CO01屏幕增强页签字段

效果:

 在表AUFK中,有预留一个结构 CI_AUFK,在CI_AUFK中增加自定义的字段。

注意:该结构只支持数字和字符(不包含数量和金额,可以用NUMC之类的),否则激活会报错

CI_AUFK:

CMOD创建,

增强分配,

 我们查找生产订单相关的

 找到PPCO0012

 经过测试,在EXIT_SAPLCOKO1_001添加代码

 

附上代码

 DATA: l_fs_c(30TYPE VALUE '(SAPLCOKO1)RC27S-AKTYP_PIC'.
 DATA: l_aktyp TYPE rc27s-aktyp_pic.
 FIELD-SYMBOLS: <l_fs>.
 ASSIGN (l_fs_cTO <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

 

 

原文地址:https://www.cnblogs.com/chaguoguo/p/14103645.html