BOM展开函数 其中的参数设置还是有待研究

    CALL FUNCTION 'CS_BOM_EXPL_MAT_V2'
     EXPORTING
       CAPID                       = 'PP01'
       DATUV                       = SY-DATUM
       MEHRS                       = 'X'           "BOM多层展开
       MTNRV                       = IT_MAST-MATNR
       MKTLS                       = 'X'           "需要与MEHRS配合
*       STLAN                       = '1'           "BOM用途不能设置?1.5
       WERKS                       = '1200'
*       EMENG                       = '1'           " 需求数量
*       EHNDL                       = '1'
*       MMORY                       = '1'
      TABLES
        STB                        = IT_BOM
     EXCEPTIONS
       ALT_NOT_FOUND               = 1
       CALL_INVALID                = 2
       MATERIAL_NOT_FOUND          = 3
       MISSING_AUTHORIZATION       = 4
       NO_BOM_FOUND                = 5
       NO_PLANT_DATA               = 6
       NO_SUITABLE_BOM_FOUND       = 7
       CONVERSION_ERROR            = 8
       OTHERS                      9
              .
    IF SY-SUBRC <> 0.
      MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.

    IF SY-SUBRC EQ 0.
      LOOP AT IT_BOM.
*        IT_ALV1-STUFE = IT_BOM-STUFE.
        IT_ALV1-MATNR = IT_MAST-MATNR.
*        IT_ALV1-CWERK = IT_MAST-CWERK.
        IT_ALV1-MAKTX = IT_MAST-CMAKTX.
*        IT_ALV1-WERKS = IT_BOM-WERKS.
        IT_ALV1-IDNRK = IT_BOM-IDNRK.
        IT_ALV1-MEINS = IT_BOM-MEINS.
        IT_ALV1-OJTXP = IT_BOMS-OJTXP.
        IT_ALV1-MATMK = IT_BOMS-MATMK.
*        IT_ALV1-MNGLG = IT_BOM-MNGLG.
        APPEND IT_ALV1.
      ENDLOOP.

      CLEAR:IT_BOM[]."MODIFY
    ENDIF.

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值