Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

The function HR_INFOTYPE_OPERATION

Former Member
0 Likes
340

Hi expert,

I try to use with the function  HR_INFOTYPE_OPERATION

according to example:

FORM INSERT_0037.

  DATA:  WA_RETURN TYPE BAPIRETURN1.
  DATA:  LV_RECORD TYPE P0037.
  CLEAR: WA_RETURN, LV_RECORD.

*  *1. Lock employee
  CALL FUNCTION 'BAPI_EMPLOYEE_ENQUEUE'
    EXPORTING
      NUMBER = <FS_PA0037>-PERNR
    IMPORTING
      RETURN = WA_RETURN.

  IF WA_RETURN-TYPE NE 'E'.
*2. create  to infotype 0037
    MOVE-CORRESPONDING <FS_PA0037> TO LV_RECORD .
    LV_RECORD-INFTY = '0037'.
    CALL FUNCTION 'HR_INFOTYPE_OPERATION'
      EXPORTING
        INFTY         = '0037'
        NUMBER        = <FS_PA0037>-PERNR
        SUBTYPE       = <FS_PA0037>-SUBTY
        VALIDITYEND   = <FS_PA0037>-ENDDA
        VALIDITYBEGIN = <FS_PA0037>-BEGDA
        RECORD        = LV_RECORD
        OPERATION     = 'INS'
        DIALOG_MODE   = '0'
      IMPORTING
        RETURN        = WA_RETURN.

    IF WA_RETURN-TYPE NE 'E'.
      COUNT_PA0037 = COUNT_PA0037 + 1.
    ENDIF.

*3. Unlock employee
    CLEAR WA_RETURN.
    CALL FUNCTION 'BAPI_EMPLOYEE_DEQUEUE'
      EXPORTING
        NUMBER = <FS_PA0037>-PERNR
      IMPORTING
        RETURN = WA_RETURN.

    CALL FUNCTION 'HR_PSBUFFER_INITIALIZE'.
  ENDIF.
ENDFORM.                    " INSERT_0037

the wa_return is return "000"

but Some data record LV_RECORD are not saved

Why some of the data in the record is not saved?
Yossi
1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
301

Hi Ami,

In the function module,

pass the value,

OPERATION     = 'INSERT'

Thanks,

Anoop S

1 REPLY 1
Read only

Former Member
0 Likes
302

Hi Ami,

In the function module,

pass the value,

OPERATION     = 'INSERT'

Thanks,

Anoop S