User exit for qa11 tcode

Hi,
i want to know which is relevant user exit for qa11 tcode while saving the data.

Hi ricx,
Check the below exits.
Transaction Code - QA11                     Record usage decision
Enhancement/ Business Add-in
Description
Enhancement
QSS10001
Possibility of calling a different print report
QLCO0001
QM: Call alternative costs report from UD
QEVA0010
UD: Usage decision check
QEVA0009
UD: Predefinition of quantity to be posted to sample stock
QEVA0008
Usage decision: Customer function key (e.g. to cancel UD)
QEVA0007
UD: Control of compulsory comment or long text presetting
QEVA0006
Entry to usage decision transactions
QEVA0005
User subscreen for displaying add. data for usage decision
QEVA0004
Exit for changing information line in usage decision header
Business Add-in
QEEM_OPER_ADDON
Functional Enhancements - Results Recording Operation Level
QEVA_ADDON_TAB
Include Tab Page for Operation Completion
QEVA_ALT_QTY_INPUT
BAdI for Input Help for Quantities in Usage Decision
QEVA_SUBSCREEN_1101
VE: BAdI Subscreen for Display of Data on Screen 1101
No.of Exits:          9
No.of BADis:          4
Regards
Karthik D

Similar Messages

USER Exits FOR TM_55 Tcode

Hi All,
Iam working on the enhancement for the TM_55 Transaction which is for the reverse of interst rate.
I want to do some enhancement when user presses the save button.
can any body give me any exits, badi, or enhancement point which will trigger when user click the save button on the tcode tm_55.
thanks in advance.
vinod.

Hi,
There are 2 Exits in Tcode "TM_55".
RFTBCOEX
RFTBCOMO Treasury: Correspondence Monitor
The Badis List as below.
FTR_BAV                             Open TR-TM: BAV regulatory reporting
FTR_CORR_INC_100            CFM: Inbound confirmation via IDoc
FTR_CORR_OUT_100           CFM: Outgoing Confirmation via IDoc
FTR_CUSTOMER_EXTENT    Open TR-TM: Enhancements for Customers
FTR_FINANCIAL_OBJECT     Open TR-TM: Finance object connector
FTR_FX_INT_EXIT                  Enhancements for Internal Forex Trading
FTR_HEDGE_MGMT               Open TR-TM: Hedge Management
FTR_HEDGE_MGMT_USER    User Exit for Hedge Management Subscreen
FTR_MA_LAUNCH                 Settings for the MiniApp Launcher
FTR_MA_LAUNCH_1STP      Control Start Page for MiniApp Launcher (FTR_MA_LAUNCH)
FTR_MA_LAUNCH_CUSTOM Settings for the MiniApp Launcher
FTR_MIRROR_DEALS           Open TR-TM: Connection to Mirror Transactions
FTR_PARTNER_ASSIGN       Open TR-TM: Partner Assignments
FTR_SE_DEFAULTS              Add-In: Default Issue Structure Data for Sec. Transaction
FTR_TRACA_STATREPORT Posting of TR Transactions: Enhancements for Reporting
FTR_TR_EXTENTION             Enhancements to TR-TM
FTR_TR_FACILITY                Open TR-TM: Connection to Facilities
FTR_TR_GENERIC                 Open TR-TM: Generic Connection to Transaction Management
FTR_TR_POSMON                 BADI Position Monitor
FTR_TR_TBB1_EXIT              Enhancements of (Operat.) Posting Interface (Obsolete!!!)
IBS_FS_LIST_OPTIONS         Manipulate Field List for Display in MiniApp
SMOD_RFTBCOEX                CFM: Enhancement of Transaction Confirmations/Dealing Slips
Thanks

User exits for CO02 Tcode

Hi Experts,
Requirement: whenever a production order component is negative then batch number is automatically assigned or populated in CO02 tcode in goods receipt tab.
for this i need User Exit.i am already trying PPCO0007 but its not working .
Could you please help us to solve my issue.
Thanks in advance..
Rajesh V.

Hi All,
My requirement is solved by using below Enhancement implementation
Enhancement point in below mentioned FORM.
In Program : SAPLCOKO1
Include : LCOKO1F3J
Inside below FORM.
FORM header_update.
DATA: flg_q_upd.
DATA: quan_old LIKE caufvd-gamng.
ENHANCEMENT-POINT header_update_01 SPOTS es_saplcoko1 STATIC.
ENHANCEMENT-POINT HEADER_UPDATE_05 SPOTS ES_SAPLCOKO1 .

User-Exit for QA11

Hello there,
I'm looking for a QA11 User-Exit which will helpful to me for below scenario.
In "Inspection lot Stock" tab after fill qty ,on pressing of "SAVE" button it should go into user-exit and there I want to populate one ALV screen if user has entered less or more qty compare to total qty. Then in ALV screen user can correct it and save it.
I tried such scenario with QEVA0007 with "EXIT_SAPMQEVA_007".
Everything going well except change qty by user in ALV.
It posted that one which user has enterd in QA11 in tab of "Inspection lot Stock". I want to post that qty which user has change in ALV popup screen.

Please ,give me some advice to resolve this issue. It's very urgent.
Thanks in advance.
Regards,
Ashish

Check if user exit enhancement QEVA0009 serves your purpose.
QEVA0004-Exit for changing information line in usage decision header
QEVA0005-User subscreen for displaying add. data for usage decision
QEVA0006-Entry to usage decision Transactions
QEVA0007-Control of compulsory comment or long text presetting
QEVA0008-Usage decision: Customer function key
QEVA0009-Predefinition of quantity to be posted to sample stock
QEVA0010-Usage decision check
QLCO0001-QM:Call alternative costs report from UD
QSS10001-Possibility of calling a different print report

User Exit for VA01 Tcode

Hi Friends,
I have an requirement in SD while creating sales order. I need to know how this can be achived using which user exits.
While creating the line items after entering the material and double click on it, in the billing plan tab, user enters the start date and enddate. The system displays the settlement dates according to the from date specified, and the system calculates the Billing value as the ordered quantity(days) manintained in Sales A tab multiplied by the condition value.
The requirement is instead of taking the ordered quantity(days) maintained in Sales A tab, the days should be calculated based on the line item interval in the billing plan tab and the billing value for the line items should be the number of days between the interval multiplied by the condition value.
Can anyone throw some light on this issue.
Thanks and Regards.

Just check these exits.
SDTRM001            Reschedule schedule lines without a new ATP check
V45A0001            Determine alternative materials for product selection
V45A0002            Determine alternative materials for product selection
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

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.

User exit for tcode vf03

Hi,
Please tell me something about user exits and the pertinent concepts. I have to effect a currency conversion from local currency to Hungarian Forint for the invoice generated by tcode VF03. Kindly tell me how to look for the related user exit for this Tcode. Reply soon as this is an urgent requirement.
Alok Bhardwaj.

Hi Alok,
Try this functional module CONVERT_TO_LOCAL_CURRENCY.
and user exit
LMR1M001 User exits in Logistics Invoice Verification
LMR1M002 Account grouping for GR/IR account maintenance
LMR1M003 Number assignment in Logistics Invoice Verification
LMR1M004 Logistics Invoice Verification: item text for follow-on docs
MRMH0001 Logistics Invoice Verification: ERS procedure
MRMH0002 Logistics Invoice Verification: EDI inbound
MRMH0003 Logistics Invoice Verification: Revaluation/RAP
MRMN0001 Message output and creation: Logistics Invoice Verification
regards,
Vishal

User exit for Tcode CS62

Hi,
What is the user exit that we can use for tcode CS62(Create order bom).
The requirement is like when i give sales oder, item, material, bom usage in tcode cs62 and then enter->goto->header and update the bom status in header and save the data.

hi,
You can Refer to this link ..list of all user exits for this tcode are provided
User Exit in CS61 / CS62 ?
Edited by: avinash kodarapu on Jan 2, 2009 2:31 PM

User Exit for saving Invoice

Hi Experts,
My req, is I have to check billing date with order date/ delivery date while creating the invoice in VF01.
For that I have done codig in user exit RV60AFZZ, so it gives error ,but the billing date field get disable.
& this invoice no. alsp get created.
So can anybody plz tell me in which user exit i have to put my code ???
I have tried with RV60AFZC.But it is not working.
My code is
FORM userexit_pricing_prepare_tkomp.
* TKOMP-zzfield = xxxx-zzfield2.
* structure for vbak
TYPES:BEGIN OF ty_vbak,
 vbeln TYPE vbak-vbeln,
 audat TYPE vbak-audat,
 END OF ty_vbak.
*likp structure
TYPES:BEGIN OF ty_likp,
 vbeln TYPE likp-vbeln,
 lfdat TYPE likp-lfdat,
 END OF ty_likp.
*vbrp structure
TYPES:BEGIN OF ty_vbrp,
 vgbel TYPE vbrp-vgbel,
 vgpos TYPE vbrp-vgpos,
 aubel TYPE vbrp-aubel,
 aupos TYPE vbrp-aupos,
 END OF ty_vbrp.
DATA:it_vbak TYPE STANDARD TABLE OF ty_vbak,
 it_likp TYPE STANDARD TABLE OF ty_likp,
 it_vbrp TYPE STANDARD TABLE OF ty_vbrp.
DATA:wa_vbak TYPE ty_vbak,
 wa_likp TYPE ty_likp,
 wa_vbrp TYPE ty_vbrp.
***** take reference document no & delivery no. *****
LOOP AT xvbrp.
wa_vbrp-vgbel = xvbrp-vgbel.
wa_vbrp-vgpos = xvbrp-vgpos.
wa_vbrp-aubel = xvbrp-aubel.
wa_vbrp-aupos = xvbrp-aupos.
APPEND wa_vbrp TO it_vbrp.
ENDLOOP.
IF it_vbrp IS NOT INITIAL.
SELECT vbeln audat FROM vbak
 INTO TABLE it_vbak
 FOR ALL ENTRIES IN it_vbrp
 WHERE vbeln = it_vbrp-aubel.
SELECT vbeln lfdat from likp
 INTO TABLE it_likp
 FOR ALL ENTRIES IN it_vbrp
 WHERE vbeln = it_vbrp-vgbel.
ENDIF.
**** check for invoice date with order date *****
LOOP AT it_vbak INTO wa_vbak.
IF xvbrk-fkdat IS NOT INITIAL AND xvbrk-fkdat < wa_vbak-audat.
 MESSAGE 'Invoice Date is less than Order Date' TYPE 'E'.
ENDIF.
ENDLOOP.
**** check for invoice date with delievery date *****
LOOP AT it_likp INTO wa_likp.
IF xvbrk-fkdat IS NOT INITIAL AND xvbrk-fkdat < wa_likp-lfdat.
 MESSAGE 'Invoice Date is less than Delivery Date' TYPE 'E'.
ENDIF.
ENDLOOP.
ENDFORM. "USEREXIT_PRICING_PREPARE_TKOMP
Thanks & Regards,
Anagha Deshmukh

Hello,
These are the user exits for the tcode.
J_3RSINV Export sales
SDVFX007 User exit: Billing plan during transfer to Accounting
SDVFX008 User exit: Processing of transfer structures SD-FI
SDVFX009 Billing doc. processing KIDONO (payment reference number)
SDVFX010 User exit item table for the customer lines
SDVFX011 Userexit for the komkcv- and kompcv-structures
V05I0001 User exits for billing index
V05N0001 User Exits for Printing Billing Docs. using POR Procedure
V60A0001 Customer functions in the billing document
V60P0001 Data provision for additional fields for display in lists
V61A0001 Customer enhancement: Pricing
Keep the break point and try in the debugging in each and every exit and see which user exit is triggred.

User exit for calculating exchange rate in MRER,MRKO,MRNB,MIRO

Hi All,
For the transactions MRER,MRKO,MRNB,MIRO I want to change the exchange rate type(tcurv-kurst) which is used to calculate exchange rate .
For example, exchange rate type 'M' is used to calculate the exchange rate but now i want to use the type 'ITAD' to calculate the exchange rate.Could you suggest some user exit or BADI for achieving this.

Hi Subasree,
The user exits for respective tcodes are mentioned below,
MRER
Exit Name           Description
MRER0001            Automotive Evaluated Receipt Settlement (ERS)
MRKO
Exit Name           Description
RMVKON00            Enhancements to report "Settle consignment liabilities"
MM08R001            User exits for ERS
MM08R002            User exit for tolerance checks
MRNB
Exit Name           Description
LMR1M001            User exits in Logistics Invoice Verification
LMR1M002            Account grouping for GR/IR account maintenance
LMR1M003            Number assignment in Logistics Invoice Verification
LMR1M004            Logistics Invoice Verification: item text for follow-on docs
LMR1M005            Logistics Inv. Verification: Release Parked Doc. for Posting
LMR1M006            Logistics Invoice Verification: Process XML Invoice
MRMH0001            Logistics Invoice Verification: ERS procedure
MRMH0002            Logistics Invoice Verification: EDI inbound
MRMH0003            Logistics Invoice Verification: Revaluation/RAP
MRMN0001            Message output and creation: Logistics Invoice Verification
MIRO
Exit Name           Description
LMR1M001            User exits in Logistics Invoice Verification
LMR1M002            Account grouping for GR/IR account maintenance
LMR1M003            Number assignment in Logistics Invoice Verification
LMR1M004            Logistics Invoice Verification: item text for follow-on docs
LMR1M005            Logistics Inv. Verification: Release Parked Doc. for Posting
LMR1M006            Logistics Invoice Verification: Process XML Invoice
MRMH0001            Logistics Invoice Verification: ERS procedure
MRMH0002            Logistics Invoice Verification: EDI inbound
MRMH0003            Logistics Invoice Verification: Revaluation/RAP
MRMN0001            Message output and creation: Logistics Invoice Verification
Hope you will find the required amongst this,
Regards,
Soundarya.

Screen Exit for CN25 tcode

Hi all,
Can anybody guide me to find an user exit for the tcode CN25 . Actually i want add two customer fields in CN25 screen.
Help of any type regarding the subject will be highly appreciated.
Regards,
Abhi

Dear,
you can meet the requirement by using the exit CONFPP07
Cheers
fareed

User exit for IW28

Hi experts,
I have question regarding user exit for IW28 tcode:-
1) When you goto IW28 and double click on any "Notification" which does not have "Functional location".
2) Then on "Notification" TAB if you put "Functional location" in "Functional loc." field then it automatically changes Cost Center, WBS Element and SettlementOrder fields in "Location" TAB, and these fields will be changed correspondence to the "Functional Location" entered in "Notification" TAB.
But we don't want that. In "Location" TAB we don't want these three fields Cost Center, WBS Element and SettlementOrder to get updated whenever we enter "Functional Location" in "Notification" TAB.
We want "Location" TAB fields should have what ever it had initially and not changed whenever we enter Functional Location in "Notification" TAB.
I am looking for some user-exit to stop this. Please help me for 1) which user exit i should use and 2) how to proceed.
Thank You Very Much!!
.mala

hi mala,
in iw21/iw22 or iw28 when ever you you change the tech object f.loc or eqpt that data in the location tab and some more data like catalogue profile are taken from the f.loc /eqpt master records and when ever you change the tech object this data again pulled fom the respective master record but if you dont want thse fields to be updated then do not maintain in ie02/il02 ... but i suggest you to maintain this data as it would be easy in processing ..
regards
pushpa

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 qa11 tcode

Similar Messages

Maybe you are looking for