创建交单-BAPI_OUTB_DELIVERY_CREATE_STO

    DATA: lt_items TYPE STANDARD TABLE OF bapidlvreftosto,
          lt_deli  TYPE STANDARD TABLE OF bapishpdelivnumb,
          lt_ret   TYPE STANDARD TABLE OF bapiret2.
    DATA: lv_vbeln TYPE	bapishpdelivnumb-deliv_numb,
          lv_num   TYPE bapidlvcreateheader-num_deliveries.

    CALL FUNCTION 'BAPI_OUTB_DELIVERY_CREATE_STO'
      IMPORTING
        delivery          = lv_vbeln
        num_deliveries    = lv_num
      TABLES
        stock_trans_items = lt_items
        deliveries        = lt_deli
        return            = lt_ret.

    READ TABLE lt_ret TRANSPORTING NO FIELDS WITH KEY type = 'E'.
    IF sy-subrc = 0.
      CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
    ELSE.
      CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
        EXPORTING
          wait = abap_true.
    ENDIF.

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值