SAP BADI example and Tutorial

 

DEFINING THE BADI

1)        execute Tcode  SE18.
2)        Specify a definition Name : ZBADI_SPFLI
3)        Press create
4)        Choose the attribute tab.  Specify short desc for badi.. and specify the type :

multiple use.
5)        Choose the interface tab
6)        Specify interface name: ZIF_EX_BADI_SPFLI and save.
7)        Dbl clk on interface name to start class builder . specify a method name (name,

level, desc).

Method                   level                                      desc
Linese;ection        instance methos                 some desc

8)        place the cursor on the method name desc its parameters to define the interface.
Parameter                       type                            refe field                        desc
I_carrid                          import                       spfli-carrid                     some
I_connid                         import                      spefi-connid                   some

9)        save , check and activate…adapter class proposed by system is

ZCL_IM_IM_LINESEL is genereated.

IMPLEMENTATION OF SAP BADI

       

1)        EXECUTE tcode se18.choose menuitem create from the implementation menubar.
2)        Specify aname for implementation ZIM_LINESEL
3)        Specify short desc.
4)        Choose interface tab. System proposes a name fo the implementation class.

ZCL_IM_IMLINESEL which is already generarted.
5)        Specify short desc for method
6)        Dbl clk on method to insert code..(check the code in “AAA”).
7)        Save , check and activate the code.

Now write a sample program to use this badi method..
Look for “BBB” sample program.

“AAA”

data : wa_flights type sflight,
it_flights type table of sflight.

format color col_heading.
write:/ ‘Flight info of:’, i_carrid, i_connid.
format color col_normal.

select * from sflight
into corresponding fields of table it_flights
where carrid = i_carrid
and  connid = i_connid.

loop at it_flights into wa_flights.
write:/ wa_flights-fldate,
wa_flights-planetype,
wa_flights-price currency wa_flights-currency,
wa_flights-seatsmax,
wa_flights-seatsocc.
endloop.

“BBB”

*&———————————————————————*
*& Report  ZBADI_TEST                                                  *
*&                                                                     *
*&———————————————————————*
*&                                                                     *
*&                                                                     *
*&———————————————————————*

REPORT  ZBADI_TEST                              .

tables: spfli.

data: wa_spfli type spfli,
it_spfli type table of spfli with key carrid connid.

*Initialise the object of the interface.
data: exit_ref type ref to ZCL_IM_IM_LINESEL,
exit_ref1 type ref to ZIF_EX_BADISPFLI1.

selection-screen begin of block b1.
select-options: s_carr for spfli-carrid.
selection-screen end of block b1.

start-of-selection.
select * from spfli into corresponding fields of table it_spfli
where carrid in s_carr.

end-of-selection.
loop at it_spfli into wa_spfli.
write:/ wa_spfli-carrid,
wa_spfli-connid,
wa_spfli-cityfrom,
wa_spfli-deptime,
wa_spfli-arrtime.

hide: wa_spfli-carrid, wa_spfli-connid.

endloop.

at line-selection.
check not wa_spfli-carrid is initial.
create object exit_ref.
exit_ref1 = exit_ref.

call method exit_ref1->lineselection
EXPORTING
i_carrid = wa_spfli-carrid
i_connid = wa_spfli-connid.

clear wa_spfli.

Screen shots for the above SAP BADI example.