[Home] [Help]
PACKAGE BODY: APPS.HR_PREVIOUS_EMPLOYMENT_BE4
Source
1 package body hr_previous_employment_be4 as
2 --Code generated on 30/03/2009 04:46:38
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure create_previous_job_a (
5 p_effective_date date,
6 p_previous_job_id number,
7 p_previous_employer_id number,
8 p_start_date date,
9 p_end_date date,
10 p_period_years number,
11 p_period_months number,
12 p_period_days number,
13 p_job_name varchar2,
14 p_employment_category varchar2,
15 p_description varchar2,
16 p_all_assignments varchar2,
17 p_pjo_attribute_category varchar2,
18 p_pjo_attribute1 varchar2,
19 p_pjo_attribute2 varchar2,
20 p_pjo_attribute3 varchar2,
21 p_pjo_attribute4 varchar2,
22 p_pjo_attribute5 varchar2,
23 p_pjo_attribute6 varchar2,
24 p_pjo_attribute7 varchar2,
25 p_pjo_attribute8 varchar2,
26 p_pjo_attribute9 varchar2,
27 p_pjo_attribute10 varchar2,
28 p_pjo_attribute11 varchar2,
29 p_pjo_attribute12 varchar2,
30 p_pjo_attribute13 varchar2,
31 p_pjo_attribute14 varchar2,
32 p_pjo_attribute15 varchar2,
33 p_pjo_attribute16 varchar2,
34 p_pjo_attribute17 varchar2,
35 p_pjo_attribute18 varchar2,
36 p_pjo_attribute19 varchar2,
37 p_pjo_attribute20 varchar2,
38 p_pjo_attribute21 varchar2,
39 p_pjo_attribute22 varchar2,
40 p_pjo_attribute23 varchar2,
41 p_pjo_attribute24 varchar2,
42 p_pjo_attribute25 varchar2,
43 p_pjo_attribute26 varchar2,
44 p_pjo_attribute27 varchar2,
45 p_pjo_attribute28 varchar2,
46 p_pjo_attribute29 varchar2,
47 p_pjo_attribute30 varchar2,
48 p_pjo_information_category varchar2,
49 p_pjo_information1 varchar2,
50 p_pjo_information2 varchar2,
51 p_pjo_information3 varchar2,
52 p_pjo_information4 varchar2,
53 p_pjo_information5 varchar2,
54 p_pjo_information6 varchar2,
55 p_pjo_information7 varchar2,
56 p_pjo_information8 varchar2,
57 p_pjo_information9 varchar2,
58 p_pjo_information10 varchar2,
59 p_pjo_information11 varchar2,
60 p_pjo_information12 varchar2,
61 p_pjo_information13 varchar2,
62 p_pjo_information14 varchar2,
63 p_pjo_information15 varchar2,
64 p_pjo_information16 varchar2,
65 p_pjo_information17 varchar2,
66 p_pjo_information18 varchar2,
67 p_pjo_information19 varchar2,
68 p_pjo_information20 varchar2,
69 p_pjo_information21 varchar2,
70 p_pjo_information22 varchar2,
71 p_pjo_information23 varchar2,
72 p_pjo_information24 varchar2,
73 p_pjo_information25 varchar2,
74 p_pjo_information26 varchar2,
75 p_pjo_information27 varchar2,
76 p_pjo_information28 varchar2,
77 p_pjo_information29 varchar2,
78 p_pjo_information30 varchar2,
79 p_object_version_number number) is
80 l_event_key number;
81 l_event_data clob;
82 l_event_name varchar2(250);
83 l_text varchar2(2000);
84 l_message varchar2(10);
85 --
86 cursor get_seq is
87 select per_wf_events_s.nextval from dual;
88 --
89 l_proc varchar2(72):=' hr_previous_employment_be4.create_previous_job_a';
90 begin
91 hr_utility.set_location('Entering: '||l_proc,10);
92 -- check the status of the business event
93 l_event_name:='oracle.apps.per.api.previous_employment.create_previous_job';
94 l_message:=wf_event.test(l_event_name);
95 --
96 if (l_message='MESSAGE') then
97 hr_utility.set_location(l_proc,20);
98 --
99 -- get a key for the event
100 --
101 open get_seq;
102 fetch get_seq into l_event_key;
103 close get_seq;
104 --
105 -- build the xml data for the event
106 --
107 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
108 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
109 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
110 l_text:='<previous_employment>';
111 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
112 --
113 l_text:='<effective_date>';
114 l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
115 l_text:=l_text||'</effective_date>';
116 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
117 l_text:='<previous_job_id>';
118 l_text:=l_text||fnd_number.number_to_canonical(p_previous_job_id);
119 l_text:=l_text||'</previous_job_id>';
120 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
121 l_text:='<previous_employer_id>';
122 l_text:=l_text||fnd_number.number_to_canonical(p_previous_employer_id);
123 l_text:=l_text||'</previous_employer_id>';
124 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
125 l_text:='<start_date>';
126 l_text:=l_text||fnd_date.date_to_canonical(p_start_date);
127 l_text:=l_text||'</start_date>';
128 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
129 l_text:='<end_date>';
130 l_text:=l_text||fnd_date.date_to_canonical(p_end_date);
131 l_text:=l_text||'</end_date>';
132 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
133 l_text:='<period_years>';
134 l_text:=l_text||fnd_number.number_to_canonical(p_period_years);
135 l_text:=l_text||'</period_years>';
136 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
137 l_text:='<period_months>';
138 l_text:=l_text||fnd_number.number_to_canonical(p_period_months);
139 l_text:=l_text||'</period_months>';
140 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
141 l_text:='<period_days>';
142 l_text:=l_text||fnd_number.number_to_canonical(p_period_days);
143 l_text:=l_text||'</period_days>';
144 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
145 l_text:='<job_name>';
146 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_name);
147 l_text:=l_text||'</job_name>';
148 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
149 l_text:='<employment_category>';
150 l_text:=l_text||irc_utilities_pkg.removeTags(p_employment_category);
151 l_text:=l_text||'</employment_category>';
152 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
153 l_text:='<description>';
154 l_text:=l_text||irc_utilities_pkg.removeTags(p_description);
155 l_text:=l_text||'</description>';
156 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
157 l_text:='<all_assignments>';
158 l_text:=l_text||irc_utilities_pkg.removeTags(p_all_assignments);
159 l_text:=l_text||'</all_assignments>';
160 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
161 l_text:='<pjo_attribute_category>';
162 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute_category);
163 l_text:=l_text||'</pjo_attribute_category>';
164 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
165 l_text:='<pjo_attribute1>';
166 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute1);
167 l_text:=l_text||'</pjo_attribute1>';
168 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
169 l_text:='<pjo_attribute2>';
170 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute2);
171 l_text:=l_text||'</pjo_attribute2>';
172 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
173 l_text:='<pjo_attribute3>';
174 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute3);
175 l_text:=l_text||'</pjo_attribute3>';
176 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
177 l_text:='<pjo_attribute4>';
178 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute4);
179 l_text:=l_text||'</pjo_attribute4>';
180 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
181 l_text:='<pjo_attribute5>';
182 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute5);
183 l_text:=l_text||'</pjo_attribute5>';
184 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
185 l_text:='<pjo_attribute6>';
186 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute6);
187 l_text:=l_text||'</pjo_attribute6>';
188 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
189 l_text:='<pjo_attribute7>';
190 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute7);
191 l_text:=l_text||'</pjo_attribute7>';
192 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
193 l_text:='<pjo_attribute8>';
194 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute8);
195 l_text:=l_text||'</pjo_attribute8>';
196 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
197 l_text:='<pjo_attribute9>';
198 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute9);
199 l_text:=l_text||'</pjo_attribute9>';
200 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
201 l_text:='<pjo_attribute10>';
202 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute10);
203 l_text:=l_text||'</pjo_attribute10>';
204 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
205 l_text:='<pjo_attribute11>';
206 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute11);
207 l_text:=l_text||'</pjo_attribute11>';
208 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
209 l_text:='<pjo_attribute12>';
210 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute12);
211 l_text:=l_text||'</pjo_attribute12>';
212 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
213 l_text:='<pjo_attribute13>';
214 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute13);
215 l_text:=l_text||'</pjo_attribute13>';
216 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
217 l_text:='<pjo_attribute14>';
218 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute14);
219 l_text:=l_text||'</pjo_attribute14>';
220 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
221 l_text:='<pjo_attribute15>';
222 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute15);
223 l_text:=l_text||'</pjo_attribute15>';
224 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
225 l_text:='<pjo_attribute16>';
226 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute16);
227 l_text:=l_text||'</pjo_attribute16>';
228 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
229 l_text:='<pjo_attribute17>';
230 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute17);
231 l_text:=l_text||'</pjo_attribute17>';
232 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
233 l_text:='<pjo_attribute18>';
234 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute18);
235 l_text:=l_text||'</pjo_attribute18>';
236 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
237 l_text:='<pjo_attribute19>';
238 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute19);
239 l_text:=l_text||'</pjo_attribute19>';
240 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
241 l_text:='<pjo_attribute20>';
242 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute20);
243 l_text:=l_text||'</pjo_attribute20>';
244 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
245 l_text:='<pjo_attribute21>';
246 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute21);
247 l_text:=l_text||'</pjo_attribute21>';
248 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
249 l_text:='<pjo_attribute22>';
250 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute22);
251 l_text:=l_text||'</pjo_attribute22>';
252 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
253 l_text:='<pjo_attribute23>';
254 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute23);
255 l_text:=l_text||'</pjo_attribute23>';
256 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
257 l_text:='<pjo_attribute24>';
258 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute24);
259 l_text:=l_text||'</pjo_attribute24>';
260 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
261 l_text:='<pjo_attribute25>';
262 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute25);
263 l_text:=l_text||'</pjo_attribute25>';
264 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
265 l_text:='<pjo_attribute26>';
266 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute26);
267 l_text:=l_text||'</pjo_attribute26>';
268 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
269 l_text:='<pjo_attribute27>';
270 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute27);
271 l_text:=l_text||'</pjo_attribute27>';
272 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
273 l_text:='<pjo_attribute28>';
274 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute28);
275 l_text:=l_text||'</pjo_attribute28>';
276 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
277 l_text:='<pjo_attribute29>';
278 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute29);
279 l_text:=l_text||'</pjo_attribute29>';
280 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
281 l_text:='<pjo_attribute30>';
282 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_attribute30);
283 l_text:=l_text||'</pjo_attribute30>';
284 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
285 l_text:='<pjo_information_category>';
286 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information_category);
287 l_text:=l_text||'</pjo_information_category>';
288 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
289 l_text:='<pjo_information1>';
290 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information1);
291 l_text:=l_text||'</pjo_information1>';
292 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
293 l_text:='<pjo_information2>';
294 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information2);
295 l_text:=l_text||'</pjo_information2>';
296 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
297 l_text:='<pjo_information3>';
298 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information3);
299 l_text:=l_text||'</pjo_information3>';
300 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
301 l_text:='<pjo_information4>';
302 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information4);
303 l_text:=l_text||'</pjo_information4>';
304 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
305 l_text:='<pjo_information5>';
306 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information5);
307 l_text:=l_text||'</pjo_information5>';
308 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
309 l_text:='<pjo_information6>';
313 l_text:='<pjo_information7>';
310 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information6);
311 l_text:=l_text||'</pjo_information6>';
312 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
314 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information7);
315 l_text:=l_text||'</pjo_information7>';
316 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
317 l_text:='<pjo_information8>';
318 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information8);
319 l_text:=l_text||'</pjo_information8>';
320 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
321 l_text:='<pjo_information9>';
322 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information9);
323 l_text:=l_text||'</pjo_information9>';
324 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
325 l_text:='<pjo_information10>';
326 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information10);
327 l_text:=l_text||'</pjo_information10>';
328 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
329 l_text:='<pjo_information11>';
330 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information11);
331 l_text:=l_text||'</pjo_information11>';
332 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
333 l_text:='<pjo_information12>';
334 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information12);
335 l_text:=l_text||'</pjo_information12>';
336 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
337 l_text:='<pjo_information13>';
338 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information13);
339 l_text:=l_text||'</pjo_information13>';
340 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
341 l_text:='<pjo_information14>';
342 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information14);
343 l_text:=l_text||'</pjo_information14>';
344 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
345 l_text:='<pjo_information15>';
346 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information15);
347 l_text:=l_text||'</pjo_information15>';
348 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
349 l_text:='<pjo_information16>';
350 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information16);
351 l_text:=l_text||'</pjo_information16>';
352 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
353 l_text:='<pjo_information17>';
354 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information17);
355 l_text:=l_text||'</pjo_information17>';
356 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
357 l_text:='<pjo_information18>';
358 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information18);
359 l_text:=l_text||'</pjo_information18>';
360 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
361 l_text:='<pjo_information19>';
362 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information19);
363 l_text:=l_text||'</pjo_information19>';
364 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
365 l_text:='<pjo_information20>';
366 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information20);
367 l_text:=l_text||'</pjo_information20>';
368 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
369 l_text:='<pjo_information21>';
370 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information21);
371 l_text:=l_text||'</pjo_information21>';
372 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
373 l_text:='<pjo_information22>';
374 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information22);
375 l_text:=l_text||'</pjo_information22>';
376 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
377 l_text:='<pjo_information23>';
378 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information23);
379 l_text:=l_text||'</pjo_information23>';
380 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
381 l_text:='<pjo_information24>';
382 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information24);
383 l_text:=l_text||'</pjo_information24>';
384 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
385 l_text:='<pjo_information25>';
386 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information25);
387 l_text:=l_text||'</pjo_information25>';
388 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
389 l_text:='<pjo_information26>';
390 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information26);
391 l_text:=l_text||'</pjo_information26>';
392 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
393 l_text:='<pjo_information27>';
394 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information27);
395 l_text:=l_text||'</pjo_information27>';
396 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
397 l_text:='<pjo_information28>';
398 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information28);
399 l_text:=l_text||'</pjo_information28>';
400 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
401 l_text:='<pjo_information29>';
402 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information29);
403 l_text:=l_text||'</pjo_information29>';
404 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
405 l_text:='<pjo_information30>';
406 l_text:=l_text||irc_utilities_pkg.removeTags(p_pjo_information30);
407 l_text:=l_text||'</pjo_information30>';
408 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
409 l_text:='<object_version_number>';
413 l_text:='</previous_employment>';
410 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
411 l_text:=l_text||'</object_version_number>';
412 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
414 --
415 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
416 --
417 -- raise the event with the event data
418 wf_event.raise(p_event_name=>l_event_name
419 ,p_event_key=>l_event_key
420 ,p_event_data=>l_event_data);
421 elsif (l_message='KEY') then
422 hr_utility.set_location(l_proc,30);
423 -- get a key for the event
424 open get_seq;
425 fetch get_seq into l_event_key;
426 close get_seq;
427 -- this is a key event, so just raise the event
428 -- without the event data
429 wf_event.raise(p_event_name=>l_event_name
430 ,p_event_key=>l_event_key);
431 elsif (l_message='NONE') then
432 hr_utility.set_location(l_proc,40);
433 -- no event is required, so do nothing
434 null;
435 end if;
436 hr_utility.set_location('Leaving: '||l_proc,50);
437 end create_previous_job_a;
438 end hr_previous_employment_be4;