SAP MM01 BAID: BADI_MATERIAL_CHECK / BADI_MATERIAL_REF

最新推荐文章于 2024-07-10 17:22:19 发布

原创最新推荐文章于 2024-07-10 17:22:19 发布 · 1.1k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#MM01

SAP 同时被 2 个专栏收录

433 篇文章

订阅专栏

BADI

21 篇文章

订阅专栏

该博客介绍了如何在SAP中使用BADI (BadIs) 对MM01和MM02事务代码进行材料检查和创建材料的逻辑。通过IF_EX_BADI_MATERIAL_CHECK和IF_EX_MATERIAL_REFERENCE这两个方法，对物料编号和物料类型进行特定操作，如设置物料类别、检查净重量等。

部署运行你感兴趣的模型镜像

METHOD if_ex_badi_material_check~check_data.
  IF sy-tcode = 'MM01' OR sy-tcode = 'MM02'.
    DATA: int TYPE c LENGTH 20.
    int = wmara-matnr.
    cmara-matkl = int+0(2).
  ENDIF.
ENDMETHOD.

method IF_EX_MATERIAL_REFERENCE~CREATE_MATERIAL.
  if SY-TCODE = 'MM01' or SY-TCODE = 'MM02'.
    data: INT type C length 20.
    data: L_MATKL type MATKL.

    move-corresponding I_MARA to E_MARAU.
    INT = I_MARA-MATNR.  "物料号

    select single MATKL into L_MATKL from T023 where MATKL = INT+0(2).
    if SY-SUBRC = 0.
      E_MARAU-MATKL = INT+0(2).
    endif.
  endif.

  if SY-TCODE = 'MM01' and I_MARA-MTART <> 'ZVFG' AND I_MARA-MTART <> 'ZUFG'
    AND I_MARA-MTART <> 'ZIAG' AND I_MARA-MTART <> 'ZPCB' AND I_MARA-MTART <> 'ZLGP'.

    E_MARAU-NTGEW = 99999.    "Clear net weight
  endif.
endmethod.