Hi i have wrote a BAPI code into HRPAD00INFTY - IN_UPDATE method. But there occuirs a problem. I do not receive email. But at first i used this code in apart program and it worked. My code is below. Please help. I want to receive an email ini any change of INFOTYPE 0008.
method IF_EX_HRPAD00INFTY~IN_UPDATE.
if IPSPAR-INFTY eq '0008'.
if ipspar-actio = 'INS' or ipspar-actio = 'COP' or
ipspar-actio = 'DEL' or ipspar-actio = 'MOD' or
ipspar-actio = 'INSS' or ipspar-actio = 'LIS9' .
DATA go_email TYPE REF TO cl_bcs.
DATA go_emaili_alan TYPE REF TO cl_cam_address_bcs .
DATA gt_email_metni TYPE bcsy_text.
DATA gs_email_metni LIKE LINE OF gt_email_metni.
DATA go_dokuman TYPE REF TO cl_document_bcs.
DATA gx_bcs TYPE REF TO cx_bcs.
DATA go_gonderen TYPE REF TO cl_cam_address_bcs.
TRY .
go_email = cl_bcs=>create_persistent( ).
go_emaili_alan = cl_cam_address_bcs=>create_internet_address( 'ferid.babayev@xxxxxxx.az' ).
go_email->add_recipient(
EXPORTING
i_recipient = go_emaili_alan
i_express = 'X' ) .
gs_email_metni-line = 'VOLKAN TOPGÖZEGÜM ile ilgili'.
APPEND gs_email_metni TO gt_email_metni.
gs_email_metni-line = 'Sükrü Ilker Bey''in dikkatine'.
APPEND gs_email_metni TO gt_email_metni.
gs_email_metni-line = 'Volkan TOPGÖZEGÜM tarafindan programlanan'.
APPEND gs_email_metni TO gt_email_metni.
gs_email_metni-line = 've yanlis calisan, performansi kötü'.
APPEND gs_email_metni TO gt_email_metni.
gs_email_metni-line = 'ABAP programlarimizi düzeltmenizi rica ederiz'.
APPEND gs_email_metni TO gt_email_metni.
go_dokuman = cl_document_bcs=>create_document(
i_type = 'RAW'
i_text = gt_email_metni
i_subject = 'SAGESSE DANISMANLIK' ).
go_gonderen = cl_cam_address_bcs=>create_internet_address( 'rashad.muradli@xxxxxxxk.az' ).
go_email->set_sender( i_sender = go_gonderen ).
go_email->set_document( go_dokuman ).
go_email->set_send_immediately( 'X' ).
go_email->send( ).
COMMIT WORK.
CATCH cx_bcs INTO gx_bcs.
MESSAGE gx_bcs TYPE 'E'.
ENDTRY.
endif.
endif.
endmethod.