User exit for selection screen of Tcode VL31N, VL32N

Dear Experts,
I want to modify selection screen of tcode VL31N, VL32N. Please help me to send user exit Tcode VL31N, VL32N.
Thanks and regards,
DucTV1.

Hi Patrik,
The ALV report is generating from a query AQZZ/SAPQUERY/MEMEVL31========, in which the field catalogue of the ALV is coming from normal list dispaly structure only, structure of which is coming from %goo structure.
Either try to find out an enhancement here , so that you can add fields over there.
Thanks and Regards,
Antony Thomas

Similar Messages

How to find the user exit for a screen..

Hi,
plz help me how to find the user exit for a screen..?
Regards
Anbu

Hi,
check this program this will give you the list of user-exit and BADI for the perticular Tcode.
REPORT zuserexit_badi.
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.
ENDCASE.
Reagards,
Bharat.

User exit for MB1A screen

I want to block the withdraw qty in MB1A screen.I used MBCFC003 AND MBCF0005 BUT I couldn't get the exact result.Is it user exit for MB1A screen -PPC00009.So can anyone tell me the exact user exit.
Regards,
Maran.d

Dear Maran,
What's your exact requirement?What do you want to block in MB1A T Code?
You want to restrict for 261 movement for an order or reservation in MB1A?
These are the exits that can be used for MB1A,
MB_CF001                                Customer Function Exit in the Case of Updating a Mat. Doc.
MBCF0011                                Read from RESB and RKPF for print list in MB26
MBCF0010                                Customer exit: Create reservation BAPI_RESERVATION_CREATE1
MBCF0009                                Filling the storage location field
MBCF0007                                Customer function exit: Updating a reservation
MBCF0006                                Customer function for WBS element
MBCF0005                                Material document item for goods receipt/issue slip
MBCF0002                                Customer function exit: Segment text in material doc. item
Regards
S Mangalraj

Screen /user exit for additional screen on sales order header

Hello sir's,
can anybody help me for this query---
Screen /user exit for additional screen on sales order header.
exit name.
Thanks in advance,
Vikram

Hi,
SAP has provided screen modification. This you can do on "Additional data B" screen at both header and line iteam level.
Additional header data is on screen SAPMV45A 0309, additional item data on screen SAPMV45A 0459. These screens contain the Include screens SAPMV45A 8309 ( this is the screen exit at header ) or SAPMV45A 8459 ( this is the screen exit at item ) as user exits. There few more exits you will have to code to get this screen works. The are,
MV45AOZZ - PBO module of screen
MV45AIZZ - PAI module of screen
MV45ATZZ - Global data definition for user-exit.
Check this link for more info regarding user-exit in sales docs.
http://help.sap.com/saphelp_46c/helpdata/en/1c/f62c7dd435d1118b3f0060b03ca329/frameset.htm
We have alredy implemented this solution at line item level. Let me know if you have any question.
Regards,
RS

How to create user Exits for selecting ranges of the month

Hi Bw Experts,
Right now i need to create a user exits for my report which is coming from Infocube which has 12 months and 12 qtys. But if my client want to see the content of the report for e.g 1 to 3 months in selection screen means then we need to create a variable and user exit to accomplish this problem or is there any solution by which we can solve the problem. Try to suggest me and steps to achieve.
Thanks in advance,

Hi,
Thanks for your input. But the questions is 12 amounts and 12 qtys not 12 months sorry for the typoerror. We are not carrying month field. But the User want to see the for e.g 1 to 3 months data means then how it is possible to accomplish this issue. Try to suggest me.
Thanks in advance
Message was edited by:
mano_biw durai

Creating user exits for Formula Routine in Tcode O5F5

Hi All,
I have to create a new rounding routine for my projet in transaction O5F5. The path which i have taken is. In transaction O5F5.
Maintain Formula & Average Pricing Exit -> Formula Evaluation -> Formula rounding. Now after creation a new formula e.g 901. I have at first got a report created with name ROICO901 (an executable program). which got included in Include file ROICONNN. Upon tring to activate the program it gave an error because of the Report ROICO901 statement, which letter was handled as that program was included and has to be treated as an include file.
My question is that after creating the program in this newly created file what are the steps i need to be done to activate it, as because when the TR was imported to quality the file where ROICO901 was included did not get changed.
Thanks
Anjanav Das

Anjana V Das,
1.Register the Object ( Custom Routine ) in SAP Service Market Place and get the SSCR Key.
2.Do the required changes in the Custom rouine ie ROICO901
3.Activate ROICO901 using SE38
4.Run RV80HGEN program to activate the Custom routine.
5.Check if the custom routine is available in ROICONNN and also the ACTIVE checkbox is ticked in O5F5. ( only to confirm that the first 4 steps were done correctly )
You need to run RV80HGEN again in Q and P once the Custom Routine is transported successfully.
or
You can tag the RV80HGEN program as XPRA along with the Custom Routine in the TR and get it imported to Q and P after testing.XPRA will set RV80HGEN to automatic execution to activate the custom routine once the TR is imported in the target server.This is the advisable approach rather than running RV80HGEN separately after importing the TR in Q and P as a cut over activity.
ROICO901 and ROICONNN prog names differ based on the application area.
K.Kiran.

How to find user exit for a perticular screen?

Dear all,
Can some one tell me how to find user exit for a perticular screen?
ex: MC88 screen can we figure out are there any user exit for that screen!!
Regards,
Vj

User exits are built into the Standard SAP code. You just activate them and insert your code into the include programs.
Here is a program that will list the user exits per transaction code. Not perfect, but it may help.
report z_find_user_exit no standard page heading.
tables: tstc, tadir, modsapt, modact,
        trdir, tfdir, enlfdir, tstct.
data : jtab like tadir occurs 0 with header line.
data : hotspot(30).
parameters : p_tcode like tstc-tcode obligatory.
at line-selection.
get cursor field hotspot.
check hotspot(4) eq 'JTAB'.
set parameter id 'MON' field sy-lisel+1(10).
call transaction 'SMOD' and skip first screen.
start-of-selection.
perform get_data.
perform write_list.
      FORM get_data                                                 *
form get_data.
select single * from tstc
              where tcode eq p_tcode.
check sy-subrc eq 0.
select single * from tadir
            where pgmid = 'R3TR'
              and object = 'PROG'
              and obj_name = tstc-pgmna.
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.
    endif.
endif.
select * from tadir into table jtab
             where pgmid = 'R3TR'
               and object = 'SMOD'
               and devclass = tadir-devclass.
select single * from tstct
          where sprsl eq sy-langu
            and tcode eq p_tcode.
endform.
      FORM write_list                                               *
form write_list.
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.
endform.
SMOD, is where you can find the system modifications provided by SAP. CMOD is where you will implement them. If you are looking for all the enhancements provided, then go to CMOD, follow the menu, 'Utilities-->SAP Enhancements'. This will take you to a screen where if you just execute it, you will get all the enhancements provided by SAP.
It is always difficult to find a user exit if all you have is a program name or a transaction code, unless you do a program like Rich suggested. But even there, you will not be able to find user exits that are implemented as sub-routines(also called forms not sapscript forms). Most of the user exits are documented under the corresponding task under IMG structure. So use transaction code SPRO, go to the IMG structure, choose the application area that your program or transaction might be and then you should find a task that talks about enhancements. If you execute that task most often it will take you to CMOD and sometimes to SE38. But all you want to know is there in the documentation attached to the task. Then you can go to CMOD and see which components are there.
Regards,
Amey

How to create user exit for MIGO check "item OK" Field select/unselect?

Hi All,
I want to know User Exit for MIGO Screen. when I click check button it will be show "Item OK " Field select or not.
MIGO Screen post if Item ok field select both parent id and line id . otherwise it will be show error message?.
Can Please every one tell me how to do user exit for MIGO?
mail id: [email protected]
thanks,
S.Muthu,

Hi,
check the BADI MB_MIGO_BADI ( method: POST_DOCUMENT).
COMD enhancment MBCF0005
Regards

User exit for tcode ME21N and ME22N

Hi everyone
Can anybody tell me the user exits found in the tcodes ME21N nad ME22N, when saving a PO?
Regards
Anjali

AMPL0001            User subscreen for additional data on AMPL
LMEDR001            Enhancements to print program
LMELA002            Adopt batch no. from shipping notification when posting a GR
LMELA010            Inbound shipping notification: Transfer item data from IDOC
LMEQR001            User exit for source determination
LMEXF001            Conditions in Purchasing Documents Without Invoice Receipt
LWSUS001            Individual customer source determination in Retail
M06B0001            Role determination for purchase requisition release
M06B0002            Changes to comm. structure for purchase requisition release
M06B0003            Number range and document number
M06B0004            Number range and document number
M06B0005            Changes to comm. structure for overall release of requisn.
M06E0004            Changes to communication structure for release purch. doc.
M06E0005            Role determination for release of purchasing documents
ME590001            Grouping of requsitions for PO split in ME59
MEETA001            Define schedule line type (backlog, immed. req., preview)
MEFLD004            Determine earliest delivery date f. check w. GR (only PO)
MELAB001            Gen. forecast delivery schedules: Transfer schedule implem.
MEVME001            WE default quantity calc. and over/ underdelivery tolerance
MM06E001            User exits for EDI inbound and outbound purchasing documents
MM06E003            Number range and document number
MM06E004            Control import data screens in purchase order
MM06E005            Customer fields in purchasing document
MM06E007            Change document for requisitions upon conversion into PO
MM06E008            Monitoring of contr. target value in case of release orders
MM06E009            Relevant texts for "Texts exist" indicator
MM06E010            Field selection for vendor address
MMAL0001            ALE source list distribution: Outbound processing
MMAL0002            ALE source list distribution: Inbound processing
MMAL0003            ALE purcasing info record distribution: Outbound processing
MMAL0004            ALE purchasing info record distribution: Inbound processing
MMDA0001            Default delivery addresses
MMFAB001            User exit for generation of release order
MRFLB001            Control Items for Contract Release Order
MEQUERY1            Enhancement to Document Overview ME21N/ME51N
MM06E011            Activate PReq Block
LMEKO001            Extend communications structure KOMK for pricing
LMEKO002            Extend communications structure KOMP for pricing
If useful reward.
Vasanth

User exit for Tcode F-22.

Hi guys.
is there any user exit fot T-code F-22 to avoid duplicate invoice?

available use exits are
F050S001            FIDCMT, FIDCC1, FIDCC2: Edit user-defined IDoc segment
F050S002            FIDCC1: Change IDoc/do not send
F050S003            FIDCC2: Change IDoc/do not send
F050S004            FIDCMT, FIDCC1, FIDCC2: Change outbound IDoc/do not se
F050S005            FIDCMT, FIDCC1, FIDCC2 Inbound IDoc: Change FI documen
F050S006            FI Outgoing IDoc: Reset Clearing in FI Document
F050S007            FIDCCH Outbound: Influence on IDoc for Document Change
F180A001            Balance Sheet Adjustment
FARC0002            Additional Checks for Archiving MM Vendor Master Data
RFAVIS01            Customer Exit for Changing Payment Advice Segment Text
RFEPOS00            Line item display: Checking of selection conditions
RFKORIEX            Automatic correspondence
SAPLF051            Workflow for FI (pre-capture, release for payment)
and you can find user exits for any transaction with the help of this code
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 - ',
             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.
Message was edited by: Vijay Kumar Reddy

User exits for tcode FBV0

Hi,
My requirement is that the user who has parked the document should not be able to post the parked document through tcode FBV0.
Is there any user exit where in I can validate the current system user and the user who has parked the document?
I have tried the user-exit SAPLF040,but this does not suffice my requirement.
Also is it possible to define our own exits in tcode OB28?
Regards,
Rajeev

Info on user exits can be found here http://www.sap-img.com/abap/a-short-tutorial-on-user-exits.htm
Transaction Code - FBV0 Post Parked Document
|Exit Name |Description |
|F050S001 |FIDCMT, FIDCC1, FIDCC2: Edit user-defined IDoc segment |
|F050S002 |FIDCC1: Change IDoc/do not send |
|F050S003 |FIDCC2: Change IDoc/do not send |
|F050S004 |FIDCMT, FIDCC1, FIDCC2: Change outbound IDoc/do not send |
|F050S005 |FIDCMT, FIDCC1, FIDCC2 Inbound IDoc: Change FI document |
|F050S006 |FI Outgoing IDoc: Reset Clearing in FI Document |
|F050S007 |FIDCCH Outbound: Influence on IDoc for Document Change |
|F180A001 |Balance Sheet Adjustment |
|FARC0002 |Additional Checks for Archiving MM Vendor Master Data |
|RFAVIS01 |Customer Exit for Changing Payment Advice Segment Text |
|RFEPOS00 |Line item display: Checking of selection conditions |
|RFKORIEX |Automatic correspondence |
|SAPLF051 |Workflow for FI (pre-capture, release for payment) |
No of Exits: 13
These are the user exits possible for FBV0
we can find user exit for any transaction, copy and run the following code in SE38
report z_find_userexit no standard page heading.
*& Enter the transaction code that you want to search through in order
*& to find which Standard SAP User Exits exists.
*& Tables
tables : tstc, "SAP Transaction Codes
 tadir, "Directory of Repository Objects
 modsapt, "SAP Enhancements - Short Texts
 modact, "Modifications
 trdir, "System table TRDIR
 tfdir, "Function Module
 enlfdir, "Additional Attributes for Function Modules
 tstct. "Transaction Code Texts
*& Variables
data : jtab like tadir occurs 0 with header line.
data : field1(30).
data : v_devclass like tadir-devclass.
*& Selection Screen Parameters
selection-screen begin of block a01 with frame title text-001.
selection-screen skip.
parameters : p_tcode like tstc-tcode obligatory.
selection-screen skip.
selection-screen end of block a01.
*& Start of main program
start-of-selection.
* Validate Transaction Code
select single * from tstc
 where tcode eq p_tcode.
* Find Repository Objects for transaction code
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 = enlfdir-area.
 move : tadir-devclass to v_devclass.
 endif.
 endif.
* Find SAP Modifactions
 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,
 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.
* Take the user to SMOD for the Exit that was selected.
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.

User exit for Tcode LI20

Hi all,
I need to find a user exit for T Code LI20, to update the Z tables.
Thanks in advance
Sree

HI Sree,
Check the list of Exits avaiable for Tcode - LI20
Total - 104
Exit Name Description
MWM2S001 Exit to Determine 2-Step Picking Characteristic
MWMBAP01 Enhancement for BAPI WarehouseTransOrder.GetDetail
MWMBAP02 Enhancement for BAPI WarehouseStock.GetDetail
MWMD0001 Transfer order print via RLVSDR40
MWMD0002 Transfer order print as multiple process with RLKOMM40
MWMIDI07 Enhancement for Output WMPIHU (Create Pick-HU) Inbound
MWMIDO11 Enhancement for message WMTORD: TO with several items
MWMIDO12 Enhancement for Output WMPIHU (Pick-HUs) Outbound
MWMIDO13 Extension for WMMBXY (subsequent tasks after goods movement)
MWMPP001 Enhancement WM/PP Interface (automatic TR generation)
MWMRF001 RF: Influence Display of material description
MWMRF100 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0100)
MWMRF101 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0101)
MWMRF102 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0102)
MWMRF104 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0104)
MWMRF105 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0105)
MWMRF106 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0106)
MWMRF107 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0107)
MWMRF108 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0108)
MWMRF151 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0151)
MWMRF152 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0152)
MWMRF153 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0153)
MWMRF170 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0170)
MWMRF202 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0202)
MWMRF203 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0203)
MWMRF204 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0204)
MWMRF205 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0205)
MWMRF212 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0212)
MWMRF213 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0213)
MWMRF221 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0221)
MWMRF302 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0302)
MWMRF303 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0303)
MWMRF304 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0304)
MWMRF305 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0305)
MWMRF312 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0312)
MWMRF313 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0313)
MWMRF321 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0321)
MWMRF400 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0400)
MWMRF402 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0402)
MWMRF403 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0403)
MWMRF404 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0404)
MWMRF405 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0405)
MWMRF406 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0406)
MWMRF410 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0410)
MWMRF411 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0411
MWMRF412 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0412)
MWMRF502 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0502)
MWMRF503 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0503)
MWMRF504 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0504)
MWMRF505 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0505)
MWMRF600 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0600)
MWMRF601 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0601)
MWMRF630 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0630)
MWMRF631 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0631)
MWMRF632 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0632)
MWMRF633 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0633)
MWMRF634 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0634)
MWMRF650 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0650)
MWMRF651 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0651)
MWMRF700 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0700)
MWMRF701 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0701)
MWMRF702 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0700)
MWMRF703 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0703)
MWMRF704 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0704)
MWMRF705 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0705)
MWMRF760 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0760)
MWMRF761 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0761)
MWMRF762 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0762)
MWMRF763 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0763)
MWMRF764 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0764)
MWMRF765 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0765)
MWMRF766 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0766)
MWMRF767 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0767)
MWMRF768 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0768)
MWMRF769 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0769)
MWMRF777 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0777)
MWMRF800 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0800)
MWMRF801 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0801)
MWMRF802 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0802)
MWMRF803 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0803)
MWMRF804 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0804)
MWMRF805 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0805)
MWMRF806 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0806)
MWMRF807 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0807)
MWMRF888 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0888)
MWMRF889 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0202)
MWMRF998 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0998)
MWMRF999 ENHANCEMENT FOR USER SCREENS (LOGICAL SCREEN 0999)
MWMRFCOD Enhancement for function codedisabling
MWMRFDLV select delivery by user criteria
MWMRFPRT Enhancement for printing
MWMRFSSG user exit for sorting TOs in RF system-guided transaction
MWMRFUP Customer defined general purpose pushbutton called from scr.
MWMRP001 Cust. Exit for Fixed Bin Replenish.: Delivery Item Selection
MWMRP002 Cust. Exit for Fixed Bin Replenishment: TR Quantity Distr.
MWMRP003 Customer Exit for Replenishment using RLLNACH1
MWMRP004 User Exit for Replenishment using RLLNACH4
MWMTO001 Enhancements for end of transfer order generation
MWMTO010 Exit: Calculation of Total Planned TO Processing Time
MWMTO011 Correction of Planned Processing Time for TO Item
MWMTO012 Correction of Sorting and Split Transfer Order
MWMTO013 Stock Removal for Sev. Storage Types as in Stringent FIFO
MWMTOAU3 Separate selection of posting changes for autom.TO creation
MWMTR001 Exits at the end of transfer rqmnt creation (IM,PP interf.)
Reward points if this helps.
Manish

User exit for me 51 to put field descryption for ekbn-sakpto in screen 505

hi .
i have a requirement to put field descryption in screen 505 for me51 tcode(program sapmm06b) for field g/l account in screen 505(Account Assignment for item 00010).
waiting for your resposne.
bye.
sita.

Hi Seetaram,
Hi,
By using the below code you can find the User exits for a particular TCODE.Execute this program and the TCODE in selection screen.
REPORT z_find_userexit NO STANDARD PAGE HEADING.
*& Enter the transaction code that you want to search through in order
*& to find which Standard SAP® User Exits exists.
*& Tables
TABLES : tstc, "SAP® Transaction Codes
tadir, "Directory of Repository Objects
modsapt, "SAP® Enhancements - Short Texts
modact, "Modifications
trdir, "System table TRDIR
tfdir, "Function Module
enlfdir, "Additional Attributes for Function Modules
tstct. "Transaction Code Texts
*& Variables
DATA : jtab LIKE tadir OCCURS 0 WITH HEADER LINE.
DATA : field1(30).
DATA : v_devclass LIKE tadir-devclass.
*& Selection Screen Parameters
SELECTION-SCREEN BEGIN OF BLOCK a01 WITH FRAME TITLE text-001.
SELECTION-SCREEN SKIP.
PARAMETERS : p_tcode LIKE tstc-tcode OBLIGATORY.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN END OF BLOCK a01.
*& Start of main program
START-OF-SELECTION.
Validate Transaction Code
SELECT SINGLE * FROM tstc
WHERE tcode EQ p_tcode.
Find Repository Objects for transaction code
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 = enlfdir-area.
MOVE : tadir-devclass TO v_devclass.
ENDIF.
ENDIF.
Find SAP® Modifactions
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.
Take the user to SMOD for the Exit that was selected.
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.
Reward if helpful,
phani

User exit for tcode ME9A

Hi Guys,
Im trying to add custom error message for tcode ME9A. Is there any user exits or badi available to do this? Thanks.

hi,
copy the below code and in the selection screen enter the T-code..
it will help for you not only for htis t-code to find user exists it will help for all T-codes..
*& Enter the transaction code that you want to search through in order
*& to find which Standard SAP User Exits exists.
*& Tables
tables : tstc,     "SAP Transaction Codes
tadir,    "Directory of Repository Objects
modsapt, "SAP Enhancements - Short Texts
modact,   "Modifications
trdir,    "System table TRDIR
tfdir,    "Function Module
         enlfdir, "Additional Attributes for Function Modules
        tstct.    "Transaction Code Texts
&----Validate Transaction Code
Find Repository Objects for transaction code
Find SAP Modifactions
Take the user to SMOD for the Exit that was selected.
*& Variables
data : jtab like tadir occurs 0 with header line.
data : field1(30).
data : v_devclass like tadir-devclass.
*& Selection Screen Parameters
selection-screen begin of block a01 with frame title text-001.
selection-screen skip.
parameters : p_tcode like tstc-tcode obligatory.
selection-screen skip.
selection-screen end of block a01.
*& Start of main program
start-of-selection.
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 = 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 - ',
    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.
and the user eixists are
Transaction Code - ME9A                     Message Output: RFQs
Exit Name           Description
AMPL0001            User subscreen for additional data on AMPL
LMEDR001            Enhancements to print program
LMELA002            Adopt batch no. from shipping notification when posting a GR
LMELA010            Inbound shipping notification: Transfer item data from IDOC
LMEQR001            User exit for source determination
LMEXF001            Conditions in Purchasing Documents Without Invoice Receipt
LWSUS001            Customer-Specific Source Determination in Retail
M06B0001            Role determination for purchase requisition release
M06B0002            Changes to comm. structure for purchase requisition release
M06B0003            Number range and document number
M06B0004            Number range and document number
M06B0005            Changes to comm. structure for overall release of requisn.
M06E0004            Changes to communication structure for release purch. doc.
M06E0005            Role determination for release of purchasing documents
ME590001            Grouping of requsitions for PO split in ME59
MEETA001            Define schedule line type (backlog, immed. req., preview)
MEFLD004            Determine earliest delivery date f. check w. GR (only PO)
MELAB001            Gen. forecast delivery schedules: Transfer schedule implem.
MEQUERY1            Enhancement to Document Overview ME21N/ME51N
MEVME001            WE default quantity calc. and over/ underdelivery tolerance
MM06E001            User exits for EDI inbound and outbound purchasing documents
MM06E003            Number range and document number
MM06E004            Control import data screens in purchase order
MM06E005            Customer fields in purchasing document
MM06E007            Change document for requisitions upon conversion into PO
MM06E008            Monitoring of contr. target value in case of release orders
MM06E009            Relevant texts for "Texts exist" indicator
MM06E010            Field selection for vendor address
MM06E011            Activate PReq Block
MMAL0001            ALE source list distribution: Outbound processing
MMAL0002            ALE source list distribution: Inbound processing
MMAL0003            ALE purcasing info record distribution: Outbound processing
MMAL0004            ALE purchasing info record distribution: Inbound processing
MMDA0001            Default delivery addresses
MMFAB001            User exit for generation of release order
MRFLB001            Control Items for Contract Release Order
No of Exits:         36
Regards,
Prabhudas

User exits for Tcode FCH5

May any one of you plz suggest me any userexits for tcode fch5.
i want to restrict the field of account id for validation.
how can i do this.
waiting for your reply.

Hi Pawan,
U can use this program to find user exit for Tcode FCH5
Find User exit for Tcode
REPORT z_find_userexit NO STANDARD PAGE HEADING.
*& Enter the transaction code that you want to search through in order
*& to find which Standard SAP User Exits exists.
*& Tables
TABLES : tstc,     "SAP Transaction Codes
         tadir,    "Directory of Repository Objects
         modsapt, "SAP Enhancements - Short Texts
         modact,   "Modifications
         trdir,    "System table TRDIR
         tfdir,    "Function Module
         enlfdir, "Additional Attributes for Function Modules
         tstct.    "Transaction Code Texts
*& Variables
DATA : jtab LIKE tadir OCCURS 0 WITH HEADER LINE.
DATA : field1(30).
DATA : v_devclass LIKE tadir-devclass.
*& Selection Screen Parameters
SELECTION-SCREEN BEGIN OF BLOCK a01 WITH FRAME TITLE text-001.
SELECTION-SCREEN SKIP.
PARAMETERS : p_tcode LIKE tstc-tcode OBLIGATORY.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN END OF BLOCK a01.
*& Start of main program
START-OF-SELECTION.
Validate Transaction Code
SELECT SINGLE * FROM tstc
    WHERE tcode EQ p_tcode.
Find Repository Objects for transaction code
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 = enlfdir-area.
        MOVE : tadir-devclass TO v_devclass.
      ENDIF.
    ENDIF.
Find SAP Modifactions
    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.
Take the user to SMOD for the Exit that was selected.
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.
Rgds,
Prakash

User exit for selection screen of Tcode VL31N, VL32N

Similar Messages

Maybe you are looking for