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