User Exit during MB1B transaction

Our scenario is during MIGO GR we are creating batches with a custom number range based on the unit of entry on the PO. For example if we are procuring and receiving material A as Pallets with the unit of entry PAL then the batch number to be generated will be PAL0000123. If for the same material A we are receiving as Drums then the batch number is DR00000123. Each batch is required as all have a specific characteristic value that must be maintained.
The next step in our process is to transfer these materials from one storage location to another using batch determination based on FIFO from MB1B. The batch determination is only at the material level and not the Unit of Entry such as PAL or DR and so the system will transfer whatever material was received first irregardless of the unit of entry in MB1B.
What we're looking for is a user exit during the MB1B transaction prior to the batch determination that will only select batches according to the value in the Unit of Entry field in MB1B. This will allow us to apply the FIFO strategy to only PAL or DR batches separately based on the batch number assigned during GR.
Thank you,
Jeff Diluzio

Hello,
I have checked in my system and I see we do not have the order unit field available to create condition table with it but then we have a option to enahance the field catalog and there if we mention the field . However even in feild catalog I cant locate this filed but I see we have filed dummy.
Conclusion: First step will be to do enhance field catalog with order unit field. If that is not possible then we need to use dummy field in field catalog to create condition table and then we need to pass order unit from MB1B screen to batch search/selection procedure.
I know you have already tried for exit and all but I do not see any way possible to pass order unit to your selection /search procedure.

Similar Messages

To find out appropriate user exit/ badi for transaction VT01n

Hi,
   I have the following requirement.
Cass shipment type (VTTK-ADD03) field needs to be required and should be automatically populated upon creation of the shipment document. The rules for populating the value (SO, ST, PO and RA) are as follows:
If any of the orders on the shipment are customer order types, then the CASS shipment type should be a SO,
If all of the orders are STO orders, then the Cass shipment type should be "ST",
If all of the orders are PO orders, then the Cass shipment type should be "PO" , and
If all of the orders are customer return orders, then the Cass shipment type should be "RA".
I have to find out proper user exit / badi to do this.I have tried with many userexit but it won't work.
   Thanking in advance to give your suggestion in order to resolve it.
With regards,
Ajit.

Hi this code will enable you to find the user exit for any transaction . Just give the transaction as input
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
Just for your information the User exits available for VT01n are
MV56AINI            Initialization of transaction control for transportation
V56AFCCH            Shipment processing: Check function code allowed
V56AGTAR            User Exit for Filtering Shipping Unit Calculation
V56ARCHV            Customer-spec. checks for archiving shipments
V56ATKTX            Change the number of lines for text input in shipment
V56BMOD             Transportation processing: Field modification
V56DISTZ            Shipment Processing: Determine Distance
V56FCOPY            Shipment processing: Copy delivery data
V56FSTAT            Shipment processing: Activities when setting a status
V56L0001            Status of Shipments for a Delivery
V56LDELI            Read Delivery Data for Shipment Processing
V56LOCID            Shipment Processing: Determine Location Identification
V56MVT04            Extensions for Collective Processing of Shipments
V56SLDET            Shipment processing: Leg determination
V56TDLIF            Filter Delivery Items for Shipment
V56UCHCH            Shipment processing: Check whether changes were made
V56UCHCO            Check shipments are complete
V56UDLUP            Obsolete as of 4.6C: Delivery Update on Delivery Routines
V56UNUMB            Shipment number allocation
V56USTAT            User-individual definition of transportation planning status
V56USVDO            Update new objects for transport
V56USVDP            Preparation for updating new objects for transport?
Award points if helpful..
Thanks

How can we find the list of user exits for a transaction

hi all
iam new in user exits please send the basic details
how can we find the list of user exit for a perticular transaction and how can we determine that a particulr user exit is used for a field
regards
jagadish

hi,
check the below links for userexits
http://help.sap.com/saphelp_46c/helpdata/en/64/72369adc56d11195100060b03c6b76/frameset.htm
FAQ's
http://http://www.sap-img.com/abap/a-short-tutorial-on-user-exits.htm
http://www.ficoexpertonline.com/downloads/User%20ExitsWPedit.doc
http://www.easymarketplace.de/userexit.php
http://wiki.ittoolbox.com/index.php/HOWTO:Implement_a_screen_exit_to_a_standard_SAP_transaction
1. what is the defference between enhancement and user-exits?
http://www.sap-img.com/abap/difference-between-badi-and-user-exits.htm
Re: difference between user exits & customer exits
Some Questions ! Plz help...
http://searchsap.techtarget.com/expert/KnowledgebaseAnswer/0,289625,sid21_gci1190924_tax299358,00.html?bucket=ETA
2. Difference between CMOD and SMOD?
http://www.sap-img.com/abap/what-is-the-difference-between-smod-and-cmod.htm
http://www.sap-img.com/abap.htm
http://sap.ittoolbox.com/groups/technical-functional/sap-r3-dev/diff-between-cmod-and-smod-236095
http://sap.ittoolbox.com/groups/technical-functional/sap-r3-dev/diff-between-cmod-and-smod-236107
check these links..
http://www.sapgenie.com/abap/tips_and_tricks.htm
http://www.sap-img.com/abap/field-exits-smod-cmod-questions-and-answers.htm
http://www.sap-img.com/abap/what-is-user-exits.htm
passing selet-option variable to subrouine...
Finding the user-exits of a SAP transaction code
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.
Written by : SAP Basis, ABAP Programming and Other IMG Stuff
             http://www.sap-img.com/*
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
if u want to find the function exit
then check the below code
REPORT ZV_FIND_EXIT 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.
or
1. in se11, goto table MODSAP
View table contents
2. in Type field, enter 'E' (for function exit)
3. For that tcode, u should know the program name.
eg. SAPLLMOB
4. then type SAPLLMOB and execute
or
REPORT z34331_user_exit .
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
DATA : jtab LIKE tadir OCCURS 0 WITH HEADER LINE.
DATA : field1(30).
DATA : v_devclass LIKE tadir-devclass.
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-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.
Regards,
Naveen

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 Exit for CAT5 Transaction

Hi,
Kindly help in getting the User Exits attached with transaction CAT5.
Thanks in Advance.
Regards,
Sapna

hello,
do not coppy the tcode into zreport. it is the biggest sin you able to do. if there is no explicit user exit look for BADI (put break point inside SXV_GET_CLIF_BY_NAME fm, execute tcode and u ll get all BADI related with CAT5) or you could use implicit user exits. there are spots in standard SAP code (each reports subroutine has them so you could add your custom code there), but you have to ensure that your code will not make any damage.
best regards,
dez_

User Exit For Co01 Transaction

Hi Friends,
When I create a production order in co01 Transition. Header Storage location should be filled based on order type. Please share user exit do the change storage location.
Regards,
Jyo
Moderator Message: Duplicate Post. Thread Locked
Edited by: kishan P on Oct 18, 2010 3:37 PM

Hi
Go to transaction CMOd and create a project there and activate it
then find the user exits there for transaction CO01.
you will find it there.
Or go to SE84 and look for enhancement there.
thanks
Lalit Gupta

I need user exit for md11 transaction

hi,
whenever planned order is created or changed i need to fill ztable with that fields.which exit is useful for this requirement.
regards,
sreenivas.

Hi Sreenivas,
Below are the user exits related to transaction MD11.
LMDR2001 User exits restr. profiles of opt. pur.ord.-based load bldg
LMDZU001 User exits in additional planning
I hope it helps.
Thanks,
Vibha
Please mark all the useful answers

How to find user exit for the transaction PBAW

Dear Freinds
In Recruitment ....PBAW(Job Advertisements--when we execute the
transaction PBAW ...we can find create Advertisement... > here will create posting
in this screen i have to add a field Status . could you please let me know how
i can add.. Is there any user exit through which i can add a field or there is any way...
as it is standard..
regards
Vamsi.

Hello Vamsi,
This might be of help. It is a program to find user exits based on transaction codes. Just install it on your sandbox and see if it works for you.
http://www.erpgenie.com/abap/code/abap26.htm
KR,
Peter Linn

User exit for MIGO transaction

I'm checking for user exit in Migo transaction
what I want to do is when I enter the PO# and try to save all the details ,it must trigger a pop-up(customized transaction) thru USEREXIT.
Thanks in advance.

Hello Hema
These are the "old" customer-exits on ECC 5.0:
MBCF0002            Customer function exit: Segment text in material doc. item
MBCF0005            Material document item for goods receipt/issue slip
MBCF0006            Customer function for WBS element
MBCF0007            Customer function exit: Updating a reservation
MBCF0009            Filling the storage location field
MBCF0010            Customer exit: Create reservation BAPI_RESERVATION_CREATE1
MBCF0011            Read from RESB and RKPF for print list in MB26
MB_CF001            Customer Function Exit in the Case of Updating a Mat. Doc.
Regards
Uwe

User exit during planned order to production order conversion

Hi,
Let me know if there is any user exit during planned order to production order production.
Regards,
Yogesh

Dear
You can try the following :
1.PPCO0001 /PPCO0007 /PPCO0012
2.BADI workorder_update
3.Check in SMOD or CMOD and enter PPC* -you will find all the related user exit
Hope this helps
Regards
JH
Edited by: Jiaul Haque on Oct 21, 2010 10:55 AM

User exit / badi for transaction appcreate

Hi,
Can nyone help me in getting user exit / badi for transaction appcreate .
Cheers
kamlesh

Hi Kamlesh,
Try below code to know the userexits for the given trxn code.
Regards,
Raj
*& Report ZTESTRAJ_USEREXITS
REPORT ztestraj_userexits
        NO STANDARD PAGE HEADING
        LINE-SIZE 200
        MESSAGE-ID zz.
       T A B L E    D E C L A R A T I O N S                          *
TABLES: tftit,
        e071,
        e070.
              S T R U C T U R E D E C L A R A T I O N S             *
TYPES: BEGIN OF x_tstc,
        tcode TYPE tcode,
        pgmna TYPE program_id,
       END OF x_tstc.
TYPES: BEGIN OF x_tadir,
        obj_name TYPE sobj_name,
        devclass TYPE devclass,
       END OF x_tadir.
TYPES: BEGIN OF x_slog,
        obj_name TYPE sobj_name,
       END OF x_slog.
TYPES: BEGIN OF x_final,
        name TYPE smodname,
        member TYPE modmember,
        include(15),            "Include name
       END OF x_final.
       I N T E R N A L    T A B L E    D E C L A R A T I O N S       *
DATA: it_tstc TYPE STANDARD TABLE OF x_tstc WITH HEADER LINE.
DATA: it_tadir TYPE STANDARD TABLE OF x_tadir WITH HEADER LINE.
DATA: it_jtab TYPE STANDARD TABLE OF x_slog WITH HEADER LINE.
DATA: it_final TYPE STANDARD TABLE OF x_final WITH HEADER LINE.
           V A R I A B L E S      D E C L A R A T I O N S            *
                U S E R   I N P U T S   S C R E E N                  *
                  S E L E C T I O N    S C R E E N                   *
SELECTION-SCREEN: BEGIN OF BLOCK blk01 WITH FRAME TITLE text-t01.
PARAMETERS: p_tcode LIKE tstc-tcode OBLIGATORY.
SELECTION-SCREEN END OF BLOCK blk01.
                S t a r t    o f    S e l e c t i o n                *
START-OF-SELECTION.
PERFORM get_tcodes. "Get Tcodes
PERFORM get_objects. "Get Objects
                E n d    o f    S e l e c t i o n                    *
END-OF-SELECTION.
PERFORM display_results. "Display Results
*&      Form get_tcodes
      Get Tcodes
FORM get_tcodes.
SELECT tcode
         pgmna
     INTO TABLE it_tstc
     FROM tstc
     WHERE tcode = p_tcode.
IF sy-subrc = 0.
    SORT it_tstc BY tcode.
ENDIF.
ENDFORM.                    " get_tcodes
*&      Form get_objects
      Get Objects
FORM get_objects.
DATA: l_fname LIKE rs38l-name,
        l_group LIKE rs38l-area,
        l_include LIKE rs38l-include,
        l_namespace LIKE rs38l-namespace,
        l_str_area LIKE rs38l-str_area.
DATA: v_include LIKE rodiobj-iobjnm.
DATA: e_t_include TYPE STANDARD TABLE OF abapsource WITH HEADER LINE.
DATA: l_line TYPE string,
        l_tabix LIKE sy-tabix.
IF NOT it_tstc[] IS INITIAL.
    SELECT obj_name
           devclass
        INTO TABLE it_tadir
        FROM tadir FOR ALL ENTRIES IN it_tstc
        WHERE pgmid = 'R3TR' AND
              object = 'PROG' AND
              obj_name = it_tstc-pgmna.
    IF sy-subrc = 0.
      SORT it_tadir BY obj_name devclass.
      SELECT obj_name
        INTO TABLE it_jtab
        FROM tadir FOR ALL ENTRIES IN it_tadir
        WHERE pgmid = 'R3TR' AND
              object = 'SMOD' AND
              devclass = it_tadir-devclass.
      IF sy-subrc = 0.
        SORT it_jtab BY obj_name.
      ENDIF.
    ENDIF.
ENDIF.
*- Get UserExit names
LOOP AT it_jtab.
    SELECT name
           member
       INTO (it_final-name, it_final-member)
       FROM modsap
       WHERE name = it_jtab-obj_name AND
             typ = 'E'.
      APPEND it_final.
      CLEAR it_final.
    ENDSELECT.
ENDLOOP.
*- Process it_final contents.
LOOP AT it_final.
    l_tabix = sy-tabix.
    CLEAR: l_fname,
         l_group,
         l_include,
         l_namespace,
         l_str_area.
    l_fname = it_final-member.
    CALL FUNCTION 'FUNCTION_EXISTS'
      EXPORTING
        funcname           = l_fname
      IMPORTING
        group              = l_group
        include            = l_include
        namespace          = l_namespace
        str_area           = l_str_area
      EXCEPTIONS
        function_not_exist = 1
        OTHERS             = 2.
    IF sy-subrc = 0.
      IF NOT l_include IS INITIAL.
*- Get Source code of include.
        CLEAR: v_include, e_t_include, e_t_include[].
        v_include = l_include.
        CALL FUNCTION 'MU_INCLUDE_GET'
          EXPORTING
            i_include   = v_include
          TABLES
            e_t_include = e_t_include.
        IF sy-subrc = 0.
          LOOP AT e_t_include.
            IF e_t_include-line CS 'INCLUDE'.
              CLEAR l_line.
              l_line = e_t_include-line.
              CONDENSE l_line NO-GAPS.
              TRANSLATE l_line USING '. '.
              l_line = l_line+7(9).
              it_final-include = l_line.
              MODIFY it_final INDEX l_tabix TRANSPORTING include.
            ENDIF.
          ENDLOOP.
        ENDIF.
      ENDIF.
    ENDIF.
ENDLOOP.
ENDFORM.                    " get_objects
*&      Form display_results
      Display Results
FORM display_results.
FORMAT COLOR COL_HEADING.
WRITE:/1(150) sy-uline.
WRITE:/ sy-vline,
        2(23) 'Extension Name',
        24 sy-vline,
        25(39) 'Exit Name',
        64 sy-vline,
        65(74) 'Description',
        140 sy-vline,
        141(9) 'Include',
        150 sy-vline.
WRITE:/1(150) sy-uline.
FORMAT RESET.
SORT it_final BY name member.
LOOP AT it_final.
    CLEAR tftit.
    SELECT SINGLE stext
      INTO tftit-stext
      FROM tftit
      WHERE spras = 'EN' AND
            funcname = it_final-member.
    WRITE:/ sy-vline,
            it_final-name COLOR COL_KEY, 24 sy-vline,
            25 it_final-member, 64 sy-vline,
            65 tftit-stext, 140 sy-vline,
            141 it_final-include, 150 sy-vline.
    WRITE:/1(150) sy-uline.
ENDLOOP.
ENDFORM.                    " display_results

Urgent. Badi or user exit for ML81N transaction

Hi!
   Currently I am working on the transaction LM81N. I am looking for a user exit or BADI before save (commit work). I need to modify the XIMSEG table where this table is updated in the code:
FORM SET_XIMSEG_ACC using p_rcode.
*&      Form SET_XIMSEG_ACC
      ximseg fuellen - Buchung auf Ebene Kontierung
p_rcode = 0.
CLEAR XIMSEG.
XIMSEG-BWART = T156N-BWART_NEXT.
XIMSEG-EBELN = XESSR-EBELN.
XIMSEG-EBELP = XESSR-EBELP.
XIMSEG-KZBEW = 'B'.
XIMSEG-LFBJA = XESSR-ERDAT.
XIMSEG-LFBNR = XESSR-LBLNI.
XIMSEG-ELIKZ = XESSR-FINAL.                 "set ELIKZ
IF XESSR-KZABN EQ KZABN_S.                  "Storno
XIMSEG-XSTOB = 'X'.
XIMSEG-ELIKZ = SPACE.                     "reset ELIKZ
ENDIF.
XIMSEG-ERFMG = 1.
XIMSEG-ERFME = XEKPO-MEINS.
XIMSEG-BPMNG = 1.
XIMSEG-BPRME = XEKPO-MEINS.
<b>XIMSEG-SGTXT = XESSR-TXZ01.</b>
LOOP AT XESKN WHERE PACKNO EQ XESSR-LBLNI
              AND LOEKZ IS INITIAL
              AND NETWR > 0.
XIMSEG-LFPOS = XESKN-ZEKKN.
APPEND XIMSEG.
ENDLOOP.
IF SY-SUBRC > 0.
p_rcode = 8.
REFRESH: XIMSEG, XEMSEG.
exit.
ENDIF.
ENDFORM.                    " SET_XIMSEG_ACC
I need to modify
XIMSEG-SGTXT = XESSR-TXZ01 with ESSL-KTEXT1
I found that use ATP_PUBLISH_RESULTS BADI after the call SET_XIMSEG_ACC . But I didn't found it.
Thanks in advance.

Hi Diana,
these are the available exits for this t.code:
Enhancement/ Business Add-in            Description
Enhancement
SRV_FRM                                 SRV: Formula calculation (obsolete since 4.0A!)
SRVSEL                                  Service selection from non-SAP systems
SRVREL                                  Changes to comm. structure for release of entry sheet
SRVQUOT                                 Service export/import for inquiry/quotations
SRVPOWEB                                Purchase order for service entry in Web
SRVMSTLV                                Conversion of data during importing of standard service cat.
SRVMAIL1                                Processing of mail before generation of sheet
SRVLIMIT                                Limit check
SRVKNTTP                                Setting the account assgnmt category when reading in, if "U"
SRVEUSCR                                User screen on entry sheet tabstrip
SRVESSR                                 Set entry sheet header data
SRVESLL                                 Service line checks
SRVESKN                                 Set account assignment in service line
SRVESI                                  Data conversion entry sheet interface
SRVENTRY                                Unplanned part of entry sheet (obsolete since Rel. 3.1G)
SRVEDIT                                 Service list control (maintenance/display)
SRVDET                                  User screen on tab strip of service detail screen
INTERFAC                                Interface for data transfer
o.of Exits:         18
o.of BADis:          0
Try to found the correct exits and provide the and activate the exits.
If u wan to where the exits is working put the breakpoint.
***********Rewords some points if it is useful.
Rgds,
P.Naganjana Reddy

User Exit during TO confirmation

hello,
I need to find a user exit that we can use during TO confirmation..need to capture some information from the TO , such as source , destination bins , quantity and user ....plz advise
Kind Regards
Edited by: BrightSide on May 18, 2009 9:29 AM

Hi,
In transaction CMOD you have to create a new proyect and assign the enhancement MWMTO002. There are only one user exit (EXIT_SAPLL03T_002).
You have to create the include ZXLTOU02. In this include you can put a break pint to check the user exit (the user run in update task, so you need to activate the update debuggin).
In the user, you have the structure I_LTAK_VB with the header data of the TO that you are confirming and the table T_LTAP_VB. This table is filed with all positions that you are confirmed (if you confirm the TO, all positions is filled in the table, if you confirm only one position, only this appear in the table).
Regars,
Pepe

Help me to find user exit for MB1B

IN MB1B TRANSACTION I WANT ONE FIELD LIKE <b>REASON FOR TRANSFER</b> APPEAR IN THE FIRST SCREEN ONLY WHEN I AM ENTERING PARTICULAR MOVEMENT TYPE,PLANT AND STORAGE LOCATION.HELP ME TO FIND USER EXIT FOR THIS
Message was edited by:
        neela renganathan

THIS FIELD ALREADY AVAILABLE IN THE NEXT SCREEN ,BUT WHILE AM ENTERING PARTICULAR MVEMNT TYPE ,PLANT,STORAGE LOCTN IT WILL APPEAR IN INITIAL SCREEN AND IT WONT ALLOW TO GO NEXT SCREEN WITHOUT GIVING THE REASON
Message was edited by:
        neela renganathan
Message was edited by:
        neela renganathan

User exit/ BADI for transaction VF11

Dear Gurus,
My requirement is that, When a billing document is canceled using transaction code VF11, while saving the document, a information message needs to be displayed based up on the invoice date which is currently getting canceled.
Kindly help me out with User Exit / BADI while saving and the table fields which will have invoice date of the invoice which is getting canceled.
Thanks,
Bhupender Dangi

hi,
the following user exits are available for tcode VF11
Exit Name           Description
SDVFX001            User exit header line in delivery to accounting
SDVFX002            User exit for A/R line in transfer to accounting
SDVFX003            User exit cash clearing in transfer to accounting
SDVFX004            User exit G/L line in transfer to accounting
SDVFX005            User exit reserves in transfer to accounting
SDVFX006            User exit tax line in transfer to accounting
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
J_3RSINV            Customer enhancement: Pricing

User Exit during MB1B transaction

Similar Messages

Maybe you are looking for