DATA: LT_HEADER TYPE BAPI2017_GM_HEAD_01, LT_MODE TYPE BAPI2017_GM_CODE, LT_GOODSMVT_HEADRET TYPE BAPI2017_GM_HEAD_RET, LT_GOODSMVT_ITEM TYPE STANDARD TABLE OF BAPI2017_GM_ITEM_CREATE WITH HEADER LINE, LT_GOODSMVT_SERIALNUMBER TYPE STANDARD TABLE OF BAPI2017_GM_SERIALNUMBER WITH HEADER LINE, LT_RETURN TYPE STANDARD TABLE OF BAPIRET2 WITH HEADER LINE. CLEAR:LT_HEADER. LT_HEADER-PR_UNAME = SY-UNAME. "用户名 LT_HEADER-DOC_DATE = '20200125'."LV_DATE. "凭证日期 LT_HEADER-PSTNG_DATE = '20200125'."LV_DATE. "过账日期 LT_HEADER-HEADER_TXT = '111'."LV_DATE. "抬头文本 * 01：采购订单的收货 * 02：生产订单的收货 * 03：发货 * 04：转移发布 * 05：其他收货 * 06：货物移动的逆转 * 07：关于转包订单的后续调整 LT_MODE-GM_CODE = '01'. CLEAR:LT_GOODSMVT_ITEM. LT_GOODSMVT_ITEM-MATERIAL = '000000000000000111'."物料号 LT_GOODSMVT_ITEM-VENDOR = '0070001111'. "供应商编码 LT_GOODSMVT_ITEM-PO_NUMBER = '8300001111'. "采购订单 LT_GOODSMVT_ITEM-PO_ITEM = '10'. "采购订单 LT_GOODSMVT_ITEM-REF_DOC = '5005351111'. "参考凭证的凭证号 LT_GOODSMVT_ITEM-REF_DOC_IT = '1'. "参考凭证项目 LT_GOODSMVT_ITEM-ENTRY_QNT = '10'."数量 LT_GOODSMVT_ITEM-ENTRY_UOM = 'PC'."单位 LT_GOODSMVT_ITEM-PLANT = '8011'. "生产工厂 LT_GOODSMVT_ITEM-STGE_LOC = '8611'."库存类型 LT_GOODSMVT_ITEM-MOVE_TYPE = '122'."移动类型 LT_GOODSMVT_ITEM-MVT_IND = 'B'."移动标识 LT_GOODSMVT_ITEM-BATCH = 'P11'."批次 LT_GOODSMVT_ITEM-MOVE_REAS = '0001'."移动原因 APPEND LT_GOODSMVT_ITEM. CALL FUNCTION 'BAPI_GOODSMVT_CREATE' EXPORTING GOODSMVT_HEADER = LT_HEADER GOODSMVT_CODE = LT_MODE IMPORTING GOODSMVT_HEADRET = LT_GOODSMVT_HEADRET TABLES GOODSMVT_ITEM = LT_GOODSMVT_ITEM[] GOODSMVT_SERIALNUMBER = LT_GOODSMVT_SERIALNUMBER[] RETURN = LT_RETURN. IF LT_GOODSMVT_HEADRET IS NOT INITIAL. CALL FUNCTION 'BAPI_TRANSACTION_COMMIT' EXPORTING WAIT = 'X'. ELSE. CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'. ENDIF.