PACKAGE BODY: APPS.INV_INVSRIOS_XMLP_PKG

Source

1 PACKAGE BODY INV_INVSRIOS_XMLP_PKG AS
2 /* $Header: INVSRIOSB.pls 120.1 2007/12/25 10:52:28 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 in before report trigger:SRWINIT')*/NULL;
12         RAISE;
13     END;
14     BEGIN
15       NULL;
16     EXCEPTION
17       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
18         /*SRW.MESSAGE(3
19                    ,'Failed in before report trigger:TRF')*/NULL;
20         RAISE;
21     END;
22     BEGIN
23       NULL;
24     EXCEPTION
25       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
26         /*SRW.MESSAGE(2
27                    ,'Failed in before report trigger:INV')*/NULL;
28         RAISE;
29     END;
30     BEGIN
31       NULL;
32     EXCEPTION
33       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
34         /*SRW.MESSAGE(3
35                    ,'Failed in before report trigger:RCV')*/NULL;
36         RAISE;
37     END;
38     BEGIN
39       NULL;
40     EXCEPTION
41       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
42         /*SRW.MESSAGE(3
43                    ,'Failed in before report trigger:PAY')*/NULL;
44         RAISE;
45     END;
46     BEGIN
47       NULL;
48     EXCEPTION
49       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
50         /*SRW.MESSAGE(3
51                    ,'Failed in before report trigger:PVA')*/NULL;
52         RAISE;
53     END;
54     RETURN (TRUE);
55   END BEFOREREPORT;
56 
57   FUNCTION AFTERREPORT RETURN BOOLEAN IS
58   BEGIN
59     BEGIN
60       /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
61     EXCEPTION
62       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
63         /*SRW.MESSAGE(1
64                    ,'SRWEXIT failed')*/NULL;
65     END;
66     RETURN (TRUE);
67   END AFTERREPORT;
68 
69   FUNCTION C_ORG_WHEREFORMULA RETURN VARCHAR2 IS
70   BEGIN
71     IF P_ORG_LO IS NOT NULL THEN
72       RETURN ('and o.organization_id = ' || TO_CHAR(P_ORG_LO));
73     ELSE
74       return(' ');
75     END IF;
76     RETURN NULL;
77   END C_ORG_WHEREFORMULA;
78 
79 END INV_INVSRIOS_XMLP_PKG;
80