Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

userexit

Former Member
0 Likes
519

Hi all,

I'm completely unaware of user-exits . I'm given a requirement. Please help me in this right from scratch...

Requirements:

User exist must be activated in the SAP externsion concept. The name of the extension is M61X0001.

Process:

1. With the help of above user exit key for MRP Planning, The materials that has MRP type VB and with fixed lot size materials should be planned and displayed.

2. Apart from above the material should be an externally procured material.

Tables to be used: Table and structure is defined in the Enhancements.

Description field name table

1.MRP type DISMM MARC

2.Fixed lot size BSTFE MARC

3.Procurement type BESKG MARC

transaction

mdbt & md01.

Thanks in advace,

Regards,

subbu.

Hi all,

I'm completely unaware of user-exits . I'm given a requirement. Please help me in this right from scratch...

Requirements:

User exist must be activated in the SAP externsion concept. The name of the extension is M61X0001.

Process:

1. With the help of above user exit key for MRP Planning, The materials that has MRP type VB and with fixed lot size materials should be planned and displayed.

2. Apart from above the material should be an externally procured material.

Tables to be used: Table and structure is defined in the Enhancements.

Description field name table

1.MRP type DISMM MARC

2.Fixed lot size BSTFE MARC

3.Procurement type BESKG MARC

transaction

mdbt & md01.

Thanks in advace,

Regards,

subbu.

2 REPLIES 2
Read only

Former Member
0 Likes
486

Hi,

The following trial may help you;

User exits :

1. Introduction

2. How to find user exits

3. Using Project management of SAP Enhancements

1. Introduction:

User exits (Function module exits) are exits developed by SAP. The exit is implementerd as a call to a functionmodule. The code for the function module is writeen by the developer. You are not writing the code directly in the function module, but in the include that is implemented in the function module.

The naming standard of function modules for functionmodule exits is:

EXIT_<program name><3 digit suffix>

The call to a functionmodule exit is implemented as:

CALL CUSTOMER.-FUNCTION ❤️ digit suffix>

Example:

The program for transaction VA01 Create salesorder is SAPMV45A

If you search for CALL CUSTOMER-FUNCTION i program

SAPMV45A you will find ( Among other user exits):

CALL CUSTOMER-FUNCTION '003'

exporting

xvbak = vbak

xvbuk = vbuk

xkomk = tkomk

importing

lvf_subrc = lvf_subrc

tables

xvbfa = xvbfa

xvbap = xvbap

xvbup = xvbup.

The exit calls function module EXIT_SAPMV45A_003

2. How to find user exits?

Display the program where you are searching for and exit and search for CALL CUSTOMER-EXIT

If you know the Exit name, go to transaction CMOD.

Choose menu Utillities->SAP Enhancements. Enter the exit name and press enter.

You will now come to a screen that shows the function module exits for the exit.

3. Using Project management of SAP Enhancements, we want to create a project to enahance trasnaction VA01 .

- Go to transaction CMOD

- Create a project called ZVA01

- Choose the Enhancement assign radio button and press the Change button

In the first column enter V45A0002 Predefine sold-to party in sales document.

Note that an enhancement can only be used in 1 project. If the enhancement is already in use, and error message will be displayed

Press Save

Press Components. You can now see that enhancement uses user exit EXIT_SAPMV45A_002. Double click on the exit.

Now the function module is displayed. Double click on include ZXVVAU04 in the function module

Insert the following code into the include: E_KUNNR = '2155'.

Activate the include program. Go back to CMOD and activate the project.

Goto transaction VA01 and craete a salesorder.

Note that Sold-to-party now automatically is "2155"

Pls reward points if useful.

Regards,

Renjith Michael.

Read only

0 Likes
486

REPORT ZM_USER_EXIT.

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.

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 - ', "#EC NOTEXT

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', "#EC NOTEXT

21 sy-vline ,

22 'Description', "#EC NOTEXT

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. "#EC NOTEXT

else.

format color col_negative intensified on.

write:/(95) 'No User Exit exists'. "#EC NOTEXT

endif.

else.

format color col_negative intensified on.

write:/(95) 'Transaction Code Does Not Exist'. "#EC NOTEXT

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.

Just copy above code, save, activate and

Run program with Tcode for which you want to find user exit