Code: Alles auswählen.
DATA:
gt_mail TYPE STANDARD TABLE OF bapiadsmtp,
gs_mail TYPE bapiadsmtp,
gt_mail_x TYPE STANDARD TABLE OF bapiadsmtx,
gs_mail_x TYPE bapiadsmtx,
gt_return TYPE STANDARD TABLE OF bapiret2,
gs_return TYPE bapiret2.
gs_mail-std_no = 'X'.
gs_mail-e_mail = 'test@mail.com'.
APPEND gs_mail TO gt_mail.
gs_mail_x-std_no = 'X'.
gs_mail_x-e_mail = 'X'.
gs_mail_x-updateflag = 'I'.
APPEND gs_mail_x TO gt_mail_x.
CALL FUNCTION 'BUPA_ADDRESS_CHANGE'
EXPORTING
iv_partner = '262595'
TABLES
it_adsmtp = gt_mail
it_adsmt_x = gt_mail_x
et_return = gt_return.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
LOOP AT gt_return INTO gs_return.
WRITE: / gs_return-message.
ENDLOOP.