topic Re: hi in Application Development and Automation Discussions

hi

Former Member — Wed, 18 Jul 2007 04:54:15 GMT

can anyone send me the doc for mm01 screen exit or badi

thanks

vipin

Re: hi

Former Member — Wed, 18 Jul 2007 05:04:54 GMT

Hi Vipin,

<b>Copy the sample code and execute</b> to find out the user exits for any tc.

For your case - MM01.

REPORT YMS_USEREXITSTEST no standard page heading.

tables : tstc, tadir, modsapt, modact, trdir, tfdir, enlfdir.

tables : 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 obligatory.

select single * from tstc where tcode eq p_tcode.

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.

select * from tadir into table jtab where pgmid = 'R3TR' and object =

'SMOD' 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:/(95) sy-uline.

format color col_heading intensified on.

write:/1 sy-vline,

2 'Exit Name',

21 sy-vline ,

22 'Description',

95 sy-vline.

write:/(95) sy-uline.

loop at jtab.

select single * from modsapt where sprsl = sy-langu and name =

jtab-obj_name.

format color col_normal intensified off.

write:/1 sy-vline,

2 jtab-obj_name hotspot on,

21 sy-vline ,

22 modsapt-modtext,

95 sy-vline.

endloop.

write:/(95) sy-uline.

describe table jtab.

skip.

format color col_total intensified on.

write:/ 'No of Exits:' , sy-tfill.

else.

format color col_negative intensified on.

write:/(95) 'No User Exit exists'.

endif.

else.

format color col_negative intensified on.

write:/(95) 'Transaction Code Does Not Exist'.

endif.

at line-selection.

get cursor field field1.

check field1(4) eq 'JTAB'.

set parameter id 'MON' field sy-lisel+1(10).

call transaction 'SMOD' and skip first screen.

~~-End of Program~~-

Reward points if this helps.

Manish

Re: hi

Former Member — Wed, 18 Jul 2007 05:11:50 GMT

Hi Vipin,

Check the BADI.

BADI_MAT_F_SPEC_SEL

try this badi-BADI_MATERIAL_CHECK .

Regards

Sathish

Re: hi

Former Member — Wed, 18 Jul 2007 05:17:03 GMT

Screen Exit is nothing but enhancing the screen like creating some more fields, subscreen and so on.

1. Go to the screen~~>System~~>Status-->Program (Double

click this program. It will take you to the program.

2. Now, Goto-->Object Directory Entry.

3. Make a note the package name.

4. Now run the transactions SMOD, press F4 and enter the

above noted package, press enter.

5. It will display list of Exits.

6. Now go back to the initial screen SMOD.

7. Specify the exit name here and select the radio button

Components.

8. It will display four group boxes one for FM, second

for Fcodes, thrid for Screen areas and last for

includes.

9. Goto transaction CMOD, create a new project, and

click the button "Enhancement assignments" and

specify your enhancements that you got in SMOD.

10. Now bouble clikc the enhancement, it will take you to editor with some includes starting with Z, double clikc the include you want to edit and proceed.

and you just go through these links also

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

http://wiki.ittoolbox.com/index.php/HOWTO:Implement_a_screen_exit_to_a_standard_SAP_transaction

http://www.sap-basis-abap.com/abap/how-to-find-a-screen-exit-in-a-given-sap-standard-t-code.htm

Thanks