CO01屏幕增强页签字段

效果：

 

 在表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