[Home] [Help]
PACKAGE BODY: APPS.INV_INVTRELT_XMLP_PKG
Source
1 PACKAGE BODY INV_INVTRELT_XMLP_PKG AS
2 /* $Header: INVTRELTB.pls 120.1 2007/12/25 11:07:59 dwkrishn noship $ */
3 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4 BEGIN
5 BEGIN
6 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
7 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
8 EXCEPTION
9 WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
10 /*SRW.MESSAGE(1
11 ,'Failed srwinit in before rpt trigger')*/NULL;
12 RAISE;
13 END;
14 DECLARE
15 P_ORG_ID_CHAR VARCHAR2(100) := (P_ORG);
16 BEGIN
17 /*SRW.USER_EXIT('FND PUTPROFILE NAME="' || 'MFG_ORGANIZATION_ID' || '" FIELD="' || P_ORG_ID_CHAR || '"')*/NULL;
18 EXCEPTION
19 WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
20 /*SRW.MESSAGE(020
21 ,'Failed in before report trigger, setting org profile ')*/NULL;
22 RAISE;
23 END;
24 BEGIN
25 NULL;
26 EXCEPTION
27 WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
28 /*SRW.MESSAGE(2
29 ,'Failed Flexsql Loc Select in before rpt trig')*/NULL;
30 RAISE;
31 END;
32 BEGIN
33 NULL;
34 EXCEPTION
35 WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
36 /*SRW.MESSAGE(3
37 ,'Failed Flexsql Item Where in before rpt trig')*/NULL;
38 RAISE;
39 END;
40 BEGIN
41 NULL;
42 EXCEPTION
43 WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
44 /*SRW.MESSAGE(4
45 ,'Failed Flexsql Item Select in before rpt trig')*/NULL;
46 RAISE;
47 END;
48 BEGIN
49 NULL;
50 EXCEPTION
51 WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
52 /*SRW.MESSAGE(6
53 ,'Failed flexsql item order by in before rpt trigger ')*/NULL;
54 RAISE;
55 END;
56 RETURN (TRUE);
57 END BEFOREREPORT;
58 FUNCTION AFTERREPORT RETURN BOOLEAN IS
59 BEGIN
60 BEGIN
61 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
62 END;
63 RETURN (TRUE);
64 END AFTERREPORT;
65 FUNCTION AFTERPFORM RETURN BOOLEAN IS
66 BEGIN
67 P_EXPIRE_DATE_1:= TO_CHAR(TO_DATE(P_EXPIRE_DATE
68 ,'YYYY/MM/DD HH24:MI:SS')
69 ,'DD-MON-RRRR HH24:MI:SS');
70 RETURN (TRUE);
71 END AFTERPFORM;
72 END INV_INVTRELT_XMLP_PKG;
73