创建带有订单参考的外向交货：BAPI…

测试bapi必须也要找前台能跑通的数据，不然，如果是数据本事问题，再怎么调都不会通

前台：VL01N   （或者在订单修改VA02中创建交货）

VL01N

我自己更喜欢va02里创建

然后看看抬头数据啥的

至于bapi，很简单

PARAMETERS  P_SOD    TYPE  CHAR10 .

*---Bapi  Data  Define
DATA :DELIVERY                     TYPE  BAPISHPDELIVNUMB -DELIV_NUMB ,
            NUM_DELIVERIES             TYPE  BAPIDLVCREATEHEADER -NUM_DELIVERIES ,
            SALES_ORDER_ITEMS          LIKE  BAPIDLVREFTOSALESORDER  OCCURS  0  WITH  HEADER  LINE ,
            RETURN                           LIKE  BAPIRET2                              OCCURS  0  WITH  HEADER  LINE  .

START-OF-SELECTION .
*---Assign  Value
    SALES_ORDER_ITEMS -REF_DOC       =  P_SOD .                                        "参考订单号
    SALES_ORDER_ITEMS -REF_ITEM     =  '000010' .                                  "行项目号
    SALES_ORDER_ITEMS -DLV_QTY       =  18                             "数量
    SALES_ORDER_ITEMS -SALES_UNIT  =  'TO' .                         "单位
    APPEND  SALES_ORDER_ITEMS .

*---Call  BAPI  Function
    CALL  FUNCTION  'BAPI_OUTB_DELIVERY_CREATE_SLS'
        IMPORTING
            DELIVERY                    =  DELIVERY
            NUM_DELIVERIES        =  NUM_DELIVERIES
        TABLES
            SALES_ORDER_ITEMS  =  SALES_ORDER_ITEMS
            RETURN                        =  RETURN .

    CALL  FUNCTION  'BAPI_TRANSACTION_COMMIT'
        EXPORTING
            WAIT  =  'X' .