BAPI ACC DOCUMENT REV POST
Ejemplo para aunular contabilizacion hecha con BAPI_ACC_DOCUMENT_POST
DATA wa_reversal TYPE BAPIACREV.
wa_reversal-obj_type = wa_bkpf-awtyp. " Field from BKPF
wa_reversal-obj_key = wa_bkpf-awkey. " Field from BKPF
wa_reversal-obj_key_r = wa_bkpf-awkey. " Field from BKPF
wa_reversal-reason_rev = '04'. " The reason code is required
wa_reversal-pstng_date = sy-datum. " The posting date is optional
CALL FUNCTION 'BAPI_ACC_DOCUMENT_REV_POST'
EXPORTING
reversal = wa_reversal
bus_act = 'RFBU'
IMPORTING
obj_type = wa_obj-obj_type
obj_key = wa_obj-obj_key
obj_sys = wa_obj-obj_sys
TABLES
return = it_return.
READ TABLE it_return INTO wa_return WITH KEY type = 'E'.
IF sy-subrc = 0.
CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
ELSE.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'.
ENDIF.