Enhancements to Standard SAP

Question

hi experts,
i badly need some information on the enhancements to Std SAP.
what r the situations and scenarios that std SAP cann't provide solution and which need some enhancements.
If anyone prepared some enhancements & know them kindly forward them to my mail id [email protected] 
Thanks in advance
I'll reward points alongwith my Sincere thanks
ur friend
raj

Answer 1

hi,
the following report can be used to indentify the User exits available for the transaction code.
*& Report  ZUSEREXIT                                                   *
REPORT  ZUSEREXIT                               .
*& Report  ZLOK_FIND_USEREXITS                                         *
*Report  ZLOK_FIND_USEREXITS   .
Use this ABAP code sample to find all user exits available
*for a particular transaction.
TABLES : TSTC,   " list of all transaction codes
          TADIR,  " directory of repository objects
          MODSAPT, "SAP Enhancements - Short Texts
          MODACT,  "Modifications
          TRDIR,   "view - system table TRDIR(only progs)
          TFDIR,   "list of func modules
          ENLFDIR, "Additional Attributes for Function Modules
          TSTCT.   "transaction codes & texts
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
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,
Murali