DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_COMPETENCE_ELEMENT_BE2

Source


1 package body hr_competence_element_be2 as 
2 --Code generated on 03/01/2007 10:48:39
3 /* $Header: hrapiwfe.pkb 120.3 2006/06/20 10:26:28 sayyampe noship $*/
4 procedure update_competence_element_a (
5 p_competence_element_id        number,
6 p_object_version_number        number,
7 p_proficiency_level_id         number,
8 p_high_proficiency_level_id    number,
9 p_weighting_level_id           number,
10 p_rating_level_id              number,
11 p_mandatory                    varchar2,
12 p_effective_date_from          date,
13 p_effective_date_to            date,
14 p_group_competence_type        varchar2,
15 p_competence_type              varchar2,
16 p_normal_elapse_duration       number,
17 p_normal_elapse_duration_unit  varchar2,
18 p_sequence_number              number,
19 p_source_of_proficiency_level  varchar2,
20 p_line_score                   number,
21 p_certification_date           date,
22 p_certification_method         varchar2,
23 p_next_certification_date      date,
24 p_comments                     varchar2,
25 p_attribute_category           varchar2,
26 p_attribute1                   varchar2,
27 p_attribute2                   varchar2,
28 p_attribute3                   varchar2,
29 p_attribute4                   varchar2,
30 p_attribute5                   varchar2,
31 p_attribute6                   varchar2,
32 p_attribute7                   varchar2,
33 p_attribute8                   varchar2,
34 p_attribute9                   varchar2,
35 p_attribute10                  varchar2,
36 p_attribute11                  varchar2,
37 p_attribute12                  varchar2,
38 p_attribute13                  varchar2,
39 p_attribute14                  varchar2,
40 p_attribute15                  varchar2,
41 p_attribute16                  varchar2,
42 p_attribute17                  varchar2,
43 p_attribute18                  varchar2,
44 p_attribute19                  varchar2,
45 p_attribute20                  varchar2,
46 p_effective_date               date,
47 p_qualification_type_id        number,
48 p_unit_standard_type           varchar2,
49 p_status                       varchar2,
50 p_information_category         varchar2,
51 p_information1                 varchar2,
52 p_information2                 varchar2,
53 p_information3                 varchar2,
54 p_information4                 varchar2,
55 p_information5                 varchar2,
56 p_information6                 varchar2,
57 p_information7                 varchar2,
58 p_information8                 varchar2,
59 p_information9                 varchar2,
60 p_information10                varchar2,
61 p_information11                varchar2,
62 p_information12                varchar2,
63 p_information13                varchar2,
64 p_information14                varchar2,
65 p_information15                varchar2,
66 p_information16                varchar2,
67 p_information17                varchar2,
68 p_information18                varchar2,
69 p_information19                varchar2,
70 p_information20                varchar2,
71 p_achieved_date                date,
72 p_appr_line_score              number) is
73   l_event_key number;
74   l_event_data clob;
75   l_event_name varchar2(250);
76   l_text varchar2(2000);
77   l_message varchar2(10);
78   --
79   cursor get_seq is
80   select per_wf_events_s.nextval from dual;
81   --
82   l_proc varchar2(72):='  hr_competence_element_be2.update_competence_element_a';
83 begin
84   hr_utility.set_location('Entering: '||l_proc,10);
85   -- check the status of the business event
86   l_event_name:='oracle.apps.per.api.competence_element.update_competence_element';
87   l_message:=wf_event.test(l_event_name);
88   --
89   if (l_message='MESSAGE') then
90     hr_utility.set_location(l_proc,20);
91     --
92     -- get a key for the event
93     --
94     open get_seq;
95     fetch get_seq into l_event_key;
96     close get_seq;
97     --
98     -- build the xml data for the event
99     --
100     dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
101     l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
102     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
103     l_text:='<competence_element>';
104     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
105     --
106     l_text:='<competence_element_id>';
107     l_text:=l_text||fnd_number.number_to_canonical(p_competence_element_id);
108     l_text:=l_text||'</competence_element_id>';
109     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
110     l_text:='<object_version_number>';
111     l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
112     l_text:=l_text||'</object_version_number>';
113     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
114     l_text:='<proficiency_level_id>';
115     l_text:=l_text||fnd_number.number_to_canonical(p_proficiency_level_id);
116     l_text:=l_text||'</proficiency_level_id>';
117     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
118     l_text:='<high_proficiency_level_id>';
119     l_text:=l_text||fnd_number.number_to_canonical(p_high_proficiency_level_id);
120     l_text:=l_text||'</high_proficiency_level_id>';
121     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
122     l_text:='<weighting_level_id>';
123     l_text:=l_text||fnd_number.number_to_canonical(p_weighting_level_id);
124     l_text:=l_text||'</weighting_level_id>';
125     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
126     l_text:='<rating_level_id>';
127     l_text:=l_text||fnd_number.number_to_canonical(p_rating_level_id);
128     l_text:=l_text||'</rating_level_id>';
129     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
130     l_text:='<mandatory>';
131     l_text:=l_text||irc_utilities_pkg.removeTags(p_mandatory);
132     l_text:=l_text||'</mandatory>';
133     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
134     l_text:='<effective_date_from>';
135     l_text:=l_text||fnd_date.date_to_canonical(p_effective_date_from);
136     l_text:=l_text||'</effective_date_from>';
137     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
138     l_text:='<effective_date_to>';
139     l_text:=l_text||fnd_date.date_to_canonical(p_effective_date_to);
140     l_text:=l_text||'</effective_date_to>';
141     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
142     l_text:='<group_competence_type>';
143     l_text:=l_text||irc_utilities_pkg.removeTags(p_group_competence_type);
144     l_text:=l_text||'</group_competence_type>';
145     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
146     l_text:='<competence_type>';
147     l_text:=l_text||irc_utilities_pkg.removeTags(p_competence_type);
148     l_text:=l_text||'</competence_type>';
149     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
150     l_text:='<normal_elapse_duration>';
151     l_text:=l_text||fnd_number.number_to_canonical(p_normal_elapse_duration);
152     l_text:=l_text||'</normal_elapse_duration>';
153     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
154     l_text:='<normal_elapse_duration_unit>';
155     l_text:=l_text||irc_utilities_pkg.removeTags(p_normal_elapse_duration_unit);
156     l_text:=l_text||'</normal_elapse_duration_unit>';
157     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
158     l_text:='<sequence_number>';
159     l_text:=l_text||fnd_number.number_to_canonical(p_sequence_number);
160     l_text:=l_text||'</sequence_number>';
161     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
162     l_text:='<source_of_proficiency_level>';
163     l_text:=l_text||irc_utilities_pkg.removeTags(p_source_of_proficiency_level);
164     l_text:=l_text||'</source_of_proficiency_level>';
165     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
166     l_text:='<line_score>';
167     l_text:=l_text||fnd_number.number_to_canonical(p_line_score);
168     l_text:=l_text||'</line_score>';
169     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
170     l_text:='<certification_date>';
171     l_text:=l_text||fnd_date.date_to_canonical(p_certification_date);
172     l_text:=l_text||'</certification_date>';
173     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
174     l_text:='<certification_method>';
175     l_text:=l_text||irc_utilities_pkg.removeTags(p_certification_method);
176     l_text:=l_text||'</certification_method>';
177     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
178     l_text:='<next_certification_date>';
179     l_text:=l_text||fnd_date.date_to_canonical(p_next_certification_date);
180     l_text:=l_text||'</next_certification_date>';
181     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
182     l_text:='<comments>';
183     l_text:=l_text||irc_utilities_pkg.removeTags(p_comments);
184     l_text:=l_text||'</comments>';
185     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
186     l_text:='<attribute_category>';
187     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
188     l_text:=l_text||'</attribute_category>';
189     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
190     l_text:='<attribute1>';
191     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
192     l_text:=l_text||'</attribute1>';
193     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
194     l_text:='<attribute2>';
195     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
196     l_text:=l_text||'</attribute2>';
197     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
198     l_text:='<attribute3>';
199     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
200     l_text:=l_text||'</attribute3>';
201     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
202     l_text:='<attribute4>';
203     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
204     l_text:=l_text||'</attribute4>';
205     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
206     l_text:='<attribute5>';
207     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
208     l_text:=l_text||'</attribute5>';
209     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
210     l_text:='<attribute6>';
211     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
212     l_text:=l_text||'</attribute6>';
213     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
214     l_text:='<attribute7>';
215     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
216     l_text:=l_text||'</attribute7>';
217     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
218     l_text:='<attribute8>';
219     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
220     l_text:=l_text||'</attribute8>';
221     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
222     l_text:='<attribute9>';
223     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
224     l_text:=l_text||'</attribute9>';
225     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
226     l_text:='<attribute10>';
227     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
228     l_text:=l_text||'</attribute10>';
229     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
230     l_text:='<attribute11>';
231     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
232     l_text:=l_text||'</attribute11>';
233     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
234     l_text:='<attribute12>';
235     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
236     l_text:=l_text||'</attribute12>';
237     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
238     l_text:='<attribute13>';
239     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
240     l_text:=l_text||'</attribute13>';
241     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
242     l_text:='<attribute14>';
243     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
244     l_text:=l_text||'</attribute14>';
245     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
246     l_text:='<attribute15>';
247     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
248     l_text:=l_text||'</attribute15>';
249     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
250     l_text:='<attribute16>';
251     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
252     l_text:=l_text||'</attribute16>';
253     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
254     l_text:='<attribute17>';
255     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
256     l_text:=l_text||'</attribute17>';
257     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
258     l_text:='<attribute18>';
259     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
260     l_text:=l_text||'</attribute18>';
261     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
262     l_text:='<attribute19>';
263     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
264     l_text:=l_text||'</attribute19>';
265     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
269     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
266     l_text:='<attribute20>';
267     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
268     l_text:=l_text||'</attribute20>';
270     l_text:='<effective_date>';
271     l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
272     l_text:=l_text||'</effective_date>';
273     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
274     l_text:='<qualification_type_id>';
275     l_text:=l_text||fnd_number.number_to_canonical(p_qualification_type_id);
276     l_text:=l_text||'</qualification_type_id>';
280     l_text:=l_text||'</unit_standard_type>';
277     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
278     l_text:='<unit_standard_type>';
279     l_text:=l_text||irc_utilities_pkg.removeTags(p_unit_standard_type);
281     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
282     l_text:='<status>';
283     l_text:=l_text||irc_utilities_pkg.removeTags(p_status);
284     l_text:=l_text||'</status>';
285     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
286     l_text:='<information_category>';
287     l_text:=l_text||irc_utilities_pkg.removeTags(p_information_category);
288     l_text:=l_text||'</information_category>';
289     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
290     l_text:='<information1>';
291     l_text:=l_text||irc_utilities_pkg.removeTags(p_information1);
292     l_text:=l_text||'</information1>';
293     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
294     l_text:='<information2>';
295     l_text:=l_text||irc_utilities_pkg.removeTags(p_information2);
296     l_text:=l_text||'</information2>';
297     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
298     l_text:='<information3>';
299     l_text:=l_text||irc_utilities_pkg.removeTags(p_information3);
300     l_text:=l_text||'</information3>';
301     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
302     l_text:='<information4>';
303     l_text:=l_text||irc_utilities_pkg.removeTags(p_information4);
304     l_text:=l_text||'</information4>';
305     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
306     l_text:='<information5>';
307     l_text:=l_text||irc_utilities_pkg.removeTags(p_information5);
308     l_text:=l_text||'</information5>';
309     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
310     l_text:='<information6>';
311     l_text:=l_text||irc_utilities_pkg.removeTags(p_information6);
312     l_text:=l_text||'</information6>';
313     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
314     l_text:='<information7>';
315     l_text:=l_text||irc_utilities_pkg.removeTags(p_information7);
316     l_text:=l_text||'</information7>';
317     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
318     l_text:='<information8>';
319     l_text:=l_text||irc_utilities_pkg.removeTags(p_information8);
320     l_text:=l_text||'</information8>';
321     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
322     l_text:='<information9>';
323     l_text:=l_text||irc_utilities_pkg.removeTags(p_information9);
324     l_text:=l_text||'</information9>';
325     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
326     l_text:='<information10>';
327     l_text:=l_text||irc_utilities_pkg.removeTags(p_information10);
328     l_text:=l_text||'</information10>';
329     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
330     l_text:='<information11>';
331     l_text:=l_text||irc_utilities_pkg.removeTags(p_information11);
332     l_text:=l_text||'</information11>';
333     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
334     l_text:='<information12>';
335     l_text:=l_text||irc_utilities_pkg.removeTags(p_information12);
336     l_text:=l_text||'</information12>';
337     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
338     l_text:='<information13>';
339     l_text:=l_text||irc_utilities_pkg.removeTags(p_information13);
340     l_text:=l_text||'</information13>';
341     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
342     l_text:='<information14>';
343     l_text:=l_text||irc_utilities_pkg.removeTags(p_information14);
344     l_text:=l_text||'</information14>';
345     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
346     l_text:='<information15>';
347     l_text:=l_text||irc_utilities_pkg.removeTags(p_information15);
348     l_text:=l_text||'</information15>';
349     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
350     l_text:='<information16>';
351     l_text:=l_text||irc_utilities_pkg.removeTags(p_information16);
352     l_text:=l_text||'</information16>';
353     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
354     l_text:='<information17>';
355     l_text:=l_text||irc_utilities_pkg.removeTags(p_information17);
359     l_text:=l_text||irc_utilities_pkg.removeTags(p_information18);
356     l_text:=l_text||'</information17>';
357     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
358     l_text:='<information18>';
360     l_text:=l_text||'</information18>';
361     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
362     l_text:='<information19>';
363     l_text:=l_text||irc_utilities_pkg.removeTags(p_information19);
364     l_text:=l_text||'</information19>';
365     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
366     l_text:='<information20>';
367     l_text:=l_text||irc_utilities_pkg.removeTags(p_information20);
368     l_text:=l_text||'</information20>';
369     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
370     l_text:='<achieved_date>';
371     l_text:=l_text||fnd_date.date_to_canonical(p_achieved_date);
372     l_text:=l_text||'</achieved_date>';
373     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
374     l_text:='<appr_line_score>';
375     l_text:=l_text||fnd_number.number_to_canonical(p_appr_line_score);
376     l_text:=l_text||'</appr_line_score>';
377     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
378     l_text:='</competence_element>';
379     --
380     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
381     --
382     -- raise the event with the event data
383     wf_event.raise(p_event_name=>l_event_name
384                   ,p_event_key=>l_event_key
385                   ,p_event_data=>l_event_data);
386     --
387   elsif (l_message='KEY') then
388     hr_utility.set_location(l_proc,30);
389     -- get a key for the event
390     open get_seq;
391     fetch get_seq into l_event_key;
392     close get_seq;
393     -- this is a key event, so just raise the event
394     -- without the event data
395     wf_event.raise(p_event_name=>l_event_name
396                   ,p_event_key=>l_event_key);
397     --
398   elsif (l_message='NONE') then
399     hr_utility.set_location(l_proc,40);
400     -- no event is required, so do nothing
401     null;
402   end if;
403     hr_utility.set_location('Leaving: '||l_proc,50);
404 end update_competence_element_a;
405 end hr_competence_element_be2;