DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_PERSON_ABSENCE_BE2

Source


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