DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_PREVIOUS_EMPLOYMENT_BEB

Source


1 package body hr_previous_employment_beB as 
2 --Code generated on 30/03/2009 04:46:53
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure update_prev_job_extra_info_a (
5 p_previous_job_extra_info_id   number,
6 p_previous_job_id              number,
7 p_information_type             varchar2,
8 p_pji_attribute_category       varchar2,
9 p_pji_attribute1               varchar2,
10 p_pji_attribute2               varchar2,
11 p_pji_attribute3               varchar2,
12 p_pji_attribute4               varchar2,
13 p_pji_attribute5               varchar2,
14 p_pji_attribute6               varchar2,
15 p_pji_attribute7               varchar2,
16 p_pji_attribute8               varchar2,
17 p_pji_attribute9               varchar2,
18 p_pji_attribute10              varchar2,
19 p_pji_attribute11              varchar2,
20 p_pji_attribute12              varchar2,
21 p_pji_attribute13              varchar2,
22 p_pji_attribute14              varchar2,
23 p_pji_attribute15              varchar2,
24 p_pji_attribute16              varchar2,
25 p_pji_attribute17              varchar2,
26 p_pji_attribute18              varchar2,
27 p_pji_attribute19              varchar2,
28 p_pji_attribute20              varchar2,
29 p_pji_attribute21              varchar2,
30 p_pji_attribute22              varchar2,
31 p_pji_attribute23              varchar2,
32 p_pji_attribute24              varchar2,
33 p_pji_attribute25              varchar2,
34 p_pji_attribute26              varchar2,
35 p_pji_attribute27              varchar2,
36 p_pji_attribute28              varchar2,
37 p_pji_attribute29              varchar2,
38 p_pji_attribute30              varchar2,
39 p_pji_information_category     varchar2,
40 p_pji_information1             varchar2,
41 p_pji_information2             varchar2,
42 p_pji_information3             varchar2,
43 p_pji_information4             varchar2,
44 p_pji_information5             varchar2,
45 p_pji_information6             varchar2,
46 p_pji_information7             varchar2,
47 p_pji_information8             varchar2,
48 p_pji_information9             varchar2,
49 p_pji_information10            varchar2,
50 p_pji_information11            varchar2,
51 p_pji_information12            varchar2,
52 p_pji_information13            varchar2,
53 p_pji_information14            varchar2,
54 p_pji_information15            varchar2,
55 p_pji_information16            varchar2,
56 p_pji_information17            varchar2,
57 p_pji_information18            varchar2,
58 p_pji_information19            varchar2,
59 p_pji_information20            varchar2,
60 p_pji_information21            varchar2,
61 p_pji_information22            varchar2,
62 p_pji_information23            varchar2,
63 p_pji_information24            varchar2,
64 p_pji_information25            varchar2,
65 p_pji_information26            varchar2,
66 p_pji_information27            varchar2,
67 p_pji_information28            varchar2,
68 p_pji_information29            varchar2,
69 p_pji_information30            varchar2,
70 p_object_version_number        number) is
71   l_event_key number;
72   l_event_data clob;
73   l_event_name varchar2(250);
74   l_text varchar2(2000);
75   l_message varchar2(10);
76   --
77   cursor get_seq is
78   select per_wf_events_s.nextval from dual;
79   --
80   l_proc varchar2(72):='  hr_previous_employment_beB.update_prev_job_extra_info_a';
81 begin
82   hr_utility.set_location('Entering: '||l_proc,10);
83   -- check the status of the business event
84   l_event_name:='oracle.apps.per.api.previous_employment.update_prev_job_extra_info';
85   l_message:=wf_event.test(l_event_name);
86   --
87   if (l_message='MESSAGE') then
88     hr_utility.set_location(l_proc,20);
89     --
90     -- get a key for the event
91     --
92     open get_seq;
93     fetch get_seq into l_event_key;
94     close get_seq;
95     --
96     -- build the xml data for the event
97     --
98     dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
99     l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
100     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
101     l_text:='<previous_employment>';
102     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
103     --
104     l_text:='<previous_job_extra_info_id>';
105     l_text:=l_text||fnd_number.number_to_canonical(p_previous_job_extra_info_id);
106     l_text:=l_text||'</previous_job_extra_info_id>';
107     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
108     l_text:='<previous_job_id>';
109     l_text:=l_text||fnd_number.number_to_canonical(p_previous_job_id);
110     l_text:=l_text||'</previous_job_id>';
111     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
112     l_text:='<information_type>';
113     l_text:=l_text||irc_utilities_pkg.removeTags(p_information_type);
114     l_text:=l_text||'</information_type>';
115     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
116     l_text:='<pji_attribute_category>';
117     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute_category);
118     l_text:=l_text||'</pji_attribute_category>';
119     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
120     l_text:='<pji_attribute1>';
121     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute1);
122     l_text:=l_text||'</pji_attribute1>';
123     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
124     l_text:='<pji_attribute2>';
125     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute2);
126     l_text:=l_text||'</pji_attribute2>';
127     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
128     l_text:='<pji_attribute3>';
129     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute3);
130     l_text:=l_text||'</pji_attribute3>';
131     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
132     l_text:='<pji_attribute4>';
133     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute4);
134     l_text:=l_text||'</pji_attribute4>';
135     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
136     l_text:='<pji_attribute5>';
137     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute5);
138     l_text:=l_text||'</pji_attribute5>';
139     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
140     l_text:='<pji_attribute6>';
141     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute6);
142     l_text:=l_text||'</pji_attribute6>';
143     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
144     l_text:='<pji_attribute7>';
145     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute7);
146     l_text:=l_text||'</pji_attribute7>';
147     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
148     l_text:='<pji_attribute8>';
149     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute8);
150     l_text:=l_text||'</pji_attribute8>';
151     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
152     l_text:='<pji_attribute9>';
153     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute9);
154     l_text:=l_text||'</pji_attribute9>';
155     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
156     l_text:='<pji_attribute10>';
157     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute10);
158     l_text:=l_text||'</pji_attribute10>';
159     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
160     l_text:='<pji_attribute11>';
161     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute11);
162     l_text:=l_text||'</pji_attribute11>';
163     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
164     l_text:='<pji_attribute12>';
165     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute12);
166     l_text:=l_text||'</pji_attribute12>';
167     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
168     l_text:='<pji_attribute13>';
169     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute13);
170     l_text:=l_text||'</pji_attribute13>';
171     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
172     l_text:='<pji_attribute14>';
173     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute14);
174     l_text:=l_text||'</pji_attribute14>';
175     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
176     l_text:='<pji_attribute15>';
177     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute15);
178     l_text:=l_text||'</pji_attribute15>';
179     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
180     l_text:='<pji_attribute16>';
181     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute16);
182     l_text:=l_text||'</pji_attribute16>';
183     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
184     l_text:='<pji_attribute17>';
185     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute17);
186     l_text:=l_text||'</pji_attribute17>';
187     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
188     l_text:='<pji_attribute18>';
189     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute18);
190     l_text:=l_text||'</pji_attribute18>';
191     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
192     l_text:='<pji_attribute19>';
193     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute19);
194     l_text:=l_text||'</pji_attribute19>';
195     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
196     l_text:='<pji_attribute20>';
197     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute20);
198     l_text:=l_text||'</pji_attribute20>';
199     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
200     l_text:='<pji_attribute21>';
201     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute21);
202     l_text:=l_text||'</pji_attribute21>';
203     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
204     l_text:='<pji_attribute22>';
205     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute22);
206     l_text:=l_text||'</pji_attribute22>';
207     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
208     l_text:='<pji_attribute23>';
209     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute23);
210     l_text:=l_text||'</pji_attribute23>';
211     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
212     l_text:='<pji_attribute24>';
213     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute24);
214     l_text:=l_text||'</pji_attribute24>';
215     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
216     l_text:='<pji_attribute25>';
217     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute25);
218     l_text:=l_text||'</pji_attribute25>';
219     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
220     l_text:='<pji_attribute26>';
221     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute26);
222     l_text:=l_text||'</pji_attribute26>';
223     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
224     l_text:='<pji_attribute27>';
225     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute27);
226     l_text:=l_text||'</pji_attribute27>';
227     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
228     l_text:='<pji_attribute28>';
229     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute28);
230     l_text:=l_text||'</pji_attribute28>';
231     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
232     l_text:='<pji_attribute29>';
233     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute29);
234     l_text:=l_text||'</pji_attribute29>';
235     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
236     l_text:='<pji_attribute30>';
237     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_attribute30);
238     l_text:=l_text||'</pji_attribute30>';
239     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
240     l_text:='<pji_information_category>';
241     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information_category);
242     l_text:=l_text||'</pji_information_category>';
243     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
244     l_text:='<pji_information1>';
245     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information1);
246     l_text:=l_text||'</pji_information1>';
247     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
248     l_text:='<pji_information2>';
249     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information2);
250     l_text:=l_text||'</pji_information2>';
251     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
252     l_text:='<pji_information3>';
253     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information3);
254     l_text:=l_text||'</pji_information3>';
255     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
256     l_text:='<pji_information4>';
257     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information4);
258     l_text:=l_text||'</pji_information4>';
259     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
260     l_text:='<pji_information5>';
261     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information5);
262     l_text:=l_text||'</pji_information5>';
263     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
264     l_text:='<pji_information6>';
265     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information6);
266     l_text:=l_text||'</pji_information6>';
267     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
268     l_text:='<pji_information7>';
269     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information7);
270     l_text:=l_text||'</pji_information7>';
271     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
272     l_text:='<pji_information8>';
273     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information8);
274     l_text:=l_text||'</pji_information8>';
275     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
276     l_text:='<pji_information9>';
277     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information9);
278     l_text:=l_text||'</pji_information9>';
279     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
280     l_text:='<pji_information10>';
281     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information10);
282     l_text:=l_text||'</pji_information10>';
283     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
284     l_text:='<pji_information11>';
285     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information11);
286     l_text:=l_text||'</pji_information11>';
290     l_text:=l_text||'</pji_information12>';
287     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
288     l_text:='<pji_information12>';
289     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information12);
291     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
292     l_text:='<pji_information13>';
293     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information13);
294     l_text:=l_text||'</pji_information13>';
295     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
296     l_text:='<pji_information14>';
297     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information14);
298     l_text:=l_text||'</pji_information14>';
299     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
300     l_text:='<pji_information15>';
301     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information15);
302     l_text:=l_text||'</pji_information15>';
303     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
304     l_text:='<pji_information16>';
305     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information16);
306     l_text:=l_text||'</pji_information16>';
307     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
308     l_text:='<pji_information17>';
309     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information17);
310     l_text:=l_text||'</pji_information17>';
311     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
312     l_text:='<pji_information18>';
313     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information18);
314     l_text:=l_text||'</pji_information18>';
315     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
316     l_text:='<pji_information19>';
317     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information19);
318     l_text:=l_text||'</pji_information19>';
319     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
320     l_text:='<pji_information20>';
321     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information20);
322     l_text:=l_text||'</pji_information20>';
323     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
324     l_text:='<pji_information21>';
325     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information21);
326     l_text:=l_text||'</pji_information21>';
327     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
328     l_text:='<pji_information22>';
329     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information22);
330     l_text:=l_text||'</pji_information22>';
331     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
332     l_text:='<pji_information23>';
333     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information23);
334     l_text:=l_text||'</pji_information23>';
335     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
336     l_text:='<pji_information24>';
337     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information24);
338     l_text:=l_text||'</pji_information24>';
339     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
340     l_text:='<pji_information25>';
341     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information25);
342     l_text:=l_text||'</pji_information25>';
343     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
344     l_text:='<pji_information26>';
345     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information26);
346     l_text:=l_text||'</pji_information26>';
347     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
348     l_text:='<pji_information27>';
349     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information27);
350     l_text:=l_text||'</pji_information27>';
351     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
352     l_text:='<pji_information28>';
353     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information28);
354     l_text:=l_text||'</pji_information28>';
355     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
356     l_text:='<pji_information29>';
357     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information29);
358     l_text:=l_text||'</pji_information29>';
359     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
360     l_text:='<pji_information30>';
361     l_text:=l_text||irc_utilities_pkg.removeTags(p_pji_information30);
362     l_text:=l_text||'</pji_information30>';
363     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
364     l_text:='<object_version_number>';
365     l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
366     l_text:=l_text||'</object_version_number>';
367     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
368     l_text:='</previous_employment>';
369     --
370     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
371     --
372     -- raise the event with the event data
373     wf_event.raise(p_event_name=>l_event_name
374                   ,p_event_key=>l_event_key
375                   ,p_event_data=>l_event_data);
376   elsif (l_message='KEY') then
377     hr_utility.set_location(l_proc,30);
378     -- get a key for the event
379     open get_seq;
380     fetch get_seq into l_event_key;
381     close get_seq;
382     -- this is a key event, so just raise the event
383     -- without the event data
384     wf_event.raise(p_event_name=>l_event_name
385                   ,p_event_key=>l_event_key);
386   elsif (l_message='NONE') then
387     hr_utility.set_location(l_proc,40);
388     -- no event is required, so do nothing
389     null;
390   end if;
391     hr_utility.set_location('Leaving: '||l_proc,50);
392 end update_prev_job_extra_info_a;
393 end hr_previous_employment_beB;