MM01创建物料主数据屏幕增强

业务场景：MM01/MM02/MM03操作物料主数据时，在基本数据1视图中新增两个字段：旧物料号、基本单位。

1、创建增强2个字段所需的子屏幕
OMT3C（spro->Logistics-General -> Material Master -> Configuring the material master and execute ‘Create Program for Customized subscreen）

2、新建函数组，最好命名ZMGD1，表示这是copy标准程序MGD1用来增强的，这里是测试案例命名无所谓了。


3、SE80打开函数组YMM_FG，画2组元素zmara_old-bismt,zmara_old-meins，参考数据字典打勾


4、0001屏幕程序流

1. PROCESS BEFORE OUTPUT.
   
2. *                      Verarbeitung vor der Ausgabe
   
3.   MODULE disable_fields.
   
4.   MODULE get_data.
   
5. 
   
6. PROCESS AFTER INPUT.
   
7. *                      Verarbeitung nach der Eingabe
   
8.   MODULE assign_data.

复制代码

1. *----------------------------------------------------------------------*
   
2. ***INCLUDE LYMM_FGO01.
   
3. *----------------------------------------------------------------------*
   
4. *&---------------------------------------------------------------------*
   
5. *&      Module  DISABLE_FIELDS  OUTPUT
   
6. *&---------------------------------------------------------------------*
   
7. *       text
   
8. *----------------------------------------------------------------------*
   
9. MODULE disable_fields OUTPUT.
   
10.   IF sy-tcode = 'MM03'.
    
11.     LOOP AT SCREEN.
    
12.       screen-input = '0'.
    
13.       MODIFY SCREEN .
    
14.     ENDLOOP.
    
15.   ENDIF.
    
16. ENDMODULE.                 " DISABLE_FIELDS  OUTPUT
    
17. *&---------------------------------------------------------------------*
    
18. *&      Module  GET_DATA  OUTPUT
    
19. *&---------------------------------------------------------------------*
    
20. *       text
    
21. *----------------------------------------------------------------------*
    
22. MODULE get_data OUTPUT.
    
23.   IF sy-tcode = 'MM03' OR sy-tcode = 'MM02'.
    
24.     GET PARAMETER ID w_mat FIELD w_matnr.
    
25.     SELECT SINGLE bismt meins
    
26.       INTO (zmara_old-bismt,zmara_old-meins)
    
27.       FROM zmara_old
    
28.       WHERE matnr = w_matnr.
    
29.   ENDIF.
    
30. ENDMODULE.                 " GET_DATA  OUTPUT

复制代码

1. *----------------------------------------------------------------------*
   
2. ***INCLUDE LYMM_FGI01.
   
3. *----------------------------------------------------------------------*
   
4. *&---------------------------------------------------------------------*
   
5. *&      Module  ASSIGN_DATA  INPUT
   
6. *&---------------------------------------------------------------------*
   
7. *       text
   
8. *----------------------------------------------------------------------*
   
9. MODULE assign_data INPUT.
   
10.   EXPORT zmara_old TO MEMORY ID 'zmara_old'.
    
11. ENDMODULE.                 " ASSIGN_DATA  INPUT

复制代码

LYMM_FGTOP中定义全局变量

1. FUNCTION-POOL ymm_fg
   
2.                    MESSAGE-ID m3.
   
3. 
   
4. INCLUDE mmmgtrbb.
   
5. INCLUDE mmmgbbau.
   
6. * Retail-Spezifische Deklarationen
   
7. INCLUDE mmmwtrbb.
   
8. INCLUDE mmmwbbau.
   
9. *---------------------------------
   
10. INCLUDE wstr_definition. "Holds BADI global definition
    
11. 
    
12. DATA:w_matnr TYPE mara-matnr.
    
13. DATA:w_mat TYPE tpara-paramid.
    
14. TABLES:zmara_old.

复制代码

5、后台将自建的屏幕维护到标准MM01屏幕中
OMT3B（spro -> Logistics-General -> Material Master -> Configuring the material master and execute  ‘Define Structure of Data Screens for Each Screen Sequence’）

选中右侧一条数据，双击左侧data screen

选中右侧Basic Data 1数据，双击左侧Subscreens

选择21->07->08，将刚才新建的函数池SAPLYMM_FG维护到program中，保存。为什么选择21->07->08?

游客，如果您要查看本帖隐藏内容请回复

6、找到mm01保存的增强出口se37：EXIT_SAPLMGMU_001
二代增强查找方法：浅谈随着sap的发展而演化出的几代增强
双击INCLUDE ZXMG0U02.新建include

1. TABLES:zmara_old.
   
2. IF sy-ucomm = 'BU'.
   
3.   IMPORT zmara_old FROM MEMORY ID 'ZMARA_OLD'.
   
4.   MOVE cmara-matnr TO zmara_old-matnr.
   
5.   MODIFY zmara_old FROM zmara_old.
   
6. ENDIF.

复制代码

7、MM01测试效果

学习了，谢谢分享

感謝無私分享，學習了!!

进来看看！！！

学习了，谢谢分享

学习一下，，，，

学习学习，楼主棒棒哒

楼主你的QQ方便透漏吗？有不明白的地方咨询一下

sunshch 发表于 2015-7-7 14:18
楼主你的QQ方便透漏吗？有不明白的地方咨询一下

上班不能上qq的，以后我来建的个吧

好贴
学习学习，楼主棒棒哒

想问下楼主选21的原因，可以选别的吗

为什么  为什么 学习中。。

支持楼主，支持SAP顾问圈，以后经常来！

真是难得给力的好资源啊，SAP顾问圈真是给力。

谢谢分享。。。不够完善，补充参考：http://blog.csdn.net/heng0757/article/details/8067645

支持sap顾问圈，顶顶顶

值得学习，很不错

學習下哈哈，day day up

新手，学习了

跟着做一下，可以，挺久不弄屏幕，画个屏幕还花了点时间