[Home] [Help]
PACKAGE BODY: APPS.PQH_PQHUSNTT_XMLP_PKG
Source
1 PACKAGE BODY PQH_PQHUSNTT_XMLP_PKG AS
2 /* $Header: PQHUSNTTB.pls 120.1 2007/12/07 06:57:22 vjaganat noship $ */
3 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4 L_LNAME VARCHAR2(150);
5 L_TITLE VARCHAR2(240);
6 L_EMPID VARCHAR2(30);
7 L_TENURE_STATUS VARCHAR2(50);
8 L_COMPLETE_YEAR VARCHAR2(2);
9 L_COMPLETE_MONTH VARCHAR2(2);
10 L_STATUS_DATE VARCHAR2(50);
11 L_TENURE_DATE VARCHAR2(50);
12 L_REMAIN_YEAR VARCHAR2(2);
13 L_REMAIN_MONTH VARCHAR2(2);
14 L_BODY_TEXT5 VARCHAR2(2);
15 L_BODY_TEXT6 VARCHAR2(2);
16 L_BODY_TEXT7 VARCHAR2(2);
17 L_BODY_TEXT8 VARCHAR2(2);
18 L_HIREDATE DATE;
19 L_MANAGER_ID NUMBER;
20 BEGIN
21 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
22 CP_BUSINESS_GROUP_NAME := GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
23 CP_LOGGED_USER_NAME := FND_PROFILE.VALUE('USERNAME');
24 L_MANAGER_ID := PQH_TENURE_DETAIL.GETPERSONSUPERVISOR(P_PERSON_ID);
25 CP_ACADEMIC_MANAGER_ADDRESS := PQH_TENURE_DETAIL.GETPERSONADDRESS(L_MANAGER_ID
26 ,P_BUSINESS_GROUP_ID);
27 CP_FACULTY_MEMBER_ADDRESS := PQH_TENURE_DETAIL.GETPERSONADDRESS(P_PERSON_ID
28 ,P_BUSINESS_GROUP_ID);
29 PQH_TENURE_DETAIL.GETPERSONINFO(P_PERSON_ID
30 ,L_EMPID
31 ,CP_FACULTY_MEMBER_NAME
32 ,CP_FACULTY_MEMBER_LNAME
33 ,CP_FACULTY_MEMBER_TITLE
34 ,CP_FACULTY_MEMBER_EMAIL
35 ,CP_CONTRACT_START_DATE);
36 PQH_TENURE_DETAIL.GETPERSONINFO(L_MANAGER_ID
37 ,L_EMPID
38 ,CP_ACADEMIC_MANAGER_NAME
39 ,L_LNAME
40 ,L_TITLE
41 ,CP_ACADEMIC_MANAGER_EMAIL
42 ,L_HIREDATE);
43 PQH_TENURE_DETAIL.GETREPORTBODYTEXT('TT'
44 ,CP_REGARDS
45 ,CP_BODY_TEXT1
46 ,CP_BODY_TEXT2
47 ,CP_BODY_TEXT3
48 ,CP_BODY_TEXT4
49 ,L_BODY_TEXT5
50 ,L_BODY_TEXT6
51 ,L_BODY_TEXT7
52 ,L_BODY_TEXT8);
53 PQH_TENURE_DETAIL.GETPERSONTENURE(P_PERSON_ID
54 ,L_TENURE_STATUS
55 ,L_STATUS_DATE
56 ,L_TENURE_DATE
57 ,L_REMAIN_YEAR
58 ,L_REMAIN_MONTH
59 ,L_COMPLETE_YEAR
60 ,L_COMPLETE_MONTH);
61 CP_BODY_TEXT1 := REPLACE(CP_BODY_TEXT1
62 ,'COLLEGE_UNIVERSITY_NAME'
63 ,CP_BUSINESS_GROUP_NAME);
64 CP_BODY_TEXT2 := REPLACE(CP_BODY_TEXT2
65 ,'TENURE_DATE'
66 ,L_TENURE_DATE);
67 CP_BODY_TEXT2 := REPLACE(CP_BODY_TEXT2
68 ,'MIN_SERVICE_YEARS'
69 ,L_REMAIN_YEAR);
70 CP_BODY_TEXT2 := REPLACE(CP_BODY_TEXT2
71 ,'MIN_SERVICE_MONTHS'
72 ,L_REMAIN_MONTH);
73 CP_BODY_TEXT4 := REPLACE(CP_BODY_TEXT4
74 ,'COLLEGE_UNIVERSITY_NAME'
75 ,CP_BUSINESS_GROUP_NAME);
76
77 CP_BODY_TEXT1 := REPLACE(CP_BODY_TEXT1
78 ,fnd_global.local_chr(38)
79 ,'');
80 CP_BODY_TEXT2 := REPLACE(CP_BODY_TEXT2
81 ,fnd_global.local_chr(38)
82 ,'');
83 CP_BODY_TEXT4 := REPLACE(CP_BODY_TEXT4
84 ,fnd_global.local_chr(38)
85 ,'');
86
87 RETURN (TRUE);
88 END BEFOREREPORT;
89
90 FUNCTION AFTERREPORT RETURN BOOLEAN IS
91 BEGIN
92 --HR_STANDARD.EVENT('AFTER REPORT');
93 RETURN (TRUE);
94 END AFTERREPORT;
95
96 FUNCTION CP_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
97 BEGIN
98 RETURN CP_BUSINESS_GROUP_NAME;
99 END CP_BUSINESS_GROUP_NAME_P;
100
101 FUNCTION CP_BODY_TEXT1_P RETURN VARCHAR2 IS
102 BEGIN
103 RETURN CP_BODY_TEXT1;
104 END CP_BODY_TEXT1_P;
105
106 FUNCTION CP_FACULTY_MEMBER_NAME_P RETURN VARCHAR2 IS
107 BEGIN
108 RETURN CP_FACULTY_MEMBER_NAME;
109 END CP_FACULTY_MEMBER_NAME_P;
110
111 FUNCTION CP_FACULTY_MEMBER_EMAIL_P RETURN VARCHAR2 IS
112 BEGIN
113 RETURN CP_FACULTY_MEMBER_EMAIL;
114 END CP_FACULTY_MEMBER_EMAIL_P;
115
116 FUNCTION CP_FACULTY_MEMBER_ADDRESS_P RETURN VARCHAR2 IS
117 BEGIN
118 RETURN CP_FACULTY_MEMBER_ADDRESS;
119 END CP_FACULTY_MEMBER_ADDRESS_P;
120
121 FUNCTION CP_FACULTY_MEMBER_TITLE_P RETURN VARCHAR2 IS
122 BEGIN
123 RETURN CP_FACULTY_MEMBER_TITLE;
124 END CP_FACULTY_MEMBER_TITLE_P;
125
126 FUNCTION CP_ACADEMIC_MANAGER_NAME_P RETURN VARCHAR2 IS
127 BEGIN
128 RETURN CP_ACADEMIC_MANAGER_NAME;
129 END CP_ACADEMIC_MANAGER_NAME_P;
130
131 FUNCTION CP_ACADEMIC_MANAGER_EMAIL_P RETURN VARCHAR2 IS
132 BEGIN
133 RETURN CP_ACADEMIC_MANAGER_EMAIL;
134 END CP_ACADEMIC_MANAGER_EMAIL_P;
135
136 FUNCTION CP_ACADEMIC_MANAGER_ADDRESS_P RETURN VARCHAR2 IS
137 BEGIN
138 RETURN CP_ACADEMIC_MANAGER_ADDRESS;
139 END CP_ACADEMIC_MANAGER_ADDRESS_P;
140
141 FUNCTION CP_LOGGED_USER_NAME_P RETURN VARCHAR2 IS
142 BEGIN
143 RETURN CP_LOGGED_USER_NAME;
144 END CP_LOGGED_USER_NAME_P;
145
146 FUNCTION CP_CONTRACT_START_DATE_P RETURN VARCHAR2 IS
147 BEGIN
148 RETURN CP_CONTRACT_START_DATE;
149 END CP_CONTRACT_START_DATE_P;
150
151 FUNCTION CP_FACULTY_MEMBER_LNAME_P RETURN VARCHAR2 IS
152 BEGIN
153 RETURN CP_FACULTY_MEMBER_LNAME;
154 END CP_FACULTY_MEMBER_LNAME_P;
155
156 FUNCTION CP_REGARDS_P RETURN VARCHAR2 IS
157 BEGIN
158 RETURN CP_REGARDS;
159 END CP_REGARDS_P;
160
161 FUNCTION CP_BODY_TEXT2_P RETURN VARCHAR2 IS
162 BEGIN
163 RETURN CP_BODY_TEXT2;
164 END CP_BODY_TEXT2_P;
165
166 FUNCTION CP_BODY_TEXT3_P RETURN VARCHAR2 IS
167 BEGIN
168 RETURN CP_BODY_TEXT3;
169 END CP_BODY_TEXT3_P;
170
171 FUNCTION CP_BODY_TEXT4_P RETURN VARCHAR2 IS
172 BEGIN
173 RETURN CP_BODY_TEXT4;
174 END CP_BODY_TEXT4_P;
175
176 FUNCTION GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID IN NUMBER) RETURN VARCHAR2 IS
177 X0 VARCHAR2(2000);
178 BEGIN
179 X0 := HR_REPORTS.GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
180 RETURN X0;
181 END GET_BUSINESS_GROUP;
182
183 END PQH_PQHUSNTT_XMLP_PKG;