FORM frm_good_cancle USING mblnr
TYPE mblnr
new_mblnr TYPE mblnr
u_date TYPE
sy-datum.
DATA: li_goodsmvt_headret
TYPE
bapi2017_gm_head_ret,
li_goodsmvt_matdocitem TYPE TABLE OF
bapi2017_gm_item_04 WITH HEADER LINE.
DATA: i_return
TYPE TABLE
OF bapiret2 WITH HEADER LINE.
CALL FUNCTION 'BAPI_GOODSMVT_CANCEL'
EXPORTING
materialdocument = mblnr
"物料凭证
matdocumentyear = u_date(4)
"年
goodsmvt_pstng_date = u_date
goodsmvt_pr_uname = sy-uname
IMPORTING
goodsmvt_headret =
li_goodsmvt_headret
TABLES
return
= i_return
goodsmvt_matdocitem = li_goodsmvt_matdocitem.
new_mblnr = li_goodsmvt_headret-mat_doc.
"新生成的凭证
LOOP AT i_return WHERE type = ‘E'.
ENDLOOP.
IF sy-subrc = 0.
ENDIF.
endform.