PACKAGE BODY: APPS.PAY_PAYRPACT_XMLP_PKG

Source

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;