topic Re: Finding BADI in Application Development and Automation Discussions

Finding BADI

Former Member — Tue, 07 Nov 2006 11:57:56 GMT

Hi Experts,

How are you?

How can I find a BADI? How can I Trace it?

Can any one explain me clearly?

Regards

Rajendra

Re: Finding BADI

Former Member — Tue, 07 Nov 2006 12:01:58 GMT

hi prasad,

Refer these threads...

Cheers

Alfred

Reward with points for helpful answers

Re: Finding BADI

Former Member — Tue, 07 Nov 2006 12:06:35 GMT

Hi Rajendra,

Just Copy & paste this code for finding BAdI's related to a given t-code.

Thanks to Kishan


TABLES : TSTC,
TADIR,
MODSAPT,
MODACT,
TRDIR,
TFDIR,
ENLFDIR,
SXS_ATTRT ,
TSTCT.

DATA : JTAB LIKE TADIR OCCURS 0 WITH HEADER LINE.
DATA : FIELD1(30).
DATA : V_DEVCLASS LIKE TADIR-DEVCLASS.

PARAMETERS : P_TCODE LIKE TSTC-TCODE,
P_PGMNA LIKE TSTC-PGMNA .




DATA wa_tadir type tadir.

START-OF-SELECTION.

IF NOT P_TCODE IS INITIAL.
SELECT SINGLE * FROM TSTC WHERE TCODE EQ P_TCODE.

ELSEIF NOT P_PGMNA IS INITIAL.
TSTC-PGMNA = P_PGMNA.
ENDIF.

IF SY-SUBRC EQ 0.
SELECT SINGLE * FROM TADIR
WHERE PGMID = 'R3TR'
AND OBJECT = 'PROG'
AND OBJ_NAME = TSTC-PGMNA.

MOVE : TADIR-DEVCLASS TO V_DEVCLASS.

IF SY-SUBRC NE 0.
SELECT SINGLE * FROM TRDIR
WHERE NAME = TSTC-PGMNA.
IF TRDIR-SUBC EQ 'F'.
SELECT SINGLE * FROM TFDIR
WHERE PNAME = TSTC-PGMNA.

SELECT SINGLE * FROM ENLFDIR
WHERE FUNCNAME = TFDIR-FUNCNAME.

SELECT SINGLE * FROM TADIR
WHERE PGMID = 'R3TR'
AND OBJECT = 'FUGR'
AND OBJ_NAME EQ ENLFDIR-AREA.

MOVE : TADIR-DEVCLASS TO V_DEVCLASS.
ENDIF.
ENDIF.

SELECT * FROM TADIR INTO TABLE JTAB
WHERE PGMID = 'R3TR'
AND OBJECT in ('SMOD', 'SXSD')
AND DEVCLASS = V_DEVCLASS.


SELECT SINGLE * FROM TSTCT
WHERE SPRSL EQ SY-LANGU
AND TCODE EQ P_TCODE.

FORMAT COLOR COL_POSITIVE INTENSIFIED OFF.
WRITE:/(19) 'Transaction Code - ',
20(20) P_TCODE,
45(50) TSTCT-TTEXT.
SKIP.
IF NOT JTAB[] IS INITIAL.
WRITE:/(105) SY-ULINE.
FORMAT COLOR COL_HEADING INTENSIFIED ON.

* Sorting the internal Table
sort jtab by OBJECT.
data : wf_txt(60) type c,
wf_smod type i ,
wf_badi type i ,
wf_object2(30) type C.
clear : wf_smod, wf_badi , wf_object2.
* Get the total SMOD.




LOOP AT JTAB into wa_tadir.
at first.
FORMAT COLOR COL_HEADING INTENSIFIED ON.

WRITE:/1 SY-VLINE,
2 'Enhancement/ Business Add-in',
41 SY-VLINE ,
42 'Description',
105 SY-VLINE.
WRITE:/(105) SY-ULINE.
endat.
clear wf_txt.
at new object.
if wa_tadir-object = 'SMOD'.
wf_object2 = 'Enhancement' .
elseif wa_tadir-object = 'SXSD'.
wf_object2 = ' Business Add-in'.

endif.
FORMAT COLOR COL_GROUP INTENSIFIED ON.

WRITE:/1 SY-VLINE,

2 wf_object2,
105 SY-VLINE.
endat.

case wa_tadir-object.
when 'SMOD'.
wf_smod = wf_smod + 1.
SELECT SINGLE MODTEXT into wf_txt
FROM MODSAPT
WHERE SPRSL = SY-LANGU
AND NAME = wa_tadir-OBJ_NAME.
FORMAT COLOR COL_NORMAL INTENSIFIED OFF.

when 'SXSD'.
* For BADis
wf_badi = wf_badi + 1 .
select single TEXT into wf_txt
from SXS_ATTRT
where sprsl = sy-langu
and EXIT_NAME = wa_tadir-OBJ_NAME.
FORMAT COLOR COL_NORMAL INTENSIFIED ON.

endcase.



WRITE:/1 SY-VLINE,
2 wa_tadir-OBJ_NAME hotspot on,
41 SY-VLINE ,
42 wf_txt,
105 SY-VLINE.
AT END OF object.
write : /(105) sy-ULINE.
ENDAT.


ENDLOOP.

WRITE:/(105) SY-ULINE.



SKIP.
FORMAT COLOR COL_TOTAL INTENSIFIED ON.
WRITE:/ 'No.of Exits:' , wf_smod.
WRITE:/ 'No.of BADis:' , wf_badi.

ELSE.
FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.
WRITE:/(105) 'No userexits or BADis exist'.
ENDIF.
ELSE.
FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.
WRITE:/(105) 'Transaction does not exist'.
ENDIF.

AT LINE-SELECTION.

data : wf_object type tadir-object.
clear wf_object.


GET CURSOR FIELD FIELD1.
CHECK FIELD1(8) EQ 'WA_TADIR'.
read table jtab with key obj_name = sy-lisel+1(20).
move jtab-object to wf_object.

case wf_object.
when 'SMOD'.
SET PARAMETER ID 'MON' FIELD SY-LISEL+1(10).

CALL TRANSACTION 'SMOD' AND SKIP FIRST SCREEN.
when 'SXSD'.
SET PARAMETER ID 'EXN' FIELD SY-LISEL+1(20).
CALL TRANSACTION 'SE18' AND SKIP FIRST SCREEN.

and for other help check this links,

http://www.allsaplinks.com/badi.html

And also download this file....

http://www.savefile.com/files.php?fid=8913854

There are other tutorials on this site...

http://sapbrain.com/Tutorials/tuto_download.html

BADI Link

http://help.sap.com/saphelp_erp2005/helpdata/en/73/7e7941601b1d09e10000000a155106/frameset.htm

http://support.sas.com/rnd/papers/sugi30/SAP.ppt

http://www.sts.tu-harburg.de/teaching/sap_r3/ABAP4/abapindx.htm

http://members.aol.com/_ht_a/skarkada/sap/

http://www.ct-software.com/reportpool_frame.htm

http://www.saphelp.com/SAP_Technical.htm

http://www.kabai.com/abaps/q.htm

http://www.guidancetech.com/people/holland/sap/abap/

http://www.planetsap.com/download_abap_programs.htm

http://help.sap.com/saphelp_nw04/helpdata/en/c8/1975cc43b111d1896f0000e8322d00/content.htm

/people/thomas.weiss/blog/2006/04/03/how-to-define-a-new-badi-within-the-enhancement-framework--part-3-of-the-series

/people/thomas.weiss/blog/2006/04/18/how-to-implement-a-badi-and-how-to-use-a-filter--part-4-of-the-series-on-the-new-enhancement-framework

Regards,

Raghav

Re: Finding BADI

anversha_s — Tue, 07 Nov 2006 12:08:06 GMT

Hi,

chk these excellent links.

http://searchsap.techtarget.com/originalContent/0,289142,sid21_gci948835,00.html

http://www.sappoint.com/abap/bapiintro.pdf#search=%22bapi%20development%20check%20list%22

http://help.sap.com/saphelp_nw04/helpdata/en/e3/cfa21850a711d395f900a0c94260a5/content.htm

regards

Anver

Re: Finding BADI

Former Member — Tue, 07 Nov 2006 12:21:08 GMT

Have a look at weblog on How to search BADIs by Alwin.

/people/alwin.vandeput2/blog/2006/04/13/how-to-search-for-badis-trace-it

It will surely help you.

Best Regards,

Vibha

*Please mark all the helpful answers

Re: Finding BADI

Former Member — Tue, 07 Nov 2006 12:51:25 GMT

hi friend,

Finding a BADI is very easy.

in order to find a badi first you should know for which transaction the badi is required . for that transaction find out the package.

for eg for tcode ME21N the package is ME

for MM01 the package is MGA. package can be find out from menu bar SYSTEM->STATUS and GOTO->ATTRIBUTES

after finding the package name

go to tcode SE18 press f4 on the field

it will display a dialog box press on INFORMATION SYSTEM BUTTON.

and give the package name and presss ENTER

it will display all the BADI related to that tcode.

after u find the related badi u have to implement the badi

in se19.

ALL THE BESST

Re: Finding BADI

Former Member — Wed, 08 Nov 2006 09:39:40 GMT

Hi,

To get BAdI that come across while you execute any functionality :

Set a breakpoint at line -

'CALL METHOD cl_exithandler=>get_class_name_by_interface'

of method 'get_instance' of class 'cl_exithandler' .

Once control comes to this point you can get the exit_name.

Reward points if it helps.

Regards,

Shikha

Re: Finding BADI

Former Member — Wed, 08 Nov 2006 13:01:40 GMT

To find BADI's & Implementation 'SE18' & 'SE19' respectively. To Trace the BADI, Go to 'se93' & enter function module name / program name into that screen & Execute it.

'Runtime Analysis - Performance File - Analyse' or 'F7' key to see performance of that BADI. I hope this would be helpful, if so, reward the points.

Regards,

Ramki.