[Home] [Help]
PACKAGE BODY: APPS.PER_QUALIFICATIONS_BE1
Source
1 package body per_qualifications_be1 as
2 --Code generated on 30/03/2009 04:46:39
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure create_qualification_a (
5 p_qualification_id number,
6 p_effective_date date,
7 p_business_group_id number,
8 p_qualification_type_id number,
9 p_person_id number,
10 p_party_id number,
11 p_title varchar2,
12 p_grade_attained varchar2,
13 p_status varchar2,
14 p_awarded_date date,
15 p_fee number,
16 p_fee_currency varchar2,
17 p_training_completed_amount number,
18 p_reimbursement_arrangements varchar2,
19 p_training_completed_units varchar2,
20 p_total_training_amount number,
21 p_start_date date,
22 p_end_date date,
23 p_license_number varchar2,
24 p_expiry_date date,
25 p_license_restrictions varchar2,
26 p_projected_completion_date date,
27 p_awarding_body varchar2,
28 p_tuition_method varchar2,
29 p_group_ranking varchar2,
30 p_comments varchar2,
31 p_attendance_id number,
32 p_attribute_category varchar2,
33 p_attribute1 varchar2,
34 p_attribute2 varchar2,
35 p_attribute3 varchar2,
36 p_attribute4 varchar2,
37 p_attribute5 varchar2,
38 p_attribute6 varchar2,
39 p_attribute7 varchar2,
40 p_attribute8 varchar2,
41 p_attribute9 varchar2,
42 p_attribute10 varchar2,
43 p_attribute11 varchar2,
44 p_attribute12 varchar2,
45 p_attribute13 varchar2,
46 p_attribute14 varchar2,
47 p_attribute15 varchar2,
48 p_attribute16 varchar2,
49 p_attribute17 varchar2,
50 p_attribute18 varchar2,
51 p_attribute19 varchar2,
52 p_attribute20 varchar2,
53 p_qua_information_category varchar2,
54 p_qua_information1 varchar2,
55 p_qua_information2 varchar2,
56 p_qua_information3 varchar2,
57 p_qua_information4 varchar2,
58 p_qua_information5 varchar2,
59 p_qua_information6 varchar2,
60 p_qua_information7 varchar2,
61 p_qua_information8 varchar2,
62 p_qua_information9 varchar2,
63 p_qua_information10 varchar2,
64 p_qua_information11 varchar2,
65 p_qua_information12 varchar2,
66 p_qua_information13 varchar2,
67 p_qua_information14 varchar2,
68 p_qua_information15 varchar2,
69 p_qua_information16 varchar2,
70 p_qua_information17 varchar2,
71 p_qua_information18 varchar2,
72 p_qua_information19 varchar2,
73 p_qua_information20 varchar2,
74 p_professional_body_name varchar2,
75 p_membership_number varchar2,
76 p_membership_category varchar2,
77 p_subscription_payment_method varchar2,
78 p_language_code varchar2) is
79 l_event_key number;
80 l_event_data clob;
81 l_event_name varchar2(250);
82 l_text varchar2(2000);
83 l_message varchar2(10);
84 --
85 cursor get_seq is
86 select per_wf_events_s.nextval from dual;
87 --
88 l_proc varchar2(72):=' per_qualifications_be1.create_qualification_a';
89 begin
90 hr_utility.set_location('Entering: '||l_proc,10);
91 -- check the status of the business event
92 l_event_name:='oracle.apps.per.api.qualifications.create_qualification';
93 l_message:=wf_event.test(l_event_name);
94 --
95 if (l_message='MESSAGE') then
96 hr_utility.set_location(l_proc,20);
97 --
98 -- get a key for the event
99 --
100 open get_seq;
101 fetch get_seq into l_event_key;
102 close get_seq;
103 --
104 -- build the xml data for the event
105 --
106 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
107 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
108 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
109 l_text:='<qualifications>';
110 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
111 --
112 l_text:='<qualification_id>';
113 l_text:=l_text||fnd_number.number_to_canonical(p_qualification_id);
114 l_text:=l_text||'</qualification_id>';
115 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
116 l_text:='<effective_date>';
117 l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
118 l_text:=l_text||'</effective_date>';
119 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
120 l_text:='<business_group_id>';
121 l_text:=l_text||fnd_number.number_to_canonical(p_business_group_id);
122 l_text:=l_text||'</business_group_id>';
123 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
124 l_text:='<qualification_type_id>';
125 l_text:=l_text||fnd_number.number_to_canonical(p_qualification_type_id);
126 l_text:=l_text||'</qualification_type_id>';
127 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
128 l_text:='<person_id>';
129 l_text:=l_text||fnd_number.number_to_canonical(p_person_id);
130 l_text:=l_text||'</person_id>';
131 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
132 l_text:='<party_id>';
133 l_text:=l_text||fnd_number.number_to_canonical(p_party_id);
134 l_text:=l_text||'</party_id>';
135 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
136 l_text:='<title>';
137 l_text:=l_text||irc_utilities_pkg.removeTags(p_title);
138 l_text:=l_text||'</title>';
139 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
140 l_text:='<grade_attained>';
141 l_text:=l_text||irc_utilities_pkg.removeTags(p_grade_attained);
142 l_text:=l_text||'</grade_attained>';
143 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
144 l_text:='<status>';
145 l_text:=l_text||irc_utilities_pkg.removeTags(p_status);
146 l_text:=l_text||'</status>';
147 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
148 l_text:='<awarded_date>';
149 l_text:=l_text||fnd_date.date_to_canonical(p_awarded_date);
150 l_text:=l_text||'</awarded_date>';
151 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
152 l_text:='<fee>';
153 l_text:=l_text||fnd_number.number_to_canonical(p_fee);
154 l_text:=l_text||'</fee>';
155 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
156 l_text:='<fee_currency>';
157 l_text:=l_text||irc_utilities_pkg.removeTags(p_fee_currency);
158 l_text:=l_text||'</fee_currency>';
159 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
160 l_text:='<training_completed_amount>';
161 l_text:=l_text||fnd_number.number_to_canonical(p_training_completed_amount);
162 l_text:=l_text||'</training_completed_amount>';
163 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
164 l_text:='<reimbursement_arrangements>';
165 l_text:=l_text||irc_utilities_pkg.removeTags(p_reimbursement_arrangements);
166 l_text:=l_text||'</reimbursement_arrangements>';
167 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
168 l_text:='<training_completed_units>';
169 l_text:=l_text||irc_utilities_pkg.removeTags(p_training_completed_units);
170 l_text:=l_text||'</training_completed_units>';
171 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
172 l_text:='<total_training_amount>';
173 l_text:=l_text||fnd_number.number_to_canonical(p_total_training_amount);
174 l_text:=l_text||'</total_training_amount>';
175 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
176 l_text:='<start_date>';
177 l_text:=l_text||fnd_date.date_to_canonical(p_start_date);
178 l_text:=l_text||'</start_date>';
179 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
180 l_text:='<end_date>';
181 l_text:=l_text||fnd_date.date_to_canonical(p_end_date);
182 l_text:=l_text||'</end_date>';
183 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
184 l_text:='<license_number>';
185 l_text:=l_text||irc_utilities_pkg.removeTags(p_license_number);
186 l_text:=l_text||'</license_number>';
187 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
188 l_text:='<expiry_date>';
189 l_text:=l_text||fnd_date.date_to_canonical(p_expiry_date);
190 l_text:=l_text||'</expiry_date>';
191 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
192 l_text:='<license_restrictions>';
193 l_text:=l_text||irc_utilities_pkg.removeTags(p_license_restrictions);
194 l_text:=l_text||'</license_restrictions>';
195 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
196 l_text:='<projected_completion_date>';
197 l_text:=l_text||fnd_date.date_to_canonical(p_projected_completion_date);
198 l_text:=l_text||'</projected_completion_date>';
199 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
200 l_text:='<awarding_body>';
201 l_text:=l_text||irc_utilities_pkg.removeTags(p_awarding_body);
202 l_text:=l_text||'</awarding_body>';
203 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
204 l_text:='<tuition_method>';
205 l_text:=l_text||irc_utilities_pkg.removeTags(p_tuition_method);
206 l_text:=l_text||'</tuition_method>';
207 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
208 l_text:='<group_ranking>';
209 l_text:=l_text||irc_utilities_pkg.removeTags(p_group_ranking);
210 l_text:=l_text||'</group_ranking>';
211 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
212 l_text:='<comments>';
213 l_text:=l_text||irc_utilities_pkg.removeTags(p_comments);
214 l_text:=l_text||'</comments>';
215 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
216 l_text:='<attendance_id>';
217 l_text:=l_text||fnd_number.number_to_canonical(p_attendance_id);
218 l_text:=l_text||'</attendance_id>';
219 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
220 l_text:='<attribute_category>';
221 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
222 l_text:=l_text||'</attribute_category>';
223 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
224 l_text:='<attribute1>';
225 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
226 l_text:=l_text||'</attribute1>';
227 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
228 l_text:='<attribute2>';
229 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
230 l_text:=l_text||'</attribute2>';
231 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
232 l_text:='<attribute3>';
233 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
234 l_text:=l_text||'</attribute3>';
235 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
236 l_text:='<attribute4>';
237 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
238 l_text:=l_text||'</attribute4>';
239 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
240 l_text:='<attribute5>';
241 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
242 l_text:=l_text||'</attribute5>';
243 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
244 l_text:='<attribute6>';
245 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
246 l_text:=l_text||'</attribute6>';
247 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
248 l_text:='<attribute7>';
249 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
250 l_text:=l_text||'</attribute7>';
251 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
252 l_text:='<attribute8>';
253 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
254 l_text:=l_text||'</attribute8>';
255 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
256 l_text:='<attribute9>';
257 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
258 l_text:=l_text||'</attribute9>';
259 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
260 l_text:='<attribute10>';
261 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
262 l_text:=l_text||'</attribute10>';
263 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
264 l_text:='<attribute11>';
265 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
266 l_text:=l_text||'</attribute11>';
267 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
268 l_text:='<attribute12>';
269 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
270 l_text:=l_text||'</attribute12>';
271 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
272 l_text:='<attribute13>';
273 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
274 l_text:=l_text||'</attribute13>';
275 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
276 l_text:='<attribute14>';
277 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
278 l_text:=l_text||'</attribute14>';
279 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
280 l_text:='<attribute15>';
281 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
282 l_text:=l_text||'</attribute15>';
283 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
284 l_text:='<attribute16>';
285 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
286 l_text:=l_text||'</attribute16>';
287 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
288 l_text:='<attribute17>';
289 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
290 l_text:=l_text||'</attribute17>';
291 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
292 l_text:='<attribute18>';
293 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
294 l_text:=l_text||'</attribute18>';
295 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
296 l_text:='<attribute19>';
297 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
298 l_text:=l_text||'</attribute19>';
299 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
300 l_text:='<attribute20>';
301 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
302 l_text:=l_text||'</attribute20>';
303 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
304 l_text:='<qua_information_category>';
305 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information_category);
306 l_text:=l_text||'</qua_information_category>';
307 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
308 l_text:='<qua_information1>';
309 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information1);
310 l_text:=l_text||'</qua_information1>';
311 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
312 l_text:='<qua_information2>';
313 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information2);
314 l_text:=l_text||'</qua_information2>';
315 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
316 l_text:='<qua_information3>';
317 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information3);
318 l_text:=l_text||'</qua_information3>';
319 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
320 l_text:='<qua_information4>';
324 l_text:='<qua_information5>';
321 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information4);
322 l_text:=l_text||'</qua_information4>';
323 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
325 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information5);
326 l_text:=l_text||'</qua_information5>';
327 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
328 l_text:='<qua_information6>';
329 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information6);
330 l_text:=l_text||'</qua_information6>';
331 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
332 l_text:='<qua_information7>';
333 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information7);
334 l_text:=l_text||'</qua_information7>';
335 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
336 l_text:='<qua_information8>';
337 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information8);
338 l_text:=l_text||'</qua_information8>';
339 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
340 l_text:='<qua_information9>';
341 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information9);
342 l_text:=l_text||'</qua_information9>';
343 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
344 l_text:='<qua_information10>';
345 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information10);
346 l_text:=l_text||'</qua_information10>';
347 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
348 l_text:='<qua_information11>';
349 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information11);
350 l_text:=l_text||'</qua_information11>';
351 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
352 l_text:='<qua_information12>';
353 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information12);
354 l_text:=l_text||'</qua_information12>';
355 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
356 l_text:='<qua_information13>';
357 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information13);
358 l_text:=l_text||'</qua_information13>';
359 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
360 l_text:='<qua_information14>';
361 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information14);
362 l_text:=l_text||'</qua_information14>';
363 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
364 l_text:='<qua_information15>';
365 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information15);
366 l_text:=l_text||'</qua_information15>';
367 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
368 l_text:='<qua_information16>';
369 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information16);
370 l_text:=l_text||'</qua_information16>';
371 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
372 l_text:='<qua_information17>';
373 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information17);
374 l_text:=l_text||'</qua_information17>';
375 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
376 l_text:='<qua_information18>';
377 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information18);
378 l_text:=l_text||'</qua_information18>';
379 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
380 l_text:='<qua_information19>';
381 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information19);
382 l_text:=l_text||'</qua_information19>';
383 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
384 l_text:='<qua_information20>';
385 l_text:=l_text||irc_utilities_pkg.removeTags(p_qua_information20);
386 l_text:=l_text||'</qua_information20>';
387 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
388 l_text:='<professional_body_name>';
389 l_text:=l_text||irc_utilities_pkg.removeTags(p_professional_body_name);
390 l_text:=l_text||'</professional_body_name>';
391 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
392 l_text:='<membership_number>';
393 l_text:=l_text||irc_utilities_pkg.removeTags(p_membership_number);
394 l_text:=l_text||'</membership_number>';
395 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
396 l_text:='<membership_category>';
397 l_text:=l_text||irc_utilities_pkg.removeTags(p_membership_category);
398 l_text:=l_text||'</membership_category>';
399 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
400 l_text:='<subscription_payment_method>';
401 l_text:=l_text||irc_utilities_pkg.removeTags(p_subscription_payment_method);
402 l_text:=l_text||'</subscription_payment_method>';
403 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
404 l_text:='<language_code>';
405 l_text:=l_text||irc_utilities_pkg.removeTags(p_language_code);
406 l_text:=l_text||'</language_code>';
407 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
408 l_text:='</qualifications>';
409 --
410 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
411 --
412 -- raise the event with the event data
413 wf_event.raise(p_event_name=>l_event_name
414 ,p_event_key=>l_event_key
415 ,p_event_data=>l_event_data);
416 elsif (l_message='KEY') then
417 hr_utility.set_location(l_proc,30);
418 -- get a key for the event
419 open get_seq;
420 fetch get_seq into l_event_key;
421 close get_seq;
422 -- this is a key event, so just raise the event
423 -- without the event data
424 wf_event.raise(p_event_name=>l_event_name
425 ,p_event_key=>l_event_key);
426 elsif (l_message='NONE') then
427 hr_utility.set_location(l_proc,40);
428 -- no event is required, so do nothing
429 null;
430 end if;
431 hr_utility.set_location('Leaving: '||l_proc,50);
432 end create_qualification_a;
433 end per_qualifications_be1;