1 PACKAGE BODY PSB_PSBRPSBI_XMLP_PKG AS
2 /* $Header: PSBRPSBIB.pls 120.0 2008/01/07 10:47:25 vijranga noship $ */
3 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4 SOB_ID NUMBER;
5 BEGIN
6 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
7 P_SET_OF_BOOKS_ID1 := P_SET_OF_BOOKS_ID;
8 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
9 IF (P_SET_OF_BOOKS_ID IS NULL) THEN
10 FND_MESSAGE.SET_NAME('PSB'
11 ,'PSB_ALL');
12 CP_SET_OF_BOOKS := FND_MESSAGE.GET;
13 IF (P_STANDARD_BUDGET_ITEM_ID IS NULL) THEN
14 FND_MESSAGE.SET_NAME('PSB'
15 ,'PSB_ALL');
16 CP_STANDARD_BUDGET_ITEMS := FND_MESSAGE.GET;
17 ELSE
18 SELECT
19 NAME
20 INTO CP_STANDARD_BUDGET_ITEMS
21 FROM
22 PSB_STANDARD_BUDGET_ITEMS
23 WHERE STANDARD_BUDGET_ITEM_ID = P_STANDARD_BUDGET_ITEM_ID;
24 SELECT
25 SET_OF_BOOKS_ID
26 INTO SOB_ID
27 FROM
28 PSB_STANDARD_BUDGET_ITEM_LINES
29 WHERE STANDARD_BUDGET_ITEM_ID = P_STANDARD_BUDGET_ITEM_ID;
30 SELECT
31 NAME
32 INTO CP_SET_OF_BOOKS
33 FROM
34 GL_SETS_OF_BOOKS
35 WHERE SET_OF_BOOKS_ID = SOB_ID;
36 P_SET_OF_BOOKS_ID1 := SOB_ID;
37 END IF;
38 ELSE
39 SELECT
40 NAME
41 INTO CP_SET_OF_BOOKS
42 FROM
43 GL_SETS_OF_BOOKS
44 WHERE SET_OF_BOOKS_ID = P_SET_OF_BOOKS_ID1;
45 IF (P_STANDARD_BUDGET_ITEM_ID IS NULL) THEN
46 FND_MESSAGE.SET_NAME('PSB'
47 ,'PSB_ALL');
48 CP_STANDARD_BUDGET_ITEMS := FND_MESSAGE.GET;
49 ELSE
50 SELECT
51 NAME
52 INTO CP_STANDARD_BUDGET_ITEMS
53 FROM
54 PSB_STANDARD_BUDGET_ITEMS
55 WHERE STANDARD_BUDGET_ITEM_ID = P_STANDARD_BUDGET_ITEM_ID;
56 END IF;
57 END IF;
58 FND_MESSAGE.SET_NAME('PSB'
59 ,'PSB_NO_DATA_FOUND');
60 C_NLS_NO_DATA_EXISTS := FND_MESSAGE.GET;
61 FND_MESSAGE.SET_NAME('PSB'
62 ,'PSB_END_OF_REPORT');
63 C_NLS_END_OF_REPORT := FND_MESSAGE.GET;
64 RETURN (TRUE);
65 END BEFOREREPORT;
66
67 FUNCTION AFTERREPORT RETURN BOOLEAN IS
68 BEGIN
69 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
70 RETURN (TRUE);
71 END AFTERREPORT;
72
73 FUNCTION BEFOREPFORM RETURN BOOLEAN IS
74 BEGIN
75 RETURN (TRUE);
76 END BEFOREPFORM;
77
78 FUNCTION AFTERPFORM RETURN BOOLEAN IS
79 BEGIN
80 RETURN (TRUE);
81 END AFTERPFORM;
82
83 FUNCTION BETWEENPAGE RETURN BOOLEAN IS
84 BEGIN
85 RETURN (TRUE);
86 END BETWEENPAGE;
87
88 FUNCTION P_CONC_REQUEST_ID_P RETURN NUMBER IS
89 BEGIN
90 RETURN P_CONC_REQUEST_ID;
91 END P_CONC_REQUEST_ID_P;
92
93 FUNCTION C_NLS_NO_DATA_EXISTS_P RETURN VARCHAR2 IS
94 BEGIN
95 RETURN C_NLS_NO_DATA_EXISTS;
96 END C_NLS_NO_DATA_EXISTS_P;
97
98 FUNCTION C_NLS_END_OF_REPORT_P RETURN VARCHAR2 IS
99 BEGIN
100 RETURN C_NLS_END_OF_REPORT;
101 END C_NLS_END_OF_REPORT_P;
102
103 FUNCTION CP_SET_OF_BOOKS_P RETURN VARCHAR2 IS
104 BEGIN
105 RETURN CP_SET_OF_BOOKS;
106 END CP_SET_OF_BOOKS_P;
107
108 FUNCTION CP_STANDARD_BUDGET_ITEMS_P RETURN VARCHAR2 IS
109 BEGIN
110 RETURN CP_STANDARD_BUDGET_ITEMS;
111 END CP_STANDARD_BUDGET_ITEMS_P;
112
113 END PSB_PSBRPSBI_XMLP_PKG;
114
115
116
117
118
119