VF11 reverse invoice

Note

If the invoice has been posted, vf02 also needs to post the offset invoice

 

demo

DATA:

LS_RETURN LIKE BAPIRETURN1,

LS_SUCCESS LIKE BAPIVBRKSUCCESS,

L_BILL_DOC LIKE BAPIVBRKSUCCESS-BILL_DOC.

 

DATA:

LT_RETURN LIKE TABLE OF BAPIRETURN1,

LT_SUCCESS LIKE TABLE OF BAPIVBRKSUCCESS.

 

CLEAR: L_BILL_DOC.

L_BILL_DOC = US_HEAD-ZZVBNF. "Invoice Document

 

*--- Cancel invoice

CALL FUNCTION 'BAPI_BILLINGDOC_CANCEL1'

EXPORTING

BILLINGDOCUMENT = L_BILL_DOC

TABLES

RETURN = LT_RETURN

SUCCESS = LT_SUCCESS.

READ TABLE LT_RETURN INTO LS_RETURN

WITH KEY TYPE = 'E'.

IF SY-SUBRC <> 0.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'

EXPORTING

WAIT = 'X'.

 

ELSE.

CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK' .

 

ENDIF.