Badi or User-Exit for TCode-oawd

Hi All,
Please help me out with a BADI or EXIT for the Tcode - OAWD (Store Documents) .As per our requirement, while executing OAWD, after the step - work item created, we want to add a pop-up which will take us to tcode- SBWP.
Any help will be highly appreciated .
Thanks/Regards
Priya

Hi
Follow the below steps to find out what all BADI's are called when you press any button in any transaction.
1) Goto se24 (Display class cl_exithandler)
2) Double click on the method GET_INSTANCE.
3) Put a break point at Line no.25 (CASE sy-subrc).
Now
4) Execute SAP standard transaction
5) Press the required button for which you need to write an exit logic, the execution will stop at the break point.
6) Check the values of variable 'exit_name', it will give you the BADI name called at that time.
7) This way you will find all the BADIs called on click of any button in any transaction.
This will solve your BADI finding problem in future as well !!
Mark if helpful
Regs,
Tushar Mundlik

Similar Messages

  • Badi or user exit for allocation run (Tcode-J3AT) on save button

    hi friends,
    i m searching for the BADI or user exit for the Tcode J3AT on the save button press. if u know any badi or user exit for same pls let me know.
    thanks and regards,
    vicky.

    solved with the help of SAP note.

  • Badi or user exit for changing currency INR to EUR

    hi friends,
    in po header there is one tab called status.
    in this tab there is one field called delivery payment
    which has curr INR but i want to change that INR CuRR
    to EUR.Can any one tell me how do this is there any badi or user exit
    for this req.
    thanks.

    Hi Sonu,
    Use the following program to find out the appropriate user exist for ur transaction:
    REPORT ZGURU_USER_EXIT_FIND .
    *&  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.
    Then u can use the function CONVERT_TO_LOCAL_CURRENCY to change the amount from INR to EUR.
    Regards,
    Himanshu

  • User Exit for TCode CJ20N to populate Project system user fields

    Hi team,
    need one support from your side..
    I am looking for User Exit for TCode CJ20N to populate Project system user fields on SAVE.
    I have found
    Enhancement        CNEX0001
    Short text         PS: User field
    which is exactly suiting my req...as it has USER Fields (USR08/USR09 )in export paramters..
    BUT it is not triggering on SAVE,,
    Any hint or is any other user exit/badi which have USER Fields in export paramters.
    Warm Regards
    Krishan

    Hi Krishnan,
    If you want a custom tab that contains User defined fields at Project level then you have to use CNEX0006 user exit. Before this you must declare your fields using the CI include CI_PROJ in the PROJ table.
    If you want a custom tab that contains User defined fields at WBS level then you have to use CNEX0007 user exit. Before this you must declare your fields using the CI include CI_PRPS in the PROJ table.
    In the PBO function module exit of these exits you must use the following statements as the first statement.
    MOVE-CORRESPONDING sap_proj_imp TO proj.
    MOVE-CORRESPONDING sap_prps_imp TO prps.
    In the PAI function module exit of these exits you must use the following statement as the last statement.
    MOVE-CORRESPONDING proj TO cnci_proj_exp.
    MOVE-CORRESPONDING prps TO cnci_prps_exp.
    The remaining programming as in the case any Screen Exit.
    Regards,
    Abijith

  • BAdI: or User Exit for Campaign Creation   IN CRM 5.0

    Hi all,
    we are working in CRM 5.0,
    we have a Requirement like :
    when we create the campaign it should check higher level project ID (marketing Plan ID)
    if it is there it should permit for create campaign else it ll show error...
    Any BAdI: or User Exit for Campaign Creation?
    I ll geive reward points....
    Rhanks & Regards,
    Ganesh

    IN WHICH TRANSACTION U R CREATING CAMPAIGN ??

  • BADI or User Exit for Txn : CRMD_ORDER

    Hi Experts,
    Is there any badi or user-exits for the transaction crmd_order.
    regrads,
    arul jtohi a

    Dear Arul Jothi,
    BAPI_ACTIVITYCRM_CREATEMULTI
    BAPI_BUSPROCESSND_CREATEMULTI
    CRM_BUSPROCESSND_BAPI
    CRM_LEADCRM_BAPI
    BAPI_LEAD_CREATEMULTI
    CRM_OPPORTUNITYCRM_BAPI
    BAPI_OPPORTUNITY_CREATEMULTI
    CRM_SLSTRANSACTCRM_BAPI
    BAPI_SLSTRANSACT_CREATEMULTI
    Also, visit the following thread:
    Change status for sales order in crmd_order
    BAdi/Enhancement:
    /people/alwin.vandeput2/blog/2006/04/13/how-to-search-for-badis-trace-it
    Regards,
    Naveen.

  • BADI or User exit for PO

    Hi Gurus,
    I am looking for BADI's or User exits for transaction ME23n.
    Exactly I am looking for BADI or user exit for the release strategy for the PO and then mailing it to th e apporover.
    regards
    kanishka

    dear ,
    check out these two badi it may be useful for your requiremrnt
    ME_RELEASE_CREATE
    SMOD_MRFLB001         
    Cheers
    fareed

  • BAdI: or User Exit  for Campaign Creation

    Hi all,
              we are working in CRM 5.0,
    we have a Requirement like :
          when we create the campaign it should check higher level project ID        (marketing Plan ID)
          if it is there it should permit for create campaign else it ll show error...
    Any BAdI: or User Exit  for Campaign Creation?
    I ll geive reward points....
    Rhanks & Regards,
    Ganesh

    Dear Ganesh,
    As campaign can be created and executed individually also, it will never check for higher level project ID.
    Let me check the system if we can block creation of campaign individually, without having a higher level marketing plan.

  • BADI or USER Exit for BP Adress check

    Hi All ,
                what is the badi or user exit for giving a additional check on Postal Codes when creating a BP ?
    I have checked BUPA_ADDR_CHECK
    BUPA_ADDR_EXPORT
    BUPA_ADDR_IMPORT
    BUPA_ADDR_UPDATE
    BUPA_ADRREL_EXPORT
    and the user exit ZXSZARU01
    but when i am entering the postal code and pressing Enter , i am not able to catch the User/EXIt or badi .
    Thanks for help.

    Hi
      Use the BAdi : ADDRESS_CHECK
      Implement the method: ADDRESS_POSTAL_CHECK
    Once you enter the Post Code and Country on BP Txn, Pressing Enter will trigger this Badi for  address check !
    Good Luck !
    Thanks
    <b>Allot points if this helps !</b>

  • BADI or User Exit for updating MSEG

    Hi,
       We are using ECC 6.0 and here is the scenario that we have to update custom fields into VBAP, LIPS and MSEG tables when these fields are entered on the sales order screen VA01,VA02.These field are added on this screen using Additional Data B screen.Also, These fields are there in VBAP and LIPS through Append Structure and MSEG through CI_COBL.Is there any BADI or USER EXIT for this.Thanks in Advance.
    Priya.

    Hi
    You can use exit ZXMBCU02 ( Function EXIT_SAPMM07M_001
    in SAP enhancement MBCF0002 ). Here also whtever changes you make to I_MSEG will be lost as MSEG is an importing parameter. You can do something like this.
    FIELD-SYMBOLS <F1> TYPE MSEG.
    DATA NAME(50) VALUE '(SAPMM07M)MSEG'.
    ASSIGN (NAME) TO <F1>.
    <F1>-KOSTL = 'XXXX'.
    ( In above example MSEG-KOSTL will be set as XXXX, you can change any of MSEG fields in above way. ).
    Cheers

  • 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

  • BADI / user exit for Tcode IW32?

    Hi
    Are there any BADIs  / user exits for changing component data in Transaction IW32 for a maintainance order?
    regards
    cs

    Enhancement                                                                               
    IWO10012                                Maintenance order: Priority handling on central header                                                                               
    Business Add-in                                                                               
    IWO_UI_USEFLEX                          BAdI for Calling Up an Alternative UI                  
    I hope it helps.
    Best Regards,
    Vibha
    Please mark all the helpful answers

  • Need BADI or USER EXIT for VT02n

    HI Friends,
    I'm writing a driver program for a ouptput type ZET1 (interface) the tcode is VT02N .
    In menu bar: goto--> output here i've give the output type and save.
    My Problem is, if there is any error on the driver program, it should be displayed the error msg while pressing  the save button.
    is there any BADI or User Exit.
    Thanks & Regards,
    Vallamuthu.M

    Hi,
       Check the below BADI's
       BADI_LE_SHIPMENT                        BadI: Shipment Processing
       BADI_V56N                                     User Exit Transport - Message Determination
    Regards,
    Srini.

  • BAdI or User Exit for MIRO

    Hello All,
    Our requirement is to change line item data in the MIRO before save. It would be a great help if you can provide any BAdI or User Exits.
    Thanks
    Anurag

    Have a look at below code
    http://www.erpgenie.com/sap/abap/code/abap26.htm
    which gives the list of exits for a tcode.
    Also have a look at below code which lists the BADI for particular tcode.
    *& Report  ZNEGI16                                                     *
    REPORT  ZNEGI16                                 .
    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.
    I hope this helps.
    Best Regards,
    Vibha
    *Please mark all the helpful answers

  • 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

Maybe you are looking for

  • ICal: Instead of colored dots, can every event's headline be displayed in color accordingly?

    Before the upgrade, every events is displayed in colour accordingly, with All-Day-Event highlighted.  After the upgrade, only the "All-day event" is highlighed in clour. But the headline/subject of everything else (from every calendars) is displayed

  • List of Grievences

    I really hate Illustrator CS6 which I'm trying to use in Windows 7 64-bit Here is the list of things that annoy me and I strongly believe that a paid program should offer. - I would like to be able to add a "Favorite" location is Save As window. Some

  • Paypal is not supported on this device...

    How do I get a new iTunes billing agreement so I may use my Paypal.  I had a fraud case opened and closed, but Paypal severed my agreement with them.

  • Recordset Retrieval in Servlets

    Dear All, I am using a Servlet to access the Database and read a recordset. The issue I am having is that the query executes in the backend in a fraction of a second. But the fetching of data from the database to the application server takes a very l

  • When will the desktop scramble get fixedn previous

    I enter several file folders daily, so I keep them on my desktop. The Lion scrambles the folders and puts them in various places on  my desktop. Never happened on previous op systems. Murf