02-15-2007 10:33 AM
02-15-2007 10:35 AM
Hello,
The exit for the Tcode IW31 & IW32 is
Transaction Code - IW31 Create Order
Exit Name Description
IWO10012 Maintenance order: Priority handling on central header
No of Exits: 1
U could use this report to get all the exit of a particular Tcode.
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.
*************************************************************
Vasanth
02-15-2007 10:36 AM
Hi!
Area: Maintenance and service orders
o IWO10001 Creation of maintenance sub-order
o IWO10002 Maintenance order: Customer check for order release
o IWO10004 Maintenance order: Customer check for order completion
o IWO10005 Maintenance order: Customer-specific determination of
profit center
o IWO10006 Maintenance order: Exclusion of function codes through
customer enhancements
o IWO10007 Maintenance order: Customer enhancement for permits in
order
o IWO10008 Maintenance order: Determination of tax jurisdiction code
o IWO10009 Maintenance order: Customer check for "Saving"
o IWO10010 Maintenance order: Determination of WBS element
o IWO10011 Maintenance order: Component selection
o IWO10012 Maintenance order: Priority treatment on central header
o IWO10015 Maintenance order: F4 Help for user fields on operation
o IWO10016 Maintenance order: Check of operation user fields
o IWO10017 Determination of external order number by customer logic
o IWO10018 Maintenance order: User fields on order header
o IWO10020 Maintenance order: Automatic inclusion of task list
o IWO10021 Automatic task list transfer for order creation for
notification
o IWO10022 Determine calendar from customer exit
o IWO10023 Service order: Changes to header data for advance shipment
o IWO10024 Service order: Changes to items for advance shipment
o IWO10025 Maintenance/service order: Determination of responsible
cost center
o IWO10026 User check when setting status "Do not perform"
o IWO10027 Generate user-specific settlement rule
o IWO10029 Inclusion of bill of material in maintenance/service order
o IWO10030 Pre-filling the fields for the result object
o IWO10031 Hiding the employee number in the maintenance-/service
order
o IWO10033 Customer-specific authorization check maintenance-/service
order (triggered by BAdI IWO1_ORDER_BADI)
o IWO10034 Operation status based on the status of the capacity
requirement
o COI20001 Change of persons determined
o COI20002 Alternative procurement of the employee availability data
o CYPP0001 Change of the sequential criteria and the sequential
planning
o IWO20001 Maintenance order: Task list transfer in order
o ICSV0004 Check maintenance object and display object information
o CNEX0013 Maintenance order: Proposal for item category for component
assignment
o CNEX0026 Maintenance order: General check for material
o CNEX0027 Maintenance order: Determination of plant or storage
location for component
o COZF0001 Maintenance order: Change purchase requisition for external
operation
o COZF0002 Maintenance order: Change purchase requisition for external
component
Regards
Tamá
02-15-2007 10:37 AM
Hi,
I have one program man. U can find out for which TC u can find the userexits are available for that man.
REPORT YMS_USEREXITSTEST 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-
Thanks,
Shankar
02-15-2007 10:39 AM
Hi
Go to tht perticular Tcode IW31&IW32
Go to menu bar SYSTEM ->STATUS
we can get program name. open tht program in ATTRIBUTES we can find PACKAGE name.
Go to SMOD give tht package name ,now we get all exits
Regards