DBA Data[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;