SAP 参照sto订单创建外向交货BAPI
生活随笔
收集整理的這篇文章主要介紹了
SAP 参照sto订单创建外向交货BAPI
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
DATA: SHIP_POINT ? ? ? ?TYPE TVST-VSTEL, ? ? ? ? ? ?"裝運點/接收點
? ? ? NUM_DELIVERIES ? ?TYPE VBNUM,
? ? ? STOCK_TRANS_ITEMS LIKE BAPIDLVREFTOSTO OCCURS 0 WITH HEADER LINE,
? ? ? DELIVERIES ? ? ? ?TYPE STANDARD TABLE OF BAPISHPDELIVNUMB,
? ? ? EXTENSION_OUT ? ? TYPE STANDARD TABLE OF BAPIPAREX,
? ? ? CREATED_ITEMS ? ? LIKE BAPIDLVITEMCREATED OCCURS 0 WITH HEADER LINE ,
? ? ? SERIAL_NUMBERS ? ?LIKE BAPIDLVSERIALNUMBER OCCURS 0 WITH HEADER LINE ,
? ? ? RETURN ? ? ? ? ? ?TYPE STANDARD TABLE OF BAPIRET2,
? ? ? LF_VBELN ? ? ? ? ?TYPE VBELN_VL.
SHIP_POINT = '1000'. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?"裝運點
STOCK_TRANS_ITEMS-REF_DOC ? ?= '4500048888'. ? ? ? ?"參考憑證
STOCK_TRANS_ITEMS-REF_ITEM ? = '000010'.
STOCK_TRANS_ITEMS-DLV_QTY ? ?= 10.
STOCK_TRANS_ITEMS-SALES_UNIT = 'PCS'.
STOCK_TRANS_ITEMS-SALES_UNIT_ISO = 'PCS'.
APPEND STOCK_TRANS_ITEMS.
CALL FUNCTION 'BAPI_OUTB_DELIVERY_CREATE_STO'
? EXPORTING
? ? SHIP_POINT ? ? ? ? = SHIP_POINT
* ? DUE_DATE ? ? ? ? ? ? ? ?=
* ? DEBUG_FLG ? ? ? ? ? ? ? =
* ? NO_DEQUEUE ? ? ? ? ? ? ?= ' '
? IMPORTING
? ? DELIVERY ? ? ? ? ? ? ? ?= LF_VBELN
? ? NUM_DELIVERIES ? ? ? ? ?= NUM_DELIVERIES
? TABLES
? ? STOCK_TRANS_ITEMS ? ? ? = STOCK_TRANS_ITEMS
? ? SERIAL_NUMBERS ? ? ? ? ?= SERIAL_NUMBERS
? ? DELIVERIES ? ? ? ? ? ? ?= DELIVERIES
? ? CREATED_ITEMS ? ? ? ? ? = CREATED_ITEMS
? ? EXTENSION_OUT ? ? ? ? ? = EXTENSION_OUT
? ? RETURN ? ? ? ? ? ? ? ? ?= RETURN.
? ? ? ? ? .
IF NOT LF_VBELN IS INITIAL.
? CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
? ? EXPORTING
? ? ? WAIT = 'X'.
ENDIF.
? ? ? NUM_DELIVERIES ? ?TYPE VBNUM,
? ? ? STOCK_TRANS_ITEMS LIKE BAPIDLVREFTOSTO OCCURS 0 WITH HEADER LINE,
? ? ? DELIVERIES ? ? ? ?TYPE STANDARD TABLE OF BAPISHPDELIVNUMB,
? ? ? EXTENSION_OUT ? ? TYPE STANDARD TABLE OF BAPIPAREX,
? ? ? CREATED_ITEMS ? ? LIKE BAPIDLVITEMCREATED OCCURS 0 WITH HEADER LINE ,
? ? ? SERIAL_NUMBERS ? ?LIKE BAPIDLVSERIALNUMBER OCCURS 0 WITH HEADER LINE ,
? ? ? RETURN ? ? ? ? ? ?TYPE STANDARD TABLE OF BAPIRET2,
? ? ? LF_VBELN ? ? ? ? ?TYPE VBELN_VL.
SHIP_POINT = '1000'. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?"裝運點
STOCK_TRANS_ITEMS-REF_DOC ? ?= '4500048888'. ? ? ? ?"參考憑證
STOCK_TRANS_ITEMS-REF_ITEM ? = '000010'.
STOCK_TRANS_ITEMS-DLV_QTY ? ?= 10.
STOCK_TRANS_ITEMS-SALES_UNIT = 'PCS'.
STOCK_TRANS_ITEMS-SALES_UNIT_ISO = 'PCS'.
APPEND STOCK_TRANS_ITEMS.
CALL FUNCTION 'BAPI_OUTB_DELIVERY_CREATE_STO'
? EXPORTING
? ? SHIP_POINT ? ? ? ? = SHIP_POINT
* ? DUE_DATE ? ? ? ? ? ? ? ?=
* ? DEBUG_FLG ? ? ? ? ? ? ? =
* ? NO_DEQUEUE ? ? ? ? ? ? ?= ' '
? IMPORTING
? ? DELIVERY ? ? ? ? ? ? ? ?= LF_VBELN
? ? NUM_DELIVERIES ? ? ? ? ?= NUM_DELIVERIES
? TABLES
? ? STOCK_TRANS_ITEMS ? ? ? = STOCK_TRANS_ITEMS
? ? SERIAL_NUMBERS ? ? ? ? ?= SERIAL_NUMBERS
? ? DELIVERIES ? ? ? ? ? ? ?= DELIVERIES
? ? CREATED_ITEMS ? ? ? ? ? = CREATED_ITEMS
? ? EXTENSION_OUT ? ? ? ? ? = EXTENSION_OUT
? ? RETURN ? ? ? ? ? ? ? ? ?= RETURN.
? ? ? ? ? .
IF NOT LF_VBELN IS INITIAL.
? CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
? ? EXPORTING
? ? ? WAIT = 'X'.
ENDIF.
總結
以上是生活随笔為你收集整理的SAP 参照sto订单创建外向交货BAPI的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 实例:ABAP权限对象设计与权限检查的实
- 下一篇: LSMW批处理使用方法(01)_总述及界