DATA: goodsmvt_header LIKE bapi2017_gm_head_01,
itab TYPE TABLE OF bapi2017_gm_item_create WITH
HEADER LINE,
return LIKE TABLE OF bapiret2 WITH HEADER LINE,
mat_doc LIKE bapi2017_gm_head_ret-mat_doc.
CLEAR:goodsmvt_header.
goodsmvt_header-doc_date = sy-datum. "凭证中的凭证日期
goodsmvt_header-pstng_date = sy-datum. "凭证中的过帐日期
goodsmvt_header-pr_uname = sy-uname. "用户名
LOOP AT gt_vbeln ASSIGNING FIELD-SYMBOL(<lfs_vbeln>).
CLEAR:itab,itab[].
LOOP AT gt_alv ASSIGNING FIELD-SYMBOL(<lfs_alv>) WHERE vbeln =
<lfs_vbeln>-vbeln.
CLEAR:mat_doc,itab,return.
itab-material = <lfs_alv>-matnr . "article物料号
itab-material_external = <lfs_alv>-matnr. "物料号
itab-move_mat_external = <lfs_alv>-matnr. "物料号