sapbadi屏幕增强实例mbmigobadi

《sapbadi屏幕增强实例mbmigobadi》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、以下根据系统实例做的最终效果：1、SE11建立数据表，主要是用于存放附加的数据；MANDTMANDTCLNT30客户端MBLNRMBLNRCHAR100物料凭证编号MJAHRMJAHRNUMC40物料凭证年度ZEILEMBLPONUMC40物料凭证中的项目BADI_ERFMGERFMGQUAN133以输入单位计的数量BADI_ERFMEERFMEUNIT30条目单位2、建立结构，在屏幕数据交换时使用1、建立表类型设置关键字段：1、SE80建立函数组创建屏幕1000，设计格式，插入附加字段创建function:ZJIM_BADI_EXAMPLE_GET_DATA*

2、"----------------------------------------------------------------------*"*"Local interface:*"  EXPORTING*"     REFERENCE(ES_MIGO_BADI_SCREEN_FIELDS) TYPE*"        ZJIM_BADI_EXAMPLE_SCREEN_FIELD*"----------------------------------------------------------------------* Get all data from

3、 fields of external screen* First move all customer-fields  MOVE-CORRESPONDING zjim_badi_exampl TO es_migo_badi_screen_fields.* Second move all GOITEM-fields (displayed on external screen)function:ZJIM_BADI_EXAMPLE_PUT_DATA*"-----------------------------------------------------------

4、-----------*"*"Local interface:*"  IMPORTING*"     REFERENCE(IS_MIGO_BADI_SCREEN_FIELDS) TYPE*"        ZJIM_BADI_EXAMPLE_SCREEN_FIELD*"----------------------------------------------------------------------* Put all data from fields to external screen* First fill all customer-fields  

5、MOVE-CORRESPONDING is_migo_badi_screen_fields TO ZJIM_badi_exampl.* second fill all GOITEM-fields (displayed on external screen)function:ZJIM_BADI_EXAMPLE_UPDATE_DATA*"----------------------------------------------------------------------*"*"Update function module:*"*"*"Local interfa

6、ce:*"  TABLES*"      IT_MIGO_BADI_EXAMPLE STRUCTURE  ZJIM_BADI_EXAMPL*"----------------------------------------------------------------------* Databse update:  INSERT zjim_BADI_EXAMPL FROM TABLE IT_MIGO_BADI_EXAMPLE.  IF sy-subrc <> 0.    MESSAGE a398(00) WITH 'Error update MIGO_BADI

7、_EXAMPL'.  ENDIF.INCLUDE:LZJIM_BADI001TOPTABLES : Zjim_badi_exampl.到这里增强的准备工作就做完了，下面开始创建实现：1、SE19创建实现2、创建执行类ZCL_IM_JIM_MIGO_BADI，激活ZJIM_MIGO_BADI双击类维护类属性GT_EXTDATA用于数据交换，类型为ZJIM_TY_T_EXTDATA表类型，1、激活以下方法并维护：method IF_EX_MB_MIGO_BADI~INIT.* Regristration of BAdI-Implementation:* Append

8、 class attri