cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Infotype 1001 org assignment fills up with special character.

former_member300568
Participant
0 Likes
630

Hi All,

Hi All i am using the below FM to update hrp1001. Calling it twice to update A008 and B008.

A008 is the holder relationship

B008 is the opposite

A008 = person's older position

Where B008 would = the position is held by the person.

But when i see the overview in transaction "P013d" , i see ("???") in place of abbr

ls_relation-mandt = sy-mandt.
  ls_relation-plvar = '01'.
  ls_relation-otype = 'S'.
  ls_relation-objid = <wa_p0001>-plans.
  ls_relation-infty = '1001'.
  ls_relation-istat = '1'.
  ls_relation-rsign = 'A'.
  ls_relation-relat = '008'.
  ls_relation-begda = lv_begda.
  ls_relation-endda = lv_endda.
  ls_relation-sclas = 'P'.
  ls_relation-sobid =  employeenumber.
  APPEND ls_relation TO lt_relation.
CALL FUNCTION 'RH_INSERT_INFTY'
    EXPORTING
      vtask               = 'D'
    TABLES
      innnn               = lt_relation
    EXCEPTIONS
      no_authorization    = 1
      error_during_insert = 2
      repid_form_initial  = 3
      corr_exit           = 4
      begda_greater_endda = 5
      OTHERS              = 6.

Sy-subrc = 0, no errors.

Accepted Solutions (0)

Answers (1)

Answers (1)

former_member300568
Participant
0 Likes

Hi @Quynh Doan Manh thanks,

So now i have to delimit the pernr in the old position and also create holder in the new position. I use the below funtion module to send my data to delimit . Should i pass only 'A008' or A008 and B008 to delimit the old position?

I have to create new position also.

'RH_CUT_INFTY'
 CLEAR ls_relation.
    REFRESH : lt_relation.
    ls_relation-mandt = sy-mandt.
    ls_relation-plvar = '01'.
    ls_relation-otype = 'S'.
    ls_relation-objid = wa_p1001_delimit-objid.
    ls_relation-infty = '1001'.
    ls_relation-istat = '1'.
    ls_relation-rsign = 'A'.
    ls_relation-relat = '008'.
    ls_relation-begda =  lv_begda.
    ls_relation-endda = wa_pa0001_new-begda - 1.
    ls_relation-sclas = 'P'.
    ls_relation-sobid =  employeenumber.

APPEND  ls_relation TO lt_relation.
  CALL FUNCTION 'RH_CUT_INFTY'
      EXPORTING
        GDATE              = ls_relation-endda
        HISTO              = ' '
        VTASK              = 'D'
      TABLES
        INNNN              = lt_relation
      EXCEPTIONS
        ERROR_DURING_CUT   = 1
        NO_AUTHORIZATION   = 2
        GDATE_BEFORE_BEGDA = 3
        CUT_OF_TIMCO_ONE   = 4
        CORR_EXIT          = 5
        OTHERS             = 6.
   IF SY-SUBRC <> 0.
* Implement suitable error handling here
    ENDIF.
endloop.