ME32L

ME32L做隐式增强,在MM06EF0C_CHECK_LOOPTAB 的 form CHECK_LOOPTAB.开头

回车触发

DEMO

FORM CHECK_LOOPTAB USING I_BSTYP LIKE EKKO-BSTYP

                         I_REPOS LIKE EKPO-REPOS

                         I_ATTYP LIKE EKPO-ATTYP.

"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Form CHECK_LOOPTAB, Start                                                                                                                         A

*$*$-Start: (1)---------------------------------------------------------------------------------$*$*

ENHANCEMENT 1  ZENH_ME32L_ITEM_CHECK.    "active version

*当使用或通过BAPI调用TCODE:ME32L增加采购SA行项目时增加判断逻辑,根据屏幕中的物料去判断,如果屏幕中存在相同物料号且删除标识不为空时保存时报错:已存在相同物料的行项目(并给出行项目号)

    loop at pot into data(ls_pot) where matnr = ekpo-matnr and loekz = '' and ebelp ne ekpo-ebelp.

      message e001(00) with '项目' ls_pot-ebelp '物料号重复' ls_pot-matnr .

    endloop.

ENDENHANCEMENT.