1 PACKAGE BODY PAY_PAYRPACT_XMLP_PKG AS
2 /* $Header: PAYRPACTB.pls 120.0 2008/01/11 07:05:09 srikrish noship $ */
3 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4 BEGIN
5 BEGIN
6 --HR_STANDARD.EVENT('BEFORE REPORT');
7 C_BUSINESS_GROUP_NAME := HR_REPORTS.GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
8 IF P_PERSON_ID IS NOT NULL THEN
9 C_PERSON_NAME := HR_REPORTS.GET_PERSON_NAME(P_SESSION_DATE
10 ,P_PERSON_ID);
11 END IF;
12 END;
13 RETURN (TRUE);
14 END BEFOREREPORT;
15
16 FUNCTION BETWEENPAGE RETURN BOOLEAN IS
17 BEGIN
18 RETURN (TRUE);
19 END BETWEENPAGE;
20
21 FUNCTION AFTERREPORT RETURN BOOLEAN IS
22 BEGIN
23 --HR_STANDARD.EVENT('AFTER REPORT');
24 RETURN (TRUE);
25 END AFTERREPORT;
26
27 FUNCTION C_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
28 BEGIN
29 RETURN C_BUSINESS_GROUP_NAME;
30 END C_BUSINESS_GROUP_NAME_P;
31
32 FUNCTION C_REPORT_SUBTITLE_P RETURN VARCHAR2 IS
33 BEGIN
34 RETURN C_REPORT_SUBTITLE;
35 END C_REPORT_SUBTITLE_P;
36
37 FUNCTION C_PERSON_NAME_P RETURN VARCHAR2 IS
38 BEGIN
39 RETURN C_PERSON_NAME;
40 END C_PERSON_NAME_P;
41
42 FUNCTION GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID IN NUMBER) RETURN VARCHAR2 IS
43 X0 VARCHAR2(2000);
44 BEGIN
45 X0 := HR_REPORTS.GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
46 RETURN X0;
47 END GET_BUSINESS_GROUP;
48
49 FUNCTION GET_PERSON_NAME(P_SESSION_DATE IN DATE
50 ,P_PERSON_ID IN NUMBER) RETURN VARCHAR2 IS
51 X0 VARCHAR2(2000);
52 BEGIN
53 X0 := HR_REPORTS.GET_PERSON_NAME(P_SESSION_DATE, P_PERSON_ID);
54 RETURN X0;
55 END GET_PERSON_NAME;
56
57 END PAY_PAYRPACT_XMLP_PKG;