SAP PP Co02 删除标记 CMOD SMOD （第二代增强）

2022年9月，新上子公司要求 CO02 标记工单删除(功能-删除标记-设置)时，如果已经领料的，需要提醒把原先领料的零件冲销掉，如果已经冲销的或者没有领料的则不提醒。

第一步：找到对应的增强

第二步：增强实现及激活。

找增强 ZBC02(SAP 增强查找程序_gavingxh的博客-CSDN博客)

找到对应的增强

因为实在设置删除标记前进行检查，所以这里 要用check set Deletion FLag

第二步：具体实现。

接上图

SE38 新建 include程序（已经新建过的，直接双击可以打开）

 先来个测试程序 ，看看是否会进来。

CMOD 新建增强

增强分配

激活

结果测试

 OK 成功了。

DATA:MSG TYPE STRING.
DATA:BEGIN OF TRESB OCCURS 0,
  RSNUM LIKE RESB-RSNUM,
  RSPOS LIKE RESB-RSPOS,
  MATNR LIKE RESB-MATNR,
  END OF TRESB.

IF ORDER_HEADER-WERKS  = '4000'. "限制指定工厂
  "检查工单里面是否含有未冲销的情况，领料未冲销不能打删除标记
  SELECT RSNUM RSPOS MATNR INTO TABLE TRESB
    FROM RESB WHERE RSNUM = ORDER_HEADER-RSNUM AND XLOEK = SPACE AND ENMNG > 0.
  IF SY-SUBRC = 0.
    MSG = '工单' && ORDER_HEADER-AUFNR && '还有领料未冲销，请先冲销！'.
    MESSAGE MSG TYPE 'E'.
  ENDIF.

ENDIF.