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”为例,如下图所示:
SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

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

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

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

SAP ABAP增强 BADI的增强全解析

本例在创建接口时,为该方法建立了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.

SAP ABAP增强 BADI的增强全解析

2、如何查找系统中的BADI

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

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

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

SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

以上述结果中的某段为例,比如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中的类,该类在方法取用时为一个参数的形式,如下图所示:

SAP ABAP增强 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,如下图所示:

SAP ABAP增强 BADI的增强全解析

 SAP ABAP增强 BADI的增强全解析

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

 SAP ABAP增强 BADI的增强全解析

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

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

<1>输入事务代码SE19,输入BADI对象名称“CUSTOMER_ADD_DATA”,如下图所示:
SAP ABAP增强 BADI的增强全解析

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

SAP ABAP增强 BADI的增强全解析

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

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

 SAP ABAP增强 BADI的增强全解析

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

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

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

SAP ABAP增强 BADI的增强全解析 

维护代码: 

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

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

发表回复