DEMO:MR8M取消发票校验凭证BAPI_INCOMINGINVOICE_CANCEL_SAP刘梦_新浪博客

​​

REPORT  zlm_mr8m.

PARAMETERS p_inv  LIKE  bapi_incinv_fld-inv_doc_no.

DATA lv_invoicedocnumber_reversal LIKE  bapi_incinv_fld-inv_doc_no.

DATA  lt_return LIKE TABLE OF  bapiret2.

CALL FUNCTION 'BAPI_INCOMINGINVOICE_CANCEL'
  EXPORTING
    invoicedocnumber                = p_inv
    fiscalyear                      = '2018'
    reasonreversal                  = '01'
*   POSTINGDATE                     =
 IMPORTING
   invoicedocnumber_reversal       = lv_invoicedocnumber_reversal
*   FISCALYEAR_REVERSAL             =
  TABLES
    return                          = lt_return.
.

READ TABLE lt_return TRANSPORTING NO FIELDS
  WITH KEY type = 'E'.

IF sy-subrc = 0.
  WRITE 'Error'.
ELSE.
  WRITE lv_invoicedocnumber_reversal.
  COMMIT WORK AND WAIT .
ENDIF.

​​