[Home] [Help]
PACKAGE BODY: APPS.HR_PERSON_ABSENCE_BE1
Source
1 package body hr_person_absence_be1 as
2 --Code generated on 30/03/2009 04:46:15
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure create_person_absence_a (
5 p_effective_date date,
6 p_person_id number,
7 p_business_group_id number,
8 p_absence_attendance_type_id number,
9 p_abs_attendance_reason_id number,
10 p_comments long,
11 p_date_notification date,
12 p_date_projected_start date,
13 p_time_projected_start varchar2,
14 p_date_projected_end date,
15 p_time_projected_end varchar2,
16 p_date_start date,
17 p_time_start varchar2,
18 p_date_end date,
19 p_time_end varchar2,
20 p_absence_days number,
21 p_absence_hours number,
22 p_authorising_person_id number,
23 p_replacement_person_id number,
24 p_attribute_category varchar2,
25 p_attribute1 varchar2,
26 p_attribute2 varchar2,
27 p_attribute3 varchar2,
28 p_attribute4 varchar2,
29 p_attribute5 varchar2,
30 p_attribute6 varchar2,
31 p_attribute7 varchar2,
32 p_attribute8 varchar2,
33 p_attribute9 varchar2,
34 p_attribute10 varchar2,
35 p_attribute11 varchar2,
36 p_attribute12 varchar2,
37 p_attribute13 varchar2,
38 p_attribute14 varchar2,
39 p_attribute15 varchar2,
40 p_attribute16 varchar2,
41 p_attribute17 varchar2,
42 p_attribute18 varchar2,
43 p_attribute19 varchar2,
44 p_attribute20 varchar2,
45 p_occurrence number,
46 p_period_of_incapacity_id number,
47 p_ssp1_issued varchar2,
48 p_maternity_id number,
49 p_sickness_start_date date,
50 p_sickness_end_date date,
51 p_pregnancy_related_illness varchar2,
52 p_reason_for_notification_dela varchar2,
53 p_accept_late_notification_fla varchar2,
54 p_linked_absence_id number,
55 p_batch_id number,
56 p_create_element_entry boolean,
57 p_abs_information_category varchar2,
58 p_abs_information1 varchar2,
59 p_abs_information2 varchar2,
60 p_abs_information3 varchar2,
61 p_abs_information4 varchar2,
62 p_abs_information5 varchar2,
63 p_abs_information6 varchar2,
64 p_abs_information7 varchar2,
65 p_abs_information8 varchar2,
66 p_abs_information9 varchar2,
67 p_abs_information10 varchar2,
68 p_abs_information11 varchar2,
69 p_abs_information12 varchar2,
70 p_abs_information13 varchar2,
71 p_abs_information14 varchar2,
72 p_abs_information15 varchar2,
73 p_abs_information16 varchar2,
74 p_abs_information17 varchar2,
75 p_abs_information18 varchar2,
76 p_abs_information19 varchar2,
77 p_abs_information20 varchar2,
78 p_abs_information21 varchar2,
79 p_abs_information22 varchar2,
80 p_abs_information23 varchar2,
81 p_abs_information24 varchar2,
82 p_abs_information25 varchar2,
83 p_abs_information26 varchar2,
84 p_abs_information27 varchar2,
85 p_abs_information28 varchar2,
86 p_abs_information29 varchar2,
87 p_abs_information30 varchar2,
88 p_absence_case_id number,
89 p_absence_attendance_id number,
90 p_object_version_number number,
91 p_dur_dys_less_warning boolean,
92 p_dur_hrs_less_warning boolean,
93 p_exceeds_pto_entit_warning boolean,
94 p_exceeds_run_total_warning boolean,
95 p_abs_overlap_warning boolean,
96 p_abs_day_after_warning boolean,
97 p_dur_overwritten_warning boolean) is
98 l_event_key number;
99 l_event_data clob;
100 l_event_name varchar2(250);
101 l_text varchar2(2000);
102 l_message varchar2(10);
103 --
104 cursor get_seq is
105 select per_wf_events_s.nextval from dual;
106 --
107 l_proc varchar2(72):=' hr_person_absence_be1.create_person_absence_a';
108 begin
109 hr_utility.set_location('Entering: '||l_proc,10);
110 -- check the status of the business event
111 l_event_name:='oracle.apps.per.api.person_absence.create_person_absence';
112 l_message:=wf_event.test(l_event_name);
113 --
114 if (l_message='MESSAGE') then
115 hr_utility.set_location(l_proc,20);
116 --
117 -- get a key for the event
118 --
119 open get_seq;
120 fetch get_seq into l_event_key;
121 close get_seq;
122 --
123 -- build the xml data for the event
124 --
125 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
126 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
127 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
128 l_text:='<person_absence>';
129 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
130 --
131 l_text:='<effective_date>';
132 l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
133 l_text:=l_text||'</effective_date>';
134 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
135 l_text:='<person_id>';
136 l_text:=l_text||fnd_number.number_to_canonical(p_person_id);
137 l_text:=l_text||'</person_id>';
138 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
139 l_text:='<business_group_id>';
140 l_text:=l_text||fnd_number.number_to_canonical(p_business_group_id);
141 l_text:=l_text||'</business_group_id>';
142 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
143 l_text:='<absence_attendance_type_id>';
144 l_text:=l_text||fnd_number.number_to_canonical(p_absence_attendance_type_id);
145 l_text:=l_text||'</absence_attendance_type_id>';
146 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
147 l_text:='<abs_attendance_reason_id>';
148 l_text:=l_text||fnd_number.number_to_canonical(p_abs_attendance_reason_id);
149 l_text:=l_text||'</abs_attendance_reason_id>';
150 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
151 l_text:='<comments>';
152 l_text:=l_text||irc_utilities_pkg.removeTags(p_comments);
153 l_text:=l_text||'</comments>';
154 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
155 l_text:='<date_notification>';
156 l_text:=l_text||fnd_date.date_to_canonical(p_date_notification);
157 l_text:=l_text||'</date_notification>';
158 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
159 l_text:='<date_projected_start>';
160 l_text:=l_text||fnd_date.date_to_canonical(p_date_projected_start);
161 l_text:=l_text||'</date_projected_start>';
162 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
163 l_text:='<time_projected_start>';
164 l_text:=l_text||irc_utilities_pkg.removeTags(p_time_projected_start);
165 l_text:=l_text||'</time_projected_start>';
166 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
167 l_text:='<date_projected_end>';
168 l_text:=l_text||fnd_date.date_to_canonical(p_date_projected_end);
169 l_text:=l_text||'</date_projected_end>';
170 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
171 l_text:='<time_projected_end>';
172 l_text:=l_text||irc_utilities_pkg.removeTags(p_time_projected_end);
173 l_text:=l_text||'</time_projected_end>';
174 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
175 l_text:='<date_start>';
176 l_text:=l_text||fnd_date.date_to_canonical(p_date_start);
177 l_text:=l_text||'</date_start>';
178 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
179 l_text:='<time_start>';
180 l_text:=l_text||irc_utilities_pkg.removeTags(p_time_start);
181 l_text:=l_text||'</time_start>';
182 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
183 l_text:='<date_end>';
184 l_text:=l_text||fnd_date.date_to_canonical(p_date_end);
185 l_text:=l_text||'</date_end>';
186 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
187 l_text:='<time_end>';
188 l_text:=l_text||irc_utilities_pkg.removeTags(p_time_end);
189 l_text:=l_text||'</time_end>';
190 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
191 l_text:='<absence_days>';
192 l_text:=l_text||fnd_number.number_to_canonical(p_absence_days);
193 l_text:=l_text||'</absence_days>';
194 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
195 l_text:='<absence_hours>';
196 l_text:=l_text||fnd_number.number_to_canonical(p_absence_hours);
197 l_text:=l_text||'</absence_hours>';
198 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
199 l_text:='<authorising_person_id>';
200 l_text:=l_text||fnd_number.number_to_canonical(p_authorising_person_id);
201 l_text:=l_text||'</authorising_person_id>';
202 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
203 l_text:='<replacement_person_id>';
204 l_text:=l_text||fnd_number.number_to_canonical(p_replacement_person_id);
205 l_text:=l_text||'</replacement_person_id>';
206 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
207 l_text:='<attribute_category>';
208 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
209 l_text:=l_text||'</attribute_category>';
210 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
211 l_text:='<attribute1>';
212 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
213 l_text:=l_text||'</attribute1>';
214 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
215 l_text:='<attribute2>';
216 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
217 l_text:=l_text||'</attribute2>';
218 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
219 l_text:='<attribute3>';
220 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
221 l_text:=l_text||'</attribute3>';
222 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
223 l_text:='<attribute4>';
224 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
225 l_text:=l_text||'</attribute4>';
226 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
227 l_text:='<attribute5>';
228 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
229 l_text:=l_text||'</attribute5>';
230 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
231 l_text:='<attribute6>';
232 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
233 l_text:=l_text||'</attribute6>';
234 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
235 l_text:='<attribute7>';
236 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
237 l_text:=l_text||'</attribute7>';
238 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
239 l_text:='<attribute8>';
240 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
241 l_text:=l_text||'</attribute8>';
242 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
243 l_text:='<attribute9>';
244 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
245 l_text:=l_text||'</attribute9>';
246 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
247 l_text:='<attribute10>';
248 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
249 l_text:=l_text||'</attribute10>';
250 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
251 l_text:='<attribute11>';
252 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
253 l_text:=l_text||'</attribute11>';
254 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
255 l_text:='<attribute12>';
256 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
257 l_text:=l_text||'</attribute12>';
258 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
259 l_text:='<attribute13>';
260 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
261 l_text:=l_text||'</attribute13>';
262 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
263 l_text:='<attribute14>';
264 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
265 l_text:=l_text||'</attribute14>';
266 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
267 l_text:='<attribute15>';
268 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
269 l_text:=l_text||'</attribute15>';
270 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
271 l_text:='<attribute16>';
272 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
273 l_text:=l_text||'</attribute16>';
274 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
275 l_text:='<attribute17>';
276 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
277 l_text:=l_text||'</attribute17>';
278 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
279 l_text:='<attribute18>';
280 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
281 l_text:=l_text||'</attribute18>';
282 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
283 l_text:='<attribute19>';
284 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
285 l_text:=l_text||'</attribute19>';
286 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
287 l_text:='<attribute20>';
288 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
289 l_text:=l_text||'</attribute20>';
290 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
291 l_text:='<occurrence>';
292 l_text:=l_text||fnd_number.number_to_canonical(p_occurrence);
293 l_text:=l_text||'</occurrence>';
294 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
295 l_text:='<period_of_incapacity_id>';
296 l_text:=l_text||fnd_number.number_to_canonical(p_period_of_incapacity_id);
297 l_text:=l_text||'</period_of_incapacity_id>';
298 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
299 l_text:='<ssp1_issued>';
300 l_text:=l_text||irc_utilities_pkg.removeTags(p_ssp1_issued);
301 l_text:=l_text||'</ssp1_issued>';
302 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
303 l_text:='<maternity_id>';
304 l_text:=l_text||fnd_number.number_to_canonical(p_maternity_id);
305 l_text:=l_text||'</maternity_id>';
306 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
307 l_text:='<sickness_start_date>';
308 l_text:=l_text||fnd_date.date_to_canonical(p_sickness_start_date);
309 l_text:=l_text||'</sickness_start_date>';
310 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
311 l_text:='<sickness_end_date>';
312 l_text:=l_text||fnd_date.date_to_canonical(p_sickness_end_date);
313 l_text:=l_text||'</sickness_end_date>';
314 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
315 l_text:='<pregnancy_related_illness>';
316 l_text:=l_text||irc_utilities_pkg.removeTags(p_pregnancy_related_illness);
317 l_text:=l_text||'</pregnancy_related_illness>';
318 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
319 l_text:='<reason_for_notification_dela>';
320 l_text:=l_text||irc_utilities_pkg.removeTags(p_reason_for_notification_dela);
321 l_text:=l_text||'</reason_for_notification_dela>';
322 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
323 l_text:='<accept_late_notification_fla>';
324 l_text:=l_text||irc_utilities_pkg.removeTags(p_accept_late_notification_fla);
325 l_text:=l_text||'</accept_late_notification_fla>';
326 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
327 l_text:='<linked_absence_id>';
328 l_text:=l_text||fnd_number.number_to_canonical(p_linked_absence_id);
329 l_text:=l_text||'</linked_absence_id>';
330 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
331 l_text:='<batch_id>';
332 l_text:=l_text||fnd_number.number_to_canonical(p_batch_id);
333 l_text:=l_text||'</batch_id>';
334 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
335 l_text:='<create_element_entry>';
336 if(P_CREATE_ELEMENT_ENTRY) then
337 l_text:=l_text||'TRUE';
338 else
339 l_text:=l_text||'FALSE';
340 end if;
341 l_text:=l_text||'</create_element_entry>';
342 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
343 l_text:='<abs_information_category>';
344 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information_category);
345 l_text:=l_text||'</abs_information_category>';
346 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
347 l_text:='<abs_information1>';
348 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information1);
349 l_text:=l_text||'</abs_information1>';
350 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
351 l_text:='<abs_information2>';
352 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information2);
353 l_text:=l_text||'</abs_information2>';
354 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
355 l_text:='<abs_information3>';
356 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information3);
357 l_text:=l_text||'</abs_information3>';
358 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
359 l_text:='<abs_information4>';
360 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information4);
361 l_text:=l_text||'</abs_information4>';
362 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
363 l_text:='<abs_information5>';
364 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information5);
365 l_text:=l_text||'</abs_information5>';
366 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
367 l_text:='<abs_information6>';
368 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information6);
369 l_text:=l_text||'</abs_information6>';
370 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
371 l_text:='<abs_information7>';
372 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information7);
373 l_text:=l_text||'</abs_information7>';
374 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
375 l_text:='<abs_information8>';
376 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information8);
377 l_text:=l_text||'</abs_information8>';
378 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
379 l_text:='<abs_information9>';
380 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information9);
381 l_text:=l_text||'</abs_information9>';
382 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
383 l_text:='<abs_information10>';
384 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information10);
385 l_text:=l_text||'</abs_information10>';
386 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
387 l_text:='<abs_information11>';
388 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information11);
389 l_text:=l_text||'</abs_information11>';
390 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
391 l_text:='<abs_information12>';
395 l_text:='<abs_information13>';
392 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information12);
393 l_text:=l_text||'</abs_information12>';
394 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
396 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information13);
397 l_text:=l_text||'</abs_information13>';
398 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
399 l_text:='<abs_information14>';
400 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information14);
401 l_text:=l_text||'</abs_information14>';
402 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
403 l_text:='<abs_information15>';
404 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information15);
405 l_text:=l_text||'</abs_information15>';
406 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
407 l_text:='<abs_information16>';
408 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information16);
409 l_text:=l_text||'</abs_information16>';
410 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
411 l_text:='<abs_information17>';
412 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information17);
413 l_text:=l_text||'</abs_information17>';
414 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
415 l_text:='<abs_information18>';
416 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information18);
417 l_text:=l_text||'</abs_information18>';
418 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
419 l_text:='<abs_information19>';
420 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information19);
421 l_text:=l_text||'</abs_information19>';
422 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
423 l_text:='<abs_information20>';
424 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information20);
425 l_text:=l_text||'</abs_information20>';
426 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
427 l_text:='<abs_information21>';
428 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information21);
429 l_text:=l_text||'</abs_information21>';
430 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
431 l_text:='<abs_information22>';
432 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information22);
433 l_text:=l_text||'</abs_information22>';
434 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
435 l_text:='<abs_information23>';
436 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information23);
437 l_text:=l_text||'</abs_information23>';
438 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
439 l_text:='<abs_information24>';
440 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information24);
441 l_text:=l_text||'</abs_information24>';
442 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
443 l_text:='<abs_information25>';
444 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information25);
445 l_text:=l_text||'</abs_information25>';
446 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
447 l_text:='<abs_information26>';
448 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information26);
449 l_text:=l_text||'</abs_information26>';
450 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
451 l_text:='<abs_information27>';
452 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information27);
453 l_text:=l_text||'</abs_information27>';
454 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
455 l_text:='<abs_information28>';
456 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information28);
457 l_text:=l_text||'</abs_information28>';
458 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
459 l_text:='<abs_information29>';
460 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information29);
461 l_text:=l_text||'</abs_information29>';
462 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
463 l_text:='<abs_information30>';
464 l_text:=l_text||irc_utilities_pkg.removeTags(p_abs_information30);
465 l_text:=l_text||'</abs_information30>';
466 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
467 l_text:='<absence_case_id>';
468 l_text:=l_text||fnd_number.number_to_canonical(p_absence_case_id);
469 l_text:=l_text||'</absence_case_id>';
470 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
471 l_text:='<absence_attendance_id>';
472 l_text:=l_text||fnd_number.number_to_canonical(p_absence_attendance_id);
473 l_text:=l_text||'</absence_attendance_id>';
474 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
475 l_text:='<object_version_number>';
476 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
477 l_text:=l_text||'</object_version_number>';
478 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
479 l_text:='<dur_dys_less_warning>';
480 if(P_DUR_DYS_LESS_WARNING) then
481 l_text:=l_text||'TRUE';
482 else
483 l_text:=l_text||'FALSE';
484 end if;
485 l_text:=l_text||'</dur_dys_less_warning>';
486 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
487 l_text:='<dur_hrs_less_warning>';
488 if(P_DUR_HRS_LESS_WARNING) then
489 l_text:=l_text||'TRUE';
490 else
491 l_text:=l_text||'FALSE';
492 end if;
493 l_text:=l_text||'</dur_hrs_less_warning>';
494 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
495 l_text:='<exceeds_pto_entit_warning>';
496 if(P_EXCEEDS_PTO_ENTIT_WARNING) then
497 l_text:=l_text||'TRUE';
498 else
499 l_text:=l_text||'FALSE';
500 end if;
501 l_text:=l_text||'</exceeds_pto_entit_warning>';
502 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
503 l_text:='<exceeds_run_total_warning>';
504 if(P_EXCEEDS_RUN_TOTAL_WARNING) then
505 l_text:=l_text||'TRUE';
506 else
507 l_text:=l_text||'FALSE';
508 end if;
509 l_text:=l_text||'</exceeds_run_total_warning>';
510 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
511 l_text:='<abs_overlap_warning>';
512 if(P_ABS_OVERLAP_WARNING) then
513 l_text:=l_text||'TRUE';
514 else
515 l_text:=l_text||'FALSE';
516 end if;
517 l_text:=l_text||'</abs_overlap_warning>';
518 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
519 l_text:='<abs_day_after_warning>';
520 if(P_ABS_DAY_AFTER_WARNING) then
521 l_text:=l_text||'TRUE';
522 else
523 l_text:=l_text||'FALSE';
524 end if;
525 l_text:=l_text||'</abs_day_after_warning>';
526 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
527 l_text:='<dur_overwritten_warning>';
528 if(P_DUR_OVERWRITTEN_WARNING) then
529 l_text:=l_text||'TRUE';
530 else
531 l_text:=l_text||'FALSE';
532 end if;
533 l_text:=l_text||'</dur_overwritten_warning>';
534 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
535 l_text:='</person_absence>';
536 --
537 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
538 --
539 -- raise the event with the event data
540 wf_event.raise(p_event_name=>l_event_name
541 ,p_event_key=>l_event_key
542 ,p_event_data=>l_event_data);
543 elsif (l_message='KEY') then
544 hr_utility.set_location(l_proc,30);
545 -- get a key for the event
546 open get_seq;
547 fetch get_seq into l_event_key;
548 close get_seq;
549 -- this is a key event, so just raise the event
550 -- without the event data
551 wf_event.raise(p_event_name=>l_event_name
552 ,p_event_key=>l_event_key);
553 elsif (l_message='NONE') then
554 hr_utility.set_location(l_proc,40);
555 -- no event is required, so do nothing
556 null;
557 end if;
558 hr_utility.set_location('Leaving: '||l_proc,50);
559 end create_person_absence_a;
560 end hr_person_absence_be1;