- 147
- 0
- 约5.98千字
- 约 9页
- 2018-01-01 发布于河南
- 举报
SAP生产工单更改(CO02)记录详细教程
SAP生产工单更改(CO02)记录详细教程
SAP生产工单更改(CO02)记录详细教程
===========================================================
SAP生产工单更改(CO02)记录详细教程
In SAP system, it has not prodution orders change record. it is very pity! how to solve it? you can use below ways :
需求:SAP在更改生产工单时并没有提供详细的更改记录,查看SAP的Notes,如果强行开启FLG_DOC(控制往更改记录CDHDR,CDPOS里写数据)标记,在批量处理组件过多的生产工单时会导致程序运行出错,SAP建议不开启。User要求对保护字段进行更改记录,无奈只有使用SAP提供的增强功能,东西经过测试初步完成,发出来共享一下,如果大家有更好的方法,发出来讨论讨论,步骤如下:
1.CMOD新增一项目ZCO02,增加增强PPCO0001。
2.查看、Debug SAP源代码,了解数据流向,主要了解在变更工单组件和表头未保存前这些数据存放在哪里?最后查到这两数据放在调用出口函数参数表:component_table,header_table。
3.设计数据表结构:ZPCO02,记录更改,结构如下:
MANDT MANDT CLNT 3
AUFNR AUFNR CHAR 12
MATNR MATNR CHAR 18
FILED FIELDNAME CHAR 30
AENAM AENAM CHAR 12
LAEDA LAEDA DATS 8
TCODE TCODE CHAR 20
CHNID CDCHNGIND CHAR 1
HOSTIP CHAR20 CHAR 20
HOST MSHOST2 CHAR 32
VALUE_OLD CHAR20 CHAR 20
VALUE_NEW CHAR20 CHAR 20
TIMES CDUZEIT TIMS 6
4.在EXIT_SAPLCOBT_001的ZXCO1U01写入代码,component_table中的数据跟RESB中的相应保护字段值对比,得出组件更改记录,表头更改记录由header_table与视图CAUFV对比而来。对于因工单总数更改导至组件数量更改的记录可以写一程序从ZPCO02里分开,开放给用户使用,其他一些更改情况请自行研究。代码如下:
-----------------------------------------------------------------------------------------------------------------
代码通过了User测试更正已传至生产系统,改善了保存时的速度,不用拿更改后的工单组件与RESB里的一个个对比了。
*---------------------------------------------------------------------*
* 包括 ZXCO1U01 *
*---------------------------------------------------------------------*
TABLES:caufv,resb.
DATA: BEGIN OF old_resb OCCURS 0, 更改后未保存之RESB.
aufnr LIKE resb-aufnr,
posnr LIKE resb-posnr,
matnr LIKE resb-matnr,
rsnum LIKE resb-rsnum,
rspos LIKE resb-rspos,
xloek LIKE resb-xloek,
bdmng LIKE resb-bdmng,
objnr LIKE resb-objnr,
END OF old_resb.
DATA: BEGIN OF new_resb OCCURS 0. 数据库中的RESB.
INCLUDE STRUCTURE old_resb.
DATA: END OF new_resb.
DATA: BEGIN OF obj_resb OCCURS 0. 插入的RESB
INCLUDE STRUCTURE old_resb.
DATA: END OF obj_resb.
DATA: i_zpco02 LIKE zpco02 OCCURS 0 WITH HEADER LINE.
DATA: i_temp LIKE zpco02 OCCURS 0 WITH HEADER LINE.
DATA: iporg LIKE msxxlist-hostadr,
ipdec(16) TYPE c,
原创力文档

文档评论(0)