User exit to default reason code on MI07

Hi MM Experts,
Am an ABAPer and need your expert advice on this. For some reason I have been asked to default the reason code on MI07 screen with a certain value  as soon as  the user gets on the screen. I have not been able to find a user exit where I can default the value on MI07 for reason code.
All MM experts can you please suggest a user exit where we can do this.
Regards,
Saket.

Dear Saket Tiwari & Dëv Päträ
I think I've given you the not clearing impression. i mean that T-Code OLMB is for "Inventory Management and Physical Inventory" configuration. (I think that you already know about it)
1) Go to T-Code >> OLMB > Physical Inventory > Default Values for Physical Inventory  &
                             OLMB > Physical Inventory > Field Selection for Physical Inventory
    Pre-settings for entering physical inventory documents
Reason for inventory difference
     The default value you specify here is only displayed when you enter an inventory difference
     without reference to the corresponding document. But you can also change the default value.
2) and You can control "Filed selection for Physical Inventory" such as MIGO filed selection.
I think that before finding Technical Enhancement Spot, You can consider Configuration Control for your process.
I hope that my options will be helpful for your project.
Regards,
Jeong, Yeong-Chul

Similar Messages

  • BADI / USER-EXIT FOR DEFAULTING THE FIELD VTTK-TNDR_ACTC IN TCODE VT01N

    Hi,
    I require a BADI / USER-EXIT for defaulting the field VTTK-TNDR_ACTC(Currency of Actual Shipment costs) to 'EUR' in transaction VT01N(Shipment Transaction) .
    Please could anyone help me with this .
    Regards,
    Sushanth H.S.

    Hi!
    User Exits in Transportation
    In Transportation, there are enhancements that you can use with transaction CMOD.
    For a detailed description of the individual enhancements, see the documentation on the individual enhancements or function modules in transaction SMOD.
    You can display all enhancements that are available for the area of transportation by choosing F4 in the Enhancement field. Enter V56* in the Enhancement field and choose Execute. Enter V54* to get a list of all enhancements for the area of shipment cost processing.
    Business Add-Ins in the transports
    Business add-ins (BADIs) are predefined user exits. They enable businesses, partners, and customers to add additional softward to the SAP source code. The linkup of SAP's New Dimension Products, such as APO and BW, to the standard system is thus possible.
    Customer-specific functions can be executed before the save time and after the database update.
    The following methods are available for the BADI with the definition name 'BADI_LE_SHIPMENT':
    AT_SAVE: BADI is called up at the time of the save. Checks and return to dialog are possible.
    BEFORE:_UPDATE: BADI is called up right before the data is saved to the database, that is, when all the data is available (for example, internal ly assigned shipment number).
    IN_UPDATE: BADI is called up after the database update.
    Standard Settings
    Creating a BADI method:
    Call up transaction SE19. Enter a name of your choice. Choose "create" and in the dialog box enter the definition name 'BADI_LE_SHIPMENT'. Afterwards, enter a short text for implementation. Save the BADI.
    On the tab page 'Interface', choose the method for implementation by double-clicking on it. Now you can enter your customer-specific program code. Save and activate the code. You can acess the transmission parameters entered in the BADI definition. With the method ***_AT_SAVE you can initiate the exception ERROR_WITH_MESSAGE (description 'An error message has occurred' ) if you wish to return to the dialog.
    Afterwards, go to the heading and activate the interface.
    Regards
    Tamá

  • How to find the user exit for the T-code 'RECN'

    Hi friends,
    I have a requirement as-
    In 'General Data with Fast Entry' tab of tcode 'RECN' there are 2 fields as contract conclusion date and contract end date.
    Now, the requirement is as if entered contract end date is less than contract conclusion date then we have to display a warning message as "contract end date cannot be less than contract conclusion date".
    So, how to find the right user exit to enter the code.
    Plz help me.I will surely reward points.
    Thanks,
    Rishi

    Hi Rishi,
    If User exits and BAdi's are not provided,  then  you will for Enhancement points.
    Procedure:
                     When you are in a particular transaction, Go to System--> status and you find the standard program of that particular screen. Go to SE38 and give that program name, display mode.
    After that you click on the spiral icon there onthe top. Then,
    You go to menu bar, Edit> Enhancement opitons> show implicit enhancement options.
    You will be shown the points where you need to write the code.
    For creating it you will go to Edit >  Enhancement opitons> Create.
    By this you will add some code in the standard programs.
    Reward points if it helps you.
    Cheers,
    Swamy Kunche

  • User exit for rerapp t-code

    Hello,
    i m looking for user exit for rerapp t-code but i couldnt find anything about that from internet. it s about e coming invoice. the invoice is being committed from rerapp t-code; then the view is being matched with invoice and clicked documents button.  i m looking for a user exit when user click 'documents' button,
    Thanks a lot,
    Ayşegül

    Hi,
    Follow this steps, you will get the exact BADI.
    1.     Go to the TCode SE24 and enter CL_EXITHANDLER as object type.
    2.     In 'Display' mode, go to 'Methods' tab.
    3.     Double click the method 'Get Instance' to display it source code.
    4.     Set a breakpoint on 'CALL METHOD cl_exithandler => get_class_name_by_interface'.
    5.     Then run your transaction.
    6.     The screen will stop at this method.
    7.     Check the value of parameter 'EXIT_NAME'. It will show you the BADI for that transaction.
    Regards
    Chaitanya

  • User exit to substitute Tax code

    Hi  Guys,
    I want to know is there any user exit to substitute tax code in MM. we have substitution in FI which is fine but fails when doc. posted through MIRO, my MM consultant say as BSEG table is updated in FI simarly MSEG table is updated in MM, so if there is a substitution in FI to substitute the tax code similarly there should be an user exit or substituion to substitute tax code in MM.
    Any body can help locate user exit for tax code substitution in MM.
    Thanks,
    Shubham

    Hello Shubham,
    check this exit "EXIT_SAPMM06E_012". Reply if this serves your purpose.
    regards,
    Prashant Rathore.

  • Find active user exit for a transaction code

    Hi All,
    Please help to find the active user exit for a transaction code.
    for Ex. below is the list of user exits for package VA ( for creation of sales order and changing sales order). Let me know which user exit is active and which is not active.
      Exit name    Short text
      SDTRM001  Reschedule schedule lines without a new ATP check
      V45A0001  Determine alternative materials for product selection
      V45A0002  Predefine sold-to party in sales document
      V45A0003  Collector for customer function modulpool MV45A
      V45A0004  Copy packing proposal
      V45E0001  Update the purchase order from the sales order
      V45E0002  Data transfer in procurement elements (PRreq., assembly)
      V45L0001  SD component supplier processing (customer enhancements)
      V45P0001  SD customer function for cross-company code sales
      V45S0001  Update sales document from configuration
      V45S0003  MRP-relevance for incomplete configuration
      V45S0004  Effectivity type in sales order
      V45W0001  SD Service Management: Forward Contract Data to Item
      V46H0001  SD Customer functions for resource-related billing
      V60F0001  SD Billing plan (customer enhancement) diff. to billing plan
    Thanks & Regards,
    Sabu

    Goto TADIR table give program id as R3TR ,Objec type as CMOD and execute.
    You will get all active exits in system.
    Exits related to SD may be in ZSD package.

  • User Exits for a Trans code

    Can any one help me out about how to find out the user exixts available for a particular T-code?
    Kindly explain the step by step process.
    Thanks ,
    Priya

    Use below code. Enter Transaction code and the output will be list of all the user exits associated with it.
    *& Report  ZUSEREXIT                                                   *
    *& Finding the user-exits of a SAP transaction code                    *
    *& Enter the transaction code in which you are looking for the         *
    *& user-exit and it will list you the list of user-exits in the        *
    *& transaction code. Also a drill down is possible which will help you *
    *& to branch to SMOD.                                                  *
    REPORT zuserexit 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.
      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.
    Best Regards,
    Vibha
    *Please mark all the helpful answers

  • Physical Inventory - MI07 default reason code

    Hi Friends,
              I config the default for reason code to count inventory ( Movementy Type 701/702) . And I do to create the transactions for physical inventory (MI01+MI04) and then I try to post difference qty by use MI07  but a reason code disappear in reason field. Pls. help me, what should I do to set up default a reason code in that field.  Thanks in advance
    Pland12

    go to OMJJ and maintian reason for movement type.
    It is not possiblle to  configure default reason for movement to a movement type

  • User Exit to default operations in IW31

    Hello Everyone,
    I have the following requirements
    1. I need to dafault the Operations in IW31 transaction. I have tried with the following code
    1. I used cmod to open up user exit EXIT_SAPLCOIH_020.
    2. Then i used cmod to open up user exit EXIT_SAPLCOIH_003
    (IWO20001 PM order: User exit to pass routing to order).
    Here in INCLUDE ZXWOCU03, I entered the following code
    IF NOT CAUFVD_IMP-AUART = 'SM03'.
    ( Use above to filter order types and PMActTypes)
    SEL_TAB-PLNTY = 'A'.
    SEL_TAB-PLNNR = 'SAFE_INS'. "***This is the name of the task list
    SEL_TAB-PLNAL = '01'.
    APPEND SEL_TAB.
    ENDIF.
    Using the above code the Operations are getting defaulted even before entering the Maintenance Activity type (PMActType) and Base Start Date. My requirement is i want an User-Exit which fills Operations based on Order Type and Maintenance Activity Type(ILART). 
    2. I also want an User-Exit to change the Control key values in the Operation tab in IW31 transaction.
    Note:The version is 4.6C
    Thanks in advance!
    Regards,
    Sandhya
    Edited by: Sandhyap on Nov 19, 2010 2:56 PM

    Dear Saket Tiwari & Dëv Päträ
    I think I've given you the not clearing impression. i mean that T-Code OLMB is for "Inventory Management and Physical Inventory" configuration. (I think that you already know about it)
    1) Go to T-Code >> OLMB > Physical Inventory > Default Values for Physical Inventory  &
                                 OLMB > Physical Inventory > Field Selection for Physical Inventory
        Pre-settings for entering physical inventory documents
    Reason for inventory difference
         The default value you specify here is only displayed when you enter an inventory difference
         without reference to the corresponding document. But you can also change the default value.
    2) and You can control "Filed selection for Physical Inventory" such as MIGO filed selection.
    I think that before finding Technical Enhancement Spot, You can consider Configuration Control for your process.
    I hope that my options will be helpful for your project.
    Regards,
    Jeong, Yeong-Chul

  • Default Reason code in IT0008 during PA40 Actions

    Hi,
    My requiremnt is default the reason code in infotype 008 during actions in PA40. Itshould be same as the one the user selected during the initial Action screen.
    For Eg: Suppose user is selected the '01' as reson code in the initial action screen during the Hiring action, then when IT0008 appears, reason code should be defaulted as '01'.
    Pls share any idea to do it.

    Hi,
    I have got the user exit for poulating the data. But the problem is how to get values from the screen  for Infotype 0000  to screen for infotype 0008. Since the user may not save the data in 0000.So we can't read it from database.

  • User Exit for CO11n transaction code

    Dear friends,
    I have a requirement that in T-Code CO11n the user enters the order confirmation and when they go for the goods movement, the screen shows the BOM list with quantities.
    My requirement is that the user will put one quantity for the main material and the rest of the quantities should be calculated through the input value and appear in the respective fields.
    For that I need an enhancement so please suggest me a userexit or any possible solution for the same.
    Thanks in advance.
    Regards,
    Mubashir

    Hi mubhasir,
    The following are the list of available user-exits in transaction code co11n, go thru the documentation of all userexit in Tcode SMOD and choose a appropriate one for ur requirement.
    Reward points, if helpful....
    Regards
    Karthik D
    <b>Transaction Code - CO11N                    Single Screen Entry of Confirmations
    Enhancement/ Business Add-in            Description
    Enhancement</b>
    CONFPP01-                                PP order conf.: Determine customer specific default values
    CONFPP02-                                PP order conf.: Customer specific input checks 1
    CONFPP03-                                PP order conf.: Cust. specific check after op. selection
    CONFPP04-                                PP order conf.: Customer specific input checks 2
    CONFPP05-                                PP order conf.: Customer specific enhancements when saving
    CONFPP06-                                PP Order Confirmations: Actual Data Transfer
    CONFPP07-                                Single Screen Entry: Inclusion of User-Defined Subscreens
    CONFPS01-                                PS confirmation: Determine customer specific default values
    CONFPS02-                                PS confirmation: Customer specific input checks 1
    CONFPS03-                                PS confirmation: Customer specific check after op. selection
    CONFPS04-                                PS confirmation: Customer specific input checks 2
    CONFPS05-                                PS confirmation: Customer specific enhancements when saving
    CONF0001-                                Enhancements in order confirmation
    CONFPI01-                                Process order conf.: Calculate cust.specific default values
    CONFPI02-                                Process order confirmation: Customer spec. input checks 1
    CONFPI03-                                Process order conf.: Cust. spec. check after op. selection
    CONFPI04-                                Process order conf.: Customer specific input checks 2
    CONFPI05-                                Process order conf.: Cust. spec. enhancements when saving
    CONFPI06-                                Process order confirmation: Actual data transfer
    CONFPM01-                                PM/SM order conf.: Determine cust. specific default values
    CONFPM02-                                PM/SM order confirmation: Customer specific input checks 1
    CONFPM03-                                PM/SM order conf.: Cust. spec. check after op. selection
    CONFPM04-                                PM/SM order conf.: Customer specific input check 2
    CONFPM05-                                PM/SM order conf.: Cust. specific enhancements when saving
    <b>No.of Exits:         24</b>

  • User Exit for default values in IW51

    Hi All,
    Can any suggest User Exit or BADI for default values like Cause code in IW51 Tcode.
    Regards,
    Samatha.

    Hi,
    Please check these
    Exits
    IWO10026                                User check on setting status 'Do not perform'
    IWO10027                                User exit: Generate user-defined settlement rule
    IWOC0001                                Create PM/SM notification: Determine reference object
    IWOC0002                                PM/SM notification: Check whether status change is allowed
    IWOC0003                                PM/SM authorization check of ref. object and planner group
    IWOC0004                                Change single-level list editing PM/QM/SM ALV settings
    Business Add-in
    IQS_MASS_CHANGE                         BadI for Mass Changes to Notifications
    IQS0_STATUS_MAINTAIN                    Control of Changeability of User Status
    NOTIF_AUTHORITY_01                      Additional Authorization Checks for the Notification
    WOC_FL_DETERMINE                        Determine Date for Determining Installation Loc. Equi.
    IWOC_OBJECTINFO_CHNG                    Changes to Data of Object Info Screen
    IWOC_LIST_TUNING                        Performance Tuning for Lists in PM/CS
    IWO1_SUBSCREEN_0170                     Display Additional Data on Object Screen 0170 PhysicalSample

  • How to use a screen-field when applying BADI or User Exit to a T Code

    Hi Experts,
    I need your help on this problem.
    I have created a BADI for the transaction code miro. I have got the Exit name on which the enhancement has to be done. I want to perform a check on a text field (Scrren field name INVFO-SGTXT).
    When my break point occurs i enter INVFO-SGTXT in the field to check the value present in it. But it shows that no such field exists.
    My Basic doubt is how to use a value entered in a text field in a tcode while performing a User Exit or BADI on it.
    Do I have to declare it. If yes please mention how?
    Thanks in advance guys.

    Hi,
    The first question here would be... do you plan on having multiple implementations down the road because if not there really isn't any reason to create a BADI inside the exit.  If that is the case then add the field as an importing parameter in your BADI interface and then you should be able to see it inside the BADI at your break-point.
    Regards,
    Ryan Crosby

  • Sales Order Creation - User defined POV on Reason Code

    I need to change the F4 values list on a field on standard SAP screen.  Screen 4480, field ABGRU of SAPMV45A.
    There appears to be no customer exit in the process on value-request section of the screen that I can utilise.
    Can you advise on the best way of implementing an enhanced POV drop down list.
    Thanks

    Thanks for that suggestion, but that will bring up the key on every field, not just the reason code on sales order entry.  Also it would need changing on the gui for every user.
    Does anyone know how I can customise the pov values on just the abgru field on screen 4480 of sapmv45a ?
    I think this is the way it needs doing.

  • User EXIT, BADI for T-code ME21n, ME21

    Hi Guru's,
    I have rquirement where for some company codes user dont want GR and GR based invoicing if net price for PO is less than 100 GBP as it is very small quantity.
    To achive this we have to uncheck Goods receipt check bax from tab 'Delivery'  and uncheck inv. receipt check box from tab 'Invoice' of item level view at the time of PO creation.
    Now, i am serching for User exit or BADI which will serve this purpose, as T-code ME21n is enjoy transaction for ME21 i dont think we will get any user exit, we have to do it through BADI.
    If anyone has done something like this and have idea how i can achive this please revert back.
    regards,
    Rahul

    http://www.erpgenie.com/sap/abap/code/abap26.htm
    which gives the list of exits for a tcode
    Below code will give a list of BADIs for particular transaction.
    *& 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.
    It may help you.
    Best Regards,
    Vibha
    *Please mark all the helpful answers

Maybe you are looking for