自开发程序里使用Badi小结

 report ztest.

* for BADI,must define one instance variable for BADI interface
DATA: g_badi_name TYPE REF TO ZIF_EX_GET_MATERIAL_DESC.


data:begin of it_mara occurs 0,
       matnr like mara-matnr,
       maktx like makt-maktx,
     end   of it_mara.


START-OF-SELECTION.


  SELECT  matnr
  into table it_mara
  up to 100 rows
  from mara.

*& get the BADI Insatance
  Call METHOD cl_exithandler=>get_instance
    CHANGING
      instance = g_badi_name.


  LOOP AT it_mara .

    CALL METHOD g_badi_name->GET_MATERIAL_DESC
      EXPORTING
        matnr = it_mara-matnr
      RECEIVING
        maktx = it_mara-maktx.

    WRITE:/2 it_mara-matnr,
           20 it_mara-maktx.

  ENDLOOP.

 

NOTE:不能通过se18-badi name 创建badi definition,而是通过Utilities-create classic badi