DBA Data[Home] [Help]

PACKAGE BODY: APPS.PER_QUALIFICATIONS_BE1

Source


1 package body per_qualifications_be1 as 
2 --Code generated on 27/11/2012 03:58:39
3 /* $Header: hrapiwfe.pkb 120.11 2011/12/24 13:28:35 vboggava 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>';
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);
324     l_text:='<qua_information5>';
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;