本文共 2277 字,大约阅读时间需要 7 分钟。
1. SE11 创建自定义表 ZPARTAPPEND
在屏幕 0001 里增加 三个 函数:
代码如下:
*&---------------------------------------------------------------------**& Module DISABLE_FIELD OUTPUT*&---------------------------------------------------------------------** text*----------------------------------------------------------------------*MODULE DISABLE_FIELD OUTPUT. IF SY-TCODE = 'MM03'. LOOP AT SCREEN. SCREEN-INPUT = '0'. MODIFY SCREEN. ENDLOOP. ENDIF.ENDMODULE. " DISABLE_FIELD OUTPUT*&---------------------------------------------------------------------**& Module GET_DATA OUTPUT*&---------------------------------------------------------------------** text*----------------------------------------------------------------------*MODULE GET_DATA OUTPUT. TABLES:ZPARTAPPEND. DATA: W_MATNR TYPE MATNR. IF SY-TCODE = 'MM02' OR SY-TCODE = 'MM03'. GET PARAMETER ID 'MAT' FIELD W_MATNR. SELECT SINGLE * FROM ZPARTAPPEND WHERE MATNR = W_MATNR. ENDIF.ENDMODULE. " GET_DATA OUTPUT*&---------------------------------------------------------------------**& Module ASSIGN_DATA INPUT*&---------------------------------------------------------------------** text*----------------------------------------------------------------------*MODULE ASSIGN_DATA INPUT. EXPORT ZPARTAPPEND TO MEMORY ID 'ZPARTAPPEND'.ENDMODULE. " ASSIGN_DATA INPUT
自定义屏幕截图如下,只使用了 ZPARTAPPEND 里的2个字段,其中字段名为: ZPARTAPPEND-F1 , ZPARTAPPEND-F2
增强代码如下:
*&---------------------------------------------------------------------**& 包括 ZXMG0U02*&---------------------------------------------------------------------*TABLES:ZPARTAPPEND.IF SY-UCOMM = 'BU' OR SY-UCOMM = 'YES'. IMPORT ZPARTAPPEND FROM MEMORY ID 'ZPARTAPPEND'. ZPARTAPPEND-MATNR = CMARA-MATNR. MODIFY ZPARTAPPEND FROM ZPARTAPPEND. ENDIF.
弹出界面后选中“21” 行 ,然后双击左边窗口的“数据屏幕”:
选中上面的“21” -- “08” ,双击“子屏幕”
然后将“21” -- “08” -- “8” 的程序名改成:“SAPLZMGD1“ , 因为ZMGD1是我们之前创建的函数组。
新增或修改物料时,这两字段可以保存到自定义创建的表ZPARTAPPEND 里 ,MM03 又可以显示出来。
作者:SAP道长
来源:CSDN 原文: 版权声明:本文为博主原创文章,转载请附上博文链接!