1 PACKAGE BODY PSB_PSBRPCAL_XMLP_PKG AS
2 /* $Header: PSBRPCALB.pls 120.0 2008/01/07 10:36:05 vijranga noship $ */
3 FUNCTION AFTERPFORM RETURN BOOLEAN IS
4 BEGIN
5 RETURN (TRUE);
6 END AFTERPFORM;
7
8 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
9 BEGIN
10 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
11 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
12 IF P_BUDGET_CALENDAR_ID IS NULL THEN
13 FND_MESSAGE.SET_NAME('PSB'
14 ,'PSB_ALL');
15 CP_CALENDAR := FND_MESSAGE.GET;
16 ELSE
17 SELECT
18 NAME
19 INTO CP_CALENDAR
20 FROM
21 PSB_BUDGET_CALENDARS
22 WHERE BUDGET_CALENDAR_ID = P_BUDGET_CALENDAR_ID;
23 END IF;
24 FND_MESSAGE.SET_NAME('PSB'
25 ,'PSB_NO_DATA_FOUND');
26 C_NLS_NO_DATA_EXISTS := FND_MESSAGE.GET;
27 FND_MESSAGE.SET_NAME('PSB'
28 ,'PSB_END_OF_REPORT');
29 C_NLS_END_OF_REPORT := FND_MESSAGE.GET;
30 RETURN (TRUE);
31 END BEFOREREPORT;
32
33 FUNCTION BEFOREPFORM RETURN BOOLEAN IS
34 BEGIN
35 RETURN (TRUE);
36 END BEFOREPFORM;
37
38 FUNCTION BETWEENPAGE RETURN BOOLEAN IS
39 BEGIN
40 RETURN (TRUE);
41 END BETWEENPAGE;
42
43 FUNCTION AFTERREPORT RETURN BOOLEAN IS
44 BEGIN
45 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
46 RETURN (TRUE);
47 END AFTERREPORT;
48
49 FUNCTION C_NLS_NO_DATA_EXISTS_P RETURN VARCHAR2 IS
50 BEGIN
51 RETURN C_NLS_NO_DATA_EXISTS;
52 END C_NLS_NO_DATA_EXISTS_P;
53
54 FUNCTION C_NLS_END_OF_REPORT_P RETURN VARCHAR2 IS
55 BEGIN
56 RETURN C_NLS_END_OF_REPORT;
57 END C_NLS_END_OF_REPORT_P;
58
59 FUNCTION P_CONC_REQUEST_ID_P RETURN VARCHAR2 IS
60 BEGIN
61 RETURN P_CONC_REQUEST_ID;
62 END P_CONC_REQUEST_ID_P;
63
64 FUNCTION CP_CALENDAR_P RETURN VARCHAR2 IS
65 BEGIN
66 RETURN CP_CALENDAR;
67 END CP_CALENDAR_P;
68
69 END PSB_PSBRPCAL_XMLP_PKG;
70
71
72
73
74