abap DN STO

创建交货单有如下场景以及对应BAPI,如下:

1)根据销售订单 / 销售计划协议创建外向交货单,对应Tcode VL01N,调用BAPI_OUTB_DELIVERY_CREATE_SLS 或者 BAPI_DELIVERYPROCESSING_EXEC(REQUEST-DOCUMENT_TYPE = ‘A’ ”销售订单)

2)根据采购订单 / 采购计划协议创建内向交货单,对应Tcode VL31N,调用BAPI_DELIVERYPROCESSING_EXEC(REQUEST-DOCUMENT_TYPE = ‘B’ “采购订单)

3)根据公司间转储订单 / 采购计划协议创建外向交货单,对应Tcode VL10D,调用BAPI_OUTB_DELIVERY_CREATE_STO

4)根据公司间转储订单/ 采购计划协议的外向交货单创建内向交货单,对应外向交货单抬头的交货输出,配置输出类型SPED,对应处理程序 /SPE/STO_ID_PROCESSING 例程 STO_ID_CREATION

CLEAR SHIP_POINT.
SELECT SINGLE VSTEL INTO SHIP_POINT FROM TVSTZ WHERE WERKS = WA_HEAD-WERKS2.
IF SHIP_POINT IS INITIAL.
SHIP_POINT = WA_HEAD-WERKS2.
ENDIF.

    LOOP AT IT_SHOW INTO WA_SHOW WHERE SEL = 'X' AND BANFN = WA_HEAD-BANFN.

      CLEAR LS_ZSD_JHD_H.
      LS_ZSD_JHD_H-VBELN2     = WA_SHOW-EBELN.
      LS_ZSD_JHD_H-ZFYGS      = WA_SHOW-ZFYGS.
      LS_ZSD_JHD_H-ZFYGSCO    = WA_SHOW-ZFYGSCO.
      APPEND LS_ZSD_JHD_H TO LT_ZSD_JHD_H.

      CLEAR LS_ITEM_EXTENSION.
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值