[Home] [Help]
PACKAGE BODY: APPS.PAY_ELEMENT_TYPES_BE2
Source
1 package body pay_element_types_be2 as
2 --Code generated on 30/03/2009 04:44:56
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure update_element_type_a (
5 p_effective_date date,
6 p_datetrack_update_mode varchar2,
7 p_element_type_id number,
8 p_object_version_number number,
9 p_formula_id number,
10 p_benefit_classification_id number,
11 p_additional_entry_allowed_fla varchar2,
12 p_adjustment_only_flag varchar2,
13 p_closed_for_entry_flag varchar2,
14 p_element_name varchar2,
15 p_reporting_name varchar2,
16 p_description varchar2,
17 p_indirect_only_flag varchar2,
18 p_multiple_entries_allowed_fla varchar2,
19 p_multiply_value_flag varchar2,
20 p_post_termination_rule varchar2,
21 p_process_in_run_flag varchar2,
22 p_processing_priority number,
23 p_standard_link_flag varchar2,
24 p_comments varchar2,
25 p_third_party_pay_only_flag varchar2,
26 p_iterative_flag varchar2,
27 p_iterative_formula_id number,
28 p_iterative_priority number,
29 p_creator_type varchar2,
30 p_retro_summ_ele_id number,
31 p_grossup_flag varchar2,
32 p_process_mode varchar2,
33 p_advance_indicator varchar2,
34 p_advance_payable varchar2,
35 p_advance_deduction varchar2,
36 p_process_advance_entry varchar2,
37 p_proration_group_id number,
38 p_proration_formula_id number,
39 p_recalc_event_group_id number,
40 p_qualifying_age number,
41 p_qualifying_length_of_service number,
42 p_qualifying_units varchar2,
43 p_attribute_category varchar2,
44 p_attribute1 varchar2,
45 p_attribute2 varchar2,
46 p_attribute3 varchar2,
47 p_attribute4 varchar2,
48 p_attribute5 varchar2,
49 p_attribute6 varchar2,
50 p_attribute7 varchar2,
51 p_attribute8 varchar2,
52 p_attribute9 varchar2,
53 p_attribute10 varchar2,
54 p_attribute11 varchar2,
55 p_attribute12 varchar2,
56 p_attribute13 varchar2,
57 p_attribute14 varchar2,
58 p_attribute15 varchar2,
59 p_attribute16 varchar2,
60 p_attribute17 varchar2,
61 p_attribute18 varchar2,
62 p_attribute19 varchar2,
63 p_attribute20 varchar2,
64 p_element_information_category varchar2,
65 p_element_information1 varchar2,
66 p_element_information2 varchar2,
67 p_element_information3 varchar2,
68 p_element_information4 varchar2,
69 p_element_information5 varchar2,
70 p_element_information6 varchar2,
71 p_element_information7 varchar2,
72 p_element_information8 varchar2,
73 p_element_information9 varchar2,
74 p_element_information10 varchar2,
75 p_element_information11 varchar2,
76 p_element_information12 varchar2,
77 p_element_information13 varchar2,
78 p_element_information14 varchar2,
79 p_element_information15 varchar2,
80 p_element_information16 varchar2,
81 p_element_information17 varchar2,
82 p_element_information18 varchar2,
83 p_element_information19 varchar2,
84 p_element_information20 varchar2,
85 p_once_each_period_flag varchar2,
86 p_language_code varchar2,
87 p_time_definition_type varchar2,
88 p_time_definition_id number,
89 p_advance_element_type_id number,
90 p_deduction_element_type_id number,
91 p_effective_start_date date,
92 p_effective_end_date date,
93 p_comment_id number,
94 p_processing_priority_warning boolean,
95 p_element_name_warning boolean,
96 p_element_name_change_warning boolean) is
97 l_event_key number;
98 l_event_data clob;
99 l_event_name varchar2(250);
100 l_text varchar2(2000);
101 l_message varchar2(10);
102 --
103 cursor get_seq is
104 select per_wf_events_s.nextval from dual;
105 --
106 l_proc varchar2(72):=' pay_element_types_be2.update_element_type_a';
107 begin
108 hr_utility.set_location('Entering: '||l_proc,10);
109 -- check the status of the business event
110 l_event_name:='oracle.apps.pay.api.element_types.update_element_type';
111 l_message:=wf_event.test(l_event_name);
112 --
113 if (l_message='MESSAGE') then
114 hr_utility.set_location(l_proc,20);
115 --
116 -- get a key for the event
117 --
118 open get_seq;
119 fetch get_seq into l_event_key;
120 close get_seq;
121 --
122 -- build the xml data for the event
123 --
124 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
125 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
126 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
127 l_text:='<element_types>';
128 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
129 --
130 l_text:='<effective_date>';
131 l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
132 l_text:=l_text||'</effective_date>';
133 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
134 l_text:='<datetrack_update_mode>';
135 l_text:=l_text||irc_utilities_pkg.removeTags(p_datetrack_update_mode);
136 l_text:=l_text||'</datetrack_update_mode>';
137 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
138 l_text:='<element_type_id>';
139 l_text:=l_text||fnd_number.number_to_canonical(p_element_type_id);
140 l_text:=l_text||'</element_type_id>';
141 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
142 l_text:='<object_version_number>';
143 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
144 l_text:=l_text||'</object_version_number>';
145 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
146 l_text:='<formula_id>';
147 l_text:=l_text||fnd_number.number_to_canonical(p_formula_id);
148 l_text:=l_text||'</formula_id>';
149 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
150 l_text:='<benefit_classification_id>';
151 l_text:=l_text||fnd_number.number_to_canonical(p_benefit_classification_id);
152 l_text:=l_text||'</benefit_classification_id>';
153 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
154 l_text:='<additional_entry_allowed_fla>';
155 l_text:=l_text||irc_utilities_pkg.removeTags(p_additional_entry_allowed_fla);
156 l_text:=l_text||'</additional_entry_allowed_fla>';
157 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
158 l_text:='<adjustment_only_flag>';
159 l_text:=l_text||irc_utilities_pkg.removeTags(p_adjustment_only_flag);
160 l_text:=l_text||'</adjustment_only_flag>';
161 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
162 l_text:='<closed_for_entry_flag>';
163 l_text:=l_text||irc_utilities_pkg.removeTags(p_closed_for_entry_flag);
164 l_text:=l_text||'</closed_for_entry_flag>';
165 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
166 l_text:='<element_name>';
167 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_name);
168 l_text:=l_text||'</element_name>';
169 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
170 l_text:='<reporting_name>';
171 l_text:=l_text||irc_utilities_pkg.removeTags(p_reporting_name);
172 l_text:=l_text||'</reporting_name>';
173 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
174 l_text:='<description>';
175 l_text:=l_text||irc_utilities_pkg.removeTags(p_description);
176 l_text:=l_text||'</description>';
177 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
178 l_text:='<indirect_only_flag>';
179 l_text:=l_text||irc_utilities_pkg.removeTags(p_indirect_only_flag);
180 l_text:=l_text||'</indirect_only_flag>';
181 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
182 l_text:='<multiple_entries_allowed_fla>';
183 l_text:=l_text||irc_utilities_pkg.removeTags(p_multiple_entries_allowed_fla);
184 l_text:=l_text||'</multiple_entries_allowed_fla>';
185 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
186 l_text:='<multiply_value_flag>';
187 l_text:=l_text||irc_utilities_pkg.removeTags(p_multiply_value_flag);
188 l_text:=l_text||'</multiply_value_flag>';
189 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
190 l_text:='<post_termination_rule>';
191 l_text:=l_text||irc_utilities_pkg.removeTags(p_post_termination_rule);
192 l_text:=l_text||'</post_termination_rule>';
193 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
194 l_text:='<process_in_run_flag>';
195 l_text:=l_text||irc_utilities_pkg.removeTags(p_process_in_run_flag);
196 l_text:=l_text||'</process_in_run_flag>';
197 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
198 l_text:='<processing_priority>';
199 l_text:=l_text||fnd_number.number_to_canonical(p_processing_priority);
200 l_text:=l_text||'</processing_priority>';
201 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
202 l_text:='<standard_link_flag>';
203 l_text:=l_text||irc_utilities_pkg.removeTags(p_standard_link_flag);
204 l_text:=l_text||'</standard_link_flag>';
205 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
206 l_text:='<comments>';
207 l_text:=l_text||irc_utilities_pkg.removeTags(p_comments);
208 l_text:=l_text||'</comments>';
209 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
210 l_text:='<third_party_pay_only_flag>';
211 l_text:=l_text||irc_utilities_pkg.removeTags(p_third_party_pay_only_flag);
212 l_text:=l_text||'</third_party_pay_only_flag>';
213 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
214 l_text:='<iterative_flag>';
215 l_text:=l_text||irc_utilities_pkg.removeTags(p_iterative_flag);
216 l_text:=l_text||'</iterative_flag>';
217 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
218 l_text:='<iterative_formula_id>';
219 l_text:=l_text||fnd_number.number_to_canonical(p_iterative_formula_id);
220 l_text:=l_text||'</iterative_formula_id>';
221 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
222 l_text:='<iterative_priority>';
223 l_text:=l_text||fnd_number.number_to_canonical(p_iterative_priority);
224 l_text:=l_text||'</iterative_priority>';
225 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
226 l_text:='<creator_type>';
227 l_text:=l_text||irc_utilities_pkg.removeTags(p_creator_type);
228 l_text:=l_text||'</creator_type>';
229 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
230 l_text:='<retro_summ_ele_id>';
231 l_text:=l_text||fnd_number.number_to_canonical(p_retro_summ_ele_id);
232 l_text:=l_text||'</retro_summ_ele_id>';
233 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
234 l_text:='<grossup_flag>';
235 l_text:=l_text||irc_utilities_pkg.removeTags(p_grossup_flag);
236 l_text:=l_text||'</grossup_flag>';
237 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
238 l_text:='<process_mode>';
239 l_text:=l_text||irc_utilities_pkg.removeTags(p_process_mode);
240 l_text:=l_text||'</process_mode>';
241 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
242 l_text:='<advance_indicator>';
243 l_text:=l_text||irc_utilities_pkg.removeTags(p_advance_indicator);
244 l_text:=l_text||'</advance_indicator>';
245 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
246 l_text:='<advance_payable>';
247 l_text:=l_text||irc_utilities_pkg.removeTags(p_advance_payable);
248 l_text:=l_text||'</advance_payable>';
249 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
250 l_text:='<advance_deduction>';
251 l_text:=l_text||irc_utilities_pkg.removeTags(p_advance_deduction);
252 l_text:=l_text||'</advance_deduction>';
253 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
254 l_text:='<process_advance_entry>';
255 l_text:=l_text||irc_utilities_pkg.removeTags(p_process_advance_entry);
256 l_text:=l_text||'</process_advance_entry>';
257 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
258 l_text:='<proration_group_id>';
259 l_text:=l_text||fnd_number.number_to_canonical(p_proration_group_id);
260 l_text:=l_text||'</proration_group_id>';
261 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
262 l_text:='<proration_formula_id>';
263 l_text:=l_text||fnd_number.number_to_canonical(p_proration_formula_id);
264 l_text:=l_text||'</proration_formula_id>';
265 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
266 l_text:='<recalc_event_group_id>';
267 l_text:=l_text||fnd_number.number_to_canonical(p_recalc_event_group_id);
268 l_text:=l_text||'</recalc_event_group_id>';
269 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
270 l_text:='<qualifying_age>';
271 l_text:=l_text||fnd_number.number_to_canonical(p_qualifying_age);
272 l_text:=l_text||'</qualifying_age>';
273 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
274 l_text:='<qualifying_length_of_service>';
275 l_text:=l_text||fnd_number.number_to_canonical(p_qualifying_length_of_service);
276 l_text:=l_text||'</qualifying_length_of_service>';
277 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
278 l_text:='<qualifying_units>';
279 l_text:=l_text||irc_utilities_pkg.removeTags(p_qualifying_units);
280 l_text:=l_text||'</qualifying_units>';
281 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
282 l_text:='<attribute_category>';
283 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
284 l_text:=l_text||'</attribute_category>';
285 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
286 l_text:='<attribute1>';
287 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
288 l_text:=l_text||'</attribute1>';
289 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
290 l_text:='<attribute2>';
291 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
292 l_text:=l_text||'</attribute2>';
293 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
294 l_text:='<attribute3>';
295 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
296 l_text:=l_text||'</attribute3>';
297 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
298 l_text:='<attribute4>';
299 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
300 l_text:=l_text||'</attribute4>';
301 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
305 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
302 l_text:='<attribute5>';
303 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
304 l_text:=l_text||'</attribute5>';
306 l_text:='<attribute6>';
307 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
308 l_text:=l_text||'</attribute6>';
309 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
310 l_text:='<attribute7>';
311 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
312 l_text:=l_text||'</attribute7>';
313 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
314 l_text:='<attribute8>';
315 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
316 l_text:=l_text||'</attribute8>';
317 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
318 l_text:='<attribute9>';
319 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
320 l_text:=l_text||'</attribute9>';
321 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
322 l_text:='<attribute10>';
323 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
324 l_text:=l_text||'</attribute10>';
325 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
326 l_text:='<attribute11>';
327 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
328 l_text:=l_text||'</attribute11>';
329 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
330 l_text:='<attribute12>';
331 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
332 l_text:=l_text||'</attribute12>';
333 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
334 l_text:='<attribute13>';
335 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
336 l_text:=l_text||'</attribute13>';
337 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
338 l_text:='<attribute14>';
339 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
340 l_text:=l_text||'</attribute14>';
341 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
342 l_text:='<attribute15>';
343 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
344 l_text:=l_text||'</attribute15>';
345 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
346 l_text:='<attribute16>';
347 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
348 l_text:=l_text||'</attribute16>';
349 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
350 l_text:='<attribute17>';
351 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
352 l_text:=l_text||'</attribute17>';
353 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
354 l_text:='<attribute18>';
355 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
356 l_text:=l_text||'</attribute18>';
357 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
358 l_text:='<attribute19>';
359 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
360 l_text:=l_text||'</attribute19>';
361 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
362 l_text:='<attribute20>';
363 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
364 l_text:=l_text||'</attribute20>';
365 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
366 l_text:='<element_information_category>';
367 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information_category);
368 l_text:=l_text||'</element_information_category>';
369 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
370 l_text:='<element_information1>';
371 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information1);
372 l_text:=l_text||'</element_information1>';
373 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
374 l_text:='<element_information2>';
375 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information2);
376 l_text:=l_text||'</element_information2>';
377 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
378 l_text:='<element_information3>';
379 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information3);
380 l_text:=l_text||'</element_information3>';
381 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
382 l_text:='<element_information4>';
383 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information4);
384 l_text:=l_text||'</element_information4>';
385 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
386 l_text:='<element_information5>';
390 l_text:='<element_information6>';
387 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information5);
388 l_text:=l_text||'</element_information5>';
389 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
391 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information6);
392 l_text:=l_text||'</element_information6>';
393 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
394 l_text:='<element_information7>';
395 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information7);
396 l_text:=l_text||'</element_information7>';
397 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
398 l_text:='<element_information8>';
399 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information8);
400 l_text:=l_text||'</element_information8>';
401 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
402 l_text:='<element_information9>';
403 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information9);
404 l_text:=l_text||'</element_information9>';
405 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
406 l_text:='<element_information10>';
407 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information10);
408 l_text:=l_text||'</element_information10>';
409 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
410 l_text:='<element_information11>';
411 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information11);
412 l_text:=l_text||'</element_information11>';
413 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
414 l_text:='<element_information12>';
415 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information12);
416 l_text:=l_text||'</element_information12>';
417 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
418 l_text:='<element_information13>';
419 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information13);
420 l_text:=l_text||'</element_information13>';
421 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
422 l_text:='<element_information14>';
423 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information14);
424 l_text:=l_text||'</element_information14>';
425 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
426 l_text:='<element_information15>';
427 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information15);
428 l_text:=l_text||'</element_information15>';
429 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
430 l_text:='<element_information16>';
431 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information16);
432 l_text:=l_text||'</element_information16>';
433 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
434 l_text:='<element_information17>';
435 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information17);
436 l_text:=l_text||'</element_information17>';
437 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
438 l_text:='<element_information18>';
439 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information18);
440 l_text:=l_text||'</element_information18>';
441 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
442 l_text:='<element_information19>';
443 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information19);
444 l_text:=l_text||'</element_information19>';
445 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
446 l_text:='<element_information20>';
447 l_text:=l_text||irc_utilities_pkg.removeTags(p_element_information20);
448 l_text:=l_text||'</element_information20>';
449 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
450 l_text:='<once_each_period_flag>';
451 l_text:=l_text||irc_utilities_pkg.removeTags(p_once_each_period_flag);
452 l_text:=l_text||'</once_each_period_flag>';
453 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
454 l_text:='<language_code>';
455 l_text:=l_text||irc_utilities_pkg.removeTags(p_language_code);
456 l_text:=l_text||'</language_code>';
457 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
458 l_text:='<time_definition_type>';
459 l_text:=l_text||irc_utilities_pkg.removeTags(p_time_definition_type);
460 l_text:=l_text||'</time_definition_type>';
461 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
462 l_text:='<time_definition_id>';
466 l_text:='<advance_element_type_id>';
463 l_text:=l_text||fnd_number.number_to_canonical(p_time_definition_id);
464 l_text:=l_text||'</time_definition_id>';
465 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
467 l_text:=l_text||fnd_number.number_to_canonical(p_advance_element_type_id);
468 l_text:=l_text||'</advance_element_type_id>';
469 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
470 l_text:='<deduction_element_type_id>';
471 l_text:=l_text||fnd_number.number_to_canonical(p_deduction_element_type_id);
472 l_text:=l_text||'</deduction_element_type_id>';
473 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
474 l_text:='<effective_start_date>';
475 l_text:=l_text||fnd_date.date_to_canonical(p_effective_start_date);
476 l_text:=l_text||'</effective_start_date>';
477 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
478 l_text:='<effective_end_date>';
479 l_text:=l_text||fnd_date.date_to_canonical(p_effective_end_date);
480 l_text:=l_text||'</effective_end_date>';
481 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
482 l_text:='<comment_id>';
483 l_text:=l_text||fnd_number.number_to_canonical(p_comment_id);
484 l_text:=l_text||'</comment_id>';
485 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
486 l_text:='<processing_priority_warning>';
487 if(P_PROCESSING_PRIORITY_WARNING) then
488 l_text:=l_text||'TRUE';
489 else
490 l_text:=l_text||'FALSE';
491 end if;
492 l_text:=l_text||'</processing_priority_warning>';
493 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
494 l_text:='<element_name_warning>';
495 if(P_ELEMENT_NAME_WARNING) then
496 l_text:=l_text||'TRUE';
497 else
498 l_text:=l_text||'FALSE';
499 end if;
500 l_text:=l_text||'</element_name_warning>';
501 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
502 l_text:='<element_name_change_warning>';
503 if(P_ELEMENT_NAME_CHANGE_WARNING) then
504 l_text:=l_text||'TRUE';
505 else
506 l_text:=l_text||'FALSE';
507 end if;
508 l_text:=l_text||'</element_name_change_warning>';
509 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
510 l_text:='</element_types>';
511 --
512 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
513 --
514 if p_effective_start_date is not NULL and
515 p_effective_start_date > trunc(SYSDATE) and
516 fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
517 -- raise the event with the event data, with send date set to effective date
518 wf_event.raise(p_event_name=>l_event_name
519 ,p_event_key=>l_event_key
520 ,p_event_data=>l_event_data
521 ,p_send_date => p_effective_start_date);
522 --
523 else
524 -- raise the event with the event data
525 wf_event.raise(p_event_name=>l_event_name
526 ,p_event_key=>l_event_key
527 ,p_event_data=>l_event_data);
528 end if;
529 elsif (l_message='KEY') then
530 hr_utility.set_location(l_proc,30);
531 -- get a key for the event
532 open get_seq;
533 fetch get_seq into l_event_key;
534 close get_seq;
535 if p_effective_start_date is not NULL and
536 p_effective_start_date > trunc(SYSDATE) and
537 fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
538 -- this is a key event, so just raise the event
539 -- without the event data, with send date set to effective date
540 wf_event.raise(p_event_name=>l_event_name
541 ,p_event_key=>l_event_key
542 ,p_send_date => p_effective_start_date);
543 --
544 else
545 -- this is a key event, so just raise the event
546 -- without the event data
547 wf_event.raise(p_event_name=>l_event_name
548 ,p_event_key=>l_event_key);
549 end if;
550 elsif (l_message='NONE') then
551 hr_utility.set_location(l_proc,40);
552 -- no event is required, so do nothing
553 null;
554 end if;
555 hr_utility.set_location('Leaving: '||l_proc,50);
556 end update_element_type_a;
557 end pay_element_types_be2;