Write Initial values to infotypes

[Former Member]

Hi Experts,

below is the coding i am developing.....

what I would like to do is: if cell and fax1 are blank/initial values, I would like to send the blank or initial value to the infotypes. this is not happening through my code. when a record already exists in cell or fax1, it is not getting blanked out. How to send initial values to Infotype records?

wa_0006_new-num02 = cell.

wa_0006_new-com02 = 'cell'.

wa_0006_new-num03 = fax1.

wa_0006_new-com03 = 'fax1'.

ENDIF.

*********Insert Records Into Communication Email

wa_0105_new-usrty = '0010'.

wa_0105_new-usrid_long = home_email.

CALL FUNCTION 'HR_EMPLOYEE_ENQUEUE'

EXPORTING

number = w_pernr.

CALL FUNCTION 'HR_INFOTYPE_OPERATION'

EXPORTING

INFTY = '0006'

NUMBER = w_pernr

SUBTYPE = '1'

VALIDITYEND = wa_0006-endda

VALIDITYBEGIN = wa_0006-begda

RECORD = wa_0006_new

OPERATION = mode

DIALOG_MODE = '0'

IMPORTING

RETURN = it_bapi_ret.

[Former Member]

I did not find a way to send the initial values so far.

[Former Member]

hi here you need to give the usrid from the pa0105 i think.

wa_0105_new-usrid = pa0105-usrid.

regards,

venkat.