Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

User exit for tcode ME9A

Former Member
0 Kudos

Hi Guys,

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

7 REPLIES 7

former_member156446
Active Contributor
0 Kudos
AMPL0001	User subscreen for additional data on AMPL
LMEDR001	Enhancements to print program
LMEKO001	Extend communications structure KOMK for pricing
LMEKO002	Extend communications structure KOMP for pricing
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
MEAG0001	Distribution of Contract/Scheduling Agreement from CRM
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
MM06E002	IDOC processing for contracts in inbox
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

Former Member
0 Kudos

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

Former Member
0 Kudos

hi,


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

Former Member
0 Kudos

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..


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.

and the user eixists are

Former Member
0 Kudos

former_member262988
Active Contributor
0 Kudos

Hi,

can you breif ...

Thanks,

Shailaja Ainala.

Former Member
0 Kudos

There are no user exits and BADI's available for the transaction ME9A.