DBA Data[Home] [Help]

PACKAGE BODY: APPS.PER_QUALIFICATIONS_BE2

Source


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