[Home] [Help]
PACKAGE BODY: APPS.HR_PREVIOUS_EMPLOYMENT_BE2
Source
1 package body hr_previous_employment_be2 as
2 --Code generated on 30/03/2009 04:46:35
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure update_previous_employer_a (
5 p_effective_date date,
6 p_previous_employer_id number,
7 p_start_date date,
8 p_end_date date,
9 p_period_years number,
10 p_period_months number,
11 p_period_days number,
12 p_employer_name varchar2,
13 p_employer_country varchar2,
14 p_employer_address varchar2,
15 p_employer_type varchar2,
16 p_employer_subtype varchar2,
17 p_description varchar2,
18 p_all_assignments varchar2,
19 p_pem_attribute_category varchar2,
20 p_pem_attribute1 varchar2,
21 p_pem_attribute2 varchar2,
22 p_pem_attribute3 varchar2,
23 p_pem_attribute4 varchar2,
24 p_pem_attribute5 varchar2,
25 p_pem_attribute6 varchar2,
26 p_pem_attribute7 varchar2,
27 p_pem_attribute8 varchar2,
28 p_pem_attribute9 varchar2,
29 p_pem_attribute10 varchar2,
30 p_pem_attribute11 varchar2,
31 p_pem_attribute12 varchar2,
32 p_pem_attribute13 varchar2,
33 p_pem_attribute14 varchar2,
34 p_pem_attribute15 varchar2,
35 p_pem_attribute16 varchar2,
36 p_pem_attribute17 varchar2,
37 p_pem_attribute18 varchar2,
38 p_pem_attribute19 varchar2,
39 p_pem_attribute20 varchar2,
40 p_pem_attribute21 varchar2,
41 p_pem_attribute22 varchar2,
42 p_pem_attribute23 varchar2,
43 p_pem_attribute24 varchar2,
44 p_pem_attribute25 varchar2,
45 p_pem_attribute26 varchar2,
46 p_pem_attribute27 varchar2,
47 p_pem_attribute28 varchar2,
48 p_pem_attribute29 varchar2,
49 p_pem_attribute30 varchar2,
50 p_pem_information_category varchar2,
51 p_pem_information1 varchar2,
52 p_pem_information2 varchar2,
53 p_pem_information3 varchar2,
54 p_pem_information4 varchar2,
55 p_pem_information5 varchar2,
56 p_pem_information6 varchar2,
57 p_pem_information7 varchar2,
58 p_pem_information8 varchar2,
59 p_pem_information9 varchar2,
60 p_pem_information10 varchar2,
61 p_pem_information11 varchar2,
62 p_pem_information12 varchar2,
63 p_pem_information13 varchar2,
64 p_pem_information14 varchar2,
65 p_pem_information15 varchar2,
66 p_pem_information16 varchar2,
67 p_pem_information17 varchar2,
68 p_pem_information18 varchar2,
69 p_pem_information19 varchar2,
70 p_pem_information20 varchar2,
71 p_pem_information21 varchar2,
72 p_pem_information22 varchar2,
73 p_pem_information23 varchar2,
74 p_pem_information24 varchar2,
75 p_pem_information25 varchar2,
76 p_pem_information26 varchar2,
77 p_pem_information27 varchar2,
78 p_pem_information28 varchar2,
79 p_pem_information29 varchar2,
80 p_pem_information30 varchar2,
81 p_object_version_number number) is
82 l_event_key number;
83 l_event_data clob;
84 l_event_name varchar2(250);
85 l_text varchar2(2000);
86 l_message varchar2(10);
87 --
88 cursor get_seq is
89 select per_wf_events_s.nextval from dual;
90 --
91 l_proc varchar2(72):=' hr_previous_employment_be2.update_previous_employer_a';
92 begin
93 hr_utility.set_location('Entering: '||l_proc,10);
94 -- check the status of the business event
95 l_event_name:='oracle.apps.per.api.previous_employment.update_previous_employer';
96 l_message:=wf_event.test(l_event_name);
97 --
98 if (l_message='MESSAGE') then
99 hr_utility.set_location(l_proc,20);
100 --
101 -- get a key for the event
102 --
103 open get_seq;
104 fetch get_seq into l_event_key;
105 close get_seq;
106 --
107 -- build the xml data for the event
108 --
109 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
110 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
111 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
112 l_text:='<previous_employment>';
113 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
114 --
115 l_text:='<effective_date>';
116 l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
117 l_text:=l_text||'</effective_date>';
118 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
119 l_text:='<previous_employer_id>';
120 l_text:=l_text||fnd_number.number_to_canonical(p_previous_employer_id);
121 l_text:=l_text||'</previous_employer_id>';
122 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
123 l_text:='<start_date>';
124 l_text:=l_text||fnd_date.date_to_canonical(p_start_date);
125 l_text:=l_text||'</start_date>';
126 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
127 l_text:='<end_date>';
128 l_text:=l_text||fnd_date.date_to_canonical(p_end_date);
129 l_text:=l_text||'</end_date>';
130 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
131 l_text:='<period_years>';
132 l_text:=l_text||fnd_number.number_to_canonical(p_period_years);
133 l_text:=l_text||'</period_years>';
134 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
135 l_text:='<period_months>';
136 l_text:=l_text||fnd_number.number_to_canonical(p_period_months);
137 l_text:=l_text||'</period_months>';
138 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
139 l_text:='<period_days>';
140 l_text:=l_text||fnd_number.number_to_canonical(p_period_days);
141 l_text:=l_text||'</period_days>';
142 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
143 l_text:='<employer_name>';
144 l_text:=l_text||irc_utilities_pkg.removeTags(p_employer_name);
145 l_text:=l_text||'</employer_name>';
146 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
147 l_text:='<employer_country>';
148 l_text:=l_text||irc_utilities_pkg.removeTags(p_employer_country);
149 l_text:=l_text||'</employer_country>';
150 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
151 l_text:='<employer_address>';
152 l_text:=l_text||irc_utilities_pkg.removeTags(p_employer_address);
153 l_text:=l_text||'</employer_address>';
154 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
155 l_text:='<employer_type>';
156 l_text:=l_text||irc_utilities_pkg.removeTags(p_employer_type);
157 l_text:=l_text||'</employer_type>';
158 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
159 l_text:='<employer_subtype>';
160 l_text:=l_text||irc_utilities_pkg.removeTags(p_employer_subtype);
161 l_text:=l_text||'</employer_subtype>';
162 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
163 l_text:='<description>';
164 l_text:=l_text||irc_utilities_pkg.removeTags(p_description);
165 l_text:=l_text||'</description>';
166 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
167 l_text:='<all_assignments>';
168 l_text:=l_text||irc_utilities_pkg.removeTags(p_all_assignments);
169 l_text:=l_text||'</all_assignments>';
170 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
171 l_text:='<pem_attribute_category>';
172 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute_category);
173 l_text:=l_text||'</pem_attribute_category>';
174 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
175 l_text:='<pem_attribute1>';
176 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute1);
177 l_text:=l_text||'</pem_attribute1>';
178 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
179 l_text:='<pem_attribute2>';
180 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute2);
181 l_text:=l_text||'</pem_attribute2>';
182 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
183 l_text:='<pem_attribute3>';
184 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute3);
185 l_text:=l_text||'</pem_attribute3>';
186 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
187 l_text:='<pem_attribute4>';
188 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute4);
189 l_text:=l_text||'</pem_attribute4>';
190 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
191 l_text:='<pem_attribute5>';
192 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute5);
193 l_text:=l_text||'</pem_attribute5>';
194 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
195 l_text:='<pem_attribute6>';
196 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute6);
197 l_text:=l_text||'</pem_attribute6>';
198 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
199 l_text:='<pem_attribute7>';
200 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute7);
201 l_text:=l_text||'</pem_attribute7>';
202 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
203 l_text:='<pem_attribute8>';
204 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute8);
205 l_text:=l_text||'</pem_attribute8>';
206 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
207 l_text:='<pem_attribute9>';
208 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute9);
209 l_text:=l_text||'</pem_attribute9>';
210 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
211 l_text:='<pem_attribute10>';
212 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute10);
213 l_text:=l_text||'</pem_attribute10>';
214 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
215 l_text:='<pem_attribute11>';
216 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute11);
217 l_text:=l_text||'</pem_attribute11>';
218 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
219 l_text:='<pem_attribute12>';
220 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute12);
221 l_text:=l_text||'</pem_attribute12>';
222 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
223 l_text:='<pem_attribute13>';
224 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute13);
225 l_text:=l_text||'</pem_attribute13>';
226 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
227 l_text:='<pem_attribute14>';
228 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute14);
229 l_text:=l_text||'</pem_attribute14>';
230 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
231 l_text:='<pem_attribute15>';
232 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute15);
233 l_text:=l_text||'</pem_attribute15>';
234 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
235 l_text:='<pem_attribute16>';
236 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute16);
237 l_text:=l_text||'</pem_attribute16>';
238 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
239 l_text:='<pem_attribute17>';
240 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute17);
241 l_text:=l_text||'</pem_attribute17>';
242 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
243 l_text:='<pem_attribute18>';
244 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute18);
245 l_text:=l_text||'</pem_attribute18>';
246 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
247 l_text:='<pem_attribute19>';
248 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute19);
249 l_text:=l_text||'</pem_attribute19>';
250 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
251 l_text:='<pem_attribute20>';
252 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute20);
253 l_text:=l_text||'</pem_attribute20>';
254 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
255 l_text:='<pem_attribute21>';
256 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute21);
257 l_text:=l_text||'</pem_attribute21>';
258 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
259 l_text:='<pem_attribute22>';
260 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute22);
261 l_text:=l_text||'</pem_attribute22>';
262 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
263 l_text:='<pem_attribute23>';
264 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute23);
265 l_text:=l_text||'</pem_attribute23>';
266 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
267 l_text:='<pem_attribute24>';
268 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute24);
269 l_text:=l_text||'</pem_attribute24>';
270 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
271 l_text:='<pem_attribute25>';
272 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute25);
273 l_text:=l_text||'</pem_attribute25>';
274 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
275 l_text:='<pem_attribute26>';
276 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute26);
277 l_text:=l_text||'</pem_attribute26>';
278 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
279 l_text:='<pem_attribute27>';
280 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute27);
281 l_text:=l_text||'</pem_attribute27>';
282 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
283 l_text:='<pem_attribute28>';
284 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute28);
285 l_text:=l_text||'</pem_attribute28>';
286 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
287 l_text:='<pem_attribute29>';
288 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute29);
289 l_text:=l_text||'</pem_attribute29>';
290 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
291 l_text:='<pem_attribute30>';
292 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_attribute30);
293 l_text:=l_text||'</pem_attribute30>';
294 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
295 l_text:='<pem_information_category>';
296 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information_category);
297 l_text:=l_text||'</pem_information_category>';
298 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
299 l_text:='<pem_information1>';
300 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information1);
301 l_text:=l_text||'</pem_information1>';
302 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
303 l_text:='<pem_information2>';
304 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information2);
305 l_text:=l_text||'</pem_information2>';
306 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
307 l_text:='<pem_information3>';
308 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information3);
309 l_text:=l_text||'</pem_information3>';
310 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
311 l_text:='<pem_information4>';
312 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information4);
313 l_text:=l_text||'</pem_information4>';
314 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
315 l_text:='<pem_information5>';
316 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information5);
317 l_text:=l_text||'</pem_information5>';
318 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
319 l_text:='<pem_information6>';
320 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information6);
321 l_text:=l_text||'</pem_information6>';
322 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
323 l_text:='<pem_information7>';
324 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information7);
325 l_text:=l_text||'</pem_information7>';
326 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
327 l_text:='<pem_information8>';
328 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information8);
329 l_text:=l_text||'</pem_information8>';
330 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
331 l_text:='<pem_information9>';
332 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information9);
336 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information10);
333 l_text:=l_text||'</pem_information9>';
334 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
335 l_text:='<pem_information10>';
337 l_text:=l_text||'</pem_information10>';
338 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
339 l_text:='<pem_information11>';
340 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information11);
341 l_text:=l_text||'</pem_information11>';
342 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
343 l_text:='<pem_information12>';
344 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information12);
345 l_text:=l_text||'</pem_information12>';
346 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
347 l_text:='<pem_information13>';
348 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information13);
349 l_text:=l_text||'</pem_information13>';
350 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
351 l_text:='<pem_information14>';
352 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information14);
353 l_text:=l_text||'</pem_information14>';
354 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
355 l_text:='<pem_information15>';
356 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information15);
357 l_text:=l_text||'</pem_information15>';
358 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
359 l_text:='<pem_information16>';
360 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information16);
361 l_text:=l_text||'</pem_information16>';
362 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
363 l_text:='<pem_information17>';
364 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information17);
365 l_text:=l_text||'</pem_information17>';
366 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
367 l_text:='<pem_information18>';
368 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information18);
369 l_text:=l_text||'</pem_information18>';
370 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
371 l_text:='<pem_information19>';
372 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information19);
373 l_text:=l_text||'</pem_information19>';
374 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
375 l_text:='<pem_information20>';
376 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information20);
377 l_text:=l_text||'</pem_information20>';
378 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
379 l_text:='<pem_information21>';
380 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information21);
381 l_text:=l_text||'</pem_information21>';
382 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
383 l_text:='<pem_information22>';
384 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information22);
385 l_text:=l_text||'</pem_information22>';
386 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
387 l_text:='<pem_information23>';
388 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information23);
389 l_text:=l_text||'</pem_information23>';
390 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
391 l_text:='<pem_information24>';
392 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information24);
393 l_text:=l_text||'</pem_information24>';
394 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
395 l_text:='<pem_information25>';
396 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information25);
397 l_text:=l_text||'</pem_information25>';
398 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
399 l_text:='<pem_information26>';
400 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information26);
401 l_text:=l_text||'</pem_information26>';
402 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
403 l_text:='<pem_information27>';
404 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information27);
405 l_text:=l_text||'</pem_information27>';
406 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
407 l_text:='<pem_information28>';
408 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information28);
409 l_text:=l_text||'</pem_information28>';
410 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
411 l_text:='<pem_information29>';
412 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information29);
413 l_text:=l_text||'</pem_information29>';
414 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
415 l_text:='<pem_information30>';
416 l_text:=l_text||irc_utilities_pkg.removeTags(p_pem_information30);
417 l_text:=l_text||'</pem_information30>';
418 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
419 l_text:='<object_version_number>';
420 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
421 l_text:=l_text||'</object_version_number>';
422 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
423 l_text:='</previous_employment>';
424 --
425 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
426 --
427 -- raise the event with the event data
428 wf_event.raise(p_event_name=>l_event_name
429 ,p_event_key=>l_event_key
430 ,p_event_data=>l_event_data);
431 elsif (l_message='KEY') then
432 hr_utility.set_location(l_proc,30);
433 -- get a key for the event
434 open get_seq;
435 fetch get_seq into l_event_key;
436 close get_seq;
437 -- this is a key event, so just raise the event
438 -- without the event data
439 wf_event.raise(p_event_name=>l_event_name
440 ,p_event_key=>l_event_key);
441 elsif (l_message='NONE') then
442 hr_utility.set_location(l_proc,40);
443 -- no event is required, so do nothing
444 null;
445 end if;
446 hr_utility.set_location('Leaving: '||l_proc,50);
447 end update_previous_employer_a;
448 end hr_previous_employment_be2;