[Home] [Help]
PACKAGE BODY: APPS.HR_CONTINGENT_WORKER_BE4
Source
1 package body hr_contingent_worker_be4 as
2 --Code generated on 30/03/2009 04:46:30
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure terminate_placement_a (
5 p_effective_date date,
6 p_person_id number,
7 p_date_start date,
8 p_object_version_number number,
9 p_person_type_id number,
10 p_assignment_status_type_id number,
11 p_actual_termination_date date,
12 p_final_process_date date,
13 p_last_standard_process_date date,
14 p_termination_reason varchar2,
15 p_projected_termination_date date,
16 p_attribute_category varchar2,
17 p_attribute1 varchar2,
18 p_attribute2 varchar2,
19 p_attribute3 varchar2,
20 p_attribute4 varchar2,
21 p_attribute5 varchar2,
22 p_attribute6 varchar2,
23 p_attribute7 varchar2,
24 p_attribute8 varchar2,
25 p_attribute9 varchar2,
26 p_attribute10 varchar2,
27 p_attribute11 varchar2,
28 p_attribute12 varchar2,
29 p_attribute13 varchar2,
30 p_attribute14 varchar2,
31 p_attribute15 varchar2,
32 p_attribute16 varchar2,
33 p_attribute17 varchar2,
34 p_attribute18 varchar2,
35 p_attribute19 varchar2,
36 p_attribute20 varchar2,
37 p_attribute21 varchar2,
38 p_attribute22 varchar2,
39 p_attribute23 varchar2,
40 p_attribute24 varchar2,
41 p_attribute25 varchar2,
42 p_attribute26 varchar2,
43 p_attribute27 varchar2,
44 p_attribute28 varchar2,
45 p_attribute29 varchar2,
46 p_attribute30 varchar2,
47 p_information_category varchar2,
48 p_information1 varchar2,
49 p_information2 varchar2,
50 p_information3 varchar2,
51 p_information4 varchar2,
52 p_information5 varchar2,
53 p_information6 varchar2,
54 p_information7 varchar2,
55 p_information8 varchar2,
56 p_information9 varchar2,
57 p_information10 varchar2,
58 p_information11 varchar2,
59 p_information12 varchar2,
60 p_information13 varchar2,
61 p_information14 varchar2,
62 p_information15 varchar2,
63 p_information16 varchar2,
64 p_information17 varchar2,
65 p_information18 varchar2,
66 p_information19 varchar2,
67 p_information20 varchar2,
68 p_information21 varchar2,
69 p_information22 varchar2,
70 p_information23 varchar2,
71 p_information24 varchar2,
72 p_information25 varchar2,
73 p_information26 varchar2,
74 p_information27 varchar2,
75 p_information28 varchar2,
76 p_information29 varchar2,
77 p_information30 varchar2,
78 p_supervisor_warning boolean,
79 p_event_warning boolean,
80 p_interview_warning boolean,
81 p_review_warning boolean,
82 p_recruiter_warning boolean,
83 p_asg_future_changes_warning boolean,
84 p_entries_changed_warning varchar2,
85 p_pay_proposal_warning boolean,
86 p_dod_warning boolean,
87 p_org_now_no_manager_warning boolean,
88 p_addl_rights_warning boolean) is
89 l_event_key number;
90 l_event_data clob;
91 l_event_name varchar2(250);
92 l_text varchar2(2000);
93 l_message varchar2(10);
94 --
95 cursor get_seq is
96 select per_wf_events_s.nextval from dual;
97 --
98 l_proc varchar2(72):=' hr_contingent_worker_be4.terminate_placement_a';
99 begin
100 hr_utility.set_location('Entering: '||l_proc,10);
101 -- check the status of the business event
102 l_event_name:='oracle.apps.per.api.contingent_worker.terminate_placement';
103 l_message:=wf_event.test(l_event_name);
104 --
105 if (l_message='MESSAGE') then
106 hr_utility.set_location(l_proc,20);
107 --
108 -- get a key for the event
109 --
110 open get_seq;
111 fetch get_seq into l_event_key;
112 close get_seq;
113 --
114 -- build the xml data for the event
115 --
116 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
117 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
118 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
119 l_text:='<contingent_worker>';
120 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
121 --
122 l_text:='<effective_date>';
123 l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
124 l_text:=l_text||'</effective_date>';
125 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
126 l_text:='<person_id>';
127 l_text:=l_text||fnd_number.number_to_canonical(p_person_id);
128 l_text:=l_text||'</person_id>';
129 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
130 l_text:='<date_start>';
131 l_text:=l_text||fnd_date.date_to_canonical(p_date_start);
132 l_text:=l_text||'</date_start>';
133 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
134 l_text:='<object_version_number>';
135 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
136 l_text:=l_text||'</object_version_number>';
137 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
138 l_text:='<person_type_id>';
139 l_text:=l_text||fnd_number.number_to_canonical(p_person_type_id);
140 l_text:=l_text||'</person_type_id>';
141 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
142 l_text:='<assignment_status_type_id>';
143 l_text:=l_text||fnd_number.number_to_canonical(p_assignment_status_type_id);
144 l_text:=l_text||'</assignment_status_type_id>';
145 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
146 l_text:='<actual_termination_date>';
147 l_text:=l_text||fnd_date.date_to_canonical(p_actual_termination_date);
148 l_text:=l_text||'</actual_termination_date>';
149 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
150 l_text:='<final_process_date>';
151 l_text:=l_text||fnd_date.date_to_canonical(p_final_process_date);
152 l_text:=l_text||'</final_process_date>';
153 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
154 l_text:='<last_standard_process_date>';
155 l_text:=l_text||fnd_date.date_to_canonical(p_last_standard_process_date);
156 l_text:=l_text||'</last_standard_process_date>';
157 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
158 l_text:='<termination_reason>';
159 l_text:=l_text||irc_utilities_pkg.removeTags(p_termination_reason);
160 l_text:=l_text||'</termination_reason>';
161 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
162 l_text:='<projected_termination_date>';
163 l_text:=l_text||fnd_date.date_to_canonical(p_projected_termination_date);
164 l_text:=l_text||'</projected_termination_date>';
165 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
166 l_text:='<attribute_category>';
167 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
168 l_text:=l_text||'</attribute_category>';
169 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
170 l_text:='<attribute1>';
171 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
172 l_text:=l_text||'</attribute1>';
173 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
174 l_text:='<attribute2>';
175 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
176 l_text:=l_text||'</attribute2>';
177 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
178 l_text:='<attribute3>';
179 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
180 l_text:=l_text||'</attribute3>';
181 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
182 l_text:='<attribute4>';
183 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
184 l_text:=l_text||'</attribute4>';
185 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
186 l_text:='<attribute5>';
187 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
188 l_text:=l_text||'</attribute5>';
189 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
190 l_text:='<attribute6>';
191 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
192 l_text:=l_text||'</attribute6>';
193 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
194 l_text:='<attribute7>';
195 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
196 l_text:=l_text||'</attribute7>';
197 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
198 l_text:='<attribute8>';
199 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
200 l_text:=l_text||'</attribute8>';
201 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
202 l_text:='<attribute9>';
203 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
204 l_text:=l_text||'</attribute9>';
205 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
206 l_text:='<attribute10>';
207 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
208 l_text:=l_text||'</attribute10>';
209 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
210 l_text:='<attribute11>';
211 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
212 l_text:=l_text||'</attribute11>';
213 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
214 l_text:='<attribute12>';
215 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
216 l_text:=l_text||'</attribute12>';
217 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
218 l_text:='<attribute13>';
219 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
220 l_text:=l_text||'</attribute13>';
221 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
222 l_text:='<attribute14>';
223 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
224 l_text:=l_text||'</attribute14>';
225 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
226 l_text:='<attribute15>';
227 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
228 l_text:=l_text||'</attribute15>';
229 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
230 l_text:='<attribute16>';
231 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
232 l_text:=l_text||'</attribute16>';
233 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
234 l_text:='<attribute17>';
235 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
236 l_text:=l_text||'</attribute17>';
237 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
238 l_text:='<attribute18>';
239 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
240 l_text:=l_text||'</attribute18>';
241 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
242 l_text:='<attribute19>';
243 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
244 l_text:=l_text||'</attribute19>';
245 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
246 l_text:='<attribute20>';
247 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
248 l_text:=l_text||'</attribute20>';
249 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
250 l_text:='<attribute21>';
251 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute21);
252 l_text:=l_text||'</attribute21>';
253 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
254 l_text:='<attribute22>';
255 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute22);
256 l_text:=l_text||'</attribute22>';
257 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
258 l_text:='<attribute23>';
259 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute23);
260 l_text:=l_text||'</attribute23>';
261 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
262 l_text:='<attribute24>';
263 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute24);
264 l_text:=l_text||'</attribute24>';
265 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
266 l_text:='<attribute25>';
267 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute25);
268 l_text:=l_text||'</attribute25>';
269 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
270 l_text:='<attribute26>';
271 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute26);
272 l_text:=l_text||'</attribute26>';
273 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
274 l_text:='<attribute27>';
275 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute27);
276 l_text:=l_text||'</attribute27>';
277 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
278 l_text:='<attribute28>';
279 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute28);
280 l_text:=l_text||'</attribute28>';
281 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
282 l_text:='<attribute29>';
283 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute29);
284 l_text:=l_text||'</attribute29>';
285 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
286 l_text:='<attribute30>';
287 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute30);
288 l_text:=l_text||'</attribute30>';
289 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
290 l_text:='<information_category>';
291 l_text:=l_text||irc_utilities_pkg.removeTags(p_information_category);
292 l_text:=l_text||'</information_category>';
293 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
294 l_text:='<information1>';
295 l_text:=l_text||irc_utilities_pkg.removeTags(p_information1);
296 l_text:=l_text||'</information1>';
297 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
298 l_text:='<information2>';
299 l_text:=l_text||irc_utilities_pkg.removeTags(p_information2);
300 l_text:=l_text||'</information2>';
301 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
302 l_text:='<information3>';
303 l_text:=l_text||irc_utilities_pkg.removeTags(p_information3);
304 l_text:=l_text||'</information3>';
305 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
306 l_text:='<information4>';
307 l_text:=l_text||irc_utilities_pkg.removeTags(p_information4);
308 l_text:=l_text||'</information4>';
309 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
310 l_text:='<information5>';
311 l_text:=l_text||irc_utilities_pkg.removeTags(p_information5);
312 l_text:=l_text||'</information5>';
313 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
314 l_text:='<information6>';
315 l_text:=l_text||irc_utilities_pkg.removeTags(p_information6);
316 l_text:=l_text||'</information6>';
317 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
318 l_text:='<information7>';
319 l_text:=l_text||irc_utilities_pkg.removeTags(p_information7);
320 l_text:=l_text||'</information7>';
321 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
322 l_text:='<information8>';
323 l_text:=l_text||irc_utilities_pkg.removeTags(p_information8);
324 l_text:=l_text||'</information8>';
325 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
326 l_text:='<information9>';
327 l_text:=l_text||irc_utilities_pkg.removeTags(p_information9);
328 l_text:=l_text||'</information9>';
329 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
330 l_text:='<information10>';
331 l_text:=l_text||irc_utilities_pkg.removeTags(p_information10);
332 l_text:=l_text||'</information10>';
333 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
334 l_text:='<information11>';
335 l_text:=l_text||irc_utilities_pkg.removeTags(p_information11);
336 l_text:=l_text||'</information11>';
337 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
338 l_text:='<information12>';
339 l_text:=l_text||irc_utilities_pkg.removeTags(p_information12);
340 l_text:=l_text||'</information12>';
341 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
342 l_text:='<information13>';
343 l_text:=l_text||irc_utilities_pkg.removeTags(p_information13);
344 l_text:=l_text||'</information13>';
345 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
346 l_text:='<information14>';
347 l_text:=l_text||irc_utilities_pkg.removeTags(p_information14);
348 l_text:=l_text||'</information14>';
349 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
350 l_text:='<information15>';
351 l_text:=l_text||irc_utilities_pkg.removeTags(p_information15);
352 l_text:=l_text||'</information15>';
353 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
354 l_text:='<information16>';
355 l_text:=l_text||irc_utilities_pkg.removeTags(p_information16);
356 l_text:=l_text||'</information16>';
357 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
358 l_text:='<information17>';
359 l_text:=l_text||irc_utilities_pkg.removeTags(p_information17);
360 l_text:=l_text||'</information17>';
361 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
362 l_text:='<information18>';
363 l_text:=l_text||irc_utilities_pkg.removeTags(p_information18);
364 l_text:=l_text||'</information18>';
365 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
366 l_text:='<information19>';
367 l_text:=l_text||irc_utilities_pkg.removeTags(p_information19);
368 l_text:=l_text||'</information19>';
369 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
370 l_text:='<information20>';
371 l_text:=l_text||irc_utilities_pkg.removeTags(p_information20);
372 l_text:=l_text||'</information20>';
373 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
374 l_text:='<information21>';
375 l_text:=l_text||irc_utilities_pkg.removeTags(p_information21);
376 l_text:=l_text||'</information21>';
377 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
378 l_text:='<information22>';
379 l_text:=l_text||irc_utilities_pkg.removeTags(p_information22);
380 l_text:=l_text||'</information22>';
381 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
382 l_text:='<information23>';
386 l_text:='<information24>';
383 l_text:=l_text||irc_utilities_pkg.removeTags(p_information23);
384 l_text:=l_text||'</information23>';
385 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
387 l_text:=l_text||irc_utilities_pkg.removeTags(p_information24);
388 l_text:=l_text||'</information24>';
389 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
390 l_text:='<information25>';
391 l_text:=l_text||irc_utilities_pkg.removeTags(p_information25);
392 l_text:=l_text||'</information25>';
393 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
394 l_text:='<information26>';
395 l_text:=l_text||irc_utilities_pkg.removeTags(p_information26);
396 l_text:=l_text||'</information26>';
397 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
398 l_text:='<information27>';
399 l_text:=l_text||irc_utilities_pkg.removeTags(p_information27);
400 l_text:=l_text||'</information27>';
401 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
402 l_text:='<information28>';
403 l_text:=l_text||irc_utilities_pkg.removeTags(p_information28);
404 l_text:=l_text||'</information28>';
405 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
406 l_text:='<information29>';
407 l_text:=l_text||irc_utilities_pkg.removeTags(p_information29);
408 l_text:=l_text||'</information29>';
409 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
410 l_text:='<information30>';
411 l_text:=l_text||irc_utilities_pkg.removeTags(p_information30);
412 l_text:=l_text||'</information30>';
413 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
414 l_text:='<supervisor_warning>';
415 if(P_SUPERVISOR_WARNING) then
416 l_text:=l_text||'TRUE';
417 else
418 l_text:=l_text||'FALSE';
419 end if;
420 l_text:=l_text||'</supervisor_warning>';
421 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
422 l_text:='<event_warning>';
423 if(P_EVENT_WARNING) then
424 l_text:=l_text||'TRUE';
425 else
426 l_text:=l_text||'FALSE';
427 end if;
428 l_text:=l_text||'</event_warning>';
429 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
430 l_text:='<interview_warning>';
431 if(P_INTERVIEW_WARNING) then
432 l_text:=l_text||'TRUE';
433 else
434 l_text:=l_text||'FALSE';
435 end if;
436 l_text:=l_text||'</interview_warning>';
437 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
438 l_text:='<review_warning>';
439 if(P_REVIEW_WARNING) then
440 l_text:=l_text||'TRUE';
441 else
442 l_text:=l_text||'FALSE';
443 end if;
444 l_text:=l_text||'</review_warning>';
445 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
446 l_text:='<recruiter_warning>';
447 if(P_RECRUITER_WARNING) then
448 l_text:=l_text||'TRUE';
449 else
450 l_text:=l_text||'FALSE';
451 end if;
452 l_text:=l_text||'</recruiter_warning>';
453 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
454 l_text:='<asg_future_changes_warning>';
455 if(P_ASG_FUTURE_CHANGES_WARNING) then
456 l_text:=l_text||'TRUE';
457 else
458 l_text:=l_text||'FALSE';
459 end if;
460 l_text:=l_text||'</asg_future_changes_warning>';
461 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
462 l_text:='<entries_changed_warning>';
463 l_text:=l_text||irc_utilities_pkg.removeTags(p_entries_changed_warning);
464 l_text:=l_text||'</entries_changed_warning>';
465 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
466 l_text:='<pay_proposal_warning>';
467 if(P_PAY_PROPOSAL_WARNING) then
468 l_text:=l_text||'TRUE';
469 else
470 l_text:=l_text||'FALSE';
471 end if;
472 l_text:=l_text||'</pay_proposal_warning>';
473 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
474 l_text:='<dod_warning>';
475 if(P_DOD_WARNING) then
476 l_text:=l_text||'TRUE';
477 else
478 l_text:=l_text||'FALSE';
479 end if;
480 l_text:=l_text||'</dod_warning>';
481 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
482 l_text:='<org_now_no_manager_warning>';
483 if(P_ORG_NOW_NO_MANAGER_WARNING) then
484 l_text:=l_text||'TRUE';
485 else
486 l_text:=l_text||'FALSE';
487 end if;
488 l_text:=l_text||'</org_now_no_manager_warning>';
489 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
490 l_text:='<addl_rights_warning>';
491 if(P_ADDL_RIGHTS_WARNING) then
492 l_text:=l_text||'TRUE';
493 else
494 l_text:=l_text||'FALSE';
495 end if;
496 l_text:=l_text||'</addl_rights_warning>';
497 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
498 l_text:='</contingent_worker>';
499 --
500 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
501 --
502 -- raise the event with the event data
503 wf_event.raise(p_event_name=>l_event_name
504 ,p_event_key=>l_event_key
505 ,p_event_data=>l_event_data);
506 elsif (l_message='KEY') then
507 hr_utility.set_location(l_proc,30);
508 -- get a key for the event
509 open get_seq;
510 fetch get_seq into l_event_key;
511 close get_seq;
512 -- this is a key event, so just raise the event
513 -- without the event data
514 wf_event.raise(p_event_name=>l_event_name
515 ,p_event_key=>l_event_key);
516 elsif (l_message='NONE') then
517 hr_utility.set_location(l_proc,40);
518 -- no event is required, so do nothing
519 null;
520 end if;
521 hr_utility.set_location('Leaving: '||l_proc,50);
522 end terminate_placement_a;
523 end hr_contingent_worker_be4;