DBA Data[Home] [Help]

PACKAGE BODY: APPS.PQH_PQHUSNTS_XMLP_PKG

Source


1 PACKAGE BODY PQH_PQHUSNTS_XMLP_PKG AS
2 /* $Header: PQHUSNTSB.pls 120.1 2007/12/07 06:57:48 vjaganat noship $ */
3   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4     L_PERSON_ID NUMBER;
5     L_MANAGER_ID NUMBER;
6     L_LNAME VARCHAR2(150);
7     L_TITLE VARCHAR2(240);
8     L_EMPID VARCHAR2(240);
9     L_BODY_TEXT2 VARCHAR2(2000);
10     L_BODY_TEXT3 VARCHAR2(2000);
11     L_BODY_TEXT4 VARCHAR2(2000);
12     L_BODY_TEXT5 VARCHAR2(2000);
13     L_BODY_TEXT6 VARCHAR2(2000);
14     L_BODY_TEXT7 VARCHAR2(2000);
15     L_BODY_TEXT8 VARCHAR2(2000);
16     L_HIREDATE DATE;
17   BEGIN
18     P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
19     CP_BUSINESS_GROUP_NAME := GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
20     CP_LOGGED_USER_NAME := FND_PROFILE.VALUE('USERNAME');
21     L_MANAGER_ID := PQH_TENURE_DETAIL.GETPERSONSUPERVISOR(P_PERSON_ID);
22     CP_ACADEMIC_MANAGER_ADDRESS := PQH_TENURE_DETAIL.GETPERSONADDRESS(L_MANAGER_ID
23                                                                      ,P_BUSINESS_GROUP_ID);
24     CP_FACULTY_MEMBER_ADDRESS := PQH_TENURE_DETAIL.GETPERSONADDRESS(P_PERSON_ID
25                                                                    ,P_BUSINESS_GROUP_ID);
26     PQH_TENURE_DETAIL.GETPERSONINFO(P_PERSON_ID
27                                    ,L_EMPID
28                                    ,CP_FACULTY_MEMBER_NAME
29                                    ,CP_FACULTY_MEMBER_LNAME
30                                    ,CP_FACULTY_MEMBER_TITLE
31                                    ,CP_FACULTY_MEMBER_EMAIL
32                                    ,CP_CONTRACT_START_DATE);
33     PQH_TENURE_DETAIL.GETPERSONINFO(L_MANAGER_ID
34                                    ,L_EMPID
35                                    ,CP_ACADEMIC_MANAGER_NAME
36                                    ,L_LNAME
37                                    ,L_TITLE
38                                    ,CP_ACADEMIC_MANAGER_EMAIL
39                                    ,L_HIREDATE);
40     PQH_TENURE_DETAIL.GETREPORTBODYTEXT('TS'
41                                        ,CP_REGARDS
42                                        ,CP_BODY_TEXT
43                                        ,L_BODY_TEXT2
44                                        ,L_BODY_TEXT3
45                                        ,L_BODY_TEXT4
46                                        ,L_BODY_TEXT5
47                                        ,L_BODY_TEXT6
48                                        ,L_BODY_TEXT7
49                                        ,L_BODY_TEXT8);
50     CP_BODY_TEXT := REPLACE(CP_BODY_TEXT
51                            ,'COLLEGE_UNIVERSITY_NAME'
52                            ,CP_BUSINESS_GROUP_NAME);
53     CP_BODY_TEXT := REPLACE(CP_BODY_TEXT
54                             ,fnd_global.local_chr(38)
55                             ,'');
56     RETURN (TRUE);
57   END BEFOREREPORT;
58 
59   FUNCTION AFTERREPORT RETURN BOOLEAN IS
60   BEGIN
61     --HR_STANDARD.EVENT('AFTER REPORT');
62     RETURN (TRUE);
63   END AFTERREPORT;
64 
65   FUNCTION CP_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
66   BEGIN
67     RETURN CP_BUSINESS_GROUP_NAME;
68   END CP_BUSINESS_GROUP_NAME_P;
69 
70   FUNCTION CP_BODY_TEXT_P RETURN VARCHAR2 IS
71   BEGIN
72     RETURN CP_BODY_TEXT;
73   END CP_BODY_TEXT_P;
74 
75   FUNCTION CP_FACULTY_MEMBER_NAME_P RETURN VARCHAR2 IS
76   BEGIN
77     RETURN CP_FACULTY_MEMBER_NAME;
78   END CP_FACULTY_MEMBER_NAME_P;
79 
80   FUNCTION CP_FACULTY_MEMBER_EMAIL_P RETURN VARCHAR2 IS
81   BEGIN
82     RETURN CP_FACULTY_MEMBER_EMAIL;
83   END CP_FACULTY_MEMBER_EMAIL_P;
84 
85   FUNCTION CP_FACULTY_MEMBER_ADDRESS_P RETURN VARCHAR2 IS
86   BEGIN
87     RETURN CP_FACULTY_MEMBER_ADDRESS;
88   END CP_FACULTY_MEMBER_ADDRESS_P;
89 
90   FUNCTION CP_FACULTY_MEMBER_TITLE_P RETURN VARCHAR2 IS
91   BEGIN
92     RETURN CP_FACULTY_MEMBER_TITLE;
93   END CP_FACULTY_MEMBER_TITLE_P;
94 
95   FUNCTION CP_ACADEMIC_MANAGER_NAME_P RETURN VARCHAR2 IS
96   BEGIN
97     RETURN CP_ACADEMIC_MANAGER_NAME;
98   END CP_ACADEMIC_MANAGER_NAME_P;
99 
100   FUNCTION CP_ACADEMIC_MANAGER_EMAIL_P RETURN VARCHAR2 IS
101   BEGIN
102     RETURN CP_ACADEMIC_MANAGER_EMAIL;
103   END CP_ACADEMIC_MANAGER_EMAIL_P;
104 
105   FUNCTION CP_ACADEMIC_MANAGER_ADDRESS_P RETURN VARCHAR2 IS
106   BEGIN
107     RETURN CP_ACADEMIC_MANAGER_ADDRESS;
108   END CP_ACADEMIC_MANAGER_ADDRESS_P;
109 
110   FUNCTION CP_LOGGED_USER_NAME_P RETURN VARCHAR2 IS
111   BEGIN
112     RETURN CP_LOGGED_USER_NAME;
113   END CP_LOGGED_USER_NAME_P;
114 
115   FUNCTION CP_CONTRACT_START_DATE_P RETURN VARCHAR2 IS
116   BEGIN
117     RETURN CP_CONTRACT_START_DATE;
118   END CP_CONTRACT_START_DATE_P;
119 
120   FUNCTION CP_FACULTY_MEMBER_LNAME_P RETURN VARCHAR2 IS
121   BEGIN
122     RETURN CP_FACULTY_MEMBER_LNAME;
123   END CP_FACULTY_MEMBER_LNAME_P;
124 
125   FUNCTION CP_REGARDS_P RETURN VARCHAR2 IS
126   BEGIN
127     RETURN CP_REGARDS;
128   END CP_REGARDS_P;
129 
130 FUNCTION GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID IN NUMBER) RETURN VARCHAR2 IS
131     X0 VARCHAR2(2000);
132   BEGIN
133     X0 := HR_REPORTS.GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
134     RETURN X0;
135   END GET_BUSINESS_GROUP;
136 
137 END PQH_PQHUSNTS_XMLP_PKG;