jjzjj

SAP ABAP增强 BADI的增强全解析

SAPmatinal 2023-09-15 原文

        BADI的全称是Business Add-in,它的主要技术是基于ABAP的对象来实现增强。SAP中BADI的维护事务代码是SE18和SE19,SE18主要是创建及维护BADI对象,而SE19用于维护BADI的实例,即如何来实现BADI对象的功能。

        SAP的BADI因系统版本的差别可能会有不同,R/3中的BADI被称为Classic BADI,而到了SAP Netweaver中ABAP被升级到了7.0版本,新增了BADI Enhancement Spot对象,Classic BADI 的功能被保留,但是Classic BADI所维护的对象也可以移植到新的BADI中进行操作。SAP的BADI不但可以实现对标准功能系统的增强,也可以直接在自定义程序中进行调用。

1、自定义BADI对象的创建及维护实例

下面就开始介绍如何自定义一个BADI对象,并实现在ABAP程序中对该对象的调用,通过实例可以初步的了解BADI维护工具的具体操作及相关属性。

<1>输入事务代码SE18,进入到BADI Builder的维护界面,选择“增强点”(Enhancement Spot)的单选按钮,在输入栏中输入自定义的对象名称,这里我们以“ZBADI_TEST001”为例,如下图所示:

<2>单据工具栏中的“创建”按钮,系统将会弹出“Create Enhancement Spot”对话框,需要维护对象名称及描述,具体如下图所示:

<3>单击“确认”按钮,保存Enhancement Spot对象,进入到Enhancement Spot对象属性维护页面,选择第四个页签“增强点元素定义”,如下图所示:

 <4>单击“创建”的空白按钮,系统将会弹出“创建BADI定义”对话框,要求维护自定义BADI的名称及描述,这里我们输入“ZBADI_TEST001”,如下图:

<5>单击“确定”按钮,可以看到操作页面的列表中增加了BADI定义的对象,如下图所示:

<6>单击菜单中的“接口”节点,在屏幕的右边将会出现接口定义的维护字段,在接口字段输入自定义接口名称“ZBADI_TEST_F01”,如下图所示:

<7>将光标定位在接口字段并按下回车键,系统提示“类/接口不存在,是否要创建对象?”,如下图所示:

<8>单击“是”按钮将保存该接口对象,接下来将会进入类别制作器维护页面。在该页面的“方法”字段中维护自定义方法,这里定义名称为“PRINT”,如下图所示:

 <9>单击“类别制作器”工具栏中的“参数”按钮,进入所选方法的参数维护页面。为“PRINT”方法分别定义一个输入和一个输出参数,参数名称分别为INPUT和OUTPUT,具体如下图所示:

<10>保存并激活上述操作,返回BADI定义的页面,在BADI对象列表中选择第二个节点“实施”,在节点处单击鼠标右键,将会出现“创建BADI实施”的菜单选项,如下图所示:

 <11>将会弹出“Create Enhancement Implementation”对话框,这里新建Enhancement实例名称为“ZBADI_TEST001_IMP”,具体如下图所示:

这里所创建的“Enhancement Implementation”也可以在SE19中查看及维护。

<12>“Create Enhancement Implementation”输入完毕点“确认”之后,系统会弹出“创建BADI实施”的对话框,这里维护BADI的实施名称为“ZBADI_TEST001”,实施类的名称为“ZBADI_TEST001_CLASS”,如下图所示:

<13>确认后进入“Enhancement Implementation”维护界面,如图所示:

<14>双击实施类所对应的方法“ZBADI_TEST_F01~PRINT”,系统将会提示是否创建该实例,单击“确认”按钮后会创建一个新的实例,该方法所对应的实例维护界面如下图所示:

本例在创建接口时,为该方法建立了INPUT和OUTPUT两个参数,在程序中可以直接调用这两个参数,相关的代码如下:

  METHOD ZBADI_TEST_F01~PRINT.
    CONCATENATE '输入:' INPUT INTO OUTPUT.
  ENDMETHOD.

 <15>所创建的BADI还可以在ABAP程序中直接调用,如下面所示:

REPORT ZTEST_BADI_001.
 
DATA : BADI1 TYPE REF TO ZBADI_TEST_F01,     "参照接口对象
       BADI2 TYPE REF TO ZBADI_TEST001_CLASS."参照实施类
 
DATA : INSTR  TYPE STRING,
       OUTSTR TYPE STRING.
 
START-OF-SELECTION.
 
  CREATE OBJECT BADI2.                       "创建一个类的实例
  BADI1 = BADI2.                             "对实例赋值
  INSTR = 'Test'.
 
  CALL METHOD BADI1->PRINT                   "调用BADI所生成的类方法
    EXPORTING
      INPUT  = INSTR
    IMPORTING
      OUTPUT = OUTSTR.
  WRITE :  OUTSTR.

2、如何查找系统中的BADI

SAP中的源码,相关BADI增强都是通过方法“CL_EXITHANDLER=>GET INSTANCE”来调用的,以客户维护事务代码VD02为例,作相关步骤的讲解:

<1>在VD02的操作页面中执行主菜单中的“系统”-“状态”命令来查看该事务代码的源码程序,可以发现VD02的程序名称为“SAPMF02D”。

<2>进入到程序“SAPMF02D”的代码查看页面,单击工具栏中的“查找”按钮,输入系统调用BADI的方法的前几个字母“CL_EXIT”,如图所示:

<3>单击“确定”按钮后,显示查找的结果:

以上述结果中的某段为例,比如BADI对象为EXIT_NAME的参数“CUSTOMER_ADD_DATA”。

* Instanz setzen
  CALL METHOD CL_EXITHANDLER=>GET_INSTANCE
      exporting                                             " \TP 563352
          exit_name              = 'CUSTOMER_ADD_DATA'      " \TP 563352
          null_instance_accepted = 'X'                      " \TP 563352
      CHANGING
          INSTANCE = G_ADDITIONAL_DATA.

还有些代码是直接调用BADI中的类,该类在方法取用时为一个参数的形式,如下图所示:

遇到这类代码,可以直接双击查找的订单,查看源码所在的位置,然后双击类关联的参数,将可以看到参数的定义代码,所查找的类名称通常是以“CL_EX_”作为开头的,BADI名则截取后面的部分。以本例在销售订单中创建事务代码VA01的关联程序中找到了BADI类:if_ex_oij_el_tsw_details,则其关联的BADI对象名称为“oij_el_tsw_details”。

  STATICS: l_exit TYPE REF TO if_ex_oij_el_tsw_details.
 
  IF l_exit IS INITIAL.
    CALL METHOD cl_exithandler=>get_instance
      CHANGING
        instance = l_exit.
  ENDIF.

 所找到的BADI对象可以通过事务代码SE18来查看,以BADI:CUSTOMER_ADD_DATA为例,可以看到其对应的接口类为IF_EX_CUSTOMER_ADD_DATA,如下图所示:

 

除了通过上面的方法外,也可以通过SE80来查看增强对象,SAP的所有程序都被分配到了一个开发类,例如XD02对应的开发类就是VS,在SE80查看该开发类调用的增强,如下图所示: 

 

3、通过BADI实现客户主数据控制功能的建立

以上面找到的增强对象“CUSTOMER_ADD_DATA”为例,该BADI是在XD02中找到的,关联的业务肯定是与客户主数据的创建和维护有关系,增强实现具体如下。

<1>输入事务代码SE19,输入BADI对象名称“CUSTOMER_ADD_DATA”,如下图所示:

<2>点击“创建实施”按钮,弹出对话框,维护BADI定义的Enhancement Implementation的名称和描述,这里定义为“ZCUSTOMER_ADD_DATA”。

 <3>单击“确认”之后需要进一步维护新建BADI对象的实施对象名称及实施类,本例中定义BADI的实施对象名称为“ZCUSTOMER_ADD_DATA”,实施类名称为“ZCL_IM_ZCUSTOMER_ADD_DATA”,然后在下拉菜单中选择该BADI的实施类为“CUSTOMER_ADD_DATA”。

<4>单击“确定”按钮,进入BADI实施对象的维护页面,新建的实施类继承了原有BADI对象所对应的实施类的所有方法,如下图所示: 

 

<5>新建的BADI实施类继承了所有的方法,双击列表中某一个方法,将进入其ABAP编辑页面,可以由用户编写自定义的代码。双击实施类或者通过事务代码SE24可以查看该类所有方法的接口参数信息。

以方法“CHECK_ALL_DATA”为例,从名称上看可以获悉该方法应该适用于对客户数据的检查,查看接口参数,几乎包括了客户主数据维护的所有信息,如下图所示:

下面举例说明,在客户保存的时候,检查该客户的地址信息是否已经维护,当地址信息为空时,提示不允许保存。客户对应的地址信息数据存储在物理表KNA1-STRAS字段中,可以推断其对应的接口参数为S_KNA1-STRAS,双击“CHECK_ALL_DATA”方法,进入到ABAP维护界面,如下图所示:

 

维护代码: 

  METHOD IF_EX_CUSTOMER_ADD_DATA~CHECK_ALL_DATA.
    IF S_KNA1-STRAS IS INITIAL.
      MESSAGE E001(00) WITH '客户的地址信息不可以为空!'.
    ENDIF.
  ENDMETHOD.

保存并激活增强代码即可。

有关SAP ABAP增强 BADI的增强全解析的更多相关文章

  1. Ruby 解析字符串 - 2

    我有一个字符串input="maybe(thisis|thatwas)some((nice|ugly)(day|night)|(strange(weather|time)))"Ruby中解析该字符串的最佳方法是什么?我的意思是脚本应该能够像这样构建句子:maybethisissomeuglynightmaybethatwassomenicenightmaybethiswassomestrangetime等等,你明白了......我应该一个字符一个字符地读取字符串并构建一个带有堆栈的状态机来存储括号值以供以后计算,还是有更好的方法?也许为此目的准备了一个开箱即用的库?

  2. ruby - 解析 RDFa、微数据等的最佳方式是什么,使用统一的模式/词汇(例如 schema.org)存储和显示信息 - 2

    我主要使用Ruby来执行此操作,但到目前为止我的攻击计划如下:使用gemsrdf、rdf-rdfa和rdf-microdata或mida来解析给定任何URI的数据。我认为最好映射到像schema.org这样的统一模式,例如使用这个yaml文件,它试图描述数据词汇表和opengraph到schema.org之间的转换:#SchemaXtoschema.orgconversion#data-vocabularyDV:name:namestreet-address:streetAddressregion:addressRegionlocality:addressLocalityphoto:i

  3. ruby - 用逗号、双引号和编码解析 csv - 2

    我正在使用ruby​​1.9解析以下带有MacRoman字符的csv文件#encoding:ISO-8859-1#csv_parse.csvName,main-dialogue"Marceu","Giveittohimóhe,hiswife."我做了以下解析。require'csv'input_string=File.read("../csv_parse.rb").force_encoding("ISO-8859-1").encode("UTF-8")#=>"Name,main-dialogue\r\n\"Marceu\",\"Giveittohim\x97he,hiswife.\"\

  4. ruby-on-rails - 我更新了 ruby​​ gems,现在到处都收到解析树错误和弃用警告! - 2

    简而言之错误:NOTE:Gem::SourceIndex#add_specisdeprecated,useSpecification.add_spec.Itwillberemovedonorafter2011-11-01.Gem::SourceIndex#add_speccalledfrom/opt/local/lib/ruby/site_ruby/1.8/rubygems/source_index.rb:91./opt/local/lib/ruby/gems/1.8/gems/rails-2.3.8/lib/rails/gem_dependency.rb:275:in`==':und

  5. ruby - 用 YAML.load 解析 json 安全吗? - 2

    我正在使用ruby2.1.0我有一个json文件。例如:test.json{"item":[{"apple":1},{"banana":2}]}用YAML.load加载这个文件安全吗?YAML.load(File.read('test.json'))我正在尝试加载一个json或yaml格式的文件。 最佳答案 YAML可以加载JSONYAML.load('{"something":"test","other":4}')=>{"something"=>"test","other"=>4}JSON将无法加载YAML。JSON.load("

  6. ruby - 如何使用 Nokogiri 解析纯 HTML 表格? - 2

    我想用Nokogiri解析HTML页面。页面的一部分有一个表,它没有使用任何特定的ID。是否可以提取如下内容:Today,3,455,34Today,1,1300,3664Today,10,100000,3444,Yesterday,3454,5656,3Yesterday,3545,1000,10Yesterday,3411,36223,15来自这个HTML:TodayYesterdayQntySizeLengthLengthSizeQnty345534345456563113003664354510001010100000344434113622315

  7. python - 帮我找到合适的 ruby​​/python 解析器生成器 - 2

    我使用的第一个解析器生成器是Parse::RecDescent,它的指南/教程很棒,但它最有用的功能是它的调试工具,特别是tracing功能(通过将$RD_TRACE设置为1来激活)。我正在寻找可以帮助您调试其规则的解析器生成器。问题是,它必须用python或ruby​​编写,并且具有详细模式/跟踪模式或非常有用的调试技术。有人知道这样的解析器生成器吗?编辑:当我说调试时,我并不是指调试python或ruby​​。我指的是调试解析器生成器,查看它在每一步都在做什么,查看它正在读取的每个字符,它试图匹配的规则。希望你明白这一点。赏金编辑:要赢得赏金,请展示一个解析器生成器框架,并说明它的

  8. ruby - 如何用 Nokogiri 解析连续的标签? - 2

    我有这样的HTML代码:Label1Value1Label2Value2...我的代码不起作用。doc.css("first").eachdo|item|label=item.css("dt")value=item.css("dd")end显示所有首先标记,然后标记标签,我需要“标签:值” 最佳答案 首先,您的HTML应该有和中的元素:Label1Value1Label2Value2...但这不会改变您解析它的方式。你想找到s并遍历它们,然后在每个你可以使用next_element得到;像这样:doc=Nokogiri::HTML(

  9. ruby-on-rails - 如何在 Rails 3 中禁用 XML 解析 - 2

    我想禁用HTTP参数的自动XML解析。但我发现命令仅适用于Rails2.x,它们都不适用于3.0:config.action_controller.param_parsers.deleteMime::XML(application.rb)ActionController::Base.param_parsers.deleteMime::XMLRails3.0中的等价物是什么? 最佳答案 根据CVE-2013-0156的最新安全公告你可以将它用于Rails3.0。3.1和3.2ActionDispatch::ParamsParser::

  10. ruby-on-rails - 如何解析位于 Amazon S3 存储桶中的 CSV 文件 - 2

    下面是我用来从应用程序中解析CSV的代码,但我想解析位于AmazonS3存储桶中的文件。当推送到Heroku时它也需要工作。namespace:csvimportdodesc"ImportCSVDatatoInventory."task:wiwt=>:environmentdorequire'csv'csv_file_path=Rails.root.join('public','wiwt.csv.txt')CSV.foreach(csv_file_path)do|row|p=Wiwt.create!({:user_id=>row[0],:date_worn=>row[1],:inven

随机推荐