采购订单屏幕BADI增强.docxVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
采购订单屏幕BADI增强.docx

ME21N/ME22N/ME23N屏幕增强这次的屏幕增强主要用到两个BADI:?ME_GUI_PO_CUST和ME_PROCESS_PO_CUST?这两个BADI都是有例子的, 可以在se18那里按GoTo-Sample code-Display来查看, 也可以直接在SE24查看类CL_EXM_IM_ME_GUI_PO_CUST和CL_EXM_IM_ME_PROCESS_PO_CUST?现在我们对PO header加上自己的subscreen, SAP的例子提供的是对item增加subscreen.?Step 1: Create Function Group仿照Function Group?MEPOBADIEX建一个Function Group我建的Function Group如下图所示?Step 2: 在Function Group里建Screen, screen number随便在TOP里面加入对应屏幕的变量, 这里我是直接用tables.?Step 3: 给BADI ME_GUI_PO_CUST建一个implementation在Public Section里加上TYPE-POOLS?mmmfd?.??Step 4: 在Method IF_EX_ME_GUI_PO_CUST~SUBSCRIBE, 加入custom subscreen的设置代码?METHOD?if_ex_me_gui_po_cust~subscribe.????DATA:?lw_subscribers?TYPE?mepo_subscribers.????*?we?want?to?add?a?customer?subscreen?on?the?Header?tab????CHECK?im_application?=?PO.????CHECK?im_element?????=?HEADER.??????CLEAR?lw_subscribers.????lw_subscribers-name?=?subscreen1.????lw_subscribers-dynpro?=?0100.????lw_subscribers-program?=?SAPLZCI_EKKODB.????lw_subscribers-struct_name?=?CI_EKKODB.????lw_subscribers-label?=?Zero?test2.????lw_subscribers-position?=?11.????lw_subscribers-height?=?8.????APPEND?lw_subscribers?TO?re_subscribers.??ENDMETHOD.??METHOD if_ex_me_gui_po_cust~subscribe. DATA: lw_subscribers TYPE mepo_subscribers.* we want to add a customer subscreen on the Header tab CHECK im_application = PO. CHECK im_element = HEADER. CLEAR lw_subscribers. lw_subscribers-name = subscreen1. lw_subscribers-dynpro = 0100. lw_subscribers-program = SAPLZCI_EKKODB. lw_subscribers-struct_name = CI_EKKODB. lw_subscribers-label = Zero test2. lw_subscribers-position = 11. lw_subscribers-height = 8. APPEND lw_subscribers TO re_subscribers.ENDMETHOD.?Step 5: 在IF_EX_ME_GUI_PO_CUST~MAP_DYNPRO_FIELDS, 加入代码, 使field name和它的数字编号关联起来?FIELD-SYMBOLS:?mapping?LIKE?LINE?OF?ch_mapping.????LOOP?AT?ch_mapping?ASSIGNING?mapping.????CASE?mapping-fieldname.??????WHEN?LV_TEST1.?mapping-metafield?=?mmmfd_cust_01.??????WHEN?LV_TEST2.?mapping-metafield?=?mmmfd_cust_02.??????WHEN?LV_TEST3.?mapping-metafield?=?mmm

文档评论(0)

jackzjh + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档