Updating P1007 vacancy with RH_UPDATE_INFTY

I am trying to update the vacancy in HRP1007 with function module rh_update_infty.  I am getting 'Error during update' exception. No sure what I am missing. Can anyone help me with this? I've already created the relationship, which works fine, but when I try to fill the vacancy it doesn't work.

wa_p1007-objid  = '50001915'.
wa_p1007-plvar  = '01'.
wa_p1007-otype  = 'S'.
wa_p1007-infty  = '1007'.
wa_p1007-begda  = '20141030'.
wa_p1007-endda  = '99991231'.
wa_p1007-mandt  = sy-mandt.
wa_p1007-istat  = '1'.
wa_p1007-status = '2'.
wa_p1007-vacan  = 'X'.
wa_p1007-histo  = 'X'.

APPEND wa_p1007 TO it_p1007.

CALL FUNCTION 'RH_UPDATE_INFTY'
   EXPORTING
     vtask               = 'D'
   TABLES
     innnn               = it_p1007
*   ILFCODE             =
   EXCEPTIONS
     error_during_update = 1
     no_authorization    = 2
     repid_form_initial  = 3
     corr_exit           = 4
     OTHERS              = 5.

IF sy-subrc <> 0.
   WRITE: / 'Error updating Vacancy'.
ELSE.
   WRITE: / 'Seemed to work'.
ENDIF.