1 PACKAGE BODY PSB_PSBRPPPS_XMLP_PKG AS
2 /* $Header: PSBRPPPSB.pls 120.0 2008/01/07 10:43:13 vijranga noship $ */
3 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4 BEGIN
5 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
6 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
7 FND_MESSAGE.SET_NAME('PSB'
8 ,'PSB_NO_DATA_FOUND');
9 CP_NO_DATA_FOUND := SUBSTR(FND_MESSAGE.GET,7,13);
10 FND_MESSAGE.SET_NAME('PSB'
11 ,'PSB_END_OF_REPORT');
12 CP_END_OF_REPORT := SUBSTR(FND_MESSAGE.GET,7,13);
13 IF P_WORKSHEET_ID IS NULL THEN
14 RETURN FALSE;
15 END IF;
16 IF P_WORKSHEET_ID IS NOT NULL THEN
17 SELECT
18 NAME
19 INTO CP_WORKSHEET_NAME
20 FROM
21 PSB_WORKSHEETS
22 WHERE WORKSHEET_ID = P_WORKSHEET_ID;
23 END IF;
24 IF P_BUDGET_YEAR_ID IS NOT NULL THEN
25 SELECT
26 NAME
27 INTO CP_YEAR_NAME
28 FROM
29 PSB_BUDGET_PERIODS
30 WHERE BUDGET_PERIOD_ID = P_BUDGET_YEAR_ID;
31 END IF;
32 RETURN TRUE;
33 EXCEPTION
34 WHEN NO_DATA_FOUND THEN
35 RETURN (FALSE);
36 WHEN OTHERS THEN
37 RETURN NULL;
38 END BEFOREREPORT;
39
40 FUNCTION BEFOREPFORM RETURN BOOLEAN IS
41 BEGIN
42 RETURN (TRUE);
43 END BEFOREPFORM;
44
45 FUNCTION AFTERPFORM RETURN BOOLEAN IS
46 BEGIN
47 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
48 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
49 RETURN (TRUE);
50 END AFTERPFORM;
51
52 FUNCTION AFTERREPORT RETURN BOOLEAN IS
53 BEGIN
54 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
55 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
56 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
57 RETURN (TRUE);
58 END AFTERREPORT;
59
60 FUNCTION BETWEENPAGE RETURN BOOLEAN IS
61 BEGIN
62 RETURN (TRUE);
63 END BETWEENPAGE;
64
65 FUNCTION CP_NO_DATA_FOUND_P RETURN VARCHAR2 IS
66 BEGIN
67 RETURN CP_NO_DATA_FOUND;
68 END CP_NO_DATA_FOUND_P;
69
70 FUNCTION CP_END_OF_REPORT_P RETURN VARCHAR2 IS
71 BEGIN
72 RETURN CP_END_OF_REPORT;
73 END CP_END_OF_REPORT_P;
74
75 FUNCTION CP_WORKSHEET_NAME_P RETURN VARCHAR2 IS
76 BEGIN
77 RETURN CP_WORKSHEET_NAME;
78 END CP_WORKSHEET_NAME_P;
79
80 FUNCTION CP_YEAR_NAME_P RETURN VARCHAR2 IS
81 BEGIN
82 RETURN CP_YEAR_NAME;
83 END CP_YEAR_NAME_P;
84
85 END PSB_PSBRPPPS_XMLP_PKG;
86
87
88
89
90