PACKAGE BODY: APPS.PQH_PQHUSUCE_XMLP_PKG

Source

1 PACKAGE BODY PQH_PQHUSUCE_XMLP_PKG AS
2 /* $Header: PQHUSUCEB.pls 120.2 2007/12/07 06:59:03 vjaganat noship $ */
3   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4     L_EMPID VARCHAR2(240);
5     L_LNAME VARCHAR2(150);
6     L_TITLE VARCHAR2(240);
7     L_EMAIL VARCHAR2(240);
8     L_BODY_TEXT2 VARCHAR2(20);
9     L_BODY_TEXT3 VARCHAR2(20);
10     L_BODY_TEXT4 VARCHAR2(20);
11     L_BODY_TEXT5 VARCHAR2(20);
12     L_BODY_TEXT6 VARCHAR2(20);
13     L_BODY_TEXT7 VARCHAR2(20);
14     L_BODY_TEXT8 VARCHAR2(20);
15     L_REGARDS VARCHAR2(100);
16     L_HIREDATE DATE;
17     L_MANAGER_ID NUMBER;
18   BEGIN
19     --HR_STANDARD.EVENT('BEFORE REPORT');
20     CP_BUSINESS_GROUP_NAME := GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
21     L_MANAGER_ID := PQH_TENURE_DETAIL.GETPERSONSUPERVISOR(P_PERSON_ID);
22     PQH_TENURE_DETAIL.GETPERSONINFO(P_PERSON_ID
23                                    ,CP_EMPLOYEE_ID
24                                    ,CP_FACULTY_MEMBER_NAME
25                                    ,L_LNAME
26                                    ,L_TITLE
27                                    ,L_EMAIL
28                                    ,L_HIREDATE);
29     PQH_TENURE_DETAIL.GETPERSONINFO(L_MANAGER_ID
30                                    ,L_EMPID
31                                    ,CP_ACADEMIC_MANAGER_NAME
32                                    ,L_LNAME
33                                    ,L_TITLE
34                                    ,L_EMAIL
35                                    ,L_HIREDATE);
36     PQH_TENURE_DETAIL.GETREPORTBODYTEXT('CE'
37                                        ,L_REGARDS
38                                        ,CP_BODY_TEXT
39                                        ,L_BODY_TEXT2
40                                        ,L_BODY_TEXT3
41                                        ,L_BODY_TEXT4
42                                        ,L_BODY_TEXT5
43                                        ,L_BODY_TEXT6
44                                        ,L_BODY_TEXT7
45                                        ,L_BODY_TEXT8);
46     RETURN (TRUE);
47   END BEFOREREPORT;
48 
49   FUNCTION AFTERREPORT RETURN BOOLEAN IS
50   BEGIN
51     --HR_STANDARD.EVENT('AFTER REPORT');
52     RETURN (TRUE);
53   END AFTERREPORT;
54 
55   FUNCTION CP_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
56   BEGIN
57     RETURN CP_BUSINESS_GROUP_NAME;
58   END CP_BUSINESS_GROUP_NAME_P;
59 
60   FUNCTION CP_BODY_TEXT_P RETURN VARCHAR2 IS
61   BEGIN
62     RETURN CP_BODY_TEXT;
63   END CP_BODY_TEXT_P;
64 
65   FUNCTION CP_FACULTY_MEMBER_NAME_P RETURN VARCHAR2 IS
66   BEGIN
67     RETURN CP_FACULTY_MEMBER_NAME;
68   END CP_FACULTY_MEMBER_NAME_P;
69 
70   FUNCTION CP_ACADEMIC_MANAGER_NAME_P RETURN VARCHAR2 IS
71   BEGIN
72     RETURN CP_ACADEMIC_MANAGER_NAME;
73   END CP_ACADEMIC_MANAGER_NAME_P;
74 
75   FUNCTION CP_EMPLOYEE_ID_P RETURN VARCHAR2 IS
76   BEGIN
77     RETURN CP_EMPLOYEE_ID;
78   END CP_EMPLOYEE_ID_P;
79 
80   FUNCTION GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID IN NUMBER) RETURN VARCHAR2 IS
81     X0 VARCHAR2(2000);
82   BEGIN
83     X0 := HR_REPORTS.GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
84     RETURN X0;
85   END GET_BUSINESS_GROUP;
86 
87 END PQH_PQHUSUCE_XMLP_PKG;