效果:
在表AUFK中,有预留一个结构 CI_AUFK,在CI_AUFK中增加自定义的字段。
注意:该结构只支持数字和字符(不包含数量和金额,可以用NUMC之类的),否则激活会报错
CI_AUFK:
CMOD创建,
增强分配,
我们查找生产订单相关的
找到PPCO0012
经过测试,在EXIT_SAPLCOKO1_001添加代码
附上代码
DATA: l_fs_c(30) TYPE c VALUE '(SAPLCOKO1)RC27S-AKTYP_PIC'.
DATA: l_aktyp TYPE rc27s-aktyp_pic.
FIELD-SYMBOLS: <l_fs>.
ASSIGN (l_fs_c) TO <l_fs>.
IF sy-subrc EQ 0.
l_aktyp = <l_fs>.
IF l_aktyp = 'A'.
gv_gisplay = 'X'.
ELSE.
gv_gisplay = ''.
ENDIF.
ENDIF.
MOVE-CORRESPONDING i_caufvd TO coci_aufk.
在EXIT_SAPLCOKO1_002添加代码
MOVE-CORRESPONDING coci_aufk TO e_coci_aufk.
SE51绘制屏幕,并在CMOD创建的增强项目里增加
SE51
我这里是之前已经有人做过了,这里直接贴属性
注意,在PBO里面,主要调用刚刚设置代码的出口,这里附上PBO的mudule的代码
MODULE HEADER_POSITION_FILL OUTPUT.
CAUFVD-MIMEZ = CAUFVD-GIAMG * -1.
MOVE CAUFVD TO *CAUFVD.
MOVE AFPOD TO *AFPOD.
MENGE_G = CAUFVD-GAMNG.
ENDMODULE.
MODULE INFO_TO_USERSCREEN0100 OUTPUT.
CALL FUNCTION 'EXIT_SAPLCOKO1_001'
EXPORTING
I_CAUFVD = CAUFVD
I_AFPOD = AFPOD.
ENDMODULE.
激活,CO01测试。
然后是检查LX14必填
CMOD,找到增强点PPCO0007