[Home] [Help]
PACKAGE BODY: APPS.PAY_CONTINUOUS_CALC
Source
1 PACKAGE BODY PAY_CONTINUOUS_CALC AS
2 /* $Header: pycontc.pkb 120.23.12020000.3 2012/07/06 09:35:50 vmaripal ship $ */
3
4 /* Global definitions */
5 --
6 g_package varchar2(80) := 'PAY_CONTINUOUS_CALC';
7 TYPE event_cache IS RECORD
8 (
9 business_group_id number_tbl,
10 legislation_code varchar_2_tbl,
11 table_name varchar_60_tbl,
12 column_name varchar_60_tbl,
13 change_type varchar_60_tbl,
14 event_update_id number_tbl,
15 event_type varchar_60_tbl,
16 event_check boolean_tbl,
17 sz INTEGER
18 );
19 --
20 g_event_cache event_cache;
21 --
22
23 /* Name : event_update
24 Purpose : Based on parameters passed in this procedure checks whether
25 the specified column has been updated, if so it records
26 any events associated with that update.
27 Arguments :
28 Notes :
29 */
30 procedure event_update(
31 p_business_group_id in number,
32 p_legislation_code in varchar2,
33 p_table_name in varchar2,
34 p_column_name in varchar2,
35 p_old_value in varchar2,
36 p_new_value in varchar2,
37 p_effective_date in date,
38 p_calc_date in date default null,
39 p_event_type in varchar2 default 'U'
40 )
41 is
42 --
43 cursor get_events (p_bg_id in number,
44 p_leg_code in varchar2,
45 p_tab_name in varchar2,
46 p_col_name in varchar2,
47 p_evnt_typ in varchar2
48 )
49 is
50 select peu.change_type,
51 peu.event_update_id,
52 peu.event_type
53 from pay_event_updates peu,
54 pay_dated_tables pt
55 where ((p_bg_id = peu.business_group_id
56 and peu.legislation_code is null)
57 or (p_leg_code = peu.legislation_code
58 and peu.business_group_id is null)
59 or (peu.business_group_id is null
60 and peu.legislation_code is null))
61 and pt.dated_table_id = peu.dated_table_id
62 and pt.table_name = p_tab_name
63 and peu.event_type = p_evnt_typ
64 and nvl(peu.column_name, 'NULL') = nvl(p_col_name, 'NULL');
65 --
66 cnt number;
67 processed boolean;
68 l_calc_date date;
69 l_event_type pay_event_updates.event_type%type;
70 begin
71 --
72 if (p_calc_date is null) then
73 l_calc_date := p_effective_date;
74 else
75 l_calc_date := p_calc_date;
76 end if;
77 --
78 -- Setup the event_type
79 if (pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
80 l_event_type := p_event_type;
81 else
82 l_event_type := pay_dyn_triggers.g_dyt_mode;
83 end if;
84 --
85 hr_utility.set_location('pay_continuous_calc.event_update', 10);
86 /* Search the cache does this event exist in the cache */
87 processed := false;
91 and g_event_cache.table_name(cnt) = p_table_name
88 for cnt in 1..g_event_cache.sz loop
89 if ( g_event_cache.business_group_id(cnt) = p_business_group_id
90 and g_event_cache.legislation_code(cnt) = p_legislation_code
92 and nvl(g_event_cache.column_name(cnt), 'NULL')
93 = nvl(p_column_name, 'NULL')
94 and g_event_cache.event_type(cnt) = l_event_type) then
95 --
96 processed := true;
97 /* Ok we got the cached value */
98 if (g_event_cache.event_check(cnt) = true) then
99 --
100 hr_utility.trace('+Discovered our event in cache.');
101 hr_utility.trace('+Event: '||l_event_type||' on '||p_table_name||'.'||p_column_name);
102 --
103 /* If its an update then check the values otherwise just add it to the list */
104 if ( g_event_cache.event_type(cnt) = 'U'
105 or g_event_cache.event_type(cnt) = 'CORRECTION'
106 or g_event_cache.event_type(cnt) = 'UPDATE'
107 or g_event_cache.event_type(cnt) = 'UPDATE_OVERRIDE'
108 or g_event_cache.event_type(cnt) = 'UPDATE_CHANGE_INSERT') then
109 hr_utility.trace('Comparing...'||p_old_value||' with '||p_new_value);
110 if (nvl(p_old_value, 'peu<null>') <> nvl(p_new_value, 'peu<null>')) then
111 /* OK record the event in the event list */
112 hr_utility.trace('>Event passes test => add to list for recording in to ppe.');
113 g_event_list.sz := g_event_list.sz + 1;
114 g_event_list.change_type(g_event_list.sz) :=
115 g_event_cache.change_type(cnt);
116 g_event_list.effective_date(g_event_list.sz) := p_effective_date;
117 g_event_list.calc_date(g_event_list.sz) := l_calc_date;
118 g_event_list.event_update_id(g_event_list.sz) :=
119 g_event_cache.event_update_id(cnt);
120 g_event_list.description(g_event_list.sz)
121 := nvl(p_old_value, '<null>')
122 ||' -> '|| nvl(p_new_value, '<null>');
123 end if;
124 else
125 hr_utility.trace('>Event auto passes => add to list for recording in to ppe.');
126 g_event_list.sz := g_event_list.sz + 1;
127 g_event_list.change_type(g_event_list.sz) :=
128 g_event_cache.change_type(cnt);
129 g_event_list.effective_date(g_event_list.sz) := p_effective_date;
130 g_event_list.calc_date(g_event_list.sz) := l_calc_date;
131 g_event_list.event_update_id(g_event_list.sz) :=
132 g_event_cache.event_update_id(cnt);
133 g_event_list.description(g_event_list.sz) := null;
134 end if;
135 end if;
136 --
137 end if;
138 end loop;
139 --
140 hr_utility.set_location('pay_continuous_calc.event_update', 30);
141 /* The event doesn't exist in the cache, go get it */
142 if (processed = false) then
143 declare
144 found boolean;
145 begin
146 --
147 hr_utility.set_location('pay_continuous_calc.event_update', 40);
148 found := false;
149 --hr_utility.trace('> p_business_group_id: '||p_business_group_id);
150 --hr_utility.trace('> p_legislation_code: '||p_legislation_code);
151 --hr_utility.trace('> p_table_name: '||p_table_name);
152 --hr_utility.trace('> p_column_name: '||p_column_name);
153 --hr_utility.trace('> l_event_type: '||l_event_type);
154
155 for evnt in get_events (p_business_group_id, p_legislation_code,
156 p_table_name, p_column_name, l_event_type) loop
157 --
158 --
159 hr_utility.trace('+Our event is not in cache, go get it...');
160 hr_utility.trace('+Event: '||l_event_type||' on '||p_table_name||'.'||p_column_name);
161 --
162 found := true;
163 g_event_cache.sz := g_event_cache.sz + 1;
164 g_event_cache.business_group_id(g_event_cache.sz) := p_business_group_id;
165 g_event_cache.legislation_code(g_event_cache.sz) := p_legislation_code;
166 g_event_cache.table_name(g_event_cache.sz) := p_table_name;
167 g_event_cache.column_name(g_event_cache.sz) := p_column_name;
168 g_event_cache.event_check(g_event_cache.sz) := true;
169 g_event_cache.change_type(g_event_cache.sz) := evnt.change_type;
170 g_event_cache.event_update_id(g_event_cache.sz) := evnt.event_update_id;
171 g_event_cache.event_type(g_event_cache.sz) := evnt.event_type;
172 --
173 --
174 /* If its an update then check the values otherwise just add it to the list */
175 if ( g_event_cache.event_type(g_event_cache.sz) = 'U'
176 or g_event_cache.event_type(g_event_cache.sz) = 'CORRECTION'
177 or g_event_cache.event_type(g_event_cache.sz) = 'UPDATE'
178 or g_event_cache.event_type(g_event_cache.sz) = 'UPDATE_OVERRIDE'
179 or g_event_cache.event_type(g_event_cache.sz) = 'UPDATE_CHANGE_INSERT') then
180 hr_utility.trace('Comparing...'||p_old_value||' with '||p_new_value);
181 --
182 if (nvl(p_old_value, 'peu<null>') <> nvl(p_new_value, 'peu<null>')) then
183 /* OK record the event in the event list */
184 hr_utility.trace('>Event passes test => add to list for recording in to ppe.');
188 g_event_list.effective_date(g_event_list.sz) := p_effective_date;
185 g_event_list.sz := g_event_list.sz + 1;
186 g_event_list.change_type(g_event_list.sz) :=
187 g_event_cache.change_type(g_event_cache.sz);
189 g_event_list.calc_date(g_event_list.sz) := l_calc_date;
190 g_event_list.event_update_id(g_event_list.sz) :=
191 g_event_cache.event_update_id(g_event_cache.sz);
192 g_event_list.description(g_event_list.sz)
193 := nvl(p_old_value, '<null>')
194 ||' -> '|| nvl(p_new_value, '<null>');
195 hr_utility.trace('5...');
196 end if;
197 else
198 hr_utility.trace('>Event auto passes => add to list for recording in to ppe.');
199 g_event_list.sz := g_event_list.sz + 1;
200 g_event_list.change_type(g_event_list.sz) :=
201 g_event_cache.change_type(g_event_cache.sz);
202 g_event_list.effective_date(g_event_list.sz) := p_effective_date;
203 g_event_list.calc_date(g_event_list.sz) := l_calc_date;
204 g_event_list.event_update_id(g_event_list.sz) :=
205 g_event_cache.event_update_id(g_event_cache.sz);
206 g_event_list.description(g_event_list.sz) := null;
207 end if;
208 --
209 end loop;
210 --
211 /* No this isn't a valid event hence don't call the API */
212 if (found = false) then
213 --
214 hr_utility.trace('Not valid event, add to a cache of non-recorded events');
215 --
216
217 g_event_cache.sz := g_event_cache.sz + 1;
218 g_event_cache.business_group_id(g_event_cache.sz) := p_business_group_id;
219 g_event_cache.legislation_code(g_event_cache.sz) := p_legislation_code;
220 g_event_cache.table_name(g_event_cache.sz) := p_table_name;
221 g_event_cache.column_name(g_event_cache.sz) := p_column_name;
222 g_event_cache.event_check(g_event_cache.sz) := false;
223 g_event_cache.change_type(g_event_cache.sz) := null;
224 g_event_cache.event_update_id(g_event_cache.sz) := null;
225 g_event_cache.event_type(g_event_cache.sz) := l_event_type;
226 end if;
227 --
228 end;
229 end if;
230 hr_utility.set_location('pay_continuous_calc.event_update', 900);
231 --
232 end event_update;
233
234 ---------------------------------------------------------------------------------------
235 -- Here are the procedures that have been built for the core triggers
236 ---------------------------------------------------------------------------------------
237
238 --
239 --------------------------------------------
240 -- PAY_ELEMENT_ENTRIES_F
241 --------------------------------------------
242 /* Used generator to build this procedure, but removed some of that table values.
243 */
244 /* PAY_ELEMENT_ENTRIES */
245 /* name : PAY_ELEMENT_ENTRIES_F_aru
246 purpose : This is procedure that records any changes for updates
247 on element_entries.
248 */
249 procedure PAY_ELEMENT_ENTRIES_F_aru(
250 p_business_group_id in number,
251 p_legislation_code in varchar2,
252 p_effective_date in date,
253 p_old_ASSIGNMENT_ID in NUMBER,
254 p_new_ASSIGNMENT_ID in NUMBER,
255 p_old_ATTRIBUTE1 in VARCHAR2,
256 p_new_ATTRIBUTE1 in VARCHAR2,
257 p_old_ATTRIBUTE10 in VARCHAR2,
258 p_new_ATTRIBUTE10 in VARCHAR2,
259 p_old_ATTRIBUTE11 in VARCHAR2,
260 p_new_ATTRIBUTE11 in VARCHAR2,
261 p_old_ATTRIBUTE12 in VARCHAR2,
262 p_new_ATTRIBUTE12 in VARCHAR2,
263 p_old_ATTRIBUTE13 in VARCHAR2,
264 p_new_ATTRIBUTE13 in VARCHAR2,
265 p_old_ATTRIBUTE14 in VARCHAR2,
266 p_new_ATTRIBUTE14 in VARCHAR2,
267 p_old_ATTRIBUTE15 in VARCHAR2,
268 p_new_ATTRIBUTE15 in VARCHAR2,
269 p_old_ATTRIBUTE16 in VARCHAR2,
270 p_new_ATTRIBUTE16 in VARCHAR2,
271 p_old_ATTRIBUTE17 in VARCHAR2,
272 p_new_ATTRIBUTE17 in VARCHAR2,
273 p_old_ATTRIBUTE18 in VARCHAR2,
274 p_new_ATTRIBUTE18 in VARCHAR2,
275 p_old_ATTRIBUTE19 in VARCHAR2,
276 p_new_ATTRIBUTE19 in VARCHAR2,
277 p_old_ATTRIBUTE2 in VARCHAR2,
278 p_new_ATTRIBUTE2 in VARCHAR2,
279 p_old_ATTRIBUTE20 in VARCHAR2,
280 p_new_ATTRIBUTE20 in VARCHAR2,
281 p_old_ATTRIBUTE3 in VARCHAR2,
282 p_new_ATTRIBUTE3 in VARCHAR2,
283 p_old_ATTRIBUTE4 in VARCHAR2,
284 p_new_ATTRIBUTE4 in VARCHAR2,
285 p_old_ATTRIBUTE5 in VARCHAR2,
286 p_new_ATTRIBUTE5 in VARCHAR2,
287 p_old_ATTRIBUTE6 in VARCHAR2,
288 p_new_ATTRIBUTE6 in VARCHAR2,
289 p_old_ATTRIBUTE7 in VARCHAR2,
290 p_new_ATTRIBUTE7 in VARCHAR2,
291 p_old_ATTRIBUTE8 in VARCHAR2,
292 p_new_ATTRIBUTE8 in VARCHAR2,
293 p_old_ATTRIBUTE9 in VARCHAR2,
294 p_new_ATTRIBUTE9 in VARCHAR2,
295 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
296 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
297 p_old_COST_ALLOCATION_KEYFLEX in NUMBER,
298 p_new_COST_ALLOCATION_KEYFLEX in NUMBER,
299 p_old_DATE_EARNED in DATE,
300 p_new_DATE_EARNED in DATE,
301 p_old_EFFECTIVE_END_DATE in DATE,
302 p_new_EFFECTIVE_END_DATE in DATE,
303 p_old_EFFECTIVE_START_DATE in DATE,
304 p_new_EFFECTIVE_START_DATE in DATE,
305 p_old_ENTRY_INFORMATION1 in VARCHAR2,
306 p_new_ENTRY_INFORMATION1 in VARCHAR2,
307 p_old_ENTRY_INFORMATION10 in VARCHAR2,
308 p_new_ENTRY_INFORMATION10 in VARCHAR2,
309 p_old_ENTRY_INFORMATION11 in VARCHAR2,
313 p_old_ENTRY_INFORMATION13 in VARCHAR2,
310 p_new_ENTRY_INFORMATION11 in VARCHAR2,
311 p_old_ENTRY_INFORMATION12 in VARCHAR2,
312 p_new_ENTRY_INFORMATION12 in VARCHAR2,
314 p_new_ENTRY_INFORMATION13 in VARCHAR2,
315 p_old_ENTRY_INFORMATION14 in VARCHAR2,
316 p_new_ENTRY_INFORMATION14 in VARCHAR2,
317 p_old_ENTRY_INFORMATION15 in VARCHAR2,
318 p_new_ENTRY_INFORMATION15 in VARCHAR2,
319 p_old_ENTRY_INFORMATION16 in VARCHAR2,
320 p_new_ENTRY_INFORMATION16 in VARCHAR2,
321 p_old_ENTRY_INFORMATION17 in VARCHAR2,
322 p_new_ENTRY_INFORMATION17 in VARCHAR2,
323 p_old_ENTRY_INFORMATION18 in VARCHAR2,
324 p_new_ENTRY_INFORMATION18 in VARCHAR2,
325 p_old_ENTRY_INFORMATION19 in VARCHAR2,
326 p_new_ENTRY_INFORMATION19 in VARCHAR2,
327 p_old_ENTRY_INFORMATION2 in VARCHAR2,
328 p_new_ENTRY_INFORMATION2 in VARCHAR2,
329 p_old_ENTRY_INFORMATION20 in VARCHAR2,
330 p_new_ENTRY_INFORMATION20 in VARCHAR2,
331 p_old_ENTRY_INFORMATION21 in VARCHAR2,
332 p_new_ENTRY_INFORMATION21 in VARCHAR2,
333 p_old_ENTRY_INFORMATION22 in VARCHAR2,
334 p_new_ENTRY_INFORMATION22 in VARCHAR2,
335 p_old_ENTRY_INFORMATION23 in VARCHAR2,
336 p_new_ENTRY_INFORMATION23 in VARCHAR2,
337 p_old_ENTRY_INFORMATION24 in VARCHAR2,
338 p_new_ENTRY_INFORMATION24 in VARCHAR2,
339 p_old_ENTRY_INFORMATION25 in VARCHAR2,
340 p_new_ENTRY_INFORMATION25 in VARCHAR2,
341 p_old_ENTRY_INFORMATION26 in VARCHAR2,
342 p_new_ENTRY_INFORMATION26 in VARCHAR2,
343 p_old_ENTRY_INFORMATION27 in VARCHAR2,
344 p_new_ENTRY_INFORMATION27 in VARCHAR2,
345 p_old_ENTRY_INFORMATION28 in VARCHAR2,
346 p_new_ENTRY_INFORMATION28 in VARCHAR2,
347 p_old_ENTRY_INFORMATION29 in VARCHAR2,
348 p_new_ENTRY_INFORMATION29 in VARCHAR2,
349 p_old_ENTRY_INFORMATION3 in VARCHAR2,
350 p_new_ENTRY_INFORMATION3 in VARCHAR2,
351 p_old_ENTRY_INFORMATION30 in VARCHAR2,
352 p_new_ENTRY_INFORMATION30 in VARCHAR2,
353 p_old_ENTRY_INFORMATION4 in VARCHAR2,
354 p_new_ENTRY_INFORMATION4 in VARCHAR2,
355 p_old_ENTRY_INFORMATION5 in VARCHAR2,
356 p_new_ENTRY_INFORMATION5 in VARCHAR2,
357 p_old_ENTRY_INFORMATION6 in VARCHAR2,
358 p_new_ENTRY_INFORMATION6 in VARCHAR2,
359 p_old_ENTRY_INFORMATION7 in VARCHAR2,
360 p_new_ENTRY_INFORMATION7 in VARCHAR2,
361 p_old_ENTRY_INFORMATION8 in VARCHAR2,
362 p_new_ENTRY_INFORMATION8 in VARCHAR2,
363 p_old_ENTRY_INFORMATION9 in VARCHAR2,
364 p_new_ENTRY_INFORMATION9 in VARCHAR2,
365 p_old_ENTRY_INFORMATION_CATEGO in VARCHAR2,
366 p_new_ENTRY_INFORMATION_CATEGO in VARCHAR2,
367 p_old_ORIGINAL_ENTRY_ID in NUMBER,
368 p_new_ORIGINAL_ENTRY_ID in NUMBER,
369 p_old_PERSONAL_PAYMENT_METHOD_ in NUMBER,
370 p_new_PERSONAL_PAYMENT_METHOD_ in NUMBER,
371 p_old_REASON in VARCHAR2,
372 p_new_REASON in VARCHAR2,
373 p_old_SUBPRIORITY in NUMBER,
374 p_new_SUBPRIORITY in NUMBER,
375 p_old_UPDATING_ACTION_ID in NUMBER,
376 p_new_UPDATING_ACTION_ID in NUMBER,
377 p_old_ELEMENT_ENTRY_ID in number
378 )
379 is
380 --
381 l_proc varchar2(240) := g_package||'.pay_element_entries_f_aru';
382 BEGIN
383 --
384 hr_utility.set_location(l_proc, 10);
385 /* If the continuous calc is overriden then do nothing */
386 if (g_override_cc = TRUE) then
387 return;
388 end if;
389 --
390 /* If the dates haven't changed it must be a correction */
391 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
392 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
393 --
394 pay_continuous_calc.event_update(p_business_group_id,
395 p_legislation_code,
396 'PAY_ELEMENT_ENTRIES_F',
397 'ATTRIBUTE1',
398 p_old_ATTRIBUTE1,
399 p_new_ATTRIBUTE1,
400 p_effective_date
401 );
402 pay_continuous_calc.event_update(p_business_group_id,
403 p_legislation_code,
404 'PAY_ELEMENT_ENTRIES_F',
405 'ATTRIBUTE10',
406 p_old_ATTRIBUTE10,
407 p_new_ATTRIBUTE10,
408 p_effective_date
409 );
410 pay_continuous_calc.event_update(p_business_group_id,
411 p_legislation_code,
412 'PAY_ELEMENT_ENTRIES_F',
413 'ATTRIBUTE11',
414 p_old_ATTRIBUTE11,
415 p_new_ATTRIBUTE11,
416 p_effective_date
417 );
418 pay_continuous_calc.event_update(p_business_group_id,
419 p_legislation_code,
420 'PAY_ELEMENT_ENTRIES_F',
421 'ATTRIBUTE12',
422 p_old_ATTRIBUTE12,
423 p_new_ATTRIBUTE12,
424 p_effective_date
425 );
426 pay_continuous_calc.event_update(p_business_group_id,
427 p_legislation_code,
428 'PAY_ELEMENT_ENTRIES_F',
429 'ATTRIBUTE13',
430 p_old_ATTRIBUTE13,
431 p_new_ATTRIBUTE13,
435 p_legislation_code,
432 p_effective_date
433 );
434 pay_continuous_calc.event_update(p_business_group_id,
436 'PAY_ELEMENT_ENTRIES_F',
437 'ATTRIBUTE14',
438 p_old_ATTRIBUTE14,
439 p_new_ATTRIBUTE14,
440 p_effective_date
441 );
442 pay_continuous_calc.event_update(p_business_group_id,
443 p_legislation_code,
444 'PAY_ELEMENT_ENTRIES_F',
445 'ATTRIBUTE15',
446 p_old_ATTRIBUTE15,
447 p_new_ATTRIBUTE15,
448 p_effective_date
449 );
450 pay_continuous_calc.event_update(p_business_group_id,
451 p_legislation_code,
452 'PAY_ELEMENT_ENTRIES_F',
453 'ATTRIBUTE16',
454 p_old_ATTRIBUTE16,
455 p_new_ATTRIBUTE16,
456 p_effective_date
457 );
458 pay_continuous_calc.event_update(p_business_group_id,
459 p_legislation_code,
460 'PAY_ELEMENT_ENTRIES_F',
461 'ATTRIBUTE17',
462 p_old_ATTRIBUTE17,
463 p_new_ATTRIBUTE17,
464 p_effective_date
465 );
466 pay_continuous_calc.event_update(p_business_group_id,
467 p_legislation_code,
468 'PAY_ELEMENT_ENTRIES_F',
469 'ATTRIBUTE18',
470 p_old_ATTRIBUTE18,
471 p_new_ATTRIBUTE18,
472 p_effective_date
473 );
474 pay_continuous_calc.event_update(p_business_group_id,
475 p_legislation_code,
476 'PAY_ELEMENT_ENTRIES_F',
477 'ATTRIBUTE19',
478 p_old_ATTRIBUTE19,
479 p_new_ATTRIBUTE19,
480 p_effective_date
481 );
482 pay_continuous_calc.event_update(p_business_group_id,
483 p_legislation_code,
484 'PAY_ELEMENT_ENTRIES_F',
485 'ATTRIBUTE2',
486 p_old_ATTRIBUTE2,
487 p_new_ATTRIBUTE2,
488 p_effective_date
489 );
490 pay_continuous_calc.event_update(p_business_group_id,
491 p_legislation_code,
492 'PAY_ELEMENT_ENTRIES_F',
493 'ATTRIBUTE20',
494 p_old_ATTRIBUTE20,
495 p_new_ATTRIBUTE20,
496 p_effective_date
497 );
498 pay_continuous_calc.event_update(p_business_group_id,
499 p_legislation_code,
500 'PAY_ELEMENT_ENTRIES_F',
501 'ATTRIBUTE3',
502 p_old_ATTRIBUTE3,
503 p_new_ATTRIBUTE3,
504 p_effective_date
505 );
506 pay_continuous_calc.event_update(p_business_group_id,
507 p_legislation_code,
508 'PAY_ELEMENT_ENTRIES_F',
509 'ATTRIBUTE4',
510 p_old_ATTRIBUTE4,
511 p_new_ATTRIBUTE4,
512 p_effective_date
513 );
514 pay_continuous_calc.event_update(p_business_group_id,
515 p_legislation_code,
516 'PAY_ELEMENT_ENTRIES_F',
517 'ATTRIBUTE5',
518 p_old_ATTRIBUTE5,
519 p_new_ATTRIBUTE5,
520 p_effective_date
521 );
522 pay_continuous_calc.event_update(p_business_group_id,
523 p_legislation_code,
524 'PAY_ELEMENT_ENTRIES_F',
525 'ATTRIBUTE6',
526 p_old_ATTRIBUTE6,
527 p_new_ATTRIBUTE6,
528 p_effective_date
529 );
530 pay_continuous_calc.event_update(p_business_group_id,
534 p_old_ATTRIBUTE7,
531 p_legislation_code,
532 'PAY_ELEMENT_ENTRIES_F',
533 'ATTRIBUTE7',
535 p_new_ATTRIBUTE7,
536 p_effective_date
537 );
538 pay_continuous_calc.event_update(p_business_group_id,
539 p_legislation_code,
540 'PAY_ELEMENT_ENTRIES_F',
541 'ATTRIBUTE8',
542 p_old_ATTRIBUTE8,
543 p_new_ATTRIBUTE8,
544 p_effective_date
545 );
546 pay_continuous_calc.event_update(p_business_group_id,
547 p_legislation_code,
548 'PAY_ELEMENT_ENTRIES_F',
549 'ATTRIBUTE9',
550 p_old_ATTRIBUTE9,
551 p_new_ATTRIBUTE9,
552 p_effective_date
553 );
554 pay_continuous_calc.event_update(p_business_group_id,
555 p_legislation_code,
556 'PAY_ELEMENT_ENTRIES_F',
557 'ATTRIBUTE_CATEGORY',
558 p_old_ATTRIBUTE_CATEGORY,
559 p_new_ATTRIBUTE_CATEGORY,
560 p_effective_date
561 );
562 pay_continuous_calc.event_update(p_business_group_id,
563 p_legislation_code,
564 'PAY_ELEMENT_ENTRIES_F',
565 'COST_ALLOCATION_KEYFLEX_ID',
566 p_old_COST_ALLOCATION_KEYFLEX,
567 p_new_COST_ALLOCATION_KEYFLEX,
568 p_effective_date
569 );
570 pay_continuous_calc.event_update(p_business_group_id,
571 p_legislation_code,
572 'PAY_ELEMENT_ENTRIES_F',
573 'DATE_EARNED',
574 p_old_DATE_EARNED,
575 p_new_DATE_EARNED,
576 p_effective_date
577 );
578 pay_continuous_calc.event_update(p_business_group_id,
579 p_legislation_code,
580 'PAY_ELEMENT_ENTRIES_F',
581 'ENTRY_INFORMATION1',
582 p_old_ENTRY_INFORMATION1,
583 p_new_ENTRY_INFORMATION1,
584 p_effective_date
585 );
586 pay_continuous_calc.event_update(p_business_group_id,
587 p_legislation_code,
588 'PAY_ELEMENT_ENTRIES_F',
589 'ENTRY_INFORMATION10',
590 p_old_ENTRY_INFORMATION10,
591 p_new_ENTRY_INFORMATION10,
592 p_effective_date
593 );
594 pay_continuous_calc.event_update(p_business_group_id,
595 p_legislation_code,
596 'PAY_ELEMENT_ENTRIES_F',
597 'ENTRY_INFORMATION11',
598 p_old_ENTRY_INFORMATION11,
599 p_new_ENTRY_INFORMATION11,
600 p_effective_date
601 );
602 pay_continuous_calc.event_update(p_business_group_id,
603 p_legislation_code,
604 'PAY_ELEMENT_ENTRIES_F',
605 'ENTRY_INFORMATION12',
606 p_old_ENTRY_INFORMATION12,
607 p_new_ENTRY_INFORMATION12,
608 p_effective_date
609 );
610 pay_continuous_calc.event_update(p_business_group_id,
611 p_legislation_code,
612 'PAY_ELEMENT_ENTRIES_F',
613 'ENTRY_INFORMATION13',
614 p_old_ENTRY_INFORMATION13,
615 p_new_ENTRY_INFORMATION13,
616 p_effective_date
617 );
618 pay_continuous_calc.event_update(p_business_group_id,
619 p_legislation_code,
620 'PAY_ELEMENT_ENTRIES_F',
621 'ENTRY_INFORMATION14',
622 p_old_ENTRY_INFORMATION14,
623 p_new_ENTRY_INFORMATION14,
624 p_effective_date
625 );
626 pay_continuous_calc.event_update(p_business_group_id,
627 p_legislation_code,
628 'PAY_ELEMENT_ENTRIES_F',
629 'ENTRY_INFORMATION15',
630 p_old_ENTRY_INFORMATION15,
631 p_new_ENTRY_INFORMATION15,
632 p_effective_date
633 );
634 pay_continuous_calc.event_update(p_business_group_id,
635 p_legislation_code,
636 'PAY_ELEMENT_ENTRIES_F',
637 'ENTRY_INFORMATION16',
638 p_old_ENTRY_INFORMATION16,
639 p_new_ENTRY_INFORMATION16,
640 p_effective_date
641 );
642 pay_continuous_calc.event_update(p_business_group_id,
643 p_legislation_code,
644 'PAY_ELEMENT_ENTRIES_F',
645 'ENTRY_INFORMATION17',
646 p_old_ENTRY_INFORMATION17,
647 p_new_ENTRY_INFORMATION17,
648 p_effective_date
649 );
650 pay_continuous_calc.event_update(p_business_group_id,
651 p_legislation_code,
652 'PAY_ELEMENT_ENTRIES_F',
653 'ENTRY_INFORMATION18',
654 p_old_ENTRY_INFORMATION18,
655 p_new_ENTRY_INFORMATION18,
656 p_effective_date
657 );
658 pay_continuous_calc.event_update(p_business_group_id,
659 p_legislation_code,
660 'PAY_ELEMENT_ENTRIES_F',
661 'ENTRY_INFORMATION19',
662 p_old_ENTRY_INFORMATION19,
663 p_new_ENTRY_INFORMATION19,
664 p_effective_date
665 );
666 pay_continuous_calc.event_update(p_business_group_id,
667 p_legislation_code,
668 'PAY_ELEMENT_ENTRIES_F',
669 'ENTRY_INFORMATION2',
670 p_old_ENTRY_INFORMATION2,
671 p_new_ENTRY_INFORMATION2,
672 p_effective_date
673 );
674 pay_continuous_calc.event_update(p_business_group_id,
675 p_legislation_code,
676 'PAY_ELEMENT_ENTRIES_F',
677 'ENTRY_INFORMATION20',
678 p_old_ENTRY_INFORMATION20,
679 p_new_ENTRY_INFORMATION20,
680 p_effective_date
681 );
682 pay_continuous_calc.event_update(p_business_group_id,
683 p_legislation_code,
684 'PAY_ELEMENT_ENTRIES_F',
685 'ENTRY_INFORMATION21',
686 p_old_ENTRY_INFORMATION21,
687 p_new_ENTRY_INFORMATION21,
688 p_effective_date
689 );
690 pay_continuous_calc.event_update(p_business_group_id,
691 p_legislation_code,
692 'PAY_ELEMENT_ENTRIES_F',
693 'ENTRY_INFORMATION22',
694 p_old_ENTRY_INFORMATION22,
695 p_new_ENTRY_INFORMATION22,
696 p_effective_date
697 );
698 pay_continuous_calc.event_update(p_business_group_id,
699 p_legislation_code,
700 'PAY_ELEMENT_ENTRIES_F',
701 'ENTRY_INFORMATION23',
702 p_old_ENTRY_INFORMATION23,
703 p_new_ENTRY_INFORMATION23,
704 p_effective_date
705 );
706 pay_continuous_calc.event_update(p_business_group_id,
707 p_legislation_code,
708 'PAY_ELEMENT_ENTRIES_F',
709 'ENTRY_INFORMATION24',
710 p_old_ENTRY_INFORMATION24,
711 p_new_ENTRY_INFORMATION24,
712 p_effective_date
713 );
714 pay_continuous_calc.event_update(p_business_group_id,
715 p_legislation_code,
716 'PAY_ELEMENT_ENTRIES_F',
717 'ENTRY_INFORMATION25',
718 p_old_ENTRY_INFORMATION25,
719 p_new_ENTRY_INFORMATION25,
720 p_effective_date
721 );
722 pay_continuous_calc.event_update(p_business_group_id,
723 p_legislation_code,
724 'PAY_ELEMENT_ENTRIES_F',
725 'ENTRY_INFORMATION26',
726 p_old_ENTRY_INFORMATION26,
727 p_new_ENTRY_INFORMATION26,
728 p_effective_date
729 );
730 pay_continuous_calc.event_update(p_business_group_id,
731 p_legislation_code,
732 'PAY_ELEMENT_ENTRIES_F',
733 'ENTRY_INFORMATION27',
734 p_old_ENTRY_INFORMATION27,
735 p_new_ENTRY_INFORMATION27,
736 p_effective_date
737 );
738 pay_continuous_calc.event_update(p_business_group_id,
739 p_legislation_code,
740 'PAY_ELEMENT_ENTRIES_F',
741 'ENTRY_INFORMATION28',
742 p_old_ENTRY_INFORMATION28,
743 p_new_ENTRY_INFORMATION28,
744 p_effective_date
745 );
746 pay_continuous_calc.event_update(p_business_group_id,
747 p_legislation_code,
748 'PAY_ELEMENT_ENTRIES_F',
749 'ENTRY_INFORMATION29',
750 p_old_ENTRY_INFORMATION29,
751 p_new_ENTRY_INFORMATION29,
752 p_effective_date
753 );
754 pay_continuous_calc.event_update(p_business_group_id,
755 p_legislation_code,
756 'PAY_ELEMENT_ENTRIES_F',
757 'ENTRY_INFORMATION3',
758 p_old_ENTRY_INFORMATION3,
759 p_new_ENTRY_INFORMATION3,
760 p_effective_date
761 );
762 pay_continuous_calc.event_update(p_business_group_id,
763 p_legislation_code,
764 'PAY_ELEMENT_ENTRIES_F',
765 'ENTRY_INFORMATION30',
766 p_old_ENTRY_INFORMATION30,
767 p_new_ENTRY_INFORMATION30,
768 p_effective_date
769 );
770 pay_continuous_calc.event_update(p_business_group_id,
771 p_legislation_code,
772 'PAY_ELEMENT_ENTRIES_F',
773 'ENTRY_INFORMATION4',
774 p_old_ENTRY_INFORMATION4,
775 p_new_ENTRY_INFORMATION4,
776 p_effective_date
777 );
778 pay_continuous_calc.event_update(p_business_group_id,
779 p_legislation_code,
780 'PAY_ELEMENT_ENTRIES_F',
781 'ENTRY_INFORMATION5',
782 p_old_ENTRY_INFORMATION5,
783 p_new_ENTRY_INFORMATION5,
784 p_effective_date
785 );
789 'ENTRY_INFORMATION6',
786 pay_continuous_calc.event_update(p_business_group_id,
787 p_legislation_code,
788 'PAY_ELEMENT_ENTRIES_F',
790 p_old_ENTRY_INFORMATION6,
791 p_new_ENTRY_INFORMATION6,
792 p_effective_date
793 );
794 pay_continuous_calc.event_update(p_business_group_id,
795 p_legislation_code,
796 'PAY_ELEMENT_ENTRIES_F',
797 'ENTRY_INFORMATION7',
798 p_old_ENTRY_INFORMATION7,
799 p_new_ENTRY_INFORMATION7,
800 p_effective_date
801 );
802 pay_continuous_calc.event_update(p_business_group_id,
803 p_legislation_code,
804 'PAY_ELEMENT_ENTRIES_F',
805 'ENTRY_INFORMATION8',
806 p_old_ENTRY_INFORMATION8,
807 p_new_ENTRY_INFORMATION8,
808 p_effective_date
809 );
810 pay_continuous_calc.event_update(p_business_group_id,
811 p_legislation_code,
812 'PAY_ELEMENT_ENTRIES_F',
813 'ENTRY_INFORMATION9',
814 p_old_ENTRY_INFORMATION9,
815 p_new_ENTRY_INFORMATION9,
816 p_effective_date
817 );
818 pay_continuous_calc.event_update(p_business_group_id,
819 p_legislation_code,
820 'PAY_ELEMENT_ENTRIES_F',
821 'ENTRY_INFORMATION_CATEGORY',
822 p_old_ENTRY_INFORMATION_CATEGO,
823 p_new_ENTRY_INFORMATION_CATEGO,
824 p_effective_date
825 );
826 pay_continuous_calc.event_update(p_business_group_id,
827 p_legislation_code,
828 'PAY_ELEMENT_ENTRIES_F',
829 'ORIGINAL_ENTRY_ID',
830 p_old_ORIGINAL_ENTRY_ID,
831 p_new_ORIGINAL_ENTRY_ID,
832 p_effective_date
833 );
834 pay_continuous_calc.event_update(p_business_group_id,
835 p_legislation_code,
836 'PAY_ELEMENT_ENTRIES_F',
837 'PERSONAL_PAYMENT_METHOD_ID',
838 p_old_PERSONAL_PAYMENT_METHOD_,
839 p_new_PERSONAL_PAYMENT_METHOD_,
840 p_effective_date
841 );
842 pay_continuous_calc.event_update(p_business_group_id,
843 p_legislation_code,
844 'PAY_ELEMENT_ENTRIES_F',
845 'REASON',
846 p_old_REASON,
847 p_new_REASON,
848 p_effective_date
849 );
850 pay_continuous_calc.event_update(p_business_group_id,
851 p_legislation_code,
852 'PAY_ELEMENT_ENTRIES_F',
853 'SUBPRIORITY',
854 p_old_SUBPRIORITY,
855 p_new_SUBPRIORITY,
856 p_effective_date
857 );
858 else
859 /* OK it must be a date track change */
860 pay_continuous_calc.event_update(p_business_group_id,
861 p_legislation_code,
862 'PAY_ELEMENT_ENTRIES_F',
863 'EFFECTIVE_END_DATE',
864 p_old_EFFECTIVE_END_DATE,
865 p_new_EFFECTIVE_END_DATE,
866 --p_new_effective_end_date, Bug fix 9370749, changed this value to p_effective_date
867 p_effective_date,
868 least(p_old_effective_end_date,
869 p_new_effective_end_date)
870 );
871 pay_continuous_calc.event_update(p_business_group_id,
872 p_legislation_code,
873 'PAY_ELEMENT_ENTRIES_F',
874 'EFFECTIVE_START_DATE',
875 p_old_EFFECTIVE_START_DATE,
876 p_new_EFFECTIVE_START_DATE,
877 --p_new_effective_start_date,Bug fix 9370749, changed this value to p_effective_date
878 p_effective_date,
879 least(p_old_effective_start_date,
880 p_new_effective_start_date)
884 /* Now call the API for the affected assignments */
881 );
882 end if;
883 --
885 declare
886 cnt number;
887 l_process_event_id number;
888 l_object_version_number number;
889 begin
890 if (pay_continuous_calc.g_event_list.sz <> 0) then
891 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
892 pay_ppe_api.create_process_event(
893 p_assignment_id => p_old_ASSIGNMENT_ID,
894 p_effective_date => g_event_list.effective_date(cnt),
895 p_change_type => g_event_list.change_type(cnt),
896 p_status => 'U',
897 p_description => g_event_list.description(cnt),
898 p_process_event_id => l_process_event_id,
899 p_object_version_number => l_object_version_number,
900 p_event_update_id => g_event_list.event_update_id(cnt),
901 p_surrogate_key => p_old_ELEMENT_ENTRY_ID,
902 p_calculation_date => g_event_list.calc_date(cnt),
903 p_business_group_id => p_business_group_id
904 );
905 end loop;
906 end if;
907 pay_continuous_calc.g_event_list.sz := 0;
908 end;
909 hr_utility.set_location(l_proc, 900);
910 --
911 end PAY_ELEMENT_ENTRIES_F_aru;
912 --
913
914 /* name : element_entries_ari
915 purpose : This is procedure that records any inserts
916 on element_entries.
917 */
918
919 procedure element_entries_ari(
920 p_business_group_id in number,
921 p_legislation_code in varchar2,
922 p_assignment_id in number,
923 p_effective_start_date in date,
924 p_updating_action_id in number,
925 p_new_element_entry_id in number
926 )
927 is
928 l_process_api boolean;
929 l_process_event_id number;
930 l_object_version_number number;
931 l_proc varchar2(240) := g_package||'.element_entries_ari';
932 begin
933 --
934 hr_utility.set_location(l_proc, 10);
935 /* If the continuous calc is overriden then do nothing */
936 if (g_override_cc = TRUE) then
937 return;
938 end if;
939 --
940 --
941 pay_continuous_calc.event_update(p_business_group_id,
942 p_legislation_code,
943 'PAY_ELEMENT_ENTRIES_F',
944 NULL,
945 NULL,
946 NULL,
947 p_effective_start_date,
948 p_effective_start_date,
949 'I'
950 );
951 /* Now call the API for the affected assignments */
952 declare
953 cnt number;
954 l_process_event_id number;
955 l_object_version_number number;
956 begin
957 if (pay_continuous_calc.g_event_list.sz <> 0) then
958 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
959 pay_ppe_api.create_process_event(
960 p_assignment_id => p_assignment_id,
961 p_effective_date => g_event_list.effective_date(cnt),
962 p_change_type => g_event_list.change_type(cnt),
963 p_status => 'U',
964 p_description => g_event_list.description(cnt),
965 p_process_event_id => l_process_event_id,
966 p_object_version_number => l_object_version_number,
967 p_event_update_id => g_event_list.event_update_id(cnt),
968 p_surrogate_key => p_new_ELEMENT_ENTRY_ID,
969 p_calculation_date => g_event_list.calc_date(cnt),
970 p_business_group_id => p_business_group_id
971 );
972 end loop;
973 end if;
974 pay_continuous_calc.g_event_list.sz := 0;
975 end;
976 hr_utility.set_location(l_proc, 900);
977 end element_entries_ari;
978 --
979
980 /* name : element_entries_ard
981 purpose : This is procedure that records any deletes
982 on element_entries.
983 */
984 procedure element_entries_ard(
985 p_business_group_id in number,
986 p_legislation_code in varchar2,
987 p_assignment_id in number,
988 p_old_ELEMENT_ENTRY_ID in number,
989 p_old_effective_start_date in date,
990 p_new_effective_start_date in date,
991 p_old_effective_end_date in date,
992 p_new_effective_end_date in date,
993 p_old_ELEMENT_TYPE_ID in number default null
994 )
995 is
996 l_process_event_id number;
997 l_object_version_number number;
998 l_effective_date date;
999 l_mode pay_event_updates.event_type%type;
1000 l_column_name pay_event_updates.column_name%type;
1001 l_old_value date;
1002 l_new_value date;
1003 l_noted_value pay_process_events.noted_value%type;
1004 lv_processed varchar2(1) := 'N';
1005
1006 l_proc varchar2(240) := g_package||'.element_entries_ard';
1007
1008 /*Bug 12556910 */
1009 cursor processed_recurring_entries(p_element_entry_id in number,p_old_effective_end_date in date) is
1010 select 'Y'
1011 from pay_run_results RESULT,
1012 pay_assignment_actions ASGT_ACTION,
1013 pay_payroll_actions PAY_ACTION,
1014 per_time_periods PERIOD
1015 where result.source_id = p_element_entry_id
1016 and result.source_type in ('E', 'I')
1017 and result.status <> 'U'
1018 and result.assignment_action_id=asgt_action.assignment_action_id
1019 and asgt_action.payroll_action_id=pay_action.payroll_action_id
1020 and pay_action.time_period_id = period.time_period_id
1021 and p_old_effective_end_date <= period.start_date;
1022
1023
1024 begin
1025 hr_utility.set_location(l_proc, 10);
1026 /* If the continuous calc is overriden then do nothing */
1027 if (g_override_cc = TRUE) then
1028 return;
1029 end if;
1030 --
1031 l_noted_value := null;
1032 --
1033 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
1034 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
1035 --
1036 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
1037 l_mode := 'D';
1038 else
1039 l_mode := pay_dyn_triggers.g_dyt_mode;
1040 end if;
1041 l_effective_date := p_old_effective_start_date;
1042 l_column_name := null;
1043 l_old_value := null;
1044 l_new_value := null;
1045 l_noted_value := p_old_ELEMENT_TYPE_ID;
1046 --
1047 else
1048 l_mode := pay_dyn_triggers.g_dyt_mode;
1049 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
1050 --
1051 l_effective_date := p_new_effective_end_date;
1052 l_column_name := 'EFFECTIVE_END_DATE';
1053 l_old_value := p_old_effective_end_date;
1054 l_new_value := p_new_effective_end_date;
1055 --
1056 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
1057 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
1058 --
1059 /*Bug 12556910 */
1060 open processed_recurring_entries(p_old_element_entry_id,p_old_effective_end_date);
1061 fetch processed_recurring_entries into lv_processed;
1062 close processed_recurring_entries;
1063
1064 if lv_processed ='N' then
1065 l_effective_date := p_old_effective_end_date;
1066 else
1067 l_effective_date := p_old_effective_start_date;
1068 end if;
1069
1070
1071 l_column_name := 'EFFECTIVE_END_DATE';
1072 l_old_value := p_old_effective_end_date;
1073 l_new_value := p_new_effective_end_date;
1074 --
1075 end if;
1076 end if;
1077 --
1078 pay_continuous_calc.event_update(p_business_group_id,
1079 p_legislation_code,
1080 'PAY_ELEMENT_ENTRIES_F',
1081 l_column_name,
1082 l_old_value,
1083 l_new_value,
1084 l_effective_date,
1085 l_effective_date,
1086 l_mode
1087 );
1088 /* Now call the API for the affected assignments */
1089 declare
1090 cnt number;
1091 l_process_event_id number;
1092 l_object_version_number number;
1093 begin
1094 if (pay_continuous_calc.g_event_list.sz <> 0) then
1095 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
1096 pay_ppe_api.create_process_event(
1097 p_assignment_id => p_assignment_id,
1098 p_effective_date => g_event_list.effective_date(cnt),
1099 p_change_type => g_event_list.change_type(cnt),
1100 p_status => 'U',
1101 p_description => g_event_list.description(cnt),
1102 p_process_event_id => l_process_event_id,
1103 p_object_version_number => l_object_version_number,
1104 p_event_update_id => g_event_list.event_update_id(cnt),
1105 p_surrogate_key => p_old_ELEMENT_ENTRY_ID,
1106 p_calculation_date => g_event_list.calc_date(cnt),
1107 p_business_group_id => p_business_group_id,
1108 p_noted_value => l_noted_value
1109 );
1110 end loop;
1111 end if;
1112 pay_continuous_calc.g_event_list.sz := 0;
1113 end;
1114 hr_utility.set_location(l_proc, 900);
1115 end element_entries_ard;
1116
1117 --------------------------------------------
1118 -- PAY_ELEMENT_ENTRY_VALUES_F
1119 --------------------------------------------
1120 /* PAY_ELEMENT_ENTRY_VALUES_F */
1121 /* name : PAY_ELEMENT_ENTRY_VALUES_F_aru
1122 purpose : This is procedure that records any changes for updates
1123 on element_entry_values.
1124 */
1125 procedure PAY_ELEMENT_ENTRY_VALUES_F_aru(
1126 p_business_group_id in number,
1127 p_legislation_code in varchar2,
1128 p_effective_date in date,
1129 p_old_ELEMENT_ENTRY_ID in NUMBER,
1130 p_new_ELEMENT_ENTRY_ID in NUMBER,
1131 p_old_SCREEN_ENTRY_VALUE in VARCHAR2,
1132 p_new_SCREEN_ENTRY_VALUE in VARCHAR2,
1133 p_old_ELEMENT_ENTRY_VALUE_ID in NUMBER
1134 )
1135 is
1136 --
1137 cursor get_asg is
1138 select ee.assignment_id
1139 from pay_element_entries_f ee
1140 where ee.element_entry_id = p_old_ELEMENT_ENTRY_ID
1141 and p_effective_date between ee.effective_start_date
1142 and ee.effective_end_date;
1143 --
1144 begin
1145 hr_utility.set_location('pay_cc_dyt_code_pkg.PAY_ELEMENT_ENTRY_VALUES_F_aru', 10);
1146 /* If the continuous calc is overriden then do nothing */
1147 if (g_override_cc = TRUE) then
1148 return;
1149 end if;
1150 --
1151 pay_continuous_calc.event_update(p_business_group_id,
1152 p_legislation_code,
1153 'PAY_ELEMENT_ENTRY_VALUES_F',
1154 'SCREEN_ENTRY_VALUE',
1155 p_old_SCREEN_ENTRY_VALUE,
1156 p_new_SCREEN_ENTRY_VALUE,
1157 p_effective_date,
1158 p_effective_date
1159 );
1160 --
1161 /* Now call the API for the affected assignments */
1162 declare
1163 l_process_event_id number;
1164 l_object_version_number number;
1165 cnt number;
1166 begin
1167 if (pay_continuous_calc.g_event_list.sz <> 0) then
1168 for asgrec in get_asg loop
1169 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
1170 pay_ppe_api.create_process_event(
1171 p_assignment_id => asgrec.assignment_id,
1172 p_effective_date => g_event_list.effective_date(cnt),
1173 p_change_type => g_event_list.change_type(cnt),
1174 p_status => 'U',
1175 p_description => g_event_list.description(cnt),
1176 p_process_event_id => l_process_event_id,
1177 p_object_version_number => l_object_version_number,
1178 p_event_update_id => g_event_list.event_update_id(cnt),
1179 p_business_group_id => p_business_group_id,
1180 p_calculation_date => g_event_list.calc_date(cnt),
1181 p_surrogate_key => p_old_ELEMENT_ENTRY_VALUE_ID
1182 );
1183 end loop;
1184 end loop;
1185 end if;
1186 pay_continuous_calc.g_event_list.sz := 0;
1187 end;
1188 hr_utility.set_location('pay_cc_dyt_code_pkg.PAY_ELEMENT_ENTRY_VALUES_F_aru', 50);
1189 --
1190 end PAY_ELEMENT_ENTRY_VALUES_F_aru;
1191 --
1192
1193 --------------------------------------------
1194 -- PER_CONTRACTS_F
1195 --------------------------------------------
1196 procedure PER_CONTRACTS_F_aru(
1197 p_business_group_id in number,
1198 p_legislation_code in varchar2,
1199 p_effective_date in date ,
1200 p_old_ATTRIBUTE1 in VARCHAR2,
1201 p_new_ATTRIBUTE1 in VARCHAR2 ,
1202 p_old_ATTRIBUTE10 in VARCHAR2,
1203 p_new_ATTRIBUTE10 in VARCHAR2 ,
1204 p_old_ATTRIBUTE11 in VARCHAR2,
1205 p_new_ATTRIBUTE11 in VARCHAR2 ,
1206 p_old_ATTRIBUTE12 in VARCHAR2,
1207 p_new_ATTRIBUTE12 in VARCHAR2 ,
1208 p_old_ATTRIBUTE13 in VARCHAR2,
1209 p_new_ATTRIBUTE13 in VARCHAR2 ,
1210 p_old_ATTRIBUTE14 in VARCHAR2,
1211 p_new_ATTRIBUTE14 in VARCHAR2 ,
1212 p_old_ATTRIBUTE15 in VARCHAR2,
1213 p_new_ATTRIBUTE15 in VARCHAR2 ,
1214 p_old_ATTRIBUTE16 in VARCHAR2,
1215 p_new_ATTRIBUTE16 in VARCHAR2 ,
1216 p_old_ATTRIBUTE17 in VARCHAR2,
1217 p_new_ATTRIBUTE17 in VARCHAR2 ,
1218 p_old_ATTRIBUTE18 in VARCHAR2,
1219 p_new_ATTRIBUTE18 in VARCHAR2 ,
1220 p_old_ATTRIBUTE19 in VARCHAR2,
1221 p_new_ATTRIBUTE19 in VARCHAR2 ,
1222 p_old_ATTRIBUTE2 in VARCHAR2,
1223 p_new_ATTRIBUTE2 in VARCHAR2 ,
1224 p_old_ATTRIBUTE20 in VARCHAR2,
1225 p_new_ATTRIBUTE20 in VARCHAR2 ,
1226 p_old_ATTRIBUTE3 in VARCHAR2,
1227 p_new_ATTRIBUTE3 in VARCHAR2 ,
1228 p_old_ATTRIBUTE4 in VARCHAR2,
1229 p_new_ATTRIBUTE4 in VARCHAR2 ,
1230 p_old_ATTRIBUTE5 in VARCHAR2,
1231 p_new_ATTRIBUTE5 in VARCHAR2 ,
1232 p_old_ATTRIBUTE6 in VARCHAR2,
1233 p_new_ATTRIBUTE6 in VARCHAR2 ,
1234 p_old_ATTRIBUTE7 in VARCHAR2,
1235 p_new_ATTRIBUTE7 in VARCHAR2 ,
1236 p_old_ATTRIBUTE8 in VARCHAR2,
1237 p_new_ATTRIBUTE8 in VARCHAR2 ,
1238 p_old_ATTRIBUTE9 in VARCHAR2,
1239 p_new_ATTRIBUTE9 in VARCHAR2 ,
1240 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
1241 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
1242 p_old_BUSINESS_GROUP_ID in NUMBER,
1243 p_new_BUSINESS_GROUP_ID in NUMBER ,
1244 p_old_CONTRACTUAL_JOB_TITLE in VARCHAR2,
1245 p_new_CONTRACTUAL_JOB_TITLE in VARCHAR2 ,
1246 p_old_CONTRACT_ID in NUMBER,
1247 p_new_CONTRACT_ID in NUMBER ,
1248 p_old_CTR_INFORMATION1 in VARCHAR2,
1249 p_new_CTR_INFORMATION1 in VARCHAR2 ,
1250 p_old_CTR_INFORMATION10 in VARCHAR2,
1251 p_new_CTR_INFORMATION10 in VARCHAR2 ,
1252 p_old_CTR_INFORMATION11 in VARCHAR2,
1253 p_new_CTR_INFORMATION11 in VARCHAR2 ,
1254 p_old_CTR_INFORMATION12 in VARCHAR2,
1255 p_new_CTR_INFORMATION12 in VARCHAR2 ,
1256 p_old_CTR_INFORMATION13 in VARCHAR2,
1257 p_new_CTR_INFORMATION13 in VARCHAR2 ,
1258 p_old_CTR_INFORMATION14 in VARCHAR2,
1259 p_new_CTR_INFORMATION14 in VARCHAR2 ,
1260 p_old_CTR_INFORMATION15 in VARCHAR2,
1261 p_new_CTR_INFORMATION15 in VARCHAR2 ,
1262 p_old_CTR_INFORMATION16 in VARCHAR2,
1263 p_new_CTR_INFORMATION16 in VARCHAR2 ,
1264 p_old_CTR_INFORMATION17 in VARCHAR2,
1265 p_new_CTR_INFORMATION17 in VARCHAR2 ,
1266 p_old_CTR_INFORMATION18 in VARCHAR2,
1267 p_new_CTR_INFORMATION18 in VARCHAR2 ,
1268 p_old_CTR_INFORMATION19 in VARCHAR2,
1269 p_new_CTR_INFORMATION19 in VARCHAR2 ,
1270 p_old_CTR_INFORMATION2 in VARCHAR2,
1271 p_new_CTR_INFORMATION2 in VARCHAR2 ,
1272 p_old_CTR_INFORMATION20 in VARCHAR2,
1273 p_new_CTR_INFORMATION20 in VARCHAR2 ,
1274 p_old_CTR_INFORMATION3 in VARCHAR2,
1275 p_new_CTR_INFORMATION3 in VARCHAR2 ,
1276 p_old_CTR_INFORMATION4 in VARCHAR2,
1277 p_new_CTR_INFORMATION4 in VARCHAR2 ,
1278 p_old_CTR_INFORMATION5 in VARCHAR2,
1279 p_new_CTR_INFORMATION5 in VARCHAR2 ,
1280 p_old_CTR_INFORMATION6 in VARCHAR2,
1281 p_new_CTR_INFORMATION6 in VARCHAR2 ,
1282 p_old_CTR_INFORMATION7 in VARCHAR2,
1283 p_new_CTR_INFORMATION7 in VARCHAR2 ,
1284 p_old_CTR_INFORMATION8 in VARCHAR2,
1285 p_new_CTR_INFORMATION8 in VARCHAR2 ,
1286 p_old_CTR_INFORMATION9 in VARCHAR2,
1287 p_new_CTR_INFORMATION9 in VARCHAR2 ,
1288 p_old_CTR_INFORMATION_CATEGORY in VARCHAR2,
1289 p_new_CTR_INFORMATION_CATEGORY in VARCHAR2 ,
1290 p_old_DESCRIPTION in VARCHAR2,
1291 p_new_DESCRIPTION in VARCHAR2 ,
1292 p_old_DOC_STATUS in VARCHAR2,
1293 p_new_DOC_STATUS in VARCHAR2 ,
1294 p_old_DOC_STATUS_CHANGE_DATE in DATE,
1295 p_new_DOC_STATUS_CHANGE_DATE in DATE ,
1296 p_old_DURATION in NUMBER,
1297 p_new_DURATION in NUMBER ,
1298 p_old_DURATION_UNITS in VARCHAR2,
1299 p_new_DURATION_UNITS in VARCHAR2 ,
1300 p_old_END_REASON in VARCHAR2,
1301 p_new_END_REASON in VARCHAR2 ,
1302 p_old_EXTENSION_PERIOD in NUMBER,
1303 p_new_EXTENSION_PERIOD in NUMBER ,
1304 p_old_EXTENSION_PERIOD_UNITS in VARCHAR2,
1305 p_new_EXTENSION_PERIOD_UNITS in VARCHAR2 ,
1306 p_old_EXTENSION_REASON in VARCHAR2,
1307 p_new_EXTENSION_REASON in VARCHAR2 ,
1308 p_old_NUMBER_OF_EXTENSIONS in NUMBER,
1309 p_new_NUMBER_OF_EXTENSIONS in NUMBER ,
1310 p_old_PARTIES in VARCHAR2,
1311 p_new_PARTIES in VARCHAR2 ,
1312 p_old_PERSON_ID in NUMBER,
1313 p_new_PERSON_ID in NUMBER ,
1314 p_old_REFERENCE in VARCHAR2,
1315 p_new_REFERENCE in VARCHAR2 ,
1316 p_old_START_REASON in VARCHAR2,
1317 p_new_START_REASON in VARCHAR2 ,
1318 p_old_STATUS in VARCHAR2,
1319 p_new_STATUS in VARCHAR2 ,
1320 p_old_STATUS_REASON in VARCHAR2,
1321 p_new_STATUS_REASON in VARCHAR2 ,
1322 p_old_TYPE in VARCHAR2,
1323 p_new_TYPE in VARCHAR2 ,
1324 p_old_EFFECTIVE_END_DATE in DATE,
1325 p_new_EFFECTIVE_END_DATE in DATE ,
1326 p_old_EFFECTIVE_START_DATE in DATE,
1327 p_new_EFFECTIVE_START_DATE in DATE
1328
1329 )
1330 is
1331 --
1332 cursor asgcur (p_person_id number) is
1333 select distinct assignment_id
1334 from per_assignments_f
1335 where person_id = p_person_id;
1336 --
1337 begin
1338 /* If the continuous calc is overriden then do nothing */
1339 if (pay_continuous_calc.g_override_cc = TRUE) then
1340 return;
1341 end if;
1342 --
1343 /* If the dates havent changed it must be a correction */
1344 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
1345 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
1346 --
1347 pay_continuous_calc.event_update(p_business_group_id,
1348 p_legislation_code,
1349 'PER_CONTRACTS_F',
1350 'ATTRIBUTE1',
1351 p_old_ATTRIBUTE1,
1352 p_new_ATTRIBUTE1,
1353 p_effective_date
1354 );
1355 --
1356 pay_continuous_calc.event_update(p_business_group_id,
1357 p_legislation_code,
1358 'PER_CONTRACTS_F',
1359 'ATTRIBUTE10',
1360 p_old_ATTRIBUTE10,
1361 p_new_ATTRIBUTE10,
1362 p_effective_date
1363 );
1364 --
1365 pay_continuous_calc.event_update(p_business_group_id,
1366 p_legislation_code,
1367 'PER_CONTRACTS_F',
1368 'ATTRIBUTE11',
1369 p_old_ATTRIBUTE11,
1370 p_new_ATTRIBUTE11,
1371 p_effective_date
1372 );
1373 --
1374 pay_continuous_calc.event_update(p_business_group_id,
1375 p_legislation_code,
1376 'PER_CONTRACTS_F',
1377 'ATTRIBUTE12',
1378 p_old_ATTRIBUTE12,
1379 p_new_ATTRIBUTE12,
1380 p_effective_date
1381 );
1382 --
1383 pay_continuous_calc.event_update(p_business_group_id,
1384 p_legislation_code,
1385 'PER_CONTRACTS_F',
1386 'ATTRIBUTE13',
1387 p_old_ATTRIBUTE13,
1388 p_new_ATTRIBUTE13,
1389 p_effective_date
1390 );
1391 --
1392 pay_continuous_calc.event_update(p_business_group_id,
1393 p_legislation_code,
1394 'PER_CONTRACTS_F',
1395 'ATTRIBUTE14',
1396 p_old_ATTRIBUTE14,
1397 p_new_ATTRIBUTE14,
1398 p_effective_date
1399 );
1400 --
1401 pay_continuous_calc.event_update(p_business_group_id,
1402 p_legislation_code,
1403 'PER_CONTRACTS_F',
1404 'ATTRIBUTE15',
1405 p_old_ATTRIBUTE15,
1406 p_new_ATTRIBUTE15,
1407 p_effective_date
1408 );
1409 --
1410 pay_continuous_calc.event_update(p_business_group_id,
1411 p_legislation_code,
1412 'PER_CONTRACTS_F',
1413 'ATTRIBUTE16',
1414 p_old_ATTRIBUTE16,
1415 p_new_ATTRIBUTE16,
1416 p_effective_date
1417 );
1418 --
1419 pay_continuous_calc.event_update(p_business_group_id,
1420 p_legislation_code,
1421 'PER_CONTRACTS_F',
1422 'ATTRIBUTE17',
1423 p_old_ATTRIBUTE17,
1427 --
1424 p_new_ATTRIBUTE17,
1425 p_effective_date
1426 );
1428 pay_continuous_calc.event_update(p_business_group_id,
1429 p_legislation_code,
1430 'PER_CONTRACTS_F',
1431 'ATTRIBUTE18',
1432 p_old_ATTRIBUTE18,
1433 p_new_ATTRIBUTE18,
1434 p_effective_date
1435 );
1436 --
1437 pay_continuous_calc.event_update(p_business_group_id,
1438 p_legislation_code,
1439 'PER_CONTRACTS_F',
1440 'ATTRIBUTE19',
1441 p_old_ATTRIBUTE19,
1442 p_new_ATTRIBUTE19,
1443 p_effective_date
1444 );
1445 --
1446 pay_continuous_calc.event_update(p_business_group_id,
1447 p_legislation_code,
1448 'PER_CONTRACTS_F',
1449 'ATTRIBUTE2',
1450 p_old_ATTRIBUTE2,
1451 p_new_ATTRIBUTE2,
1452 p_effective_date
1453 );
1454 --
1455 pay_continuous_calc.event_update(p_business_group_id,
1456 p_legislation_code,
1457 'PER_CONTRACTS_F',
1458 'ATTRIBUTE20',
1459 p_old_ATTRIBUTE20,
1460 p_new_ATTRIBUTE20,
1461 p_effective_date
1462 );
1463 --
1464 pay_continuous_calc.event_update(p_business_group_id,
1465 p_legislation_code,
1466 'PER_CONTRACTS_F',
1467 'ATTRIBUTE3',
1468 p_old_ATTRIBUTE3,
1469 p_new_ATTRIBUTE3,
1470 p_effective_date
1471 );
1472 --
1473 pay_continuous_calc.event_update(p_business_group_id,
1474 p_legislation_code,
1475 'PER_CONTRACTS_F',
1476 'ATTRIBUTE4',
1477 p_old_ATTRIBUTE4,
1478 p_new_ATTRIBUTE4,
1479 p_effective_date
1480 );
1481 --
1482 pay_continuous_calc.event_update(p_business_group_id,
1483 p_legislation_code,
1484 'PER_CONTRACTS_F',
1485 'ATTRIBUTE5',
1486 p_old_ATTRIBUTE5,
1487 p_new_ATTRIBUTE5,
1488 p_effective_date
1489 );
1490 --
1491 pay_continuous_calc.event_update(p_business_group_id,
1492 p_legislation_code,
1493 'PER_CONTRACTS_F',
1494 'ATTRIBUTE6',
1495 p_old_ATTRIBUTE6,
1496 p_new_ATTRIBUTE6,
1497 p_effective_date
1498 );
1499 --
1500 pay_continuous_calc.event_update(p_business_group_id,
1501 p_legislation_code,
1502 'PER_CONTRACTS_F',
1503 'ATTRIBUTE7',
1504 p_old_ATTRIBUTE7,
1505 p_new_ATTRIBUTE7,
1506 p_effective_date
1507 );
1508 --
1509 pay_continuous_calc.event_update(p_business_group_id,
1510 p_legislation_code,
1511 'PER_CONTRACTS_F',
1512 'ATTRIBUTE8',
1513 p_old_ATTRIBUTE8,
1514 p_new_ATTRIBUTE8,
1515 p_effective_date
1516 );
1517 --
1518 pay_continuous_calc.event_update(p_business_group_id,
1519 p_legislation_code,
1520 'PER_CONTRACTS_F',
1521 'ATTRIBUTE9',
1522 p_old_ATTRIBUTE9,
1523 p_new_ATTRIBUTE9,
1524 p_effective_date
1525 );
1526 --
1527 pay_continuous_calc.event_update(p_business_group_id,
1528 p_legislation_code,
1529 'PER_CONTRACTS_F',
1530 'ATTRIBUTE_CATEGORY',
1531 p_old_ATTRIBUTE_CATEGORY,
1532 p_new_ATTRIBUTE_CATEGORY,
1533 p_effective_date
1534 );
1535 --
1536 pay_continuous_calc.event_update(p_business_group_id,
1537 p_legislation_code,
1538 'PER_CONTRACTS_F',
1539 'BUSINESS_GROUP_ID',
1540 p_old_BUSINESS_GROUP_ID,
1541 p_new_BUSINESS_GROUP_ID,
1542 p_effective_date
1543 );
1544 --
1545 pay_continuous_calc.event_update(p_business_group_id,
1546 p_legislation_code,
1547 'PER_CONTRACTS_F',
1548 'CONTRACTUAL_JOB_TITLE',
1549 p_old_CONTRACTUAL_JOB_TITLE,
1550 p_new_CONTRACTUAL_JOB_TITLE,
1551 p_effective_date
1552 );
1553 --
1554 pay_continuous_calc.event_update(p_business_group_id,
1555 p_legislation_code,
1556 'PER_CONTRACTS_F',
1557 'CONTRACT_ID',
1558 p_old_CONTRACT_ID,
1559 p_new_CONTRACT_ID,
1560 p_effective_date
1561 );
1562 --
1563 pay_continuous_calc.event_update(p_business_group_id,
1564 p_legislation_code,
1565 'PER_CONTRACTS_F',
1566 'CTR_INFORMATION1',
1567 p_old_CTR_INFORMATION1,
1568 p_new_CTR_INFORMATION1,
1569 p_effective_date
1570 );
1571 --
1572 pay_continuous_calc.event_update(p_business_group_id,
1573 p_legislation_code,
1574 'PER_CONTRACTS_F',
1575 'CTR_INFORMATION10',
1576 p_old_CTR_INFORMATION10,
1577 p_new_CTR_INFORMATION10,
1578 p_effective_date
1579 );
1580 --
1581 pay_continuous_calc.event_update(p_business_group_id,
1582 p_legislation_code,
1583 'PER_CONTRACTS_F',
1584 'CTR_INFORMATION11',
1585 p_old_CTR_INFORMATION11,
1586 p_new_CTR_INFORMATION11,
1587 p_effective_date
1588 );
1589 --
1590 pay_continuous_calc.event_update(p_business_group_id,
1591 p_legislation_code,
1592 'PER_CONTRACTS_F',
1593 'CTR_INFORMATION12',
1594 p_old_CTR_INFORMATION12,
1595 p_new_CTR_INFORMATION12,
1596 p_effective_date
1597 );
1598 --
1599 pay_continuous_calc.event_update(p_business_group_id,
1600 p_legislation_code,
1601 'PER_CONTRACTS_F',
1602 'CTR_INFORMATION13',
1603 p_old_CTR_INFORMATION13,
1604 p_new_CTR_INFORMATION13,
1605 p_effective_date
1606 );
1607 --
1608 pay_continuous_calc.event_update(p_business_group_id,
1609 p_legislation_code,
1610 'PER_CONTRACTS_F',
1611 'CTR_INFORMATION14',
1612 p_old_CTR_INFORMATION14,
1613 p_new_CTR_INFORMATION14,
1614 p_effective_date
1615 );
1616 --
1617 pay_continuous_calc.event_update(p_business_group_id,
1618 p_legislation_code,
1619 'PER_CONTRACTS_F',
1620 'CTR_INFORMATION15',
1621 p_old_CTR_INFORMATION15,
1622 p_new_CTR_INFORMATION15,
1623 p_effective_date
1624 );
1625 --
1626 pay_continuous_calc.event_update(p_business_group_id,
1627 p_legislation_code,
1628 'PER_CONTRACTS_F',
1629 'CTR_INFORMATION16',
1630 p_old_CTR_INFORMATION16,
1631 p_new_CTR_INFORMATION16,
1632 p_effective_date
1633 );
1634 --
1635 pay_continuous_calc.event_update(p_business_group_id,
1636 p_legislation_code,
1637 'PER_CONTRACTS_F',
1638 'CTR_INFORMATION17',
1639 p_old_CTR_INFORMATION17,
1640 p_new_CTR_INFORMATION17,
1641 p_effective_date
1642 );
1643 --
1644 pay_continuous_calc.event_update(p_business_group_id,
1645 p_legislation_code,
1646 'PER_CONTRACTS_F',
1647 'CTR_INFORMATION18',
1648 p_old_CTR_INFORMATION18,
1649 p_new_CTR_INFORMATION18,
1650 p_effective_date
1651 );
1652 --
1653 pay_continuous_calc.event_update(p_business_group_id,
1654 p_legislation_code,
1655 'PER_CONTRACTS_F',
1656 'CTR_INFORMATION19',
1657 p_old_CTR_INFORMATION19,
1658 p_new_CTR_INFORMATION19,
1659 p_effective_date
1660 );
1661 --
1662 pay_continuous_calc.event_update(p_business_group_id,
1663 p_legislation_code,
1664 'PER_CONTRACTS_F',
1665 'CTR_INFORMATION2',
1666 p_old_CTR_INFORMATION2,
1667 p_new_CTR_INFORMATION2,
1668 p_effective_date
1669 );
1670 --
1671 pay_continuous_calc.event_update(p_business_group_id,
1672 p_legislation_code,
1673 'PER_CONTRACTS_F',
1674 'CTR_INFORMATION20',
1675 p_old_CTR_INFORMATION20,
1676 p_new_CTR_INFORMATION20,
1677 p_effective_date
1678 );
1679 --
1680 pay_continuous_calc.event_update(p_business_group_id,
1681 p_legislation_code,
1682 'PER_CONTRACTS_F',
1683 'CTR_INFORMATION3',
1684 p_old_CTR_INFORMATION3,
1685 p_new_CTR_INFORMATION3,
1686 p_effective_date
1687 );
1688 --
1689 pay_continuous_calc.event_update(p_business_group_id,
1690 p_legislation_code,
1691 'PER_CONTRACTS_F',
1692 'CTR_INFORMATION4',
1693 p_old_CTR_INFORMATION4,
1694 p_new_CTR_INFORMATION4,
1695 p_effective_date
1696 );
1697 --
1698 pay_continuous_calc.event_update(p_business_group_id,
1699 p_legislation_code,
1700 'PER_CONTRACTS_F',
1701 'CTR_INFORMATION5',
1702 p_old_CTR_INFORMATION5,
1703 p_new_CTR_INFORMATION5,
1704 p_effective_date
1705 );
1706 --
1707 pay_continuous_calc.event_update(p_business_group_id,
1708 p_legislation_code,
1709 'PER_CONTRACTS_F',
1710 'CTR_INFORMATION6',
1711 p_old_CTR_INFORMATION6,
1712 p_new_CTR_INFORMATION6,
1713 p_effective_date
1714 );
1715 --
1716 pay_continuous_calc.event_update(p_business_group_id,
1717 p_legislation_code,
1718 'PER_CONTRACTS_F',
1719 'CTR_INFORMATION7',
1720 p_old_CTR_INFORMATION7,
1721 p_new_CTR_INFORMATION7,
1722 p_effective_date
1723 );
1724 --
1725 pay_continuous_calc.event_update(p_business_group_id,
1726 p_legislation_code,
1727 'PER_CONTRACTS_F',
1728 'CTR_INFORMATION8',
1729 p_old_CTR_INFORMATION8,
1730 p_new_CTR_INFORMATION8,
1731 p_effective_date
1732 );
1733 --
1734 pay_continuous_calc.event_update(p_business_group_id,
1735 p_legislation_code,
1736 'PER_CONTRACTS_F',
1737 'CTR_INFORMATION9',
1738 p_old_CTR_INFORMATION9,
1739 p_new_CTR_INFORMATION9,
1740 p_effective_date
1741 );
1742 --
1743 pay_continuous_calc.event_update(p_business_group_id,
1744 p_legislation_code,
1745 'PER_CONTRACTS_F',
1746 'CTR_INFORMATION_CATEGORY',
1747 p_old_CTR_INFORMATION_CATEGORY,
1748 p_new_CTR_INFORMATION_CATEGORY,
1749 p_effective_date
1750 );
1751 --
1752 pay_continuous_calc.event_update(p_business_group_id,
1753 p_legislation_code,
1754 'PER_CONTRACTS_F',
1755 'DESCRIPTION',
1756 p_old_DESCRIPTION,
1757 p_new_DESCRIPTION,
1758 p_effective_date
1759 );
1760 --
1761 pay_continuous_calc.event_update(p_business_group_id,
1762 p_legislation_code,
1763 'PER_CONTRACTS_F',
1764 'DOC_STATUS',
1765 p_old_DOC_STATUS,
1766 p_new_DOC_STATUS,
1767 p_effective_date
1768 );
1769 --
1770 pay_continuous_calc.event_update(p_business_group_id,
1771 p_legislation_code,
1772 'PER_CONTRACTS_F',
1773 'DOC_STATUS_CHANGE_DATE',
1774 p_old_DOC_STATUS_CHANGE_DATE,
1775 p_new_DOC_STATUS_CHANGE_DATE,
1776 p_effective_date
1777 );
1778 --
1779 pay_continuous_calc.event_update(p_business_group_id,
1780 p_legislation_code,
1781 'PER_CONTRACTS_F',
1782 'DURATION',
1783 p_old_DURATION,
1784 p_new_DURATION,
1785 p_effective_date
1786 );
1787 --
1788 pay_continuous_calc.event_update(p_business_group_id,
1789 p_legislation_code,
1790 'PER_CONTRACTS_F',
1791 'DURATION_UNITS',
1792 p_old_DURATION_UNITS,
1793 p_new_DURATION_UNITS,
1794 p_effective_date
1795 );
1796 --
1797 pay_continuous_calc.event_update(p_business_group_id,
1798 p_legislation_code,
1799 'PER_CONTRACTS_F',
1800 'END_REASON',
1801 p_old_END_REASON,
1802 p_new_END_REASON,
1803 p_effective_date
1804 );
1805 --
1806 pay_continuous_calc.event_update(p_business_group_id,
1807 p_legislation_code,
1808 'PER_CONTRACTS_F',
1809 'EXTENSION_PERIOD',
1810 p_old_EXTENSION_PERIOD,
1811 p_new_EXTENSION_PERIOD,
1812 p_effective_date
1813 );
1814 --
1815 pay_continuous_calc.event_update(p_business_group_id,
1816 p_legislation_code,
1817 'PER_CONTRACTS_F',
1818 'EXTENSION_PERIOD_UNITS',
1819 p_old_EXTENSION_PERIOD_UNITS,
1820 p_new_EXTENSION_PERIOD_UNITS,
1821 p_effective_date
1822 );
1823 --
1824 pay_continuous_calc.event_update(p_business_group_id,
1825 p_legislation_code,
1826 'PER_CONTRACTS_F',
1827 'EXTENSION_REASON',
1828 p_old_EXTENSION_REASON,
1829 p_new_EXTENSION_REASON,
1830 p_effective_date
1831 );
1832 --
1833 pay_continuous_calc.event_update(p_business_group_id,
1834 p_legislation_code,
1835 'PER_CONTRACTS_F',
1836 'NUMBER_OF_EXTENSIONS',
1837 p_old_NUMBER_OF_EXTENSIONS,
1838 p_new_NUMBER_OF_EXTENSIONS,
1839 p_effective_date
1840 );
1841 --
1842 pay_continuous_calc.event_update(p_business_group_id,
1843 p_legislation_code,
1844 'PER_CONTRACTS_F',
1845 'PARTIES',
1846 p_old_PARTIES,
1847 p_new_PARTIES,
1848 p_effective_date
1849 );
1850 --
1851 pay_continuous_calc.event_update(p_business_group_id,
1852 p_legislation_code,
1853 'PER_CONTRACTS_F',
1854 'PERSON_ID',
1855 p_old_PERSON_ID,
1856 p_new_PERSON_ID,
1857 p_effective_date
1858 );
1859 --
1860 pay_continuous_calc.event_update(p_business_group_id,
1861 p_legislation_code,
1862 'PER_CONTRACTS_F',
1863 'REFERENCE',
1864 p_old_REFERENCE,
1865 p_new_REFERENCE,
1866 p_effective_date
1867 );
1868 --
1869 pay_continuous_calc.event_update(p_business_group_id,
1870 p_legislation_code,
1871 'PER_CONTRACTS_F',
1872 'START_REASON',
1873 p_old_START_REASON,
1874 p_new_START_REASON,
1875 p_effective_date
1876 );
1877 --
1878 pay_continuous_calc.event_update(p_business_group_id,
1879 p_legislation_code,
1880 'PER_CONTRACTS_F',
1881 'STATUS',
1882 p_old_STATUS,
1883 p_new_STATUS,
1884 p_effective_date
1885 );
1886 --
1887 pay_continuous_calc.event_update(p_business_group_id,
1888 p_legislation_code,
1889 'PER_CONTRACTS_F',
1890 'STATUS_REASON',
1894 );
1891 p_old_STATUS_REASON,
1892 p_new_STATUS_REASON,
1893 p_effective_date
1895 --
1896 pay_continuous_calc.event_update(p_business_group_id,
1897 p_legislation_code,
1898 'PER_CONTRACTS_F',
1899 'TYPE',
1900 p_old_TYPE,
1901 p_new_TYPE,
1902 p_effective_date
1903 );
1904 --
1905 pay_continuous_calc.event_update(p_business_group_id,
1906 p_legislation_code,
1907 'PER_CONTRACTS_F',
1908 'TYPE',
1909 p_old_TYPE,
1910 p_new_TYPE,
1911 p_effective_date
1912 );
1913 else
1914 /* OK it must be a date track change */
1915 --
1916 pay_continuous_calc.event_update(p_business_group_id,
1917 p_legislation_code,
1918 'PER_CONTRACTS_F',
1919 'EFFECTIVE_END_DATE',
1920 p_old_EFFECTIVE_END_DATE,
1921 p_new_EFFECTIVE_END_DATE,
1922 p_new_effective_end_date,
1923 least(p_old_effective_end_date,
1924 p_new_effective_end_date)
1925 );
1926 --
1927 pay_continuous_calc.event_update(p_business_group_id,
1928 p_legislation_code,
1929 'PER_CONTRACTS_F',
1930 'EFFECTIVE_START_DATE',
1931 p_old_EFFECTIVE_START_DATE,
1932 p_new_EFFECTIVE_START_DATE,
1933 p_new_effective_start_date,
1934 least(p_old_effective_start_date,
1935 p_new_effective_start_date)
1936 );
1937
1938 end if;
1939 --
1940 /* Now call the API for the affected assignments */
1941 declare
1942 l_process_event_id number;
1943 l_object_version_number number;
1944 cnt number;
1945 begin
1946 if (pay_continuous_calc.g_event_list.sz <> 0) then
1947 for asgrec in asgcur (p_old_PERSON_ID) loop
1948 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
1949 pay_ppe_api.create_process_event(
1950 p_assignment_id => asgrec.assignment_id,
1951 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
1952 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
1953 p_status => 'U',
1954 p_description => pay_continuous_calc.g_event_list.description(cnt),
1955 p_process_event_id => l_process_event_id,
1956 p_object_version_number => l_object_version_number,
1957 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
1958 p_business_group_id => p_business_group_id,
1959 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
1960 p_surrogate_key => p_new_contract_id
1961 );
1962 end loop;
1963 end loop;
1964 end if;
1965 pay_continuous_calc.g_event_list.sz := 0;
1966 end;
1967 --
1968 end PER_CONTRACTS_F_aru;
1969
1970
1971 --
1972 /* Used generator to build this procedure, but removed some of that table values.
1973 */
1974 /* PER_ALL_ASSIGNMENTS */
1975 /* name : PER_ALL_ASSIGNMENTS_F_aru
1976 purpose : This is procedure that records any updates
1977 on assignments.
1978 */
1979 procedure PER_ALL_ASSIGNMENTS_F_aru(
1980 p_business_group_id in number,
1981 p_legislation_code in varchar2,
1982 p_effective_date in date,
1983 p_old_APPLICATION_ID in NUMBER,
1984 p_new_APPLICATION_ID in NUMBER,
1985 p_old_ASSIGNMENT_ID in NUMBER,
1986 p_new_ASSIGNMENT_ID in NUMBER,
1987 p_old_ASSIGNMENT_NUMBER in VARCHAR2,
1988 p_new_ASSIGNMENT_NUMBER in VARCHAR2,
1989 p_old_ASSIGNMENT_SEQUENCE in NUMBER,
1990 p_new_ASSIGNMENT_SEQUENCE in NUMBER,
1991 p_old_ASSIGNMENT_STATUS_TYPE_I in NUMBER,
1992 p_new_ASSIGNMENT_STATUS_TYPE_I in NUMBER,
1993 p_old_ASSIGNMENT_TYPE in VARCHAR2,
1994 p_new_ASSIGNMENT_TYPE in VARCHAR2,
1995 p_old_ASS_ATTRIBUTE1 in VARCHAR2,
1996 p_new_ASS_ATTRIBUTE1 in VARCHAR2,
1997 p_old_ASS_ATTRIBUTE10 in VARCHAR2,
1998 p_new_ASS_ATTRIBUTE10 in VARCHAR2,
1999 p_old_ASS_ATTRIBUTE11 in VARCHAR2,
2000 p_new_ASS_ATTRIBUTE11 in VARCHAR2,
2001 p_old_ASS_ATTRIBUTE12 in VARCHAR2,
2002 p_new_ASS_ATTRIBUTE12 in VARCHAR2,
2003 p_old_ASS_ATTRIBUTE13 in VARCHAR2,
2004 p_new_ASS_ATTRIBUTE13 in VARCHAR2,
2005 p_old_ASS_ATTRIBUTE14 in VARCHAR2,
2006 p_new_ASS_ATTRIBUTE14 in VARCHAR2,
2007 p_old_ASS_ATTRIBUTE15 in VARCHAR2,
2008 p_new_ASS_ATTRIBUTE15 in VARCHAR2,
2009 p_old_ASS_ATTRIBUTE16 in VARCHAR2,
2010 p_new_ASS_ATTRIBUTE16 in VARCHAR2,
2011 p_old_ASS_ATTRIBUTE17 in VARCHAR2,
2012 p_new_ASS_ATTRIBUTE17 in VARCHAR2,
2013 p_old_ASS_ATTRIBUTE18 in VARCHAR2,
2014 p_new_ASS_ATTRIBUTE18 in VARCHAR2,
2015 p_old_ASS_ATTRIBUTE19 in VARCHAR2,
2016 p_new_ASS_ATTRIBUTE19 in VARCHAR2,
2017 p_old_ASS_ATTRIBUTE2 in VARCHAR2,
2018 p_new_ASS_ATTRIBUTE2 in VARCHAR2,
2019 p_old_ASS_ATTRIBUTE20 in VARCHAR2,
2020 p_new_ASS_ATTRIBUTE20 in VARCHAR2,
2021 p_old_ASS_ATTRIBUTE21 in VARCHAR2,
2022 p_new_ASS_ATTRIBUTE21 in VARCHAR2,
2023 p_old_ASS_ATTRIBUTE22 in VARCHAR2,
2024 p_new_ASS_ATTRIBUTE22 in VARCHAR2,
2025 p_old_ASS_ATTRIBUTE23 in VARCHAR2,
2026 p_new_ASS_ATTRIBUTE23 in VARCHAR2,
2027 p_old_ASS_ATTRIBUTE24 in VARCHAR2,
2028 p_new_ASS_ATTRIBUTE24 in VARCHAR2,
2029 p_old_ASS_ATTRIBUTE25 in VARCHAR2,
2030 p_new_ASS_ATTRIBUTE25 in VARCHAR2,
2031 p_old_ASS_ATTRIBUTE26 in VARCHAR2,
2032 p_new_ASS_ATTRIBUTE26 in VARCHAR2,
2033 p_old_ASS_ATTRIBUTE27 in VARCHAR2,
2034 p_new_ASS_ATTRIBUTE27 in VARCHAR2,
2035 p_old_ASS_ATTRIBUTE28 in VARCHAR2,
2036 p_new_ASS_ATTRIBUTE28 in VARCHAR2,
2037 p_old_ASS_ATTRIBUTE29 in VARCHAR2,
2038 p_new_ASS_ATTRIBUTE29 in VARCHAR2,
2039 p_old_ASS_ATTRIBUTE3 in VARCHAR2,
2040 p_new_ASS_ATTRIBUTE3 in VARCHAR2,
2041 p_old_ASS_ATTRIBUTE30 in VARCHAR2,
2042 p_new_ASS_ATTRIBUTE30 in VARCHAR2,
2043 p_old_ASS_ATTRIBUTE4 in VARCHAR2,
2044 p_new_ASS_ATTRIBUTE4 in VARCHAR2,
2045 p_old_ASS_ATTRIBUTE5 in VARCHAR2,
2046 p_new_ASS_ATTRIBUTE5 in VARCHAR2,
2047 p_old_ASS_ATTRIBUTE6 in VARCHAR2,
2048 p_new_ASS_ATTRIBUTE6 in VARCHAR2,
2049 p_old_ASS_ATTRIBUTE7 in VARCHAR2,
2050 p_new_ASS_ATTRIBUTE7 in VARCHAR2,
2051 p_old_ASS_ATTRIBUTE8 in VARCHAR2,
2052 p_new_ASS_ATTRIBUTE8 in VARCHAR2,
2053 p_old_ASS_ATTRIBUTE9 in VARCHAR2,
2054 p_new_ASS_ATTRIBUTE9 in VARCHAR2,
2055 p_old_ASS_ATTRIBUTE_CATEGORY in VARCHAR2,
2056 p_new_ASS_ATTRIBUTE_CATEGORY in VARCHAR2,
2057 p_old_BARGAINING_UNIT_CODE in VARCHAR2,
2058 p_new_BARGAINING_UNIT_CODE in VARCHAR2,
2059 p_old_BUSINESS_GROUP_ID in NUMBER,
2060 p_new_BUSINESS_GROUP_ID in NUMBER,
2061 p_old_CAGR_GRADE_DEF_ID in NUMBER,
2062 p_new_CAGR_GRADE_DEF_ID in NUMBER,
2063 p_old_CAGR_ID_FLEX_NUM in NUMBER,
2064 p_new_CAGR_ID_FLEX_NUM in NUMBER,
2065 p_old_CHANGE_REASON in VARCHAR2,
2066 p_new_CHANGE_REASON in VARCHAR2,
2067 p_old_COLLECTIVE_AGREEMENT_ID in NUMBER,
2068 p_new_COLLECTIVE_AGREEMENT_ID in NUMBER,
2069 p_old_COMMENT_ID in NUMBER,
2070 p_new_COMMENT_ID in NUMBER,
2071 p_old_CONTRACT_ID in NUMBER,
2072 p_new_CONTRACT_ID in NUMBER,
2073 p_old_DATE_PROBATION_END in DATE,
2074 p_new_DATE_PROBATION_END in DATE,
2075 p_old_DEFAULT_CODE_COMB_ID in NUMBER,
2079 p_old_EFFECTIVE_START_DATE in DATE,
2076 p_new_DEFAULT_CODE_COMB_ID in NUMBER,
2077 p_old_EFFECTIVE_END_DATE in DATE,
2078 p_new_EFFECTIVE_END_DATE in DATE,
2080 p_new_EFFECTIVE_START_DATE in DATE,
2081 p_old_EMPLOYMENT_CATEGORY in VARCHAR2,
2082 p_new_EMPLOYMENT_CATEGORY in VARCHAR2,
2083 p_old_ESTABLISHMENT_ID in NUMBER,
2084 p_new_ESTABLISHMENT_ID in NUMBER,
2085 p_old_FREQUENCY in VARCHAR2,
2086 p_new_FREQUENCY in VARCHAR2,
2087 p_old_GRADE_ID in NUMBER,
2088 p_new_GRADE_ID in NUMBER,
2089 p_old_HOURLY_SALARIED_CODE in VARCHAR2,
2090 p_new_HOURLY_SALARIED_CODE in VARCHAR2,
2091 p_old_INTERNAL_ADDRESS_LINE in VARCHAR2,
2092 p_new_INTERNAL_ADDRESS_LINE in VARCHAR2,
2093 p_old_JOB_ID in NUMBER,
2094 p_new_JOB_ID in NUMBER,
2095 p_old_LABOUR_UNION_MEMBER_FLAG in VARCHAR2,
2096 p_new_LABOUR_UNION_MEMBER_FLAG in VARCHAR2,
2097 p_old_LOCATION_ID in NUMBER,
2098 p_new_LOCATION_ID in NUMBER,
2099 p_old_MANAGER_FLAG in VARCHAR2,
2100 p_new_MANAGER_FLAG in VARCHAR2,
2101 p_old_NORMAL_HOURS in NUMBER,
2102 p_new_NORMAL_HOURS in NUMBER,
2103 p_old_OBJECT_VERSION_NUMBER in NUMBER,
2104 p_new_OBJECT_VERSION_NUMBER in NUMBER,
2105 p_old_ORGANIZATION_ID in NUMBER,
2106 p_new_ORGANIZATION_ID in NUMBER,
2107 p_old_PAYROLL_ID in NUMBER,
2108 p_new_PAYROLL_ID in NUMBER,
2109 p_old_PAY_BASIS_ID in NUMBER,
2110 p_new_PAY_BASIS_ID in NUMBER,
2111 p_old_PEOPLE_GROUP_ID in NUMBER,
2112 p_new_PEOPLE_GROUP_ID in NUMBER,
2113 p_old_PERF_REVIEW_PERIOD in NUMBER,
2114 p_new_PERF_REVIEW_PERIOD in NUMBER,
2115 p_old_PERF_REVIEW_PERIOD_FREQU in VARCHAR2,
2116 p_new_PERF_REVIEW_PERIOD_FREQU in VARCHAR2,
2117 p_old_PERIOD_OF_SERVICE_ID in NUMBER,
2118 p_new_PERIOD_OF_SERVICE_ID in NUMBER,
2119 p_old_PERSON_ID in NUMBER,
2120 p_new_PERSON_ID in NUMBER,
2121 p_old_PERSON_REFERRED_BY_ID in NUMBER,
2122 p_new_PERSON_REFERRED_BY_ID in NUMBER,
2123 p_old_POSITION_ID in NUMBER,
2124 p_new_POSITION_ID in NUMBER,
2125 p_old_PRIMARY_FLAG in VARCHAR2,
2126 p_new_PRIMARY_FLAG in VARCHAR2,
2127 p_old_PROBATION_PERIOD in NUMBER,
2128 p_new_PROBATION_PERIOD in NUMBER,
2129 p_old_PROBATION_UNIT in VARCHAR2,
2130 p_new_PROBATION_UNIT in VARCHAR2,
2131 p_old_PROGRAM_APPLICATION_ID in NUMBER,
2132 p_new_PROGRAM_APPLICATION_ID in NUMBER,
2133 p_old_PROGRAM_ID in NUMBER,
2134 p_new_PROGRAM_ID in NUMBER,
2135 p_old_PROGRAM_UPDATE_DATE in DATE,
2136 p_new_PROGRAM_UPDATE_DATE in DATE,
2137 p_old_RECRUITER_ID in NUMBER,
2138 p_new_RECRUITER_ID in NUMBER,
2139 p_old_RECRUITMENT_ACTIVITY_ID in NUMBER,
2140 p_new_RECRUITMENT_ACTIVITY_ID in NUMBER,
2141 p_old_REQUEST_ID in NUMBER,
2142 p_new_REQUEST_ID in NUMBER,
2143 p_old_SAL_REVIEW_PERIOD in NUMBER,
2144 p_new_SAL_REVIEW_PERIOD in NUMBER,
2145 p_old_SAL_REVIEW_PERIOD_FREQUE in VARCHAR2,
2146 p_new_SAL_REVIEW_PERIOD_FREQUE in VARCHAR2,
2147 p_old_SET_OF_BOOKS_ID in NUMBER,
2148 p_new_SET_OF_BOOKS_ID in NUMBER,
2149 p_old_SOFT_CODING_KEYFLEX_ID in NUMBER,
2150 p_new_SOFT_CODING_KEYFLEX_ID in NUMBER,
2151 p_old_SOURCE_ORGANIZATION_ID in NUMBER,
2152 p_new_SOURCE_ORGANIZATION_ID in NUMBER,
2153 p_old_SOURCE_TYPE in VARCHAR2,
2154 p_new_SOURCE_TYPE in VARCHAR2,
2155 p_old_SPECIAL_CEILING_STEP_ID in NUMBER,
2156 p_new_SPECIAL_CEILING_STEP_ID in NUMBER,
2157 p_old_SUPERVISOR_ID in NUMBER,
2158 p_new_SUPERVISOR_ID in NUMBER,
2159 p_old_TIME_NORMAL_FINISH in VARCHAR2,
2160 p_new_TIME_NORMAL_FINISH in VARCHAR2,
2161 p_old_TIME_NORMAL_START in VARCHAR2,
2162 p_new_TIME_NORMAL_START in VARCHAR2,
2163 p_old_TITLE in VARCHAR2,
2164 p_new_TITLE in VARCHAR2,
2165 p_old_VACANCY_ID in NUMBER,
2166 p_new_VACANCY_ID in NUMBER,
2167 p_old_PROJECTED_ASSIGNMENT_END in DATE default null,
2168 p_new_PROJECTED_ASSIGNMENT_END in DATE default null
2169 )
2170 is
2171 --
2172 begin
2173 hr_utility.set_location('pay_continuous_calc.PER_ALL_ASSIGNMENTS_F_aru', 10);
2174 /* If the continuous calc is overriden then do nothing */
2175 if (g_override_cc = TRUE) then
2176 return;
2177 end if;
2178 --
2179 /* If the dates haven't changed it must be a correction */
2180 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
2181 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
2182 --
2183 pay_continuous_calc.event_update(p_business_group_id,
2184 p_legislation_code,
2185 'PER_ALL_ASSIGNMENTS_F',
2186 'APPLICATION_ID',
2187 p_old_APPLICATION_ID,
2188 p_new_APPLICATION_ID,
2189 p_effective_date
2190 );
2191 pay_continuous_calc.event_update(p_business_group_id,
2192 p_legislation_code,
2193 'PER_ALL_ASSIGNMENTS_F',
2194 'ASSIGNMENT_ID',
2195 p_old_ASSIGNMENT_ID,
2196 p_new_ASSIGNMENT_ID,
2197 p_effective_date
2198 );
2199 pay_continuous_calc.event_update(p_business_group_id,
2200 p_legislation_code,
2201 'PER_ALL_ASSIGNMENTS_F',
2202 'ASSIGNMENT_NUMBER',
2203 p_old_ASSIGNMENT_NUMBER,
2204 p_new_ASSIGNMENT_NUMBER,
2205 p_effective_date
2206 );
2210 'ASSIGNMENT_SEQUENCE',
2207 pay_continuous_calc.event_update(p_business_group_id,
2208 p_legislation_code,
2209 'PER_ALL_ASSIGNMENTS_F',
2211 p_old_ASSIGNMENT_SEQUENCE,
2212 p_new_ASSIGNMENT_SEQUENCE,
2213 p_effective_date
2214 );
2215 pay_continuous_calc.event_update(p_business_group_id,
2216 p_legislation_code,
2217 'PER_ALL_ASSIGNMENTS_F',
2218 'ASSIGNMENT_STATUS_TYPE_ID',
2219 p_old_ASSIGNMENT_STATUS_TYPE_I,
2220 p_new_ASSIGNMENT_STATUS_TYPE_I,
2221 p_effective_date
2222 );
2223 pay_continuous_calc.event_update(p_business_group_id,
2224 p_legislation_code,
2225 'PER_ALL_ASSIGNMENTS_F',
2226 'ASSIGNMENT_TYPE',
2227 p_old_ASSIGNMENT_TYPE,
2228 p_new_ASSIGNMENT_TYPE,
2229 p_effective_date
2230 );
2231 pay_continuous_calc.event_update(p_business_group_id,
2232 p_legislation_code,
2233 'PER_ALL_ASSIGNMENTS_F',
2234 'ASS_ATTRIBUTE1',
2235 p_old_ASS_ATTRIBUTE1,
2236 p_new_ASS_ATTRIBUTE1,
2237 p_effective_date
2238 );
2239 pay_continuous_calc.event_update(p_business_group_id,
2240 p_legislation_code,
2241 'PER_ALL_ASSIGNMENTS_F',
2242 'ASS_ATTRIBUTE10',
2243 p_old_ASS_ATTRIBUTE10,
2244 p_new_ASS_ATTRIBUTE10,
2245 p_effective_date
2246 );
2247 pay_continuous_calc.event_update(p_business_group_id,
2248 p_legislation_code,
2249 'PER_ALL_ASSIGNMENTS_F',
2250 'ASS_ATTRIBUTE11',
2251 p_old_ASS_ATTRIBUTE11,
2252 p_new_ASS_ATTRIBUTE11,
2253 p_effective_date
2254 );
2255 pay_continuous_calc.event_update(p_business_group_id,
2256 p_legislation_code,
2257 'PER_ALL_ASSIGNMENTS_F',
2258 'ASS_ATTRIBUTE12',
2259 p_old_ASS_ATTRIBUTE12,
2260 p_new_ASS_ATTRIBUTE12,
2261 p_effective_date
2262 );
2263 pay_continuous_calc.event_update(p_business_group_id,
2264 p_legislation_code,
2265 'PER_ALL_ASSIGNMENTS_F',
2266 'ASS_ATTRIBUTE13',
2267 p_old_ASS_ATTRIBUTE13,
2268 p_new_ASS_ATTRIBUTE13,
2269 p_effective_date
2270 );
2271 pay_continuous_calc.event_update(p_business_group_id,
2272 p_legislation_code,
2273 'PER_ALL_ASSIGNMENTS_F',
2274 'ASS_ATTRIBUTE14',
2275 p_old_ASS_ATTRIBUTE14,
2276 p_new_ASS_ATTRIBUTE14,
2277 p_effective_date
2278 );
2279 pay_continuous_calc.event_update(p_business_group_id,
2280 p_legislation_code,
2281 'PER_ALL_ASSIGNMENTS_F',
2282 'ASS_ATTRIBUTE15',
2283 p_old_ASS_ATTRIBUTE15,
2284 p_new_ASS_ATTRIBUTE15,
2285 p_effective_date
2286 );
2287 pay_continuous_calc.event_update(p_business_group_id,
2288 p_legislation_code,
2289 'PER_ALL_ASSIGNMENTS_F',
2290 'ASS_ATTRIBUTE16',
2291 p_old_ASS_ATTRIBUTE16,
2292 p_new_ASS_ATTRIBUTE16,
2293 p_effective_date
2294 );
2295 pay_continuous_calc.event_update(p_business_group_id,
2296 p_legislation_code,
2297 'PER_ALL_ASSIGNMENTS_F',
2298 'ASS_ATTRIBUTE17',
2299 p_old_ASS_ATTRIBUTE17,
2300 p_new_ASS_ATTRIBUTE17,
2301 p_effective_date
2302 );
2303 pay_continuous_calc.event_update(p_business_group_id,
2307 p_old_ASS_ATTRIBUTE18,
2304 p_legislation_code,
2305 'PER_ALL_ASSIGNMENTS_F',
2306 'ASS_ATTRIBUTE18',
2308 p_new_ASS_ATTRIBUTE18,
2309 p_effective_date
2310 );
2311 pay_continuous_calc.event_update(p_business_group_id,
2312 p_legislation_code,
2313 'PER_ALL_ASSIGNMENTS_F',
2314 'ASS_ATTRIBUTE19',
2315 p_old_ASS_ATTRIBUTE19,
2316 p_new_ASS_ATTRIBUTE19,
2317 p_effective_date
2318 );
2319 pay_continuous_calc.event_update(p_business_group_id,
2320 p_legislation_code,
2321 'PER_ALL_ASSIGNMENTS_F',
2322 'ASS_ATTRIBUTE2',
2323 p_old_ASS_ATTRIBUTE2,
2324 p_new_ASS_ATTRIBUTE2,
2325 p_effective_date
2326 );
2327 pay_continuous_calc.event_update(p_business_group_id,
2328 p_legislation_code,
2329 'PER_ALL_ASSIGNMENTS_F',
2330 'ASS_ATTRIBUTE20',
2331 p_old_ASS_ATTRIBUTE20,
2332 p_new_ASS_ATTRIBUTE20,
2333 p_effective_date
2334 );
2335 pay_continuous_calc.event_update(p_business_group_id,
2336 p_legislation_code,
2337 'PER_ALL_ASSIGNMENTS_F',
2338 'ASS_ATTRIBUTE21',
2339 p_old_ASS_ATTRIBUTE21,
2340 p_new_ASS_ATTRIBUTE21,
2341 p_effective_date
2342 );
2343 pay_continuous_calc.event_update(p_business_group_id,
2344 p_legislation_code,
2345 'PER_ALL_ASSIGNMENTS_F',
2346 'ASS_ATTRIBUTE22',
2347 p_old_ASS_ATTRIBUTE22,
2348 p_new_ASS_ATTRIBUTE22,
2349 p_effective_date
2350 );
2351 pay_continuous_calc.event_update(p_business_group_id,
2352 p_legislation_code,
2353 'PER_ALL_ASSIGNMENTS_F',
2354 'ASS_ATTRIBUTE23',
2355 p_old_ASS_ATTRIBUTE23,
2356 p_new_ASS_ATTRIBUTE23,
2357 p_effective_date
2358 );
2359 pay_continuous_calc.event_update(p_business_group_id,
2360 p_legislation_code,
2361 'PER_ALL_ASSIGNMENTS_F',
2362 'ASS_ATTRIBUTE24',
2363 p_old_ASS_ATTRIBUTE24,
2364 p_new_ASS_ATTRIBUTE24,
2365 p_effective_date
2366 );
2367 pay_continuous_calc.event_update(p_business_group_id,
2368 p_legislation_code,
2369 'PER_ALL_ASSIGNMENTS_F',
2370 'ASS_ATTRIBUTE25',
2371 p_old_ASS_ATTRIBUTE25,
2372 p_new_ASS_ATTRIBUTE25,
2373 p_effective_date
2374 );
2375 pay_continuous_calc.event_update(p_business_group_id,
2376 p_legislation_code,
2377 'PER_ALL_ASSIGNMENTS_F',
2378 'ASS_ATTRIBUTE26',
2379 p_old_ASS_ATTRIBUTE26,
2380 p_new_ASS_ATTRIBUTE26,
2381 p_effective_date
2382 );
2383 pay_continuous_calc.event_update(p_business_group_id,
2384 p_legislation_code,
2385 'PER_ALL_ASSIGNMENTS_F',
2386 'ASS_ATTRIBUTE27',
2387 p_old_ASS_ATTRIBUTE27,
2388 p_new_ASS_ATTRIBUTE27,
2389 p_effective_date
2390 );
2391 pay_continuous_calc.event_update(p_business_group_id,
2392 p_legislation_code,
2393 'PER_ALL_ASSIGNMENTS_F',
2394 'ASS_ATTRIBUTE28',
2395 p_old_ASS_ATTRIBUTE28,
2396 p_new_ASS_ATTRIBUTE28,
2397 p_effective_date
2398 );
2399 pay_continuous_calc.event_update(p_business_group_id,
2400 p_legislation_code,
2404 p_new_ASS_ATTRIBUTE29,
2401 'PER_ALL_ASSIGNMENTS_F',
2402 'ASS_ATTRIBUTE29',
2403 p_old_ASS_ATTRIBUTE29,
2405 p_effective_date
2406 );
2407 pay_continuous_calc.event_update(p_business_group_id,
2408 p_legislation_code,
2409 'PER_ALL_ASSIGNMENTS_F',
2410 'ASS_ATTRIBUTE3',
2411 p_old_ASS_ATTRIBUTE3,
2412 p_new_ASS_ATTRIBUTE3,
2413 p_effective_date
2414 );
2415 pay_continuous_calc.event_update(p_business_group_id,
2416 p_legislation_code,
2417 'PER_ALL_ASSIGNMENTS_F',
2418 'ASS_ATTRIBUTE30',
2419 p_old_ASS_ATTRIBUTE30,
2420 p_new_ASS_ATTRIBUTE30,
2421 p_effective_date
2422 );
2423 pay_continuous_calc.event_update(p_business_group_id,
2424 p_legislation_code,
2425 'PER_ALL_ASSIGNMENTS_F',
2426 'ASS_ATTRIBUTE4',
2427 p_old_ASS_ATTRIBUTE4,
2428 p_new_ASS_ATTRIBUTE4,
2429 p_effective_date
2430 );
2431 pay_continuous_calc.event_update(p_business_group_id,
2432 p_legislation_code,
2433 'PER_ALL_ASSIGNMENTS_F',
2434 'ASS_ATTRIBUTE5',
2435 p_old_ASS_ATTRIBUTE5,
2436 p_new_ASS_ATTRIBUTE5,
2437 p_effective_date
2438 );
2439 pay_continuous_calc.event_update(p_business_group_id,
2440 p_legislation_code,
2441 'PER_ALL_ASSIGNMENTS_F',
2442 'ASS_ATTRIBUTE6',
2443 p_old_ASS_ATTRIBUTE6,
2444 p_new_ASS_ATTRIBUTE6,
2445 p_effective_date
2446 );
2447 pay_continuous_calc.event_update(p_business_group_id,
2448 p_legislation_code,
2449 'PER_ALL_ASSIGNMENTS_F',
2450 'ASS_ATTRIBUTE7',
2451 p_old_ASS_ATTRIBUTE7,
2452 p_new_ASS_ATTRIBUTE7,
2453 p_effective_date
2454 );
2455 pay_continuous_calc.event_update(p_business_group_id,
2456 p_legislation_code,
2457 'PER_ALL_ASSIGNMENTS_F',
2458 'ASS_ATTRIBUTE8',
2459 p_old_ASS_ATTRIBUTE8,
2460 p_new_ASS_ATTRIBUTE8,
2461 p_effective_date
2462 );
2463 pay_continuous_calc.event_update(p_business_group_id,
2464 p_legislation_code,
2465 'PER_ALL_ASSIGNMENTS_F',
2466 'ASS_ATTRIBUTE9',
2467 p_old_ASS_ATTRIBUTE9,
2468 p_new_ASS_ATTRIBUTE9,
2469 p_effective_date
2470 );
2471 pay_continuous_calc.event_update(p_business_group_id,
2472 p_legislation_code,
2473 'PER_ALL_ASSIGNMENTS_F',
2474 'ASS_ATTRIBUTE_CATEGORY',
2475 p_old_ASS_ATTRIBUTE_CATEGORY,
2476 p_new_ASS_ATTRIBUTE_CATEGORY,
2477 p_effective_date
2478 );
2479 pay_continuous_calc.event_update(p_business_group_id,
2480 p_legislation_code,
2481 'PER_ALL_ASSIGNMENTS_F',
2482 'BARGAINING_UNIT_CODE',
2483 p_old_BARGAINING_UNIT_CODE,
2484 p_new_BARGAINING_UNIT_CODE,
2485 p_effective_date
2486 );
2487 pay_continuous_calc.event_update(p_business_group_id,
2488 p_legislation_code,
2489 'PER_ALL_ASSIGNMENTS_F',
2490 'BUSINESS_GROUP_ID',
2491 p_old_BUSINESS_GROUP_ID,
2492 p_new_BUSINESS_GROUP_ID,
2493 p_effective_date
2494 );
2495 pay_continuous_calc.event_update(p_business_group_id,
2496 p_legislation_code,
2497 'PER_ALL_ASSIGNMENTS_F',
2498 'CAGR_GRADE_DEF_ID',
2499 p_old_CAGR_GRADE_DEF_ID,
2503 pay_continuous_calc.event_update(p_business_group_id,
2500 p_new_CAGR_GRADE_DEF_ID,
2501 p_effective_date
2502 );
2504 p_legislation_code,
2505 'PER_ALL_ASSIGNMENTS_F',
2506 'CAGR_ID_FLEX_NUM',
2507 p_old_CAGR_ID_FLEX_NUM,
2508 p_new_CAGR_ID_FLEX_NUM,
2509 p_effective_date
2510 );
2511 pay_continuous_calc.event_update(p_business_group_id,
2512 p_legislation_code,
2513 'PER_ALL_ASSIGNMENTS_F',
2514 'CHANGE_REASON',
2515 p_old_CHANGE_REASON,
2516 p_new_CHANGE_REASON,
2517 p_effective_date
2518 );
2519 pay_continuous_calc.event_update(p_business_group_id,
2520 p_legislation_code,
2521 'PER_ALL_ASSIGNMENTS_F',
2522 'COLLECTIVE_AGREEMENT_ID',
2523 p_old_COLLECTIVE_AGREEMENT_ID,
2524 p_new_COLLECTIVE_AGREEMENT_ID,
2525 p_effective_date
2526 );
2527 pay_continuous_calc.event_update(p_business_group_id,
2528 p_legislation_code,
2529 'PER_ALL_ASSIGNMENTS_F',
2530 'COMMENT_ID',
2531 p_old_COMMENT_ID,
2532 p_new_COMMENT_ID,
2533 p_effective_date
2534 );
2535 pay_continuous_calc.event_update(p_business_group_id,
2536 p_legislation_code,
2537 'PER_ALL_ASSIGNMENTS_F',
2538 'CONTRACT_ID',
2539 p_old_CONTRACT_ID,
2540 p_new_CONTRACT_ID,
2541 p_effective_date
2542 );
2543 pay_continuous_calc.event_update(p_business_group_id,
2544 p_legislation_code,
2545 'PER_ALL_ASSIGNMENTS_F',
2546 'DATE_PROBATION_END',
2547 p_old_DATE_PROBATION_END,
2548 p_new_DATE_PROBATION_END,
2549 p_effective_date
2550 );
2551 pay_continuous_calc.event_update(p_business_group_id,
2552 p_legislation_code,
2553 'PER_ALL_ASSIGNMENTS_F',
2554 'DEFAULT_CODE_COMB_ID',
2555 p_old_DEFAULT_CODE_COMB_ID,
2556 p_new_DEFAULT_CODE_COMB_ID,
2557 p_effective_date
2558 );
2559 pay_continuous_calc.event_update(p_business_group_id,
2560 p_legislation_code,
2561 'PER_ALL_ASSIGNMENTS_F',
2562 'EMPLOYMENT_CATEGORY',
2563 p_old_EMPLOYMENT_CATEGORY,
2564 p_new_EMPLOYMENT_CATEGORY,
2565 p_effective_date
2566 );
2567 pay_continuous_calc.event_update(p_business_group_id,
2568 p_legislation_code,
2569 'PER_ALL_ASSIGNMENTS_F',
2570 'ESTABLISHMENT_ID',
2571 p_old_ESTABLISHMENT_ID,
2572 p_new_ESTABLISHMENT_ID,
2573 p_effective_date
2574 );
2575 pay_continuous_calc.event_update(p_business_group_id,
2576 p_legislation_code,
2577 'PER_ALL_ASSIGNMENTS_F',
2578 'FREQUENCY',
2579 p_old_FREQUENCY,
2580 p_new_FREQUENCY,
2581 p_effective_date
2582 );
2583 pay_continuous_calc.event_update(p_business_group_id,
2584 p_legislation_code,
2585 'PER_ALL_ASSIGNMENTS_F',
2586 'GRADE_ID',
2587 p_old_GRADE_ID,
2588 p_new_GRADE_ID,
2589 p_effective_date
2590 );
2591 pay_continuous_calc.event_update(p_business_group_id,
2592 p_legislation_code,
2593 'PER_ALL_ASSIGNMENTS_F',
2594 'HOURLY_SALARIED_CODE',
2595 p_old_HOURLY_SALARIED_CODE,
2596 p_new_HOURLY_SALARIED_CODE,
2597 p_effective_date
2598 );
2599 pay_continuous_calc.event_update(p_business_group_id,
2603 p_old_INTERNAL_ADDRESS_LINE,
2600 p_legislation_code,
2601 'PER_ALL_ASSIGNMENTS_F',
2602 'INTERNAL_ADDRESS_LINE',
2604 p_new_INTERNAL_ADDRESS_LINE,
2605 p_effective_date
2606 );
2607 pay_continuous_calc.event_update(p_business_group_id,
2608 p_legislation_code,
2609 'PER_ALL_ASSIGNMENTS_F',
2610 'JOB_ID',
2611 p_old_JOB_ID,
2612 p_new_JOB_ID,
2613 p_effective_date
2614 );
2615 pay_continuous_calc.event_update(p_business_group_id,
2616 p_legislation_code,
2617 'PER_ALL_ASSIGNMENTS_F',
2618 'LABOUR_UNION_MEMBER_FLAG',
2619 p_old_LABOUR_UNION_MEMBER_FLAG,
2620 p_new_LABOUR_UNION_MEMBER_FLAG,
2621 p_effective_date
2622 );
2623 pay_continuous_calc.event_update(p_business_group_id,
2624 p_legislation_code,
2625 'PER_ALL_ASSIGNMENTS_F',
2626 'LOCATION_ID',
2627 p_old_LOCATION_ID,
2628 p_new_LOCATION_ID,
2629 p_effective_date
2630 );
2631 pay_continuous_calc.event_update(p_business_group_id,
2632 p_legislation_code,
2633 'PER_ALL_ASSIGNMENTS_F',
2634 'MANAGER_FLAG',
2635 p_old_MANAGER_FLAG,
2636 p_new_MANAGER_FLAG,
2637 p_effective_date
2638 );
2639 pay_continuous_calc.event_update(p_business_group_id,
2640 p_legislation_code,
2641 'PER_ALL_ASSIGNMENTS_F',
2642 'NORMAL_HOURS',
2643 p_old_NORMAL_HOURS,
2644 p_new_NORMAL_HOURS,
2645 p_effective_date
2646 );
2647 pay_continuous_calc.event_update(p_business_group_id,
2648 p_legislation_code,
2649 'PER_ALL_ASSIGNMENTS_F',
2650 'ORGANIZATION_ID',
2651 p_old_ORGANIZATION_ID,
2652 p_new_ORGANIZATION_ID,
2653 p_effective_date
2654 );
2655 pay_continuous_calc.event_update(p_business_group_id,
2656 p_legislation_code,
2657 'PER_ALL_ASSIGNMENTS_F',
2658 'PAYROLL_ID',
2659 p_old_PAYROLL_ID,
2660 p_new_PAYROLL_ID,
2661 p_effective_date
2662 );
2663 pay_continuous_calc.event_update(p_business_group_id,
2664 p_legislation_code,
2665 'PER_ALL_ASSIGNMENTS_F',
2666 'PAY_BASIS_ID',
2667 p_old_PAY_BASIS_ID,
2668 p_new_PAY_BASIS_ID,
2669 p_effective_date
2670 );
2671 pay_continuous_calc.event_update(p_business_group_id,
2672 p_legislation_code,
2673 'PER_ALL_ASSIGNMENTS_F',
2674 'PEOPLE_GROUP_ID',
2675 p_old_PEOPLE_GROUP_ID,
2676 p_new_PEOPLE_GROUP_ID,
2677 p_effective_date
2678 );
2679 pay_continuous_calc.event_update(p_business_group_id,
2680 p_legislation_code,
2681 'PER_ALL_ASSIGNMENTS_F',
2682 'PERF_REVIEW_PERIOD',
2683 p_old_PERF_REVIEW_PERIOD,
2684 p_new_PERF_REVIEW_PERIOD,
2685 p_effective_date
2686 );
2687 pay_continuous_calc.event_update(p_business_group_id,
2688 p_legislation_code,
2689 'PER_ALL_ASSIGNMENTS_F',
2690 'PERF_REVIEW_PERIOD_FREQUENCY',
2691 p_old_PERF_REVIEW_PERIOD_FREQU,
2692 p_new_PERF_REVIEW_PERIOD_FREQU,
2693 p_effective_date
2694 );
2695 pay_continuous_calc.event_update(p_business_group_id,
2696 p_legislation_code,
2697 'PER_ALL_ASSIGNMENTS_F',
2698 'PERIOD_OF_SERVICE_ID',
2699 p_old_PERIOD_OF_SERVICE_ID,
2703 pay_continuous_calc.event_update(p_business_group_id,
2700 p_new_PERIOD_OF_SERVICE_ID,
2701 p_effective_date
2702 );
2704 p_legislation_code,
2705 'PER_ALL_ASSIGNMENTS_F',
2706 'PERSON_ID',
2707 p_old_PERSON_ID,
2708 p_new_PERSON_ID,
2709 p_effective_date
2710 );
2711 pay_continuous_calc.event_update(p_business_group_id,
2712 p_legislation_code,
2713 'PER_ALL_ASSIGNMENTS_F',
2714 'PERSON_REFERRED_BY_ID',
2715 p_old_PERSON_REFERRED_BY_ID,
2716 p_new_PERSON_REFERRED_BY_ID,
2717 p_effective_date
2718 );
2719 pay_continuous_calc.event_update(p_business_group_id,
2720 p_legislation_code,
2721 'PER_ALL_ASSIGNMENTS_F',
2722 'POSITION_ID',
2723 p_old_POSITION_ID,
2724 p_new_POSITION_ID,
2725 p_effective_date
2726 );
2727 pay_continuous_calc.event_update(p_business_group_id,
2728 p_legislation_code,
2729 'PER_ALL_ASSIGNMENTS_F',
2730 'PRIMARY_FLAG',
2731 p_old_PRIMARY_FLAG,
2732 p_new_PRIMARY_FLAG,
2733 p_effective_date
2734 );
2735 pay_continuous_calc.event_update(p_business_group_id,
2736 p_legislation_code,
2737 'PER_ALL_ASSIGNMENTS_F',
2738 'PROBATION_PERIOD',
2739 p_old_PROBATION_PERIOD,
2740 p_new_PROBATION_PERIOD,
2741 p_effective_date
2742 );
2743 pay_continuous_calc.event_update(p_business_group_id,
2744 p_legislation_code,
2745 'PER_ALL_ASSIGNMENTS_F',
2746 'PROBATION_UNIT',
2747 p_old_PROBATION_UNIT,
2748 p_new_PROBATION_UNIT,
2749 p_effective_date
2750 );
2751 pay_continuous_calc.event_update(p_business_group_id,
2752 p_legislation_code,
2753 'PER_ALL_ASSIGNMENTS_F',
2754 'PROGRAM_APPLICATION_ID',
2755 p_old_PROGRAM_APPLICATION_ID,
2756 p_new_PROGRAM_APPLICATION_ID,
2757 p_effective_date
2758 );
2759 pay_continuous_calc.event_update(p_business_group_id,
2760 p_legislation_code,
2761 'PER_ALL_ASSIGNMENTS_F',
2762 'PROGRAM_ID',
2763 p_old_PROGRAM_ID,
2764 p_new_PROGRAM_ID,
2765 p_effective_date
2766 );
2767 pay_continuous_calc.event_update(p_business_group_id,
2768 p_legislation_code,
2769 'PER_ALL_ASSIGNMENTS_F',
2770 'PROGRAM_UPDATE_DATE',
2771 p_old_PROGRAM_UPDATE_DATE,
2772 p_new_PROGRAM_UPDATE_DATE,
2773 p_effective_date
2774 );
2775 pay_continuous_calc.event_update(p_business_group_id,
2776 p_legislation_code,
2777 'PER_ALL_ASSIGNMENTS_F',
2778 'RECRUITER_ID',
2779 p_old_RECRUITER_ID,
2780 p_new_RECRUITER_ID,
2781 p_effective_date
2782 );
2783 pay_continuous_calc.event_update(p_business_group_id,
2784 p_legislation_code,
2785 'PER_ALL_ASSIGNMENTS_F',
2786 'RECRUITMENT_ACTIVITY_ID',
2787 p_old_RECRUITMENT_ACTIVITY_ID,
2788 p_new_RECRUITMENT_ACTIVITY_ID,
2789 p_effective_date
2790 );
2791 pay_continuous_calc.event_update(p_business_group_id,
2792 p_legislation_code,
2793 'PER_ALL_ASSIGNMENTS_F',
2794 'REQUEST_ID',
2795 p_old_REQUEST_ID,
2796 p_new_REQUEST_ID,
2797 p_effective_date
2798 );
2799 pay_continuous_calc.event_update(p_business_group_id,
2800 p_legislation_code,
2804 p_new_SAL_REVIEW_PERIOD,
2801 'PER_ALL_ASSIGNMENTS_F',
2802 'SAL_REVIEW_PERIOD',
2803 p_old_SAL_REVIEW_PERIOD,
2805 p_effective_date
2806 );
2807 pay_continuous_calc.event_update(p_business_group_id,
2808 p_legislation_code,
2809 'PER_ALL_ASSIGNMENTS_F',
2810 'SAL_REVIEW_PERIOD_FREQUENCY',
2811 p_old_SAL_REVIEW_PERIOD_FREQUE,
2812 p_new_SAL_REVIEW_PERIOD_FREQUE,
2813 p_effective_date
2814 );
2815 pay_continuous_calc.event_update(p_business_group_id,
2816 p_legislation_code,
2817 'PER_ALL_ASSIGNMENTS_F',
2818 'SET_OF_BOOKS_ID',
2819 p_old_SET_OF_BOOKS_ID,
2820 p_new_SET_OF_BOOKS_ID,
2821 p_effective_date
2822 );
2823 pay_continuous_calc.event_update(p_business_group_id,
2824 p_legislation_code,
2825 'PER_ALL_ASSIGNMENTS_F',
2826 'SOFT_CODING_KEYFLEX_ID',
2827 p_old_SOFT_CODING_KEYFLEX_ID,
2828 p_new_SOFT_CODING_KEYFLEX_ID,
2829 p_effective_date
2830 );
2831 pay_continuous_calc.event_update(p_business_group_id,
2832 p_legislation_code,
2833 'PER_ALL_ASSIGNMENTS_F',
2834 'SOURCE_ORGANIZATION_ID',
2835 p_old_SOURCE_ORGANIZATION_ID,
2836 p_new_SOURCE_ORGANIZATION_ID,
2837 p_effective_date
2838 );
2839 pay_continuous_calc.event_update(p_business_group_id,
2840 p_legislation_code,
2841 'PER_ALL_ASSIGNMENTS_F',
2842 'SOURCE_TYPE',
2843 p_old_SOURCE_TYPE,
2844 p_new_SOURCE_TYPE,
2845 p_effective_date
2846 );
2847 pay_continuous_calc.event_update(p_business_group_id,
2848 p_legislation_code,
2849 'PER_ALL_ASSIGNMENTS_F',
2850 'SPECIAL_CEILING_STEP_ID',
2851 p_old_SPECIAL_CEILING_STEP_ID,
2852 p_new_SPECIAL_CEILING_STEP_ID,
2853 p_effective_date
2854 );
2855 pay_continuous_calc.event_update(p_business_group_id,
2856 p_legislation_code,
2857 'PER_ALL_ASSIGNMENTS_F',
2858 'SUPERVISOR_ID',
2859 p_old_SUPERVISOR_ID,
2860 p_new_SUPERVISOR_ID,
2861 p_effective_date
2862 );
2863 pay_continuous_calc.event_update(p_business_group_id,
2864 p_legislation_code,
2865 'PER_ALL_ASSIGNMENTS_F',
2866 'TIME_NORMAL_FINISH',
2867 p_old_TIME_NORMAL_FINISH,
2868 p_new_TIME_NORMAL_FINISH,
2869 p_effective_date
2870 );
2871 pay_continuous_calc.event_update(p_business_group_id,
2872 p_legislation_code,
2873 'PER_ALL_ASSIGNMENTS_F',
2874 'TIME_NORMAL_START',
2875 p_old_TIME_NORMAL_START,
2876 p_new_TIME_NORMAL_START,
2877 p_effective_date
2878 );
2879 pay_continuous_calc.event_update(p_business_group_id,
2880 p_legislation_code,
2881 'PER_ALL_ASSIGNMENTS_F',
2882 'TITLE',
2883 p_old_TITLE,
2884 p_new_TITLE,
2885 p_effective_date
2886 );
2887 pay_continuous_calc.event_update(p_business_group_id,
2888 p_legislation_code,
2889 'PER_ALL_ASSIGNMENTS_F',
2890 'VACANCY_ID',
2891 p_old_VACANCY_ID,
2892 p_new_VACANCY_ID,
2893 p_effective_date
2894 );
2895 pay_continuous_calc.event_update(p_business_group_id,
2896 p_legislation_code,
2897 'PER_ALL_ASSIGNMENTS_F',
2898 'PROJECTED_ASSIGNMENT_END',
2899 p_old_PROJECTED_ASSIGNMENT_END,
2900 p_new_PROJECTED_ASSIGNMENT_END,
2904 /* OK it must be a date track change */
2901 p_effective_date
2902 );
2903 else
2905 pay_continuous_calc.event_update(p_business_group_id,
2906 p_legislation_code,
2907 'PER_ALL_ASSIGNMENTS_F',
2908 'EFFECTIVE_END_DATE',
2909 p_old_EFFECTIVE_END_DATE,
2910 p_new_EFFECTIVE_END_DATE,
2911 p_new_effective_end_date,
2912 least(p_old_effective_end_date,
2913 p_new_effective_end_date)
2914 );
2915 pay_continuous_calc.event_update(p_business_group_id,
2916 p_legislation_code,
2917 'PER_ALL_ASSIGNMENTS_F',
2918 'EFFECTIVE_START_DATE',
2919 p_old_EFFECTIVE_START_DATE,
2920 p_new_EFFECTIVE_START_DATE,
2921 p_new_effective_start_date,
2922 least(p_old_effective_start_date,
2923 p_new_effective_start_date)
2924 );
2925 end if;
2926 --
2927 /* Now call the API for the affected assignments */
2928 declare
2929 l_process_event_id number;
2930 l_object_version_number number;
2931 cnt number;
2932 begin
2933 if (pay_continuous_calc.g_event_list.sz <> 0) then
2934 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
2935 pay_ppe_api.create_process_event(
2936 p_assignment_id => p_old_ASSIGNMENT_ID,
2937 p_effective_date => g_event_list.effective_date(cnt),
2938 p_change_type => g_event_list.change_type(cnt),
2939 p_status => 'U',
2940 p_description => g_event_list.description(cnt),
2941 p_process_event_id => l_process_event_id,
2942 p_object_version_number => l_object_version_number,
2943 p_event_update_id => g_event_list.event_update_id(cnt),
2944 p_surrogate_key => p_old_ASSIGNMENT_ID,
2945 p_calculation_date => g_event_list.calc_date(cnt),
2946 p_business_group_id => p_business_group_id
2947 );
2948 end loop;
2949 end if;
2950 pay_continuous_calc.g_event_list.sz := 0;
2951 end;
2952 hr_utility.set_location('pay_continuous_calc.PER_ALL_ASSIGNMENTS_F_aru', 50);
2953 --
2954 end PER_ALL_ASSIGNMENTS_F_aru;
2955 --
2956 /* PER_ALL_ASSIGNMENTS_F_ari */
2957 /* name : PER_ALL_ASSIGNMENTS_F_ari
2958 purpose : This is procedure that records any insert
2959 on assignments.
2960 */
2961 procedure PER_ALL_ASSIGNMENTS_F_ari(
2962 p_business_group_id in number,
2963 p_legislation_code in varchar2,
2964 p_assignment_id in number,
2965 p_effective_start_date in date
2966 )
2967 is
2968 l_process_event_id number;
2969 l_object_version_number number;
2970 l_proc varchar2(240) := g_package||'.per_all_assignments_f_ari';
2971 begin
2972 hr_utility.set_location(l_proc, 10);
2973 /* If the continuous calc is overriden then do nothing */
2974 if (g_override_cc = TRUE) then
2975 return;
2976 end if;
2977 --
2978 pay_continuous_calc.event_update(p_business_group_id,
2979 p_legislation_code,
2980 'PER_ALL_ASSIGNMENTS_F',
2981 NULL,
2982 NULL,
2983 NULL,
2984 p_effective_start_date,
2985 p_effective_start_date,
2986 'I'
2987 );
2988 /* Now call the API for the affected assignments */
2989 declare
2990 cnt number;
2991 l_process_event_id number;
2992 l_object_version_number number;
2993 begin
2994 if (pay_continuous_calc.g_event_list.sz <> 0) then
2995 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
2996 pay_ppe_api.create_process_event(
2997 p_assignment_id => p_assignment_id,
2998 p_effective_date => g_event_list.effective_date(cnt),
2999 p_change_type => g_event_list.change_type(cnt),
3000 p_status => 'U',
3001 p_description => g_event_list.description(cnt),
3002 p_process_event_id => l_process_event_id,
3003 p_object_version_number => l_object_version_number,
3004 p_event_update_id => g_event_list.event_update_id(cnt),
3005 p_surrogate_key => p_assignment_id,
3006 p_calculation_date => g_event_list.calc_date(cnt),
3007 p_business_group_id => p_business_group_id
3008 );
3009 end loop;
3010 end if;
3011 pay_continuous_calc.g_event_list.sz := 0;
3012 end;
3016 /* name : per_all_assignments_f_ard
3013 hr_utility.set_location(l_proc, 900);
3014 end per_all_assignments_f_ari;
3015 --
3017 purpose : This is procedure that records any deletes
3018 on assignments.
3019 */
3020 procedure per_all_assignments_f_ard(
3021 p_business_group_id in number,
3022 p_legislation_code in varchar2,
3023 p_assignment_id in number,
3024 p_effective_start_date in date
3025 )
3026 is
3027 l_process_event_id number;
3028 l_object_version_number number;
3029 l_proc varchar2(240) := g_package||'.per_all_assignments_f_ard';
3030 begin
3031 hr_utility.set_location(l_proc, 10);
3032 /* If the continuous calc is overriden then do nothing */
3033 if (g_override_cc = TRUE) then
3034 return;
3035 end if;
3036 --
3037 pay_continuous_calc.event_update(p_business_group_id,
3038 p_legislation_code,
3039 'PER_ALL_ASSIGNMENTS_F',
3040 NULL,
3041 NULL,
3042 NULL,
3043 p_effective_start_date,
3044 p_effective_start_date,
3045 'D'
3046 );
3047 /* Now call the API for the affected assignments */
3048 declare
3049 cnt number;
3050 l_process_event_id number;
3051 l_object_version_number number;
3052 begin
3053 if (pay_continuous_calc.g_event_list.sz <> 0) then
3054 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3055 pay_ppe_api.create_process_event(
3056 p_assignment_id => p_assignment_id,
3057 p_effective_date => g_event_list.effective_date(cnt),
3058 p_change_type => g_event_list.change_type(cnt),
3059 p_status => 'U',
3060 p_description => g_event_list.description(cnt),
3061 p_process_event_id => l_process_event_id,
3062 p_object_version_number => l_object_version_number,
3063 p_event_update_id => g_event_list.event_update_id(cnt),
3064 p_surrogate_key => p_assignment_id,
3065 p_calculation_date => g_event_list.calc_date(cnt),
3066 p_business_group_id => p_business_group_id
3067 );
3068 end loop;
3069 end if;
3070 pay_continuous_calc.g_event_list.sz := 0;
3071 end;
3072 hr_utility.set_location(l_proc, 900);
3073 END per_all_assignments_f_ard;
3074
3075
3076 /* PAY_PERSONAL_PAYMENT_METHODS_F */
3077 /* name : PER_ALL_payment_methods_ari
3078 purpose : This is procedure that records any insert
3079 on personal_payment_methods.
3080 */
3081 procedure personal_payment_methods_ari(
3082 p_business_group_id in number,
3083 p_legislation_code in varchar2,
3084 p_assignment_id in number,
3085 p_effective_start_date in date,
3086 p_payment_method_id in number
3087 )
3088 is
3089 l_process_event_id number;
3090 l_object_version_number number;
3091 l_proc varchar2(240) := g_package||'.personal_payment_methods_ari';
3092 begin
3093 hr_utility.set_location(l_proc, 10);
3094 /* If the continuous calc is overriden then do nothing */
3095 if (g_override_cc = TRUE) then
3096 return;
3097 end if;
3098 --
3099 pay_continuous_calc.event_update(p_business_group_id,
3100 p_legislation_code,
3101 'PAY_PERSONAL_PAYMENT_METHODS_F',
3102 NULL,
3103 NULL,
3104 NULL,
3105 p_effective_start_date,
3106 p_effective_start_date,
3107 'I'
3108 );
3109 /* Now call the API for the affected assignments */
3110 declare
3111 cnt number;
3112 l_process_event_id number;
3113 l_object_version_number number;
3114 begin
3115 if (pay_continuous_calc.g_event_list.sz <> 0) then
3116 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3117 pay_ppe_api.create_process_event(
3118 p_assignment_id => p_assignment_id,
3119 p_effective_date => g_event_list.effective_date(cnt),
3120 p_change_type => g_event_list.change_type(cnt),
3121 p_status => 'U',
3122 p_description => g_event_list.description(cnt),
3123 p_process_event_id => l_process_event_id,
3124 p_object_version_number => l_object_version_number,
3128 p_business_group_id => p_business_group_id
3125 p_event_update_id => g_event_list.event_update_id(cnt),
3126 p_surrogate_key => p_payment_method_id,
3127 p_calculation_date => g_event_list.calc_date(cnt),
3129 );
3130 end loop;
3131 end if;
3132 pay_continuous_calc.g_event_list.sz := 0;
3133 end;
3134 hr_utility.set_location(l_proc, 900);
3135 end personal_payment_methods_ari;
3136 --
3137 /* name : personal_payment_methods_ard
3138 purpose : This is procedure that records any deletes
3139 on personal_payment_methods.
3140 */
3141 procedure personal_payment_methods_ard(
3142 p_business_group_id in number,
3143 p_legislation_code in varchar2,
3144 p_assignment_id in number,
3145 p_effective_start_date in date,
3146 p_payment_method_id in number
3147 )
3148 is
3149 l_process_event_id number;
3150 l_object_version_number number;
3151 l_proc varchar2(240) := g_package||'.personal_payment_methods_ard';
3152 begin
3153 hr_utility.set_location(l_proc, 10);
3154 /* If the continuous calc is overriden then do nothing */
3155 if (g_override_cc = TRUE) then
3156 return;
3157 end if;
3158 --
3159 pay_continuous_calc.event_update(p_business_group_id,
3160 p_legislation_code,
3161 'PAY_PERSONAL_PAYMENT_METHODS_F',
3162 NULL,
3163 NULL,
3164 NULL,
3165 p_effective_start_date,
3166 p_effective_start_date,
3167 'D'
3168 );
3169 /* Now call the API for the affected assignments */
3170 declare
3171 cnt number;
3172 l_process_event_id number;
3173 l_object_version_number number;
3174 begin
3175 if (pay_continuous_calc.g_event_list.sz <> 0) then
3176 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3177 pay_ppe_api.create_process_event(
3178 p_assignment_id => p_assignment_id,
3179 p_effective_date => g_event_list.effective_date(cnt),
3180 p_change_type => g_event_list.change_type(cnt),
3181 p_status => 'U',
3182 p_description => g_event_list.description(cnt),
3183 p_process_event_id => l_process_event_id,
3184 p_object_version_number => l_object_version_number,
3185 p_event_update_id => g_event_list.event_update_id(cnt),
3186 p_surrogate_key => p_payment_method_id,
3187 p_calculation_date => g_event_list.calc_date(cnt),
3188 p_business_group_id => p_business_group_id
3189 );
3190 end loop;
3191 end if;
3192 pay_continuous_calc.g_event_list.sz := 0;
3193 end;
3194 hr_utility.set_location(l_proc, 900);
3195 END personal_payment_methods_ard;
3196 --
3197 /* name : PERSONAL_PAYMENT_METHODS_F_aru
3198 purpose : This is procedure that records any updates
3199 on personal_payment_methods.
3200 */
3201 procedure PERSONAL_PAYMENT_METHODS_F_aru(
3202 p_business_group_id in number,
3203 p_legislation_code in varchar2,
3204 p_effective_date in date,
3205 p_old_AMOUNT in NUMBER,
3206 p_new_AMOUNT in NUMBER,
3207 p_old_ASSIGNMENT_ID in NUMBER,
3208 p_new_ASSIGNMENT_ID in NUMBER,
3209 p_old_ATTRIBUTE1 in VARCHAR2,
3210 p_new_ATTRIBUTE1 in VARCHAR2,
3211 p_old_ATTRIBUTE10 in VARCHAR2,
3212 p_new_ATTRIBUTE10 in VARCHAR2,
3213 p_old_ATTRIBUTE11 in VARCHAR2,
3214 p_new_ATTRIBUTE11 in VARCHAR2,
3215 p_old_ATTRIBUTE12 in VARCHAR2,
3216 p_new_ATTRIBUTE12 in VARCHAR2,
3217 p_old_ATTRIBUTE13 in VARCHAR2,
3218 p_new_ATTRIBUTE13 in VARCHAR2,
3219 p_old_ATTRIBUTE14 in VARCHAR2,
3220 p_new_ATTRIBUTE14 in VARCHAR2,
3221 p_old_ATTRIBUTE15 in VARCHAR2,
3222 p_new_ATTRIBUTE15 in VARCHAR2,
3223 p_old_ATTRIBUTE16 in VARCHAR2,
3224 p_new_ATTRIBUTE16 in VARCHAR2,
3225 p_old_ATTRIBUTE17 in VARCHAR2,
3226 p_new_ATTRIBUTE17 in VARCHAR2,
3227 p_old_ATTRIBUTE18 in VARCHAR2,
3228 p_new_ATTRIBUTE18 in VARCHAR2,
3229 p_old_ATTRIBUTE19 in VARCHAR2,
3230 p_new_ATTRIBUTE19 in VARCHAR2,
3231 p_old_ATTRIBUTE2 in VARCHAR2,
3232 p_new_ATTRIBUTE2 in VARCHAR2,
3233 p_old_ATTRIBUTE20 in VARCHAR2,
3234 p_new_ATTRIBUTE20 in VARCHAR2,
3235 p_old_ATTRIBUTE3 in VARCHAR2,
3236 p_new_ATTRIBUTE3 in VARCHAR2,
3237 p_old_ATTRIBUTE4 in VARCHAR2,
3238 p_new_ATTRIBUTE4 in VARCHAR2,
3239 p_old_ATTRIBUTE5 in VARCHAR2,
3240 p_new_ATTRIBUTE5 in VARCHAR2,
3241 p_old_ATTRIBUTE6 in VARCHAR2,
3242 p_new_ATTRIBUTE6 in VARCHAR2,
3243 p_old_ATTRIBUTE7 in VARCHAR2,
3244 p_new_ATTRIBUTE7 in VARCHAR2,
3245 p_old_ATTRIBUTE8 in VARCHAR2,
3246 p_new_ATTRIBUTE8 in VARCHAR2,
3247 p_old_ATTRIBUTE9 in VARCHAR2,
3248 p_new_ATTRIBUTE9 in VARCHAR2,
3249 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
3253 p_old_EFFECTIVE_END_DATE in DATE,
3250 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
3251 p_old_COMMENT_ID in NUMBER,
3252 p_new_COMMENT_ID in NUMBER,
3254 p_new_EFFECTIVE_END_DATE in DATE,
3255 p_old_EFFECTIVE_START_DATE in DATE,
3256 p_new_EFFECTIVE_START_DATE in DATE,
3257 p_old_EXTERNAL_ACCOUNT_ID in NUMBER,
3258 p_new_EXTERNAL_ACCOUNT_ID in NUMBER,
3259 p_old_ORG_PAYMENT_METHOD_ID in NUMBER,
3260 p_new_ORG_PAYMENT_METHOD_ID in NUMBER,
3261 p_old_PAYEE_ID in NUMBER,
3262 p_new_PAYEE_ID in NUMBER,
3263 p_old_PAYEE_TYPE in VARCHAR2,
3264 p_new_PAYEE_TYPE in VARCHAR2,
3265 p_old_PERCENTAGE in NUMBER,
3266 p_new_PERCENTAGE in NUMBER,
3267 p_old_PERSONAL_PAYMENT_METHOD_ in NUMBER,
3268 p_new_PERSONAL_PAYMENT_METHOD_ in NUMBER,
3269 p_old_PRIORITY in NUMBER,
3270 p_new_PRIORITY in NUMBER
3271 )
3272 is
3273 --
3274 begin
3275 --
3276 hr_utility.set_location('pay_continuous_calc.PERSONAL_PAYMENT_METHODS_F_aru', 10);
3277 /* If the continuous calc is overriden then do nothing */
3278 if (g_override_cc = TRUE) then
3279 return;
3280 end if;
3281 --
3282 /* If the dates haven't changed it must be a correction */
3283 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
3284 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
3285 --
3286 pay_continuous_calc.event_update(p_business_group_id,
3287 p_legislation_code,
3288 'PAY_PERSONAL_PAYMENT_METHODS_F',
3289 'AMOUNT',
3290 p_old_AMOUNT,
3291 p_new_AMOUNT,
3292 p_effective_date
3293 );
3294 pay_continuous_calc.event_update(p_business_group_id,
3295 p_legislation_code,
3296 'PAY_PERSONAL_PAYMENT_METHODS_F',
3297 'ASSIGNMENT_ID',
3298 p_old_ASSIGNMENT_ID,
3299 p_new_ASSIGNMENT_ID,
3300 p_effective_date
3301 );
3302 pay_continuous_calc.event_update(p_business_group_id,
3303 p_legislation_code,
3304 'PAY_PERSONAL_PAYMENT_METHODS_F',
3305 'ATTRIBUTE1',
3306 p_old_ATTRIBUTE1,
3307 p_new_ATTRIBUTE1,
3308 p_effective_date
3309 );
3310 pay_continuous_calc.event_update(p_business_group_id,
3311 p_legislation_code,
3312 'PAY_PERSONAL_PAYMENT_METHODS_F',
3313 'ATTRIBUTE10',
3314 p_old_ATTRIBUTE10,
3315 p_new_ATTRIBUTE10,
3316 p_effective_date
3317 );
3318 pay_continuous_calc.event_update(p_business_group_id,
3319 p_legislation_code,
3320 'PAY_PERSONAL_PAYMENT_METHODS_F',
3321 'ATTRIBUTE11',
3322 p_old_ATTRIBUTE11,
3323 p_new_ATTRIBUTE11,
3324 p_effective_date
3325 );
3326 pay_continuous_calc.event_update(p_business_group_id,
3327 p_legislation_code,
3328 'PAY_PERSONAL_PAYMENT_METHODS_F',
3329 'ATTRIBUTE12',
3330 p_old_ATTRIBUTE12,
3331 p_new_ATTRIBUTE12,
3332 p_effective_date
3333 );
3334 pay_continuous_calc.event_update(p_business_group_id,
3335 p_legislation_code,
3336 'PAY_PERSONAL_PAYMENT_METHODS_F',
3337 'ATTRIBUTE13',
3338 p_old_ATTRIBUTE13,
3339 p_new_ATTRIBUTE13,
3340 p_effective_date
3341 );
3342 pay_continuous_calc.event_update(p_business_group_id,
3343 p_legislation_code,
3344 'PAY_PERSONAL_PAYMENT_METHODS_F',
3345 'ATTRIBUTE14',
3346 p_old_ATTRIBUTE14,
3347 p_new_ATTRIBUTE14,
3348 p_effective_date
3349 );
3350 pay_continuous_calc.event_update(p_business_group_id,
3351 p_legislation_code,
3352 'PAY_PERSONAL_PAYMENT_METHODS_F',
3353 'ATTRIBUTE15',
3354 p_old_ATTRIBUTE15,
3355 p_new_ATTRIBUTE15,
3356 p_effective_date
3357 );
3358 pay_continuous_calc.event_update(p_business_group_id,
3359 p_legislation_code,
3360 'PAY_PERSONAL_PAYMENT_METHODS_F',
3361 'ATTRIBUTE16',
3362 p_old_ATTRIBUTE16,
3363 p_new_ATTRIBUTE16,
3367 p_legislation_code,
3364 p_effective_date
3365 );
3366 pay_continuous_calc.event_update(p_business_group_id,
3368 'PAY_PERSONAL_PAYMENT_METHODS_F',
3369 'ATTRIBUTE17',
3370 p_old_ATTRIBUTE17,
3371 p_new_ATTRIBUTE17,
3372 p_effective_date
3373 );
3374 pay_continuous_calc.event_update(p_business_group_id,
3375 p_legislation_code,
3376 'PAY_PERSONAL_PAYMENT_METHODS_F',
3377 'ATTRIBUTE18',
3378 p_old_ATTRIBUTE18,
3379 p_new_ATTRIBUTE18,
3380 p_effective_date
3381 );
3382 pay_continuous_calc.event_update(p_business_group_id,
3383 p_legislation_code,
3384 'PAY_PERSONAL_PAYMENT_METHODS_F',
3385 'ATTRIBUTE19',
3386 p_old_ATTRIBUTE19,
3387 p_new_ATTRIBUTE19,
3388 p_effective_date
3389 );
3390 pay_continuous_calc.event_update(p_business_group_id,
3391 p_legislation_code,
3392 'PAY_PERSONAL_PAYMENT_METHODS_F',
3393 'ATTRIBUTE2',
3394 p_old_ATTRIBUTE2,
3395 p_new_ATTRIBUTE2,
3396 p_effective_date
3397 );
3398 pay_continuous_calc.event_update(p_business_group_id,
3399 p_legislation_code,
3400 'PAY_PERSONAL_PAYMENT_METHODS_F',
3401 'ATTRIBUTE20',
3402 p_old_ATTRIBUTE20,
3403 p_new_ATTRIBUTE20,
3404 p_effective_date
3405 );
3406 pay_continuous_calc.event_update(p_business_group_id,
3407 p_legislation_code,
3408 'PAY_PERSONAL_PAYMENT_METHODS_F',
3409 'ATTRIBUTE3',
3410 p_old_ATTRIBUTE3,
3411 p_new_ATTRIBUTE3,
3412 p_effective_date
3413 );
3414 pay_continuous_calc.event_update(p_business_group_id,
3415 p_legislation_code,
3416 'PAY_PERSONAL_PAYMENT_METHODS_F',
3417 'ATTRIBUTE4',
3418 p_old_ATTRIBUTE4,
3419 p_new_ATTRIBUTE4,
3420 p_effective_date
3421 );
3422 pay_continuous_calc.event_update(p_business_group_id,
3423 p_legislation_code,
3424 'PAY_PERSONAL_PAYMENT_METHODS_F',
3425 'ATTRIBUTE5',
3426 p_old_ATTRIBUTE5,
3427 p_new_ATTRIBUTE5,
3428 p_effective_date
3429 );
3430 pay_continuous_calc.event_update(p_business_group_id,
3431 p_legislation_code,
3432 'PAY_PERSONAL_PAYMENT_METHODS_F',
3433 'ATTRIBUTE6',
3434 p_old_ATTRIBUTE6,
3435 p_new_ATTRIBUTE6,
3436 p_effective_date
3437 );
3438 pay_continuous_calc.event_update(p_business_group_id,
3439 p_legislation_code,
3440 'PAY_PERSONAL_PAYMENT_METHODS_F',
3441 'ATTRIBUTE7',
3442 p_old_ATTRIBUTE7,
3443 p_new_ATTRIBUTE7,
3444 p_effective_date
3445 );
3446 pay_continuous_calc.event_update(p_business_group_id,
3447 p_legislation_code,
3448 'PAY_PERSONAL_PAYMENT_METHODS_F',
3449 'ATTRIBUTE8',
3450 p_old_ATTRIBUTE8,
3451 p_new_ATTRIBUTE8,
3452 p_effective_date
3453 );
3454 pay_continuous_calc.event_update(p_business_group_id,
3455 p_legislation_code,
3456 'PAY_PERSONAL_PAYMENT_METHODS_F',
3457 'ATTRIBUTE9',
3458 p_old_ATTRIBUTE9,
3459 p_new_ATTRIBUTE9,
3460 p_effective_date
3461 );
3462 pay_continuous_calc.event_update(p_business_group_id,
3463 p_legislation_code,
3464 'PAY_PERSONAL_PAYMENT_METHODS_F',
3465 'ATTRIBUTE_CATEGORY',
3469 );
3466 p_old_ATTRIBUTE_CATEGORY,
3467 p_new_ATTRIBUTE_CATEGORY,
3468 p_effective_date
3470 pay_continuous_calc.event_update(p_business_group_id,
3471 p_legislation_code,
3472 'PAY_PERSONAL_PAYMENT_METHODS_F',
3473 'COMMENT_ID',
3474 p_old_COMMENT_ID,
3475 p_new_COMMENT_ID,
3476 p_effective_date
3477 );
3478 pay_continuous_calc.event_update(p_business_group_id,
3479 p_legislation_code,
3480 'PAY_PERSONAL_PAYMENT_METHODS_F',
3481 'EXTERNAL_ACCOUNT_ID',
3482 p_old_EXTERNAL_ACCOUNT_ID,
3483 p_new_EXTERNAL_ACCOUNT_ID,
3484 p_effective_date
3485 );
3486 pay_continuous_calc.event_update(p_business_group_id,
3487 p_legislation_code,
3488 'PAY_PERSONAL_PAYMENT_METHODS_F',
3489 'ORG_PAYMENT_METHOD_ID',
3490 p_old_ORG_PAYMENT_METHOD_ID,
3491 p_new_ORG_PAYMENT_METHOD_ID,
3492 p_effective_date
3493 );
3494 pay_continuous_calc.event_update(p_business_group_id,
3495 p_legislation_code,
3496 'PAY_PERSONAL_PAYMENT_METHODS_F',
3497 'PAYEE_ID',
3498 p_old_PAYEE_ID,
3499 p_new_PAYEE_ID,
3500 p_effective_date
3501 );
3502 pay_continuous_calc.event_update(p_business_group_id,
3503 p_legislation_code,
3504 'PAY_PERSONAL_PAYMENT_METHODS_F',
3505 'PAYEE_TYPE',
3506 p_old_PAYEE_TYPE,
3507 p_new_PAYEE_TYPE,
3508 p_effective_date
3509 );
3510 pay_continuous_calc.event_update(p_business_group_id,
3511 p_legislation_code,
3512 'PAY_PERSONAL_PAYMENT_METHODS_F',
3513 'PERCENTAGE',
3514 p_old_PERCENTAGE,
3515 p_new_PERCENTAGE,
3516 p_effective_date
3517 );
3518 pay_continuous_calc.event_update(p_business_group_id,
3519 p_legislation_code,
3520 'PAY_PERSONAL_PAYMENT_METHODS_F',
3521 'PERSONAL_PAYMENT_METHOD_ID',
3522 p_old_PERSONAL_PAYMENT_METHOD_,
3523 p_new_PERSONAL_PAYMENT_METHOD_,
3524 p_effective_date
3525 );
3526 pay_continuous_calc.event_update(p_business_group_id,
3527 p_legislation_code,
3528 'PAY_PERSONAL_PAYMENT_METHODS_F',
3529 'PRIORITY',
3530 p_old_PRIORITY,
3531 p_new_PRIORITY,
3532 p_effective_date
3533 );
3534 else
3535 /* OK it must be a date track change */
3536 pay_continuous_calc.event_update(p_business_group_id,
3537 p_legislation_code,
3538 'PAY_PERSONAL_PAYMENT_METHODS_F',
3539 'EFFECTIVE_END_DATE',
3540 p_old_EFFECTIVE_END_DATE,
3541 p_new_EFFECTIVE_END_DATE,
3542 p_new_effective_end_date,
3546 pay_continuous_calc.event_update(p_business_group_id,
3543 least(p_old_effective_end_date,
3544 p_new_effective_end_date)
3545 );
3547 p_legislation_code,
3548 'PAY_PERSONAL_PAYMENT_METHODS_F',
3549 'EFFECTIVE_START_DATE',
3550 p_old_EFFECTIVE_START_DATE,
3551 p_new_EFFECTIVE_START_DATE,
3552 p_new_effective_start_date,
3553 least(p_old_effective_start_date,
3554 p_new_effective_start_date)
3555 );
3556 end if;
3557 --
3558 /* Now call the API for the affected assignments */
3559 declare
3560 l_process_event_id number;
3561 l_object_version_number number;
3562 cnt number;
3563 begin
3564 if (pay_continuous_calc.g_event_list.sz <> 0) then
3565 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3566 pay_ppe_api.create_process_event(
3567 p_assignment_id => p_old_ASSIGNMENT_ID,
3568 p_effective_date => g_event_list.effective_date(cnt),
3569 p_change_type => g_event_list.change_type(cnt),
3570 p_status => 'U',
3571 p_description => g_event_list.description(cnt),
3572 p_process_event_id => l_process_event_id,
3573 p_object_version_number => l_object_version_number,
3574 p_event_update_id => g_event_list.event_update_id(cnt),
3575 p_surrogate_key => p_old_PERSONAL_PAYMENT_METHOD_,
3576 p_calculation_date => g_event_list.calc_date(cnt),
3577 p_business_group_id => p_business_group_id
3578 );
3579 end loop;
3580 end if;
3581 pay_continuous_calc.g_event_list.sz := 0;
3582 end;
3583 hr_utility.set_location('pay_continuous_calc.PERSONAL_PAYMENT_METHODS_F_aru', 50);
3584 --
3585 end PERSONAL_PAYMENT_METHODS_F_aru;
3586 --
3587 /* PAY_LINK_INPUT_VALUES */
3588 /* name : PAY_LINK_INPUT_VALUES_F_aru
3589 purpose : This is procedure that records any updates
3590 on link_input_values.
3591 */
3592 procedure PAY_LINK_INPUT_VALUES_F_aru(
3593 p_business_group_id in number,
3594 p_legislation_code in varchar2,
3595 p_effective_date in date,
3596 p_old_COSTED_FLAG in VARCHAR2,
3597 p_new_COSTED_FLAG in VARCHAR2 ,
3598 p_old_DEFAULT_VALUE in VARCHAR2,
3599 p_new_DEFAULT_VALUE in VARCHAR2 ,
3600 p_old_ELEMENT_LINK_ID in NUMBER,
3601 p_new_ELEMENT_LINK_ID in NUMBER ,
3602 p_old_INPUT_VALUE_ID in NUMBER,
3603 p_new_INPUT_VALUE_ID in NUMBER ,
3604 p_old_LINK_INPUT_VALUE_ID in NUMBER,
3605 p_new_LINK_INPUT_VALUE_ID in NUMBER ,
3606 p_old_MAX_VALUE in VARCHAR2,
3607 p_new_MAX_VALUE in VARCHAR2 ,
3608 p_old_MIN_VALUE in VARCHAR2,
3609 p_new_MIN_VALUE in VARCHAR2 ,
3610 p_old_WARNING_OR_ERROR in VARCHAR2,
3611 p_new_WARNING_OR_ERROR in VARCHAR2 ,
3612 p_old_EFFECTIVE_END_DATE in DATE,
3613 p_new_EFFECTIVE_END_DATE in DATE ,
3614 p_old_EFFECTIVE_START_DATE in DATE,
3615 p_new_EFFECTIVE_START_DATE in DATE
3616 )
3617 is
3618 --
3619 begin
3620 /* If the continuous calc is overriden then do nothing */
3621 if (g_override_cc = TRUE) then
3622 return;
3623 end if;
3624 --
3625 /* If the dates havent changed it must be a correction */
3626 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
3627 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
3628 --
3629 pay_continuous_calc.event_update(p_business_group_id,
3630 p_legislation_code,
3631 'PAY_LINK_INPUT_VALUES_F',
3632 'COSTED_FLAG',
3633 p_old_COSTED_FLAG,
3634 p_new_COSTED_FLAG,
3635 p_effective_date
3636 );
3637 --
3638 pay_continuous_calc.event_update(p_business_group_id,
3639 p_legislation_code,
3640 'PAY_LINK_INPUT_VALUES_F',
3641 'DEFAULT_VALUE',
3642 p_old_DEFAULT_VALUE,
3643 p_new_DEFAULT_VALUE,
3644 p_effective_date
3645 );
3646 --
3647 pay_continuous_calc.event_update(p_business_group_id,
3648 p_legislation_code,
3649 'PAY_LINK_INPUT_VALUES_F',
3650 'ELEMENT_LINK_ID',
3651 p_old_ELEMENT_LINK_ID,
3652 p_new_ELEMENT_LINK_ID,
3653 p_effective_date
3654 );
3655 --
3656 pay_continuous_calc.event_update(p_business_group_id,
3657 p_legislation_code,
3658 'PAY_LINK_INPUT_VALUES_F',
3659 'INPUT_VALUE_ID',
3663 );
3660 p_old_INPUT_VALUE_ID,
3661 p_new_INPUT_VALUE_ID,
3662 p_effective_date
3664 --
3665 pay_continuous_calc.event_update(p_business_group_id,
3666 p_legislation_code,
3667 'PAY_LINK_INPUT_VALUES_F',
3668 'LINK_INPUT_VALUE_ID',
3669 p_old_LINK_INPUT_VALUE_ID,
3670 p_new_LINK_INPUT_VALUE_ID,
3671 p_effective_date
3672 );
3673 --
3674 pay_continuous_calc.event_update(p_business_group_id,
3675 p_legislation_code,
3676 'PAY_LINK_INPUT_VALUES_F',
3677 'MAX_VALUE',
3678 p_old_MAX_VALUE,
3679 p_new_MAX_VALUE,
3680 p_effective_date
3681 );
3682 --
3683 pay_continuous_calc.event_update(p_business_group_id,
3684 p_legislation_code,
3685 'PAY_LINK_INPUT_VALUES_F',
3686 'MIN_VALUE',
3687 p_old_MIN_VALUE,
3688 p_new_MIN_VALUE,
3689 p_effective_date
3690 );
3691 --
3692 pay_continuous_calc.event_update(p_business_group_id,
3693 p_legislation_code,
3694 'PAY_LINK_INPUT_VALUES_F',
3695 'WARNING_OR_ERROR',
3696 p_old_WARNING_OR_ERROR,
3697 p_new_WARNING_OR_ERROR,
3698 p_effective_date
3699 );
3700 --
3701 pay_continuous_calc.event_update(p_business_group_id,
3702 p_legislation_code,
3703 'PAY_LINK_INPUT_VALUES_F',
3704 'WARNING_OR_ERROR',
3705 p_old_WARNING_OR_ERROR,
3706 p_new_WARNING_OR_ERROR,
3707 p_effective_date
3708 );
3709 else
3710 /* OK it must be a date track change */
3711 --
3712 pay_continuous_calc.event_update(p_business_group_id,
3713 p_legislation_code,
3714 'PAY_LINK_INPUT_VALUES_F',
3715 'EFFECTIVE_END_DATE',
3716 p_old_EFFECTIVE_END_DATE,
3717 p_new_EFFECTIVE_END_DATE,
3718 p_new_effective_end_date,
3719 least(p_old_effective_end_date,
3720 p_new_effective_end_date)
3721 );
3722 --
3723 pay_continuous_calc.event_update(p_business_group_id,
3724 p_legislation_code,
3725 'PAY_LINK_INPUT_VALUES_F',
3726 'EFFECTIVE_START_DATE',
3727 p_old_EFFECTIVE_START_DATE,
3728 p_new_EFFECTIVE_START_DATE,
3729 p_new_effective_start_date,
3730 least(p_old_effective_start_date,
3731 p_new_effective_start_date)
3732 );
3733
3734 end if;
3735 --
3736 /* Now call the API for the affected assignments */
3737 declare
3738 l_process_event_id number;
3739 l_object_version_number number;
3740 cnt number;
3741 begin
3742 if (pay_continuous_calc.g_event_list.sz <> 0) then
3743 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3744 pay_ppe_api.create_process_event(
3745 p_assignment_id => null,
3746 p_effective_date => g_event_list.effective_date(cnt),
3747 p_change_type => g_event_list.change_type(cnt),
3748 p_status => 'U',
3749 p_description => g_event_list.description(cnt),
3750 p_process_event_id => l_process_event_id,
3751 p_object_version_number => l_object_version_number,
3752 p_event_update_id => g_event_list.event_update_id(cnt),
3753 p_business_group_id => p_business_group_id,
3754 p_calculation_date => g_event_list.calc_date(cnt),
3755 p_surrogate_key => p_new_LINK_INPUT_VALUE_ID
3756 );
3757 end loop;
3758 end if;
3759 pay_continuous_calc.g_event_list.sz := 0;
3760 end;
3761 --
3762 end PAY_LINK_INPUT_VALUES_F_aru;
3763 --
3764 /* Used generator to build this procedure, but removed some of that table values.
3768 purpose : This is procedure that records any updates
3765 */
3766 /* PAY_ELEMENT_LINKS */
3767 /* name : PAY_ELEMENT_LINKS_F_aru
3769 on element_links.
3770 */
3771 procedure PAY_ELEMENT_LINKS_F_aru(
3772 p_business_group_id in number,
3773 p_legislation_code in varchar2,
3774 p_effective_date in date,
3775 p_old_ATTRIBUTE1 in VARCHAR2,
3776 p_new_ATTRIBUTE1 in VARCHAR2,
3777 p_old_ATTRIBUTE10 in VARCHAR2,
3778 p_new_ATTRIBUTE10 in VARCHAR2,
3779 p_old_ATTRIBUTE11 in VARCHAR2,
3780 p_new_ATTRIBUTE11 in VARCHAR2,
3781 p_old_ATTRIBUTE12 in VARCHAR2,
3782 p_new_ATTRIBUTE12 in VARCHAR2,
3783 p_old_ATTRIBUTE13 in VARCHAR2,
3784 p_new_ATTRIBUTE13 in VARCHAR2,
3785 p_old_ATTRIBUTE14 in VARCHAR2,
3786 p_new_ATTRIBUTE14 in VARCHAR2,
3787 p_old_ATTRIBUTE15 in VARCHAR2,
3788 p_new_ATTRIBUTE15 in VARCHAR2,
3789 p_old_ATTRIBUTE16 in VARCHAR2,
3790 p_new_ATTRIBUTE16 in VARCHAR2,
3791 p_old_ATTRIBUTE17 in VARCHAR2,
3792 p_new_ATTRIBUTE17 in VARCHAR2,
3793 p_old_ATTRIBUTE18 in VARCHAR2,
3794 p_new_ATTRIBUTE18 in VARCHAR2,
3795 p_old_ATTRIBUTE19 in VARCHAR2,
3796 p_new_ATTRIBUTE19 in VARCHAR2,
3797 p_old_ATTRIBUTE2 in VARCHAR2,
3798 p_new_ATTRIBUTE2 in VARCHAR2,
3799 p_old_ATTRIBUTE20 in VARCHAR2,
3800 p_new_ATTRIBUTE20 in VARCHAR2,
3801 p_old_ATTRIBUTE3 in VARCHAR2,
3802 p_new_ATTRIBUTE3 in VARCHAR2,
3803 p_old_ATTRIBUTE4 in VARCHAR2,
3804 p_new_ATTRIBUTE4 in VARCHAR2,
3805 p_old_ATTRIBUTE5 in VARCHAR2,
3806 p_new_ATTRIBUTE5 in VARCHAR2,
3807 p_old_ATTRIBUTE6 in VARCHAR2,
3808 p_new_ATTRIBUTE6 in VARCHAR2,
3809 p_old_ATTRIBUTE7 in VARCHAR2,
3810 p_new_ATTRIBUTE7 in VARCHAR2,
3811 p_old_ATTRIBUTE8 in VARCHAR2,
3812 p_new_ATTRIBUTE8 in VARCHAR2,
3813 p_old_ATTRIBUTE9 in VARCHAR2,
3814 p_new_ATTRIBUTE9 in VARCHAR2,
3815 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
3816 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
3817 p_old_BALANCING_KEYFLEX_ID in NUMBER,
3818 p_new_BALANCING_KEYFLEX_ID in NUMBER,
3819 p_old_COSTABLE_TYPE in VARCHAR2,
3820 p_new_COSTABLE_TYPE in VARCHAR2,
3821 p_old_COST_ALLOCATION_KEYFLEX in NUMBER,
3822 p_new_COST_ALLOCATION_KEYFLEX in NUMBER,
3823 p_old_ELEMENT_LINK_ID in NUMBER,
3824 p_new_ELEMENT_LINK_ID in NUMBER,
3825 p_old_ELEMENT_SET_ID in NUMBER,
3826 p_new_ELEMENT_SET_ID in NUMBER,
3827 p_old_ELEMENT_TYPE_ID in NUMBER,
3828 p_new_ELEMENT_TYPE_ID in NUMBER,
3829 p_old_EFFECTIVE_END_DATE in DATE,
3830 p_new_EFFECTIVE_END_DATE in DATE,
3831 p_old_EFFECTIVE_START_DATE in DATE,
3832 p_new_EFFECTIVE_START_DATE in DATE
3833 )
3834 is
3835 --
3836 begin
3837 hr_utility.set_location('pay_continuous_calc.PAY_ELEMENT_LINKS_F_aru', 10);
3838 /* If the continuous calc is overriden then do nothing */
3839 if (g_override_cc = TRUE) then
3840 return;
3841 end if;
3842 --
3843 /* If the dates havent changed it must be a correction */
3844 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
3845 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
3846 --
3847 pay_continuous_calc.event_update(p_business_group_id,
3848 p_legislation_code,
3849 'PAY_ELEMENT_LINKS_F',
3850 'ATTRIBUTE1',
3851 p_old_ATTRIBUTE1,
3852 p_new_ATTRIBUTE1,
3853 p_effective_date
3854 );
3855 pay_continuous_calc.event_update(p_business_group_id,
3856 p_legislation_code,
3857 'PAY_ELEMENT_LINKS_F',
3858 'ATTRIBUTE10',
3859 p_old_ATTRIBUTE10,
3860 p_new_ATTRIBUTE10,
3861 p_effective_date
3862 );
3863 pay_continuous_calc.event_update(p_business_group_id,
3864 p_legislation_code,
3865 'PAY_ELEMENT_LINKS_F',
3866 'ATTRIBUTE11',
3867 p_old_ATTRIBUTE11,
3868 p_new_ATTRIBUTE11,
3869 p_effective_date
3870 );
3871 pay_continuous_calc.event_update(p_business_group_id,
3872 p_legislation_code,
3873 'PAY_ELEMENT_LINKS_F',
3874 'ATTRIBUTE12',
3875 p_old_ATTRIBUTE12,
3876 p_new_ATTRIBUTE12,
3877 p_effective_date
3878 );
3879 pay_continuous_calc.event_update(p_business_group_id,
3880 p_legislation_code,
3881 'PAY_ELEMENT_LINKS_F',
3882 'ATTRIBUTE13',
3883 p_old_ATTRIBUTE13,
3884 p_new_ATTRIBUTE13,
3885 p_effective_date
3886 );
3887 pay_continuous_calc.event_update(p_business_group_id,
3888 p_legislation_code,
3889 'PAY_ELEMENT_LINKS_F',
3890 'ATTRIBUTE14',
3891 p_old_ATTRIBUTE14,
3892 p_new_ATTRIBUTE14,
3893 p_effective_date
3894 );
3898 'ATTRIBUTE15',
3895 pay_continuous_calc.event_update(p_business_group_id,
3896 p_legislation_code,
3897 'PAY_ELEMENT_LINKS_F',
3899 p_old_ATTRIBUTE15,
3900 p_new_ATTRIBUTE15,
3901 p_effective_date
3902 );
3903 pay_continuous_calc.event_update(p_business_group_id,
3904 p_legislation_code,
3905 'PAY_ELEMENT_LINKS_F',
3906 'ATTRIBUTE16',
3907 p_old_ATTRIBUTE16,
3908 p_new_ATTRIBUTE16,
3909 p_effective_date
3910 );
3911 pay_continuous_calc.event_update(p_business_group_id,
3912 p_legislation_code,
3913 'PAY_ELEMENT_LINKS_F',
3914 'ATTRIBUTE17',
3915 p_old_ATTRIBUTE17,
3916 p_new_ATTRIBUTE17,
3917 p_effective_date
3918 );
3919 pay_continuous_calc.event_update(p_business_group_id,
3920 p_legislation_code,
3921 'PAY_ELEMENT_LINKS_F',
3922 'ATTRIBUTE18',
3923 p_old_ATTRIBUTE18,
3924 p_new_ATTRIBUTE18,
3925 p_effective_date
3926 );
3927 pay_continuous_calc.event_update(p_business_group_id,
3928 p_legislation_code,
3929 'PAY_ELEMENT_LINKS_F',
3930 'ATTRIBUTE19',
3931 p_old_ATTRIBUTE19,
3932 p_new_ATTRIBUTE19,
3933 p_effective_date
3934 );
3935 pay_continuous_calc.event_update(p_business_group_id,
3936 p_legislation_code,
3937 'PAY_ELEMENT_LINKS_F',
3938 'ATTRIBUTE2',
3939 p_old_ATTRIBUTE2,
3940 p_new_ATTRIBUTE2,
3941 p_effective_date
3942 );
3943 pay_continuous_calc.event_update(p_business_group_id,
3944 p_legislation_code,
3945 'PAY_ELEMENT_LINKS_F',
3946 'ATTRIBUTE20',
3947 p_old_ATTRIBUTE20,
3948 p_new_ATTRIBUTE20,
3949 p_effective_date
3950 );
3951 pay_continuous_calc.event_update(p_business_group_id,
3952 p_legislation_code,
3953 'PAY_ELEMENT_LINKS_F',
3954 'ATTRIBUTE3',
3955 p_old_ATTRIBUTE3,
3956 p_new_ATTRIBUTE3,
3957 p_effective_date
3958 );
3959 pay_continuous_calc.event_update(p_business_group_id,
3960 p_legislation_code,
3961 'PAY_ELEMENT_LINKS_F',
3962 'ATTRIBUTE4',
3963 p_old_ATTRIBUTE4,
3964 p_new_ATTRIBUTE4,
3965 p_effective_date
3966 );
3967 pay_continuous_calc.event_update(p_business_group_id,
3968 p_legislation_code,
3969 'PAY_ELEMENT_LINKS_F',
3970 'ATTRIBUTE5',
3971 p_old_ATTRIBUTE5,
3972 p_new_ATTRIBUTE5,
3973 p_effective_date
3974 );
3975 pay_continuous_calc.event_update(p_business_group_id,
3976 p_legislation_code,
3977 'PAY_ELEMENT_LINKS_F',
3978 'ATTRIBUTE6',
3979 p_old_ATTRIBUTE6,
3980 p_new_ATTRIBUTE6,
3981 p_effective_date
3982 );
3983 pay_continuous_calc.event_update(p_business_group_id,
3984 p_legislation_code,
3985 'PAY_ELEMENT_LINKS_F',
3986 'ATTRIBUTE7',
3987 p_old_ATTRIBUTE7,
3988 p_new_ATTRIBUTE7,
3989 p_effective_date
3990 );
3991 pay_continuous_calc.event_update(p_business_group_id,
3992 p_legislation_code,
3993 'PAY_ELEMENT_LINKS_F',
3994 'ATTRIBUTE8',
3995 p_old_ATTRIBUTE8,
3996 p_new_ATTRIBUTE8,
3997 p_effective_date
4001 'PAY_ELEMENT_LINKS_F',
3998 );
3999 pay_continuous_calc.event_update(p_business_group_id,
4000 p_legislation_code,
4002 'ATTRIBUTE9',
4003 p_old_ATTRIBUTE9,
4004 p_new_ATTRIBUTE9,
4005 p_effective_date
4006 );
4007 pay_continuous_calc.event_update(p_business_group_id,
4008 p_legislation_code,
4009 'PAY_ELEMENT_LINKS_F',
4010 'ATTRIBUTE_CATEGORY',
4011 p_old_ATTRIBUTE_CATEGORY,
4012 p_new_ATTRIBUTE_CATEGORY,
4013 p_effective_date
4014 );
4015 pay_continuous_calc.event_update(p_business_group_id,
4016 p_legislation_code,
4017 'PAY_ELEMENT_LINKS_F',
4018 'BALANCING_KEYFLEX_ID',
4019 p_old_BALANCING_KEYFLEX_ID,
4020 p_new_BALANCING_KEYFLEX_ID,
4021 p_effective_date
4022 );
4023 pay_continuous_calc.event_update(p_business_group_id,
4024 p_legislation_code,
4025 'PAY_ELEMENT_LINKS_F',
4026 'COSTABLE_TYPE',
4027 p_old_COSTABLE_TYPE,
4028 p_new_COSTABLE_TYPE,
4029 p_effective_date
4030 );
4031 pay_continuous_calc.event_update(p_business_group_id,
4032 p_legislation_code,
4033 'PAY_ELEMENT_LINKS_F',
4034 'COST_ALLOCATION_KEYFLEX_ID',
4035 p_old_COST_ALLOCATION_KEYFLEX,
4036 p_new_COST_ALLOCATION_KEYFLEX,
4037 p_effective_date
4038 );
4039 pay_continuous_calc.event_update(p_business_group_id,
4040 p_legislation_code,
4041 'PAY_ELEMENT_LINKS_F',
4042 'ELEMENT_SET_ID',
4043 p_old_ELEMENT_SET_ID,
4044 p_new_ELEMENT_SET_ID,
4045 p_effective_date
4046 );
4047 --
4048 else
4049 /* OK it must be a date track change */
4050 --
4051 pay_continuous_calc.event_update(p_business_group_id,
4052 p_legislation_code,
4053 'PAY_ELEMENT_LINKS_F',
4054 'EFFECTIVE_END_DATE',
4055 p_old_EFFECTIVE_END_DATE,
4056 p_new_EFFECTIVE_END_DATE,
4057 p_new_effective_end_date,
4058 least(p_old_effective_end_date,
4059 p_new_effective_end_date)
4060 );
4061 --
4062 pay_continuous_calc.event_update(p_business_group_id,
4063 p_legislation_code,
4064 'PAY_ELEMENT_LINKS_F',
4065 'EFFECTIVE_START_DATE',
4066 p_old_EFFECTIVE_START_DATE,
4067 p_new_EFFECTIVE_START_DATE,
4068 p_new_effective_start_date,
4069 least(p_old_effective_start_date,
4070 p_new_effective_start_date)
4071 );
4072
4073 end if;
4074 --
4075 /* Now call the API for the affected assignments */
4076 declare
4077 l_process_event_id number;
4078 l_object_version_number number;
4079 cnt number;
4080 begin
4081 if (pay_continuous_calc.g_event_list.sz <> 0) then
4082 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
4083 pay_ppe_api.create_process_event(
4084 p_assignment_id => null,
4085 p_effective_date => g_event_list.effective_date(cnt),
4086 p_change_type => g_event_list.change_type(cnt),
4087 p_status => 'U',
4088 p_description => g_event_list.description(cnt),
4089 p_process_event_id => l_process_event_id,
4090 p_object_version_number => l_object_version_number,
4091 p_event_update_id => g_event_list.event_update_id(cnt),
4092 p_business_group_id => p_business_group_id,
4093 p_calculation_date => g_event_list.calc_date(cnt),
4094 p_surrogate_key => p_new_ELEMENT_LINK_ID
4095 );
4096 end loop;
4097 end if;
4098 pay_continuous_calc.g_event_list.sz := 0;
4099 end;
4103 --
4100 hr_utility.set_location('pay_continuous_calc.PAY_ELEMENT_LINKS_F_aru', 50);
4101 --
4102 end PAY_ELEMENT_LINKS_F_aru;
4104 /* PAY_INPUT_VALUES */
4105 /* name : PAY_INPUT_VALUES_F_aru
4106 purpose : This is procedure that records any updates
4107 on input_values.
4108 */
4109 procedure PAY_INPUT_VALUES_F_aru(
4110 p_business_group_id in number,
4111 p_legislation_code in varchar2,
4112 p_effective_date in date ,
4113 p_old_DEFAULT_VALUE in VARCHAR2,
4114 p_new_DEFAULT_VALUE in VARCHAR2 ,
4115 p_old_DISPLAY_SEQUENCE in NUMBER,
4116 p_new_DISPLAY_SEQUENCE in NUMBER ,
4117 p_old_ELEMENT_TYPE_ID in NUMBER,
4118 p_new_ELEMENT_TYPE_ID in NUMBER ,
4119 p_old_FORMULA_ID in NUMBER,
4120 p_new_FORMULA_ID in NUMBER ,
4121 p_old_GENERATE_DB_ITEMS_FLAG in VARCHAR2,
4122 p_new_GENERATE_DB_ITEMS_FLAG in VARCHAR2 ,
4123 p_old_HOT_DEFAULT_FLAG in VARCHAR2,
4124 p_new_HOT_DEFAULT_FLAG in VARCHAR2 ,
4125 p_old_INPUT_VALUE_ID in NUMBER,
4126 p_new_INPUT_VALUE_ID in NUMBER ,
4127 p_old_LEGISLATION_SUBGROUP in VARCHAR2,
4128 p_new_LEGISLATION_SUBGROUP in VARCHAR2 ,
4129 p_old_LOOKUP_TYPE in VARCHAR2,
4130 p_new_LOOKUP_TYPE in VARCHAR2 ,
4131 p_old_MANDATORY_FLAG in VARCHAR2,
4132 p_new_MANDATORY_FLAG in VARCHAR2 ,
4133 p_old_MAX_VALUE in VARCHAR2,
4134 p_new_MAX_VALUE in VARCHAR2 ,
4135 p_old_MIN_VALUE in VARCHAR2,
4136 p_new_MIN_VALUE in VARCHAR2 ,
4137 p_old_UOM in VARCHAR2,
4138 p_new_UOM in VARCHAR2 ,
4139 p_old_WARNING_OR_ERROR in VARCHAR2,
4140 p_new_WARNING_OR_ERROR in VARCHAR2 ,
4141 p_old_EFFECTIVE_END_DATE in DATE,
4142 p_new_EFFECTIVE_END_DATE in DATE ,
4143 p_old_EFFECTIVE_START_DATE in DATE,
4144 p_new_EFFECTIVE_START_DATE in DATE
4145 )
4146 is
4147 --
4148 begin
4149 /* If the continuous calc is overriden then do nothing */
4150 if (g_override_cc = TRUE) then
4151 return;
4152 end if;
4153 --
4154 /* If the dates havent changed it must be a correction */
4155 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
4156 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
4157 --
4158 pay_continuous_calc.event_update(p_business_group_id,
4159 p_legislation_code,
4160 'PAY_INPUT_VALUES_F',
4161 'DEFAULT_VALUE',
4162 p_old_DEFAULT_VALUE,
4163 p_new_DEFAULT_VALUE,
4164 p_effective_date
4165 );
4166 --
4167 pay_continuous_calc.event_update(p_business_group_id,
4168 p_legislation_code,
4169 'PAY_INPUT_VALUES_F',
4170 'DISPLAY_SEQUENCE',
4171 p_old_DISPLAY_SEQUENCE,
4172 p_new_DISPLAY_SEQUENCE,
4173 p_effective_date
4174 );
4175 --
4176 pay_continuous_calc.event_update(p_business_group_id,
4177 p_legislation_code,
4178 'PAY_INPUT_VALUES_F',
4179 'ELEMENT_TYPE_ID',
4180 p_old_ELEMENT_TYPE_ID,
4181 p_new_ELEMENT_TYPE_ID,
4182 p_effective_date
4183 );
4184 --
4185 pay_continuous_calc.event_update(p_business_group_id,
4186 p_legislation_code,
4187 'PAY_INPUT_VALUES_F',
4188 'FORMULA_ID',
4189 p_old_FORMULA_ID,
4190 p_new_FORMULA_ID,
4191 p_effective_date
4192 );
4193 --
4194 pay_continuous_calc.event_update(p_business_group_id,
4195 p_legislation_code,
4196 'PAY_INPUT_VALUES_F',
4197 'GENERATE_DB_ITEMS_FLAG',
4198 p_old_GENERATE_DB_ITEMS_FLAG,
4199 p_new_GENERATE_DB_ITEMS_FLAG,
4200 p_effective_date
4201 );
4202 --
4203 pay_continuous_calc.event_update(p_business_group_id,
4204 p_legislation_code,
4205 'PAY_INPUT_VALUES_F',
4206 'HOT_DEFAULT_FLAG',
4207 p_old_HOT_DEFAULT_FLAG,
4208 p_new_HOT_DEFAULT_FLAG,
4209 p_effective_date
4210 );
4211 --
4212 pay_continuous_calc.event_update(p_business_group_id,
4213 p_legislation_code,
4214 'PAY_INPUT_VALUES_F',
4215 'INPUT_VALUE_ID',
4216 p_old_INPUT_VALUE_ID,
4217 p_new_INPUT_VALUE_ID,
4218 p_effective_date
4219 );
4220 --
4221 pay_continuous_calc.event_update(p_business_group_id,
4222 p_legislation_code,
4223 'PAY_INPUT_VALUES_F',
4224 'LEGISLATION_SUBGROUP',
4225 p_old_LEGISLATION_SUBGROUP,
4226 p_new_LEGISLATION_SUBGROUP,
4230 pay_continuous_calc.event_update(p_business_group_id,
4227 p_effective_date
4228 );
4229 --
4231 p_legislation_code,
4232 'PAY_INPUT_VALUES_F',
4233 'LOOKUP_TYPE',
4234 p_old_LOOKUP_TYPE,
4235 p_new_LOOKUP_TYPE,
4236 p_effective_date
4237 );
4238 --
4239 pay_continuous_calc.event_update(p_business_group_id,
4240 p_legislation_code,
4241 'PAY_INPUT_VALUES_F',
4242 'MANDATORY_FLAG',
4243 p_old_MANDATORY_FLAG,
4244 p_new_MANDATORY_FLAG,
4245 p_effective_date
4246 );
4247 --
4248 pay_continuous_calc.event_update(p_business_group_id,
4249 p_legislation_code,
4250 'PAY_INPUT_VALUES_F',
4251 'MAX_VALUE',
4252 p_old_MAX_VALUE,
4253 p_new_MAX_VALUE,
4254 p_effective_date
4255 );
4256 --
4257 pay_continuous_calc.event_update(p_business_group_id,
4258 p_legislation_code,
4259 'PAY_INPUT_VALUES_F',
4260 'MIN_VALUE',
4261 p_old_MIN_VALUE,
4262 p_new_MIN_VALUE,
4263 p_effective_date
4264 );
4265 --
4266 pay_continuous_calc.event_update(p_business_group_id,
4267 p_legislation_code,
4268 'PAY_INPUT_VALUES_F',
4269 'UOM',
4270 p_old_UOM,
4271 p_new_UOM,
4272 p_effective_date
4273 );
4274 --
4275 pay_continuous_calc.event_update(p_business_group_id,
4276 p_legislation_code,
4277 'PAY_INPUT_VALUES_F',
4278 'WARNING_OR_ERROR',
4279 p_old_WARNING_OR_ERROR,
4280 p_new_WARNING_OR_ERROR,
4281 p_effective_date
4282 );
4283 --
4284 pay_continuous_calc.event_update(p_business_group_id,
4285 p_legislation_code,
4286 'PAY_INPUT_VALUES_F',
4287 'WARNING_OR_ERROR',
4288 p_old_WARNING_OR_ERROR,
4289 p_new_WARNING_OR_ERROR,
4290 p_effective_date
4291 );
4292 else
4293 /* OK it must be a date track change */
4294 --
4295 pay_continuous_calc.event_update(p_business_group_id,
4296 p_legislation_code,
4297 'PAY_INPUT_VALUES_F',
4298 'EFFECTIVE_END_DATE',
4299 p_old_EFFECTIVE_END_DATE,
4300 p_new_EFFECTIVE_END_DATE,
4301 p_new_effective_end_date,
4302 least(p_old_effective_end_date,
4303 p_new_effective_end_date)
4304 );
4305 --
4306 pay_continuous_calc.event_update(p_business_group_id,
4307 p_legislation_code,
4308 'PAY_INPUT_VALUES_F',
4309 'EFFECTIVE_START_DATE',
4310 p_old_EFFECTIVE_START_DATE,
4311 p_new_EFFECTIVE_START_DATE,
4312 p_new_effective_start_date,
4313 least(p_old_effective_start_date,
4314 p_new_effective_start_date)
4315 );
4316
4317 end if;
4318 --
4319 /* Now call the API for the affected assignments */
4320 declare
4321 l_process_event_id number;
4322 l_object_version_number number;
4323 cnt number;
4324 begin
4325 if (pay_continuous_calc.g_event_list.sz <> 0) then
4326 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
4327 pay_ppe_api.create_process_event(
4328 p_assignment_id => null,
4329 p_effective_date => g_event_list.effective_date(cnt),
4330 p_change_type => g_event_list.change_type(cnt),
4331 p_status => 'U',
4332 p_description => g_event_list.description(cnt),
4333 p_process_event_id => l_process_event_id,
4334 p_object_version_number => l_object_version_number,
4335 p_event_update_id => g_event_list.event_update_id(cnt),
4339 );
4336 p_business_group_id => p_business_group_id,
4337 p_calculation_date => g_event_list.calc_date(cnt),
4338 p_surrogate_key => p_new_INPUT_VALUE_ID
4340 end loop;
4341 end if;
4342 pay_continuous_calc.g_event_list.sz := 0;
4343 end;
4344 --
4345 end PAY_INPUT_VALUES_F_aru;
4346 --
4347 /* Used generator to build this procedure, but removed some of that table values.
4348 */
4349 /* PAY_ALL_PAYROLLS */
4350 /* name : PAY_ALL_PAYROLLS_F_aru
4351 purpose : This is procedure that records any updates
4352 on payrolls.
4353 */
4354 procedure PAY_ALL_PAYROLLS_F_aru(
4355 p_business_group_id in number,
4356 p_legislation_code in varchar2,
4357 p_effective_date in date,
4358 p_old_ATTRIBUTE1 in VARCHAR2,
4359 p_new_ATTRIBUTE1 in VARCHAR2,
4360 p_old_ATTRIBUTE10 in VARCHAR2,
4361 p_new_ATTRIBUTE10 in VARCHAR2,
4362 p_old_ATTRIBUTE11 in VARCHAR2,
4363 p_new_ATTRIBUTE11 in VARCHAR2,
4364 p_old_ATTRIBUTE12 in VARCHAR2,
4365 p_new_ATTRIBUTE12 in VARCHAR2,
4366 p_old_ATTRIBUTE13 in VARCHAR2,
4367 p_new_ATTRIBUTE13 in VARCHAR2,
4368 p_old_ATTRIBUTE14 in VARCHAR2,
4369 p_new_ATTRIBUTE14 in VARCHAR2,
4370 p_old_ATTRIBUTE15 in VARCHAR2,
4371 p_new_ATTRIBUTE15 in VARCHAR2,
4372 p_old_ATTRIBUTE16 in VARCHAR2,
4373 p_new_ATTRIBUTE16 in VARCHAR2,
4374 p_old_ATTRIBUTE17 in VARCHAR2,
4375 p_new_ATTRIBUTE17 in VARCHAR2,
4376 p_old_ATTRIBUTE18 in VARCHAR2,
4377 p_new_ATTRIBUTE18 in VARCHAR2,
4378 p_old_ATTRIBUTE19 in VARCHAR2,
4379 p_new_ATTRIBUTE19 in VARCHAR2,
4380 p_old_ATTRIBUTE2 in VARCHAR2,
4381 p_new_ATTRIBUTE2 in VARCHAR2,
4382 p_old_ATTRIBUTE20 in VARCHAR2,
4383 p_new_ATTRIBUTE20 in VARCHAR2,
4384 p_old_ATTRIBUTE3 in VARCHAR2,
4385 p_new_ATTRIBUTE3 in VARCHAR2,
4386 p_old_ATTRIBUTE4 in VARCHAR2,
4387 p_new_ATTRIBUTE4 in VARCHAR2,
4388 p_old_ATTRIBUTE5 in VARCHAR2,
4389 p_new_ATTRIBUTE5 in VARCHAR2,
4390 p_old_ATTRIBUTE6 in VARCHAR2,
4391 p_new_ATTRIBUTE6 in VARCHAR2,
4392 p_old_ATTRIBUTE7 in VARCHAR2,
4393 p_new_ATTRIBUTE7 in VARCHAR2,
4394 p_old_ATTRIBUTE8 in VARCHAR2,
4395 p_new_ATTRIBUTE8 in VARCHAR2,
4396 p_old_ATTRIBUTE9 in VARCHAR2,
4397 p_new_ATTRIBUTE9 in VARCHAR2,
4398 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
4399 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
4400 p_old_COST_ALLOCATION_KEYFLEX_ in NUMBER,
4401 p_new_COST_ALLOCATION_KEYFLEX_ in NUMBER,
4402 p_old_DEFAULT_PAYMENT_METHOD_I in NUMBER,
4403 p_new_DEFAULT_PAYMENT_METHOD_I in NUMBER,
4404 p_old_PAYROLL_ID in NUMBER,
4405 p_new_PAYROLL_ID in NUMBER,
4406 p_old_PRL_INFORMATION1 in VARCHAR2,
4407 p_new_PRL_INFORMATION1 in VARCHAR2,
4408 p_old_PRL_INFORMATION10 in VARCHAR2,
4409 p_new_PRL_INFORMATION10 in VARCHAR2,
4410 p_old_PRL_INFORMATION11 in VARCHAR2,
4411 p_new_PRL_INFORMATION11 in VARCHAR2,
4412 p_old_PRL_INFORMATION12 in VARCHAR2,
4413 p_new_PRL_INFORMATION12 in VARCHAR2,
4414 p_old_PRL_INFORMATION13 in VARCHAR2,
4415 p_new_PRL_INFORMATION13 in VARCHAR2,
4416 p_old_PRL_INFORMATION14 in VARCHAR2,
4417 p_new_PRL_INFORMATION14 in VARCHAR2,
4418 p_old_PRL_INFORMATION15 in VARCHAR2,
4419 p_new_PRL_INFORMATION15 in VARCHAR2,
4420 p_old_PRL_INFORMATION16 in VARCHAR2,
4421 p_new_PRL_INFORMATION16 in VARCHAR2,
4422 p_old_PRL_INFORMATION17 in VARCHAR2,
4423 p_new_PRL_INFORMATION17 in VARCHAR2,
4424 p_old_PRL_INFORMATION18 in VARCHAR2,
4425 p_new_PRL_INFORMATION18 in VARCHAR2,
4426 p_old_PRL_INFORMATION19 in VARCHAR2,
4427 p_new_PRL_INFORMATION19 in VARCHAR2,
4428 p_old_PRL_INFORMATION2 in VARCHAR2,
4429 p_new_PRL_INFORMATION2 in VARCHAR2,
4430 p_old_PRL_INFORMATION20 in VARCHAR2,
4431 p_new_PRL_INFORMATION20 in VARCHAR2,
4432 p_old_PRL_INFORMATION21 in VARCHAR2,
4433 p_new_PRL_INFORMATION21 in VARCHAR2,
4434 p_old_PRL_INFORMATION22 in VARCHAR2,
4435 p_new_PRL_INFORMATION22 in VARCHAR2,
4436 p_old_PRL_INFORMATION23 in VARCHAR2,
4437 p_new_PRL_INFORMATION23 in VARCHAR2,
4438 p_old_PRL_INFORMATION24 in VARCHAR2,
4439 p_new_PRL_INFORMATION24 in VARCHAR2,
4440 p_old_PRL_INFORMATION25 in VARCHAR2,
4441 p_new_PRL_INFORMATION25 in VARCHAR2,
4442 p_old_PRL_INFORMATION26 in VARCHAR2,
4443 p_new_PRL_INFORMATION26 in VARCHAR2,
4444 p_old_PRL_INFORMATION27 in VARCHAR2,
4445 p_new_PRL_INFORMATION27 in VARCHAR2,
4446 p_old_PRL_INFORMATION28 in VARCHAR2,
4447 p_new_PRL_INFORMATION28 in VARCHAR2,
4448 p_old_PRL_INFORMATION29 in VARCHAR2,
4449 p_new_PRL_INFORMATION29 in VARCHAR2,
4450 p_old_PRL_INFORMATION3 in VARCHAR2,
4451 p_new_PRL_INFORMATION3 in VARCHAR2,
4452 p_old_PRL_INFORMATION30 in VARCHAR2,
4453 p_new_PRL_INFORMATION30 in VARCHAR2,
4454 p_old_PRL_INFORMATION4 in VARCHAR2,
4455 p_new_PRL_INFORMATION4 in VARCHAR2,
4456 p_old_PRL_INFORMATION5 in VARCHAR2,
4457 p_new_PRL_INFORMATION5 in VARCHAR2,
4458 p_old_PRL_INFORMATION6 in VARCHAR2,
4459 p_new_PRL_INFORMATION6 in VARCHAR2,
4460 p_old_PRL_INFORMATION7 in VARCHAR2,
4461 p_new_PRL_INFORMATION7 in VARCHAR2,
4462 p_old_PRL_INFORMATION8 in VARCHAR2,
4463 p_new_PRL_INFORMATION8 in VARCHAR2,
4464 p_old_PRL_INFORMATION9 in VARCHAR2,
4465 p_new_PRL_INFORMATION9 in VARCHAR2,
4466 p_old_PRL_INFORMATION_CATEGORY in VARCHAR2,
4467 p_new_PRL_INFORMATION_CATEGORY in VARCHAR2,
4468 p_old_SOFT_CODING_KEYFLEX_ID in NUMBER,
4469 p_new_SOFT_CODING_KEYFLEX_ID in NUMBER,
4470 p_old_SUSPENSE_ACCOUNT_KEYFLEX in NUMBER,
4471 p_new_SUSPENSE_ACCOUNT_KEYFLEX in NUMBER,
4472 p_old_EFFECTIVE_END_DATE in DATE,
4473 p_new_EFFECTIVE_END_DATE in DATE,
4474 p_old_EFFECTIVE_START_DATE in DATE,
4475 p_new_EFFECTIVE_START_DATE in DATE
4476 )
4477 is
4478 --
4482 where asg.payroll_id = p_payroll_id
4479 cursor get_asg (p_payroll_id in number) is
4480 select distinct asg.assignment_id
4481 from per_assignments_f asg
4483 and p_effective_date < asg.effective_end_date;
4484 --
4485 begin
4486 hr_utility.set_location('pay_continuous_calc.PAY_ALL_PAYROLLS_F_aru', 10);
4487 /* If the continuous calc is overriden then do nothing */
4488 if (g_override_cc = TRUE) then
4489 return;
4490 end if;
4491 --
4492 /* If the dates havent changed it must be a correction */
4493 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
4494 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
4495 --
4496 pay_continuous_calc.event_update(p_business_group_id,
4497 p_legislation_code,
4498 'PAY_ALL_PAYROLLS_F',
4499 'ATTRIBUTE1',
4500 p_old_ATTRIBUTE1,
4501 p_new_ATTRIBUTE1,
4502 p_effective_date
4503 );
4504 pay_continuous_calc.event_update(p_business_group_id,
4505 p_legislation_code,
4506 'PAY_ALL_PAYROLLS_F',
4507 'ATTRIBUTE10',
4508 p_old_ATTRIBUTE10,
4509 p_new_ATTRIBUTE10,
4510 p_effective_date
4511 );
4512 pay_continuous_calc.event_update(p_business_group_id,
4513 p_legislation_code,
4514 'PAY_ALL_PAYROLLS_F',
4515 'ATTRIBUTE11',
4516 p_old_ATTRIBUTE11,
4517 p_new_ATTRIBUTE11,
4518 p_effective_date
4519 );
4520 pay_continuous_calc.event_update(p_business_group_id,
4521 p_legislation_code,
4522 'PAY_ALL_PAYROLLS_F',
4523 'ATTRIBUTE12',
4524 p_old_ATTRIBUTE12,
4525 p_new_ATTRIBUTE12,
4526 p_effective_date
4527 );
4528 pay_continuous_calc.event_update(p_business_group_id,
4529 p_legislation_code,
4530 'PAY_ALL_PAYROLLS_F',
4531 'ATTRIBUTE13',
4532 p_old_ATTRIBUTE13,
4533 p_new_ATTRIBUTE13,
4534 p_effective_date
4535 );
4536 pay_continuous_calc.event_update(p_business_group_id,
4537 p_legislation_code,
4538 'PAY_ALL_PAYROLLS_F',
4539 'ATTRIBUTE14',
4540 p_old_ATTRIBUTE14,
4541 p_new_ATTRIBUTE14,
4542 p_effective_date
4543 );
4544 pay_continuous_calc.event_update(p_business_group_id,
4545 p_legislation_code,
4546 'PAY_ALL_PAYROLLS_F',
4547 'ATTRIBUTE15',
4548 p_old_ATTRIBUTE15,
4549 p_new_ATTRIBUTE15,
4550 p_effective_date
4551 );
4552 pay_continuous_calc.event_update(p_business_group_id,
4553 p_legislation_code,
4554 'PAY_ALL_PAYROLLS_F',
4555 'ATTRIBUTE16',
4556 p_old_ATTRIBUTE16,
4557 p_new_ATTRIBUTE16,
4558 p_effective_date
4559 );
4560 pay_continuous_calc.event_update(p_business_group_id,
4561 p_legislation_code,
4562 'PAY_ALL_PAYROLLS_F',
4563 'ATTRIBUTE17',
4564 p_old_ATTRIBUTE17,
4565 p_new_ATTRIBUTE17,
4566 p_effective_date
4567 );
4568 pay_continuous_calc.event_update(p_business_group_id,
4569 p_legislation_code,
4570 'PAY_ALL_PAYROLLS_F',
4571 'ATTRIBUTE18',
4572 p_old_ATTRIBUTE18,
4573 p_new_ATTRIBUTE18,
4574 p_effective_date
4575 );
4576 pay_continuous_calc.event_update(p_business_group_id,
4577 p_legislation_code,
4578 'PAY_ALL_PAYROLLS_F',
4579 'ATTRIBUTE19',
4580 p_old_ATTRIBUTE19,
4581 p_new_ATTRIBUTE19,
4582 p_effective_date
4583 );
4584 pay_continuous_calc.event_update(p_business_group_id,
4585 p_legislation_code,
4586 'PAY_ALL_PAYROLLS_F',
4590 p_effective_date
4587 'ATTRIBUTE2',
4588 p_old_ATTRIBUTE2,
4589 p_new_ATTRIBUTE2,
4591 );
4592 pay_continuous_calc.event_update(p_business_group_id,
4593 p_legislation_code,
4594 'PAY_ALL_PAYROLLS_F',
4595 'ATTRIBUTE20',
4596 p_old_ATTRIBUTE20,
4597 p_new_ATTRIBUTE20,
4598 p_effective_date
4599 );
4600 pay_continuous_calc.event_update(p_business_group_id,
4601 p_legislation_code,
4602 'PAY_ALL_PAYROLLS_F',
4603 'ATTRIBUTE3',
4604 p_old_ATTRIBUTE3,
4605 p_new_ATTRIBUTE3,
4606 p_effective_date
4607 );
4608 pay_continuous_calc.event_update(p_business_group_id,
4609 p_legislation_code,
4610 'PAY_ALL_PAYROLLS_F',
4611 'ATTRIBUTE4',
4612 p_old_ATTRIBUTE4,
4613 p_new_ATTRIBUTE4,
4614 p_effective_date
4615 );
4616 pay_continuous_calc.event_update(p_business_group_id,
4617 p_legislation_code,
4618 'PAY_ALL_PAYROLLS_F',
4619 'ATTRIBUTE5',
4620 p_old_ATTRIBUTE5,
4621 p_new_ATTRIBUTE5,
4622 p_effective_date
4623 );
4624 pay_continuous_calc.event_update(p_business_group_id,
4625 p_legislation_code,
4626 'PAY_ALL_PAYROLLS_F',
4627 'ATTRIBUTE6',
4628 p_old_ATTRIBUTE6,
4629 p_new_ATTRIBUTE6,
4630 p_effective_date
4631 );
4632 pay_continuous_calc.event_update(p_business_group_id,
4633 p_legislation_code,
4634 'PAY_ALL_PAYROLLS_F',
4635 'ATTRIBUTE7',
4636 p_old_ATTRIBUTE7,
4637 p_new_ATTRIBUTE7,
4638 p_effective_date
4639 );
4640 pay_continuous_calc.event_update(p_business_group_id,
4641 p_legislation_code,
4642 'PAY_ALL_PAYROLLS_F',
4643 'ATTRIBUTE8',
4644 p_old_ATTRIBUTE8,
4645 p_new_ATTRIBUTE8,
4646 p_effective_date
4647 );
4648 pay_continuous_calc.event_update(p_business_group_id,
4649 p_legislation_code,
4650 'PAY_ALL_PAYROLLS_F',
4651 'ATTRIBUTE9',
4652 p_old_ATTRIBUTE9,
4653 p_new_ATTRIBUTE9,
4654 p_effective_date
4655 );
4656 pay_continuous_calc.event_update(p_business_group_id,
4657 p_legislation_code,
4658 'PAY_ALL_PAYROLLS_F',
4659 'ATTRIBUTE_CATEGORY',
4660 p_old_ATTRIBUTE_CATEGORY,
4661 p_new_ATTRIBUTE_CATEGORY,
4662 p_effective_date
4663 );
4664 pay_continuous_calc.event_update(p_business_group_id,
4665 p_legislation_code,
4666 'PAY_ALL_PAYROLLS_F',
4667 'COST_ALLOCATION_KEYFLEX_ID',
4668 p_old_COST_ALLOCATION_KEYFLEX_,
4669 p_new_COST_ALLOCATION_KEYFLEX_,
4670 p_effective_date
4671 );
4672 pay_continuous_calc.event_update(p_business_group_id,
4673 p_legislation_code,
4674 'PAY_ALL_PAYROLLS_F',
4675 'DEFAULT_PAYMENT_METHOD_ID',
4676 p_old_DEFAULT_PAYMENT_METHOD_I,
4677 p_new_DEFAULT_PAYMENT_METHOD_I,
4678 p_effective_date
4679 );
4680 pay_continuous_calc.event_update(p_business_group_id,
4681 p_legislation_code,
4682 'PAY_ALL_PAYROLLS_F',
4683 'PRL_INFORMATION1',
4684 p_old_PRL_INFORMATION1,
4685 p_new_PRL_INFORMATION1,
4686 p_effective_date
4687 );
4688 pay_continuous_calc.event_update(p_business_group_id,
4689 p_legislation_code,
4693 p_new_PRL_INFORMATION10,
4690 'PAY_ALL_PAYROLLS_F',
4691 'PRL_INFORMATION10',
4692 p_old_PRL_INFORMATION10,
4694 p_effective_date
4695 );
4696 pay_continuous_calc.event_update(p_business_group_id,
4697 p_legislation_code,
4698 'PAY_ALL_PAYROLLS_F',
4699 'PRL_INFORMATION11',
4700 p_old_PRL_INFORMATION11,
4701 p_new_PRL_INFORMATION11,
4702 p_effective_date
4703 );
4704 pay_continuous_calc.event_update(p_business_group_id,
4705 p_legislation_code,
4706 'PAY_ALL_PAYROLLS_F',
4707 'PRL_INFORMATION12',
4708 p_old_PRL_INFORMATION12,
4709 p_new_PRL_INFORMATION12,
4710 p_effective_date
4711 );
4712 pay_continuous_calc.event_update(p_business_group_id,
4713 p_legislation_code,
4714 'PAY_ALL_PAYROLLS_F',
4715 'PRL_INFORMATION13',
4716 p_old_PRL_INFORMATION13,
4717 p_new_PRL_INFORMATION13,
4718 p_effective_date
4719 );
4720 pay_continuous_calc.event_update(p_business_group_id,
4721 p_legislation_code,
4722 'PAY_ALL_PAYROLLS_F',
4723 'PRL_INFORMATION14',
4724 p_old_PRL_INFORMATION14,
4725 p_new_PRL_INFORMATION14,
4726 p_effective_date
4727 );
4728 pay_continuous_calc.event_update(p_business_group_id,
4729 p_legislation_code,
4730 'PAY_ALL_PAYROLLS_F',
4731 'PRL_INFORMATION15',
4732 p_old_PRL_INFORMATION15,
4733 p_new_PRL_INFORMATION15,
4734 p_effective_date
4735 );
4736 pay_continuous_calc.event_update(p_business_group_id,
4737 p_legislation_code,
4738 'PAY_ALL_PAYROLLS_F',
4739 'PRL_INFORMATION16',
4740 p_old_PRL_INFORMATION16,
4741 p_new_PRL_INFORMATION16,
4742 p_effective_date
4743 );
4744 pay_continuous_calc.event_update(p_business_group_id,
4745 p_legislation_code,
4746 'PAY_ALL_PAYROLLS_F',
4747 'PRL_INFORMATION17',
4748 p_old_PRL_INFORMATION17,
4749 p_new_PRL_INFORMATION17,
4750 p_effective_date
4751 );
4752 pay_continuous_calc.event_update(p_business_group_id,
4753 p_legislation_code,
4754 'PAY_ALL_PAYROLLS_F',
4755 'PRL_INFORMATION18',
4756 p_old_PRL_INFORMATION18,
4757 p_new_PRL_INFORMATION18,
4758 p_effective_date
4759 );
4760 pay_continuous_calc.event_update(p_business_group_id,
4761 p_legislation_code,
4762 'PAY_ALL_PAYROLLS_F',
4763 'PRL_INFORMATION19',
4764 p_old_PRL_INFORMATION19,
4765 p_new_PRL_INFORMATION19,
4766 p_effective_date
4767 );
4768 pay_continuous_calc.event_update(p_business_group_id,
4769 p_legislation_code,
4770 'PAY_ALL_PAYROLLS_F',
4771 'PRL_INFORMATION2',
4772 p_old_PRL_INFORMATION2,
4773 p_new_PRL_INFORMATION2,
4774 p_effective_date
4775 );
4776 pay_continuous_calc.event_update(p_business_group_id,
4777 p_legislation_code,
4778 'PAY_ALL_PAYROLLS_F',
4779 'PRL_INFORMATION20',
4780 p_old_PRL_INFORMATION20,
4781 p_new_PRL_INFORMATION20,
4782 p_effective_date
4783 );
4784 pay_continuous_calc.event_update(p_business_group_id,
4785 p_legislation_code,
4786 'PAY_ALL_PAYROLLS_F',
4787 'PRL_INFORMATION21',
4788 p_old_PRL_INFORMATION21,
4789 p_new_PRL_INFORMATION21,
4793 p_legislation_code,
4790 p_effective_date
4791 );
4792 pay_continuous_calc.event_update(p_business_group_id,
4794 'PAY_ALL_PAYROLLS_F',
4795 'PRL_INFORMATION22',
4796 p_old_PRL_INFORMATION22,
4797 p_new_PRL_INFORMATION22,
4798 p_effective_date
4799 );
4800 pay_continuous_calc.event_update(p_business_group_id,
4801 p_legislation_code,
4802 'PAY_ALL_PAYROLLS_F',
4803 'PRL_INFORMATION23',
4804 p_old_PRL_INFORMATION23,
4805 p_new_PRL_INFORMATION23,
4806 p_effective_date
4807 );
4808 pay_continuous_calc.event_update(p_business_group_id,
4809 p_legislation_code,
4810 'PAY_ALL_PAYROLLS_F',
4811 'PRL_INFORMATION24',
4812 p_old_PRL_INFORMATION24,
4813 p_new_PRL_INFORMATION24,
4814 p_effective_date
4815 );
4816 pay_continuous_calc.event_update(p_business_group_id,
4817 p_legislation_code,
4818 'PAY_ALL_PAYROLLS_F',
4819 'PRL_INFORMATION25',
4820 p_old_PRL_INFORMATION25,
4821 p_new_PRL_INFORMATION25,
4822 p_effective_date
4823 );
4824 pay_continuous_calc.event_update(p_business_group_id,
4825 p_legislation_code,
4826 'PAY_ALL_PAYROLLS_F',
4827 'PRL_INFORMATION26',
4828 p_old_PRL_INFORMATION26,
4829 p_new_PRL_INFORMATION26,
4830 p_effective_date
4831 );
4832 pay_continuous_calc.event_update(p_business_group_id,
4833 p_legislation_code,
4834 'PAY_ALL_PAYROLLS_F',
4835 'PRL_INFORMATION27',
4836 p_old_PRL_INFORMATION27,
4837 p_new_PRL_INFORMATION27,
4838 p_effective_date
4839 );
4840 pay_continuous_calc.event_update(p_business_group_id,
4841 p_legislation_code,
4842 'PAY_ALL_PAYROLLS_F',
4843 'PRL_INFORMATION28',
4844 p_old_PRL_INFORMATION28,
4845 p_new_PRL_INFORMATION28,
4846 p_effective_date
4847 );
4848 pay_continuous_calc.event_update(p_business_group_id,
4849 p_legislation_code,
4850 'PAY_ALL_PAYROLLS_F',
4851 'PRL_INFORMATION29',
4852 p_old_PRL_INFORMATION29,
4853 p_new_PRL_INFORMATION29,
4854 p_effective_date
4855 );
4856 pay_continuous_calc.event_update(p_business_group_id,
4857 p_legislation_code,
4858 'PAY_ALL_PAYROLLS_F',
4859 'PRL_INFORMATION3',
4860 p_old_PRL_INFORMATION3,
4861 p_new_PRL_INFORMATION3,
4862 p_effective_date
4863 );
4864 pay_continuous_calc.event_update(p_business_group_id,
4865 p_legislation_code,
4866 'PAY_ALL_PAYROLLS_F',
4867 'PRL_INFORMATION30',
4868 p_old_PRL_INFORMATION30,
4869 p_new_PRL_INFORMATION30,
4870 p_effective_date
4871 );
4872 pay_continuous_calc.event_update(p_business_group_id,
4873 p_legislation_code,
4874 'PAY_ALL_PAYROLLS_F',
4875 'PRL_INFORMATION4',
4876 p_old_PRL_INFORMATION4,
4877 p_new_PRL_INFORMATION4,
4878 p_effective_date
4879 );
4880 pay_continuous_calc.event_update(p_business_group_id,
4881 p_legislation_code,
4882 'PAY_ALL_PAYROLLS_F',
4883 'PRL_INFORMATION5',
4884 p_old_PRL_INFORMATION5,
4885 p_new_PRL_INFORMATION5,
4886 p_effective_date
4887 );
4888 pay_continuous_calc.event_update(p_business_group_id,
4889 p_legislation_code,
4890 'PAY_ALL_PAYROLLS_F',
4894 p_effective_date
4891 'PRL_INFORMATION6',
4892 p_old_PRL_INFORMATION6,
4893 p_new_PRL_INFORMATION6,
4895 );
4896 pay_continuous_calc.event_update(p_business_group_id,
4897 p_legislation_code,
4898 'PAY_ALL_PAYROLLS_F',
4899 'PRL_INFORMATION7',
4900 p_old_PRL_INFORMATION7,
4901 p_new_PRL_INFORMATION7,
4902 p_effective_date
4903 );
4904 pay_continuous_calc.event_update(p_business_group_id,
4905 p_legislation_code,
4906 'PAY_ALL_PAYROLLS_F',
4907 'PRL_INFORMATION8',
4908 p_old_PRL_INFORMATION8,
4909 p_new_PRL_INFORMATION8,
4910 p_effective_date
4911 );
4912 pay_continuous_calc.event_update(p_business_group_id,
4913 p_legislation_code,
4914 'PAY_ALL_PAYROLLS_F',
4915 'PRL_INFORMATION9',
4916 p_old_PRL_INFORMATION9,
4917 p_new_PRL_INFORMATION9,
4918 p_effective_date
4919 );
4920 pay_continuous_calc.event_update(p_business_group_id,
4921 p_legislation_code,
4922 'PAY_ALL_PAYROLLS_F',
4923 'PRL_INFORMATION_CATEGORY',
4924 p_old_PRL_INFORMATION_CATEGORY,
4925 p_new_PRL_INFORMATION_CATEGORY,
4926 p_effective_date
4927 );
4928 pay_continuous_calc.event_update(p_business_group_id,
4929 p_legislation_code,
4930 'PAY_ALL_PAYROLLS_F',
4931 'SOFT_CODING_KEYFLEX_ID',
4932 p_old_SOFT_CODING_KEYFLEX_ID,
4933 p_new_SOFT_CODING_KEYFLEX_ID,
4934 p_effective_date
4935 );
4936 pay_continuous_calc.event_update(p_business_group_id,
4937 p_legislation_code,
4938 'PAY_ALL_PAYROLLS_F',
4939 'SUSPENSE_ACCOUNT_KEYFLEX',
4940 p_old_SUSPENSE_ACCOUNT_KEYFLEX,
4941 p_new_SUSPENSE_ACCOUNT_KEYFLEX,
4942 p_effective_date
4943 );
4944 --
4945 else
4946 /* OK it must be a date track change */
4947 --
4948 pay_continuous_calc.event_update(p_business_group_id,
4949 p_legislation_code,
4950 'PAY_ALL_PAYROLLS_F',
4951 'EFFECTIVE_END_DATE',
4952 p_old_EFFECTIVE_END_DATE,
4953 p_new_EFFECTIVE_END_DATE,
4954 p_new_effective_end_date,
4955 least(p_old_effective_end_date,
4956 p_new_effective_end_date)
4957 );
4958 --
4959 pay_continuous_calc.event_update(p_business_group_id,
4960 p_legislation_code,
4961 'PAY_ALL_PAYROLLS_F',
4962 'EFFECTIVE_START_DATE',
4963 p_old_EFFECTIVE_START_DATE,
4964 p_new_EFFECTIVE_START_DATE,
4965 p_new_effective_start_date,
4966 least(p_old_effective_start_date,
4967 p_new_effective_start_date)
4968 );
4969
4970 end if;
4971 --
4972 /* Now call the API for the affected assignments */
4973 declare
4974 l_process_event_id number;
4975 l_object_version_number number;
4976 cnt number;
4977 begin
4978 if (pay_continuous_calc.g_event_list.sz <> 0) then
4979 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
4980 pay_ppe_api.create_process_event(
4981 p_assignment_id => null,
4982 p_effective_date => g_event_list.effective_date(cnt),
4983 p_change_type => g_event_list.change_type(cnt),
4984 p_status => 'U',
4985 p_description => g_event_list.description(cnt),
4986 p_process_event_id => l_process_event_id,
4987 p_object_version_number => l_object_version_number,
4988 p_event_update_id => g_event_list.event_update_id(cnt),
4989 p_business_group_id => p_business_group_id,
4990 p_calculation_date => g_event_list.calc_date(cnt),
4994 end if;
4991 p_surrogate_key => p_new_PAYROLL_ID
4992 );
4993 end loop;
4995 pay_continuous_calc.g_event_list.sz := 0;
4996 end;
4997 hr_utility.set_location('pay_continuous_calc.PAY_ALL_PAYROLLS_F_aru', 50);
4998 --
4999 end PAY_ALL_PAYROLLS_F_aru;
5000 --
5001 /* Used generator to build this procedure, but removed some of that table values.
5002 */
5003 /* PAY_ELEMENT_TYEPS_F */
5004 /* name : PAY_ELEMENT_TYPES_F_aru
5005 purpose : This is procedure that records any updates
5006 on element_types.
5007 */
5008 procedure PAY_ELEMENT_TYPES_F_aru(
5009 p_business_group_id in number,
5010 p_legislation_code in varchar2,
5011 p_effective_date in date,
5012 p_old_ATTRIBUTE1 in VARCHAR2,
5013 p_new_ATTRIBUTE1 in VARCHAR2,
5014 p_old_ATTRIBUTE10 in VARCHAR2,
5015 p_new_ATTRIBUTE10 in VARCHAR2,
5016 p_old_ATTRIBUTE11 in VARCHAR2,
5017 p_new_ATTRIBUTE11 in VARCHAR2,
5018 p_old_ATTRIBUTE12 in VARCHAR2,
5019 p_new_ATTRIBUTE12 in VARCHAR2,
5020 p_old_ATTRIBUTE13 in VARCHAR2,
5021 p_new_ATTRIBUTE13 in VARCHAR2,
5022 p_old_ATTRIBUTE14 in VARCHAR2,
5023 p_new_ATTRIBUTE14 in VARCHAR2,
5024 p_old_ATTRIBUTE15 in VARCHAR2,
5025 p_new_ATTRIBUTE15 in VARCHAR2,
5026 p_old_ATTRIBUTE16 in VARCHAR2,
5027 p_new_ATTRIBUTE16 in VARCHAR2,
5028 p_old_ATTRIBUTE17 in VARCHAR2,
5029 p_new_ATTRIBUTE17 in VARCHAR2,
5030 p_old_ATTRIBUTE18 in VARCHAR2,
5031 p_new_ATTRIBUTE18 in VARCHAR2,
5032 p_old_ATTRIBUTE19 in VARCHAR2,
5033 p_new_ATTRIBUTE19 in VARCHAR2,
5034 p_old_ATTRIBUTE2 in VARCHAR2,
5035 p_new_ATTRIBUTE2 in VARCHAR2,
5036 p_old_ATTRIBUTE20 in VARCHAR2,
5037 p_new_ATTRIBUTE20 in VARCHAR2,
5038 p_old_ATTRIBUTE3 in VARCHAR2,
5039 p_new_ATTRIBUTE3 in VARCHAR2,
5040 p_old_ATTRIBUTE4 in VARCHAR2,
5041 p_new_ATTRIBUTE4 in VARCHAR2,
5042 p_old_ATTRIBUTE5 in VARCHAR2,
5043 p_new_ATTRIBUTE5 in VARCHAR2,
5044 p_old_ATTRIBUTE6 in VARCHAR2,
5045 p_new_ATTRIBUTE6 in VARCHAR2,
5046 p_old_ATTRIBUTE7 in VARCHAR2,
5047 p_new_ATTRIBUTE7 in VARCHAR2,
5048 p_old_ATTRIBUTE8 in VARCHAR2,
5049 p_new_ATTRIBUTE8 in VARCHAR2,
5050 p_old_ATTRIBUTE9 in VARCHAR2,
5051 p_new_ATTRIBUTE9 in VARCHAR2,
5052 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
5053 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
5054 p_old_ELEMENT_INFORMATION1 in VARCHAR2,
5055 p_new_ELEMENT_INFORMATION1 in VARCHAR2,
5056 p_old_ELEMENT_INFORMATION10 in VARCHAR2,
5057 p_new_ELEMENT_INFORMATION10 in VARCHAR2,
5058 p_old_ELEMENT_INFORMATION11 in VARCHAR2,
5059 p_new_ELEMENT_INFORMATION11 in VARCHAR2,
5060 p_old_ELEMENT_INFORMATION12 in VARCHAR2,
5061 p_new_ELEMENT_INFORMATION12 in VARCHAR2,
5062 p_old_ELEMENT_INFORMATION13 in VARCHAR2,
5063 p_new_ELEMENT_INFORMATION13 in VARCHAR2,
5064 p_old_ELEMENT_INFORMATION14 in VARCHAR2,
5065 p_new_ELEMENT_INFORMATION14 in VARCHAR2,
5066 p_old_ELEMENT_INFORMATION15 in VARCHAR2,
5067 p_new_ELEMENT_INFORMATION15 in VARCHAR2,
5068 p_old_ELEMENT_INFORMATION16 in VARCHAR2,
5069 p_new_ELEMENT_INFORMATION16 in VARCHAR2,
5070 p_old_ELEMENT_INFORMATION17 in VARCHAR2,
5071 p_new_ELEMENT_INFORMATION17 in VARCHAR2,
5072 p_old_ELEMENT_INFORMATION18 in VARCHAR2,
5073 p_new_ELEMENT_INFORMATION18 in VARCHAR2,
5074 p_old_ELEMENT_INFORMATION19 in VARCHAR2,
5075 p_new_ELEMENT_INFORMATION19 in VARCHAR2,
5076 p_old_ELEMENT_INFORMATION2 in VARCHAR2,
5077 p_new_ELEMENT_INFORMATION2 in VARCHAR2,
5078 p_old_ELEMENT_INFORMATION20 in VARCHAR2,
5079 p_new_ELEMENT_INFORMATION20 in VARCHAR2,
5080 p_old_ELEMENT_INFORMATION3 in VARCHAR2,
5081 p_new_ELEMENT_INFORMATION3 in VARCHAR2,
5082 p_old_ELEMENT_INFORMATION4 in VARCHAR2,
5083 p_new_ELEMENT_INFORMATION4 in VARCHAR2,
5084 p_old_ELEMENT_INFORMATION5 in VARCHAR2,
5085 p_new_ELEMENT_INFORMATION5 in VARCHAR2,
5086 p_old_ELEMENT_INFORMATION6 in VARCHAR2,
5087 p_new_ELEMENT_INFORMATION6 in VARCHAR2,
5088 p_old_ELEMENT_INFORMATION7 in VARCHAR2,
5089 p_new_ELEMENT_INFORMATION7 in VARCHAR2,
5090 p_old_ELEMENT_INFORMATION8 in VARCHAR2,
5091 p_new_ELEMENT_INFORMATION8 in VARCHAR2,
5092 p_old_ELEMENT_INFORMATION9 in VARCHAR2,
5093 p_new_ELEMENT_INFORMATION9 in VARCHAR2,
5094 p_old_ELEMENT_INFORMATION_CATE in VARCHAR2,
5095 p_new_ELEMENT_INFORMATION_CATE in VARCHAR2,
5096 p_old_ELEMENT_TYPE_ID in NUMBER,
5097 p_new_ELEMENT_TYPE_ID in NUMBER,
5098 p_old_GROSSUP_FLAG in VARCHAR2,
5099 p_new_GROSSUP_FLAG in VARCHAR2,
5100 p_old_ITERATIVE_FLAG in VARCHAR2,
5101 p_new_ITERATIVE_FLAG in VARCHAR2,
5102 p_old_ITERATIVE_FORMULA_ID in NUMBER,
5103 p_new_ITERATIVE_FORMULA_ID in NUMBER,
5104 p_old_ITERATIVE_PRIORITY in NUMBER,
5105 p_new_ITERATIVE_PRIORITY in NUMBER,
5111 p_new_PROCESS_MODE in VARCHAR2,
5106 p_old_POST_TERMINATION_RULE in VARCHAR2,
5107 p_new_POST_TERMINATION_RULE in VARCHAR2,
5108 p_old_PROCESSING_PRIORITY in NUMBER,
5109 p_new_PROCESSING_PRIORITY in NUMBER,
5110 p_old_PROCESS_MODE in VARCHAR2,
5112 p_old_EFFECTIVE_END_DATE in DATE,
5113 p_new_EFFECTIVE_END_DATE in DATE,
5114 p_old_EFFECTIVE_START_DATE in DATE,
5115 p_new_EFFECTIVE_START_DATE in DATE
5116 )
5117 is
5118 --
5119 begin
5120 hr_utility.set_location('pay_continuous_calc.PAY_ELEMENT_TYPES_F_aru', 10);
5121 /* If the continuous calc is overriden then do nothing */
5122 if (g_override_cc = TRUE) then
5123 return;
5124 end if;
5125 --
5126 /* If the dates havent changed it must be a correction */
5127 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
5128 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
5129 --
5130 pay_continuous_calc.event_update(p_business_group_id,
5131 p_legislation_code,
5132 'PAY_ELEMENT_TYPES_F',
5133 'ATTRIBUTE1',
5134 p_old_ATTRIBUTE1,
5135 p_new_ATTRIBUTE1,
5136 p_effective_date
5137 );
5138 pay_continuous_calc.event_update(p_business_group_id,
5139 p_legislation_code,
5140 'PAY_ELEMENT_TYPES_F',
5141 'ATTRIBUTE10',
5142 p_old_ATTRIBUTE10,
5143 p_new_ATTRIBUTE10,
5144 p_effective_date
5145 );
5146 pay_continuous_calc.event_update(p_business_group_id,
5147 p_legislation_code,
5148 'PAY_ELEMENT_TYPES_F',
5149 'ATTRIBUTE11',
5150 p_old_ATTRIBUTE11,
5151 p_new_ATTRIBUTE11,
5152 p_effective_date
5153 );
5154 pay_continuous_calc.event_update(p_business_group_id,
5155 p_legislation_code,
5156 'PAY_ELEMENT_TYPES_F',
5157 'ATTRIBUTE12',
5158 p_old_ATTRIBUTE12,
5159 p_new_ATTRIBUTE12,
5160 p_effective_date
5161 );
5162 pay_continuous_calc.event_update(p_business_group_id,
5163 p_legislation_code,
5164 'PAY_ELEMENT_TYPES_F',
5165 'ATTRIBUTE13',
5166 p_old_ATTRIBUTE13,
5167 p_new_ATTRIBUTE13,
5168 p_effective_date
5169 );
5170 pay_continuous_calc.event_update(p_business_group_id,
5171 p_legislation_code,
5172 'PAY_ELEMENT_TYPES_F',
5173 'ATTRIBUTE14',
5174 p_old_ATTRIBUTE14,
5175 p_new_ATTRIBUTE14,
5176 p_effective_date
5177 );
5178 pay_continuous_calc.event_update(p_business_group_id,
5179 p_legislation_code,
5180 'PAY_ELEMENT_TYPES_F',
5181 'ATTRIBUTE15',
5182 p_old_ATTRIBUTE15,
5183 p_new_ATTRIBUTE15,
5184 p_effective_date
5185 );
5186 pay_continuous_calc.event_update(p_business_group_id,
5187 p_legislation_code,
5188 'PAY_ELEMENT_TYPES_F',
5189 'ATTRIBUTE16',
5190 p_old_ATTRIBUTE16,
5191 p_new_ATTRIBUTE16,
5192 p_effective_date
5193 );
5194 pay_continuous_calc.event_update(p_business_group_id,
5195 p_legislation_code,
5196 'PAY_ELEMENT_TYPES_F',
5197 'ATTRIBUTE17',
5198 p_old_ATTRIBUTE17,
5199 p_new_ATTRIBUTE17,
5200 p_effective_date
5201 );
5202 pay_continuous_calc.event_update(p_business_group_id,
5203 p_legislation_code,
5204 'PAY_ELEMENT_TYPES_F',
5205 'ATTRIBUTE18',
5206 p_old_ATTRIBUTE18,
5207 p_new_ATTRIBUTE18,
5208 p_effective_date
5209 );
5210 pay_continuous_calc.event_update(p_business_group_id,
5211 p_legislation_code,
5212 'PAY_ELEMENT_TYPES_F',
5213 'ATTRIBUTE19',
5214 p_old_ATTRIBUTE19,
5215 p_new_ATTRIBUTE19,
5216 p_effective_date
5220 'PAY_ELEMENT_TYPES_F',
5217 );
5218 pay_continuous_calc.event_update(p_business_group_id,
5219 p_legislation_code,
5221 'ATTRIBUTE2',
5222 p_old_ATTRIBUTE2,
5223 p_new_ATTRIBUTE2,
5224 p_effective_date
5225 );
5226 pay_continuous_calc.event_update(p_business_group_id,
5227 p_legislation_code,
5228 'PAY_ELEMENT_TYPES_F',
5229 'ATTRIBUTE20',
5230 p_old_ATTRIBUTE20,
5231 p_new_ATTRIBUTE20,
5232 p_effective_date
5233 );
5237 'ATTRIBUTE3',
5234 pay_continuous_calc.event_update(p_business_group_id,
5235 p_legislation_code,
5236 'PAY_ELEMENT_TYPES_F',
5238 p_old_ATTRIBUTE3,
5239 p_new_ATTRIBUTE3,
5240 p_effective_date
5241 );
5242 pay_continuous_calc.event_update(p_business_group_id,
5243 p_legislation_code,
5244 'PAY_ELEMENT_TYPES_F',
5245 'ATTRIBUTE4',
5246 p_old_ATTRIBUTE4,
5247 p_new_ATTRIBUTE4,
5248 p_effective_date
5249 );
5250 pay_continuous_calc.event_update(p_business_group_id,
5251 p_legislation_code,
5252 'PAY_ELEMENT_TYPES_F',
5253 'ATTRIBUTE5',
5254 p_old_ATTRIBUTE5,
5255 p_new_ATTRIBUTE5,
5256 p_effective_date
5257 );
5258 pay_continuous_calc.event_update(p_business_group_id,
5259 p_legislation_code,
5260 'PAY_ELEMENT_TYPES_F',
5261 'ATTRIBUTE6',
5262 p_old_ATTRIBUTE6,
5263 p_new_ATTRIBUTE6,
5264 p_effective_date
5265 );
5266 pay_continuous_calc.event_update(p_business_group_id,
5267 p_legislation_code,
5268 'PAY_ELEMENT_TYPES_F',
5269 'ATTRIBUTE7',
5270 p_old_ATTRIBUTE7,
5271 p_new_ATTRIBUTE7,
5272 p_effective_date
5273 );
5274 pay_continuous_calc.event_update(p_business_group_id,
5275 p_legislation_code,
5276 'PAY_ELEMENT_TYPES_F',
5277 'ATTRIBUTE8',
5278 p_old_ATTRIBUTE8,
5279 p_new_ATTRIBUTE8,
5280 p_effective_date
5281 );
5282 pay_continuous_calc.event_update(p_business_group_id,
5283 p_legislation_code,
5284 'PAY_ELEMENT_TYPES_F',
5285 'ATTRIBUTE9',
5286 p_old_ATTRIBUTE9,
5287 p_new_ATTRIBUTE9,
5288 p_effective_date
5289 );
5290 pay_continuous_calc.event_update(p_business_group_id,
5291 p_legislation_code,
5292 'PAY_ELEMENT_TYPES_F',
5293 'ATTRIBUTE_CATEGORY',
5294 p_old_ATTRIBUTE_CATEGORY,
5295 p_new_ATTRIBUTE_CATEGORY,
5296 p_effective_date
5297 );
5298 pay_continuous_calc.event_update(p_business_group_id,
5302 p_old_ELEMENT_INFORMATION1,
5299 p_legislation_code,
5300 'PAY_ELEMENT_TYPES_F',
5301 'ELEMENT_INFORMATION1',
5303 p_new_ELEMENT_INFORMATION1,
5304 p_effective_date
5305 );
5306 pay_continuous_calc.event_update(p_business_group_id,
5307 p_legislation_code,
5308 'PAY_ELEMENT_TYPES_F',
5309 'ELEMENT_INFORMATION10',
5310 p_old_ELEMENT_INFORMATION10,
5311 p_new_ELEMENT_INFORMATION10,
5312 p_effective_date
5313 );
5314 pay_continuous_calc.event_update(p_business_group_id,
5315 p_legislation_code,
5316 'PAY_ELEMENT_TYPES_F',
5317 'ELEMENT_INFORMATION11',
5318 p_old_ELEMENT_INFORMATION11,
5319 p_new_ELEMENT_INFORMATION11,
5320 p_effective_date
5321 );
5322 pay_continuous_calc.event_update(p_business_group_id,
5323 p_legislation_code,
5324 'PAY_ELEMENT_TYPES_F',
5325 'ELEMENT_INFORMATION12',
5326 p_old_ELEMENT_INFORMATION12,
5327 p_new_ELEMENT_INFORMATION12,
5328 p_effective_date
5329 );
5330 pay_continuous_calc.event_update(p_business_group_id,
5331 p_legislation_code,
5332 'PAY_ELEMENT_TYPES_F',
5333 'ELEMENT_INFORMATION13',
5334 p_old_ELEMENT_INFORMATION13,
5335 p_new_ELEMENT_INFORMATION13,
5336 p_effective_date
5337 );
5338 pay_continuous_calc.event_update(p_business_group_id,
5339 p_legislation_code,
5340 'PAY_ELEMENT_TYPES_F',
5341 'ELEMENT_INFORMATION14',
5342 p_old_ELEMENT_INFORMATION14,
5343 p_new_ELEMENT_INFORMATION14,
5344 p_effective_date
5345 );
5346 pay_continuous_calc.event_update(p_business_group_id,
5347 p_legislation_code,
5348 'PAY_ELEMENT_TYPES_F',
5349 'ELEMENT_INFORMATION15',
5350 p_old_ELEMENT_INFORMATION15,
5351 p_new_ELEMENT_INFORMATION15,
5352 p_effective_date
5353 );
5354 pay_continuous_calc.event_update(p_business_group_id,
5355 p_legislation_code,
5356 'PAY_ELEMENT_TYPES_F',
5357 'ELEMENT_INFORMATION16',
5358 p_old_ELEMENT_INFORMATION16,
5359 p_new_ELEMENT_INFORMATION16,
5360 p_effective_date
5361 );
5362 pay_continuous_calc.event_update(p_business_group_id,
5363 p_legislation_code,
5364 'PAY_ELEMENT_TYPES_F',
5365 'ELEMENT_INFORMATION17',
5366 p_old_ELEMENT_INFORMATION17,
5367 p_new_ELEMENT_INFORMATION17,
5368 p_effective_date
5369 );
5370 pay_continuous_calc.event_update(p_business_group_id,
5371 p_legislation_code,
5372 'PAY_ELEMENT_TYPES_F',
5373 'ELEMENT_INFORMATION18',
5374 p_old_ELEMENT_INFORMATION18,
5375 p_new_ELEMENT_INFORMATION18,
5376 p_effective_date
5377 );
5378 pay_continuous_calc.event_update(p_business_group_id,
5382 p_old_ELEMENT_INFORMATION19,
5379 p_legislation_code,
5380 'PAY_ELEMENT_TYPES_F',
5381 'ELEMENT_INFORMATION19',
5383 p_new_ELEMENT_INFORMATION19,
5384 p_effective_date
5385 );
5386 pay_continuous_calc.event_update(p_business_group_id,
5387 p_legislation_code,
5388 'PAY_ELEMENT_TYPES_F',
5389 'ELEMENT_INFORMATION2',
5390 p_old_ELEMENT_INFORMATION2,
5391 p_new_ELEMENT_INFORMATION2,
5392 p_effective_date
5393 );
5394 pay_continuous_calc.event_update(p_business_group_id,
5395 p_legislation_code,
5396 'PAY_ELEMENT_TYPES_F',
5397 'ELEMENT_INFORMATION20',
5398 p_old_ELEMENT_INFORMATION20,
5399 p_new_ELEMENT_INFORMATION20,
5400 p_effective_date
5401 );
5402 pay_continuous_calc.event_update(p_business_group_id,
5403 p_legislation_code,
5404 'PAY_ELEMENT_TYPES_F',
5405 'ELEMENT_INFORMATION3',
5406 p_old_ELEMENT_INFORMATION3,
5407 p_new_ELEMENT_INFORMATION3,
5408 p_effective_date
5409 );
5410 pay_continuous_calc.event_update(p_business_group_id,
5411 p_legislation_code,
5412 'PAY_ELEMENT_TYPES_F',
5413 'ELEMENT_INFORMATION4',
5414 p_old_ELEMENT_INFORMATION4,
5415 p_new_ELEMENT_INFORMATION4,
5416 p_effective_date
5417 );
5418 pay_continuous_calc.event_update(p_business_group_id,
5419 p_legislation_code,
5420 'PAY_ELEMENT_TYPES_F',
5421 'ELEMENT_INFORMATION5',
5422 p_old_ELEMENT_INFORMATION5,
5423 p_new_ELEMENT_INFORMATION5,
5424 p_effective_date
5425 );
5426 pay_continuous_calc.event_update(p_business_group_id,
5427 p_legislation_code,
5428 'PAY_ELEMENT_TYPES_F',
5429 'ELEMENT_INFORMATION6',
5430 p_old_ELEMENT_INFORMATION6,
5431 p_new_ELEMENT_INFORMATION6,
5432 p_effective_date
5433 );
5434 pay_continuous_calc.event_update(p_business_group_id,
5435 p_legislation_code,
5436 'PAY_ELEMENT_TYPES_F',
5437 'ELEMENT_INFORMATION7',
5438 p_old_ELEMENT_INFORMATION7,
5439 p_new_ELEMENT_INFORMATION7,
5440 p_effective_date
5441 );
5442 pay_continuous_calc.event_update(p_business_group_id,
5443 p_legislation_code,
5444 'PAY_ELEMENT_TYPES_F',
5445 'ELEMENT_INFORMATION8',
5446 p_old_ELEMENT_INFORMATION8,
5447 p_new_ELEMENT_INFORMATION8,
5448 p_effective_date
5449 );
5450 pay_continuous_calc.event_update(p_business_group_id,
5451 p_legislation_code,
5452 'PAY_ELEMENT_TYPES_F',
5453 'ELEMENT_INFORMATION9',
5454 p_old_ELEMENT_INFORMATION9,
5455 p_new_ELEMENT_INFORMATION9,
5456 p_effective_date
5457 );
5458 pay_continuous_calc.event_update(p_business_group_id,
5459 p_legislation_code,
5460 'PAY_ELEMENT_TYPES_F',
5461 'ELEMENT_INFORMATION_CATEGORY',
5462 p_old_ELEMENT_INFORMATION_CATE,
5463 p_new_ELEMENT_INFORMATION_CATE,
5464 p_effective_date
5465 );
5466 pay_continuous_calc.event_update(p_business_group_id,
5467 p_legislation_code,
5468 'PAY_ELEMENT_TYPES_F',
5469 'GROSSUP_FLAG',
5470 p_old_GROSSUP_FLAG,
5471 p_new_GROSSUP_FLAG,
5472 p_effective_date
5473 );
5474 pay_continuous_calc.event_update(p_business_group_id,
5475 p_legislation_code,
5476 'PAY_ELEMENT_TYPES_F',
5477 'ITERATIVE_FLAG',
5481 );
5478 p_old_ITERATIVE_FLAG,
5479 p_new_ITERATIVE_FLAG,
5480 p_effective_date
5482 pay_continuous_calc.event_update(p_business_group_id,
5483 p_legislation_code,
5484 'PAY_ELEMENT_TYPES_F',
5485 'ITERATIVE_FORMULA_ID',
5486 p_old_ITERATIVE_FORMULA_ID,
5487 p_new_ITERATIVE_FORMULA_ID,
5488 p_effective_date
5489 );
5490 pay_continuous_calc.event_update(p_business_group_id,
5491 p_legislation_code,
5492 'PAY_ELEMENT_TYPES_F',
5493 'ITERATIVE_PRIORITY',
5494 p_old_ITERATIVE_PRIORITY,
5495 p_new_ITERATIVE_PRIORITY,
5496 p_effective_date
5497 );
5498 pay_continuous_calc.event_update(p_business_group_id,
5499 p_legislation_code,
5500 'PAY_ELEMENT_TYPES_F',
5501 'POST_TERMINATION_RULE',
5502 p_old_POST_TERMINATION_RULE,
5503 p_new_POST_TERMINATION_RULE,
5504 p_effective_date
5505 );
5506 pay_continuous_calc.event_update(p_business_group_id,
5507 p_legislation_code,
5508 'PAY_ELEMENT_TYPES_F',
5509 'PROCESSING_PRIORITY',
5510 p_old_PROCESSING_PRIORITY,
5511 p_new_PROCESSING_PRIORITY,
5512 p_effective_date
5513 );
5514 pay_continuous_calc.event_update(p_business_group_id,
5515 p_legislation_code,
5516 'PAY_ELEMENT_TYPES_F',
5517 'PROCESS_MODE',
5518 p_old_PROCESS_MODE,
5519 p_new_PROCESS_MODE,
5520 p_effective_date
5521 );
5522 --
5523 else
5524 /* OK it must be a date track change */
5525 --
5526 pay_continuous_calc.event_update(p_business_group_id,
5527 p_legislation_code,
5528 'PAY_ELEMENT_TYPES_F',
5529 'EFFECTIVE_END_DATE',
5530 p_old_EFFECTIVE_END_DATE,
5531 p_new_EFFECTIVE_END_DATE,
5532 p_new_effective_end_date,
5533 least(p_old_effective_end_date,
5534 p_new_effective_end_date)
5535 );
5536 --
5537 pay_continuous_calc.event_update(p_business_group_id,
5538 p_legislation_code,
5539 'PAY_ELEMENT_TYPES_F',
5540 'EFFECTIVE_START_DATE',
5541 p_old_EFFECTIVE_START_DATE,
5542 p_new_EFFECTIVE_START_DATE,
5543 p_new_effective_start_date,
5544 least(p_old_effective_start_date,
5545 p_new_effective_start_date)
5546 );
5547
5548 end if;
5549 --
5550 /* Now call the API for the affected assignments */
5551 declare
5552 l_process_event_id number;
5553 l_object_version_number number;
5554 cnt number;
5555 begin
5556 if (pay_continuous_calc.g_event_list.sz <> 0) then
5557 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
5558 pay_ppe_api.create_process_event(
5559 p_assignment_id => null,
5560 p_effective_date => g_event_list.effective_date(cnt),
5561 p_change_type => g_event_list.change_type(cnt),
5562 p_status => 'U',
5563 p_description => g_event_list.description(cnt),
5564 p_process_event_id => l_process_event_id,
5565 p_object_version_number => l_object_version_number,
5566 p_event_update_id => g_event_list.event_update_id(cnt),
5567 p_business_group_id => p_business_group_id,
5568 p_calculation_date => g_event_list.calc_date(cnt),
5569 p_surrogate_key => p_new_ELEMENT_TYPE_ID
5570 );
5571 end loop;
5572 end if;
5573 pay_continuous_calc.g_event_list.sz := 0;
5574 end;
5575 hr_utility.set_location('pay_continuous_calc.PAY_ELEMENT_TYPES_F_aru', 50);
5576 --
5577 end PAY_ELEMENT_TYPES_F_aru;
5578 --
5582 on grade_rules.
5579 /* PAY_GRADE_RULES_F */
5580 /* name : PAY_GRADE_RULES_F_aru
5581 purpose : This is procedure that records any updates
5583 */
5584 procedure PAY_GRADE_RULES_F_aru(
5585 p_business_group_id in number,
5586 p_legislation_code in varchar2,
5587 p_effective_date in date ,
5588 p_old_GRADE_OR_SPINAL_POINT_ID in NUMBER,
5589 p_new_GRADE_OR_SPINAL_POINT_ID in NUMBER ,
5590 p_old_GRADE_RULE_ID in NUMBER,
5591 p_new_GRADE_RULE_ID in NUMBER ,
5592 p_old_MAXIMUM in VARCHAR2,
5593 p_new_MAXIMUM in VARCHAR2 ,
5594 p_old_MID_VALUE in VARCHAR2,
5595 p_new_MID_VALUE in VARCHAR2 ,
5596 p_old_MINIMUM in VARCHAR2,
5597 p_new_MINIMUM in VARCHAR2 ,
5598 p_old_PROGRAM_APPLICATION_ID in NUMBER,
5599 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
5600 p_old_PROGRAM_ID in NUMBER,
5601 p_new_PROGRAM_ID in NUMBER ,
5602 p_old_PROGRAM_UPDATE_DATE in DATE,
5603 p_new_PROGRAM_UPDATE_DATE in DATE ,
5604 p_old_RATE_ID in NUMBER,
5605 p_new_RATE_ID in NUMBER ,
5606 p_old_RATE_TYPE in VARCHAR2,
5607 p_new_RATE_TYPE in VARCHAR2 ,
5608 p_old_REQUEST_ID in NUMBER,
5609 p_new_REQUEST_ID in NUMBER ,
5610 p_old_SEQUENCE in NUMBER,
5611 p_new_SEQUENCE in NUMBER ,
5612 p_old_VALUE in VARCHAR2,
5613 p_new_VALUE in VARCHAR2 ,
5614 p_old_EFFECTIVE_END_DATE in DATE,
5615 p_new_EFFECTIVE_END_DATE in DATE ,
5616 p_old_EFFECTIVE_START_DATE in DATE,
5617 p_new_EFFECTIVE_START_DATE in DATE
5618 )
5619 is
5620 --
5621 begin
5622 /* If the continuous calc is overriden then do nothing */
5623 if (g_override_cc = TRUE) then
5624 return;
5625 end if;
5626 --
5627 /* If the dates havent changed it must be a correction */
5628 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
5629 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
5630 --
5631 pay_continuous_calc.event_update(p_business_group_id,
5632 p_legislation_code,
5633 'PAY_GRADE_RULES_F',
5634 'GRADE_OR_SPINAL_POINT_ID',
5635 p_old_GRADE_OR_SPINAL_POINT_ID,
5636 p_new_GRADE_OR_SPINAL_POINT_ID,
5637 p_effective_date
5638 );
5639 --
5640 pay_continuous_calc.event_update(p_business_group_id,
5641 p_legislation_code,
5642 'PAY_GRADE_RULES_F',
5643 'GRADE_RULE_ID',
5644 p_old_GRADE_RULE_ID,
5645 p_new_GRADE_RULE_ID,
5646 p_effective_date
5647 );
5648 --
5649 pay_continuous_calc.event_update(p_business_group_id,
5650 p_legislation_code,
5651 'PAY_GRADE_RULES_F',
5652 'MAXIMUM',
5653 p_old_MAXIMUM,
5654 p_new_MAXIMUM,
5655 p_effective_date
5656 );
5657 --
5658 pay_continuous_calc.event_update(p_business_group_id,
5659 p_legislation_code,
5660 'PAY_GRADE_RULES_F',
5661 'MID_VALUE',
5662 p_old_MID_VALUE,
5663 p_new_MID_VALUE,
5664 p_effective_date
5665 );
5666 --
5667 pay_continuous_calc.event_update(p_business_group_id,
5668 p_legislation_code,
5669 'PAY_GRADE_RULES_F',
5670 'MINIMUM',
5671 p_old_MINIMUM,
5672 p_new_MINIMUM,
5673 p_effective_date
5674 );
5675 --
5676 pay_continuous_calc.event_update(p_business_group_id,
5677 p_legislation_code,
5678 'PAY_GRADE_RULES_F',
5679 'PROGRAM_APPLICATION_ID',
5680 p_old_PROGRAM_APPLICATION_ID,
5681 p_new_PROGRAM_APPLICATION_ID,
5682 p_effective_date
5683 );
5684 --
5685 pay_continuous_calc.event_update(p_business_group_id,
5686 p_legislation_code,
5687 'PAY_GRADE_RULES_F',
5688 'PROGRAM_ID',
5689 p_old_PROGRAM_ID,
5690 p_new_PROGRAM_ID,
5691 p_effective_date
5692 );
5693 --
5694 pay_continuous_calc.event_update(p_business_group_id,
5695 p_legislation_code,
5696 'PAY_GRADE_RULES_F',
5697 'PROGRAM_UPDATE_DATE',
5698 p_old_PROGRAM_UPDATE_DATE,
5699 p_new_PROGRAM_UPDATE_DATE,
5700 p_effective_date
5701 );
5702 --
5703 pay_continuous_calc.event_update(p_business_group_id,
5704 p_legislation_code,
5705 'PAY_GRADE_RULES_F',
5709 p_effective_date
5706 'RATE_ID',
5707 p_old_RATE_ID,
5708 p_new_RATE_ID,
5710 );
5711 --
5712 pay_continuous_calc.event_update(p_business_group_id,
5713 p_legislation_code,
5714 'PAY_GRADE_RULES_F',
5715 'RATE_TYPE',
5716 p_old_RATE_TYPE,
5717 p_new_RATE_TYPE,
5718 p_effective_date
5719 );
5720 --
5721 pay_continuous_calc.event_update(p_business_group_id,
5722 p_legislation_code,
5723 'PAY_GRADE_RULES_F',
5724 'REQUEST_ID',
5725 p_old_REQUEST_ID,
5726 p_new_REQUEST_ID,
5727 p_effective_date
5728 );
5729 --
5730 pay_continuous_calc.event_update(p_business_group_id,
5734 p_old_SEQUENCE,
5731 p_legislation_code,
5732 'PAY_GRADE_RULES_F',
5733 'SEQUENCE',
5735 p_new_SEQUENCE,
5736 p_effective_date
5737 );
5738 --
5739 pay_continuous_calc.event_update(p_business_group_id,
5740 p_legislation_code,
5741 'PAY_GRADE_RULES_F',
5742 'VALUE',
5743 p_old_VALUE,
5744 p_new_VALUE,
5745 p_effective_date
5746 );
5747 --
5748 pay_continuous_calc.event_update(p_business_group_id,
5749 p_legislation_code,
5750 'PAY_GRADE_RULES_F',
5751 'VALUE',
5752 p_old_VALUE,
5753 p_new_VALUE,
5754 p_effective_date
5755 );
5756 else
5757 /* OK it must be a date track change */
5758 --
5759 pay_continuous_calc.event_update(p_business_group_id,
5760 p_legislation_code,
5761 'PAY_GRADE_RULES_F',
5762 'EFFECTIVE_END_DATE',
5763 p_old_EFFECTIVE_END_DATE,
5764 p_new_EFFECTIVE_END_DATE,
5765 p_new_effective_end_date,
5766 least(p_old_effective_end_date,
5767 p_new_effective_end_date)
5768 );
5769 --
5770 pay_continuous_calc.event_update(p_business_group_id,
5771 p_legislation_code,
5772 'PAY_GRADE_RULES_F',
5773 'EFFECTIVE_START_DATE',
5774 p_old_EFFECTIVE_START_DATE,
5775 p_new_EFFECTIVE_START_DATE,
5776 p_new_effective_start_date,
5777 least(p_old_effective_start_date,
5778 p_new_effective_start_date)
5779 );
5780
5781 end if;
5782 --
5783 /* Now call the API for the affected assignments */
5784 declare
5785 l_process_event_id number;
5786 l_object_version_number number;
5787 cnt number;
5788 begin
5789 if (pay_continuous_calc.g_event_list.sz <> 0) then
5790 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
5791 pay_ppe_api.create_process_event(
5792 p_assignment_id => null,
5793 p_effective_date => g_event_list.effective_date(cnt),
5794 p_change_type => g_event_list.change_type(cnt),
5795 p_status => 'U',
5796 p_description => g_event_list.description(cnt),
5797 p_process_event_id => l_process_event_id,
5801 p_calculation_date => g_event_list.calc_date(cnt),
5798 p_object_version_number => l_object_version_number,
5799 p_event_update_id => g_event_list.event_update_id(cnt),
5800 p_business_group_id => p_business_group_id,
5802 p_surrogate_key => p_new_GRADE_RULE_ID
5803 );
5804 end loop;
5805 end if;
5806 pay_continuous_calc.g_event_list.sz := 0;
5807 end;
5808 --
5809 end PAY_GRADE_RULES_F_aru;
5810 --
5811
5812
5813 /* PER_ADDRESSES */
5814 /* name : PER_ADDRESSES_ari
5815 purpose : This is procedure that records any insert
5816 on addresses table.
5817 */
5818 Procedure PER_ADDRESSES_ari(
5819 p_business_group_id in number,
5820 p_legislation_code in varchar2,
5821 p_person_id in number,
5822 p_effective_start_date in date,
5823 p_new_address_id in number
5824 )
5825 is
5826 --
5827 cursor asgcur (p_person_id number) is
5828 select distinct assignment_id
5829 from per_assignments_f
5830 where person_id = p_person_id;
5831 --
5832 l_process_event_id number;
5833 l_proc varchar2(240) := g_package||'.per_addresses_ari';
5834 begin
5835 hr_utility.set_location(l_proc, 10);
5836 /* If the continuous calc is overriden then do nothing */
5837 if (g_override_cc = TRUE) then
5838 return;
5839 end if;
5840 --
5841 pay_continuous_calc.event_update(p_business_group_id,
5842 p_legislation_code,
5843 'PER_ADDRESSES',
5844 NULL,
5845 NULL,
5846 NULL,
5847 p_effective_start_date,
5848 p_effective_start_date,
5849 'I'
5850 );
5851 /* Now call the API for the affected assignments */
5852 declare
5853 cnt number;
5854 l_process_event_id number;
5855 l_object_version_number number;
5856 begin
5857 if (pay_continuous_calc.g_event_list.sz <> 0) then
5858 for asgrec in asgcur (p_person_id) loop
5859 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
5860 pay_ppe_api.create_process_event(
5861 p_assignment_id => asgrec.assignment_id,
5862 p_effective_date => g_event_list.effective_date(cnt),
5863 p_change_type => g_event_list.change_type(cnt),
5864 p_status => 'U',
5865 p_description => g_event_list.description(cnt),
5866 p_process_event_id => l_process_event_id,
5867 p_object_version_number => l_object_version_number,
5868 p_event_update_id => g_event_list.event_update_id(cnt),
5869 p_business_group_id => p_business_group_id,
5870 p_calculation_date => g_event_list.calc_date(cnt),
5871 p_surrogate_key => p_new_address_id
5872 );
5873 end loop;
5874 end loop;
5875 end if;
5876 pay_continuous_calc.g_event_list.sz := 0;
5877 end;
5878 hr_utility.set_location(l_proc, 900);
5879
5880 end PER_ADDRESSES_ari;
5881
5882 --
5883
5884 /* name : PER_ADDRESSES_aru
5885 purpose : This is procedure that records any updates
5886 on addresses.
5887 */
5888 procedure PER_ADDRESSES_aru(
5889 p_business_group_id in number,
5890 p_legislation_code in varchar2,
5891 p_effective_date in date ,
5892 p_old_ADDRESS_ID in NUMBER,
5893 p_new_ADDRESS_ID in NUMBER ,
5894 p_old_ADDRESS_LINE1 in VARCHAR2,
5895 p_new_ADDRESS_LINE1 in VARCHAR2 ,
5896 p_old_ADDRESS_LINE2 in VARCHAR2,
5897 p_new_ADDRESS_LINE2 in VARCHAR2 ,
5898 p_old_ADDRESS_LINE3 in VARCHAR2,
5899 p_new_ADDRESS_LINE3 in VARCHAR2 ,
5900 p_old_ADDRESS_TYPE in VARCHAR2,
5901 p_new_ADDRESS_TYPE in VARCHAR2 ,
5902 p_old_ADDR_ATTRIBUTE1 in VARCHAR2,
5903 p_new_ADDR_ATTRIBUTE1 in VARCHAR2 ,
5904 p_old_ADDR_ATTRIBUTE10 in VARCHAR2,
5905 p_new_ADDR_ATTRIBUTE10 in VARCHAR2 ,
5906 p_old_ADDR_ATTRIBUTE11 in VARCHAR2,
5907 p_new_ADDR_ATTRIBUTE11 in VARCHAR2 ,
5908 p_old_ADDR_ATTRIBUTE12 in VARCHAR2,
5909 p_new_ADDR_ATTRIBUTE12 in VARCHAR2 ,
5910 p_old_ADDR_ATTRIBUTE13 in VARCHAR2,
5911 p_new_ADDR_ATTRIBUTE13 in VARCHAR2 ,
5912 p_old_ADDR_ATTRIBUTE14 in VARCHAR2,
5913 p_new_ADDR_ATTRIBUTE14 in VARCHAR2 ,
5914 p_old_ADDR_ATTRIBUTE15 in VARCHAR2,
5915 p_new_ADDR_ATTRIBUTE15 in VARCHAR2 ,
5916 p_old_ADDR_ATTRIBUTE16 in VARCHAR2,
5917 p_new_ADDR_ATTRIBUTE16 in VARCHAR2 ,
5918 p_old_ADDR_ATTRIBUTE17 in VARCHAR2,
5919 p_new_ADDR_ATTRIBUTE17 in VARCHAR2 ,
5920 p_old_ADDR_ATTRIBUTE18 in VARCHAR2,
5921 p_new_ADDR_ATTRIBUTE18 in VARCHAR2 ,
5922 p_old_ADDR_ATTRIBUTE19 in VARCHAR2,
5923 p_new_ADDR_ATTRIBUTE19 in VARCHAR2 ,
5924 p_old_ADDR_ATTRIBUTE2 in VARCHAR2,
5925 p_new_ADDR_ATTRIBUTE2 in VARCHAR2 ,
5926 p_old_ADDR_ATTRIBUTE20 in VARCHAR2,
5927 p_new_ADDR_ATTRIBUTE20 in VARCHAR2 ,
5928 p_old_ADDR_ATTRIBUTE3 in VARCHAR2,
5929 p_new_ADDR_ATTRIBUTE3 in VARCHAR2 ,
5933 p_new_ADDR_ATTRIBUTE5 in VARCHAR2 ,
5930 p_old_ADDR_ATTRIBUTE4 in VARCHAR2,
5931 p_new_ADDR_ATTRIBUTE4 in VARCHAR2 ,
5932 p_old_ADDR_ATTRIBUTE5 in VARCHAR2,
5934 p_old_ADDR_ATTRIBUTE6 in VARCHAR2,
5935 p_new_ADDR_ATTRIBUTE6 in VARCHAR2 ,
5936 p_old_ADDR_ATTRIBUTE7 in VARCHAR2,
5937 p_new_ADDR_ATTRIBUTE7 in VARCHAR2 ,
5938 p_old_ADDR_ATTRIBUTE8 in VARCHAR2,
5939 p_new_ADDR_ATTRIBUTE8 in VARCHAR2 ,
5940 p_old_ADDR_ATTRIBUTE9 in VARCHAR2,
5941 p_new_ADDR_ATTRIBUTE9 in VARCHAR2 ,
5942 p_old_ADDR_ATTRIBUTE_CATEGORY in VARCHAR2,
5943 p_new_ADDR_ATTRIBUTE_CATEGORY in VARCHAR2 ,
5944 p_old_ADD_INFORMATION13 in VARCHAR2,
5945 p_new_ADD_INFORMATION13 in VARCHAR2 ,
5946 p_old_ADD_INFORMATION14 in VARCHAR2,
5947 p_new_ADD_INFORMATION14 in VARCHAR2 ,
5948 p_old_ADD_INFORMATION15 in VARCHAR2,
5949 p_new_ADD_INFORMATION15 in VARCHAR2 ,
5950 p_old_ADD_INFORMATION16 in VARCHAR2,
5951 p_new_ADD_INFORMATION16 in VARCHAR2 ,
5952 p_old_ADD_INFORMATION17 in VARCHAR2,
5953 p_new_ADD_INFORMATION17 in VARCHAR2 ,
5954 p_old_ADD_INFORMATION18 in VARCHAR2,
5955 p_new_ADD_INFORMATION18 in VARCHAR2 ,
5956 p_old_ADD_INFORMATION19 in VARCHAR2,
5957 p_new_ADD_INFORMATION19 in VARCHAR2 ,
5958 p_old_ADD_INFORMATION20 in VARCHAR2,
5959 p_new_ADD_INFORMATION20 in VARCHAR2 ,
5960 p_old_BUSINESS_GROUP_ID in NUMBER,
5961 p_new_BUSINESS_GROUP_ID in NUMBER ,
5962 p_old_COUNTRY in VARCHAR2,
5963 p_new_COUNTRY in VARCHAR2 ,
5964 p_old_DATE_FROM in DATE,
5965 p_new_DATE_FROM in DATE ,
5966 p_old_DATE_TO in DATE,
5967 p_new_DATE_TO in DATE ,
5968 p_old_PERSON_ID in NUMBER,
5969 p_new_PERSON_ID in NUMBER ,
5970 p_old_POSTAL_CODE in VARCHAR2,
5971 p_new_POSTAL_CODE in VARCHAR2 ,
5972 p_old_PRIMARY_FLAG in VARCHAR2,
5973 p_new_PRIMARY_FLAG in VARCHAR2 ,
5974 p_old_PROGRAM_APPLICATION_ID in NUMBER,
5975 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
5976 p_old_PROGRAM_ID in NUMBER,
5977 p_new_PROGRAM_ID in NUMBER ,
5978 p_old_PROGRAM_UPDATE_DATE in DATE,
5979 p_new_PROGRAM_UPDATE_DATE in DATE ,
5980 p_old_REGION_1 in VARCHAR2,
5981 p_new_REGION_1 in VARCHAR2 ,
5982 p_old_REGION_2 in VARCHAR2,
5983 p_new_REGION_2 in VARCHAR2 ,
5984 p_old_REGION_3 in VARCHAR2,
5985 p_new_REGION_3 in VARCHAR2 ,
5986 p_old_REQUEST_ID in NUMBER,
5987 p_new_REQUEST_ID in NUMBER ,
5988 p_old_STYLE in VARCHAR2,
5989 p_new_STYLE in VARCHAR2 ,
5990 p_old_TELEPHONE_NUMBER_1 in VARCHAR2,
5991 p_new_TELEPHONE_NUMBER_1 in VARCHAR2 ,
5992 p_old_TELEPHONE_NUMBER_2 in VARCHAR2,
5993 p_new_TELEPHONE_NUMBER_2 in VARCHAR2 ,
5994 p_old_TELEPHONE_NUMBER_3 in VARCHAR2,
5995 p_new_TELEPHONE_NUMBER_3 in VARCHAR2 ,
5996 p_old_TOWN_OR_CITY in VARCHAR2,
5997 p_new_TOWN_OR_CITY in VARCHAR2
5998 )
5999 is
6000 --
6001 cursor asgcur (p_person_id number) is
6002 select distinct assignment_id
6003 from per_assignments_f
6004 where person_id = p_person_id;
6005 --
6006 begin
6007 /* If the continuous calc is overriden then do nothing */
6008 if (g_override_cc = TRUE) then
6009 return;
6010 end if;
6011 --
6012 pay_continuous_calc.event_update(p_business_group_id,
6013 p_legislation_code,
6014 'PER_ADDRESSES',
6015 'ADDRESS_ID',
6016 p_old_ADDRESS_ID,
6017 p_new_ADDRESS_ID,
6018 p_effective_date
6019 );
6020 --
6021 pay_continuous_calc.event_update(p_business_group_id,
6022 p_legislation_code,
6023 'PER_ADDRESSES',
6024 'ADDRESS_LINE1',
6025 p_old_ADDRESS_LINE1,
6026 p_new_ADDRESS_LINE1,
6027 p_effective_date
6028 );
6029 --
6030 pay_continuous_calc.event_update(p_business_group_id,
6031 p_legislation_code,
6032 'PER_ADDRESSES',
6033 'ADDRESS_LINE2',
6034 p_old_ADDRESS_LINE2,
6035 p_new_ADDRESS_LINE2,
6036 p_effective_date
6037 );
6038 --
6039 pay_continuous_calc.event_update(p_business_group_id,
6040 p_legislation_code,
6041 'PER_ADDRESSES',
6042 'ADDRESS_LINE3',
6043 p_old_ADDRESS_LINE3,
6044 p_new_ADDRESS_LINE3,
6045 p_effective_date
6046 );
6047 --
6048 pay_continuous_calc.event_update(p_business_group_id,
6049 p_legislation_code,
6050 'PER_ADDRESSES',
6051 'ADDRESS_TYPE',
6052 p_old_ADDRESS_TYPE,
6053 p_new_ADDRESS_TYPE,
6054 p_effective_date
6055 );
6056 --
6057 pay_continuous_calc.event_update(p_business_group_id,
6058 p_legislation_code,
6059 'PER_ADDRESSES',
6060 'ADDR_ATTRIBUTE1',
6061 p_old_ADDR_ATTRIBUTE1,
6062 p_new_ADDR_ATTRIBUTE1,
6063 p_effective_date
6067 p_legislation_code,
6064 );
6065 --
6066 pay_continuous_calc.event_update(p_business_group_id,
6068 'PER_ADDRESSES',
6069 'ADDR_ATTRIBUTE10',
6070 p_old_ADDR_ATTRIBUTE10,
6071 p_new_ADDR_ATTRIBUTE10,
6072 p_effective_date
6073 );
6074 --
6075 pay_continuous_calc.event_update(p_business_group_id,
6076 p_legislation_code,
6077 'PER_ADDRESSES',
6078 'ADDR_ATTRIBUTE11',
6079 p_old_ADDR_ATTRIBUTE11,
6080 p_new_ADDR_ATTRIBUTE11,
6081 p_effective_date
6082 );
6083 --
6084 pay_continuous_calc.event_update(p_business_group_id,
6085 p_legislation_code,
6086 'PER_ADDRESSES',
6087 'ADDR_ATTRIBUTE12',
6088 p_old_ADDR_ATTRIBUTE12,
6089 p_new_ADDR_ATTRIBUTE12,
6090 p_effective_date
6091 );
6092 --
6093 pay_continuous_calc.event_update(p_business_group_id,
6094 p_legislation_code,
6095 'PER_ADDRESSES',
6096 'ADDR_ATTRIBUTE13',
6097 p_old_ADDR_ATTRIBUTE13,
6098 p_new_ADDR_ATTRIBUTE13,
6099 p_effective_date
6100 );
6101 --
6102 pay_continuous_calc.event_update(p_business_group_id,
6103 p_legislation_code,
6104 'PER_ADDRESSES',
6105 'ADDR_ATTRIBUTE14',
6106 p_old_ADDR_ATTRIBUTE14,
6107 p_new_ADDR_ATTRIBUTE14,
6108 p_effective_date
6109 );
6110 --
6111 pay_continuous_calc.event_update(p_business_group_id,
6112 p_legislation_code,
6113 'PER_ADDRESSES',
6114 'ADDR_ATTRIBUTE15',
6115 p_old_ADDR_ATTRIBUTE15,
6116 p_new_ADDR_ATTRIBUTE15,
6117 p_effective_date
6118 );
6119 --
6120 pay_continuous_calc.event_update(p_business_group_id,
6121 p_legislation_code,
6122 'PER_ADDRESSES',
6123 'ADDR_ATTRIBUTE16',
6124 p_old_ADDR_ATTRIBUTE16,
6125 p_new_ADDR_ATTRIBUTE16,
6126 p_effective_date
6127 );
6128 --
6129 pay_continuous_calc.event_update(p_business_group_id,
6130 p_legislation_code,
6131 'PER_ADDRESSES',
6132 'ADDR_ATTRIBUTE17',
6133 p_old_ADDR_ATTRIBUTE17,
6134 p_new_ADDR_ATTRIBUTE17,
6135 p_effective_date
6136 );
6137 --
6138 pay_continuous_calc.event_update(p_business_group_id,
6139 p_legislation_code,
6140 'PER_ADDRESSES',
6141 'ADDR_ATTRIBUTE18',
6142 p_old_ADDR_ATTRIBUTE18,
6143 p_new_ADDR_ATTRIBUTE18,
6144 p_effective_date
6145 );
6146 --
6147 pay_continuous_calc.event_update(p_business_group_id,
6148 p_legislation_code,
6149 'PER_ADDRESSES',
6150 'ADDR_ATTRIBUTE19',
6151 p_old_ADDR_ATTRIBUTE19,
6152 p_new_ADDR_ATTRIBUTE19,
6153 p_effective_date
6154 );
6155 --
6156 pay_continuous_calc.event_update(p_business_group_id,
6157 p_legislation_code,
6158 'PER_ADDRESSES',
6159 'ADDR_ATTRIBUTE2',
6160 p_old_ADDR_ATTRIBUTE2,
6166 p_legislation_code,
6161 p_new_ADDR_ATTRIBUTE2,
6162 p_effective_date
6163 );
6164 --
6165 pay_continuous_calc.event_update(p_business_group_id,
6167 'PER_ADDRESSES',
6168 'ADDR_ATTRIBUTE20',
6169 p_old_ADDR_ATTRIBUTE20,
6170 p_new_ADDR_ATTRIBUTE20,
6171 p_effective_date
6172 );
6173 --
6174 pay_continuous_calc.event_update(p_business_group_id,
6175 p_legislation_code,
6176 'PER_ADDRESSES',
6177 'ADDR_ATTRIBUTE3',
6178 p_old_ADDR_ATTRIBUTE3,
6179 p_new_ADDR_ATTRIBUTE3,
6180 p_effective_date
6181 );
6182 --
6183 pay_continuous_calc.event_update(p_business_group_id,
6184 p_legislation_code,
6185 'PER_ADDRESSES',
6186 'ADDR_ATTRIBUTE4',
6187 p_old_ADDR_ATTRIBUTE4,
6188 p_new_ADDR_ATTRIBUTE4,
6189 p_effective_date
6190 );
6191 --
6192 pay_continuous_calc.event_update(p_business_group_id,
6193 p_legislation_code,
6194 'PER_ADDRESSES',
6195 'ADDR_ATTRIBUTE5',
6196 p_old_ADDR_ATTRIBUTE5,
6197 p_new_ADDR_ATTRIBUTE5,
6198 p_effective_date
6199 );
6200 --
6201 pay_continuous_calc.event_update(p_business_group_id,
6202 p_legislation_code,
6203 'PER_ADDRESSES',
6204 'ADDR_ATTRIBUTE6',
6205 p_old_ADDR_ATTRIBUTE6,
6206 p_new_ADDR_ATTRIBUTE6,
6207 p_effective_date
6208 );
6209 --
6210 pay_continuous_calc.event_update(p_business_group_id,
6211 p_legislation_code,
6212 'PER_ADDRESSES',
6213 'ADDR_ATTRIBUTE7',
6214 p_old_ADDR_ATTRIBUTE7,
6215 p_new_ADDR_ATTRIBUTE7,
6216 p_effective_date
6217 );
6218 --
6219 pay_continuous_calc.event_update(p_business_group_id,
6220 p_legislation_code,
6221 'PER_ADDRESSES',
6222 'ADDR_ATTRIBUTE8',
6223 p_old_ADDR_ATTRIBUTE8,
6224 p_new_ADDR_ATTRIBUTE8,
6225 p_effective_date
6226 );
6227 --
6228 pay_continuous_calc.event_update(p_business_group_id,
6229 p_legislation_code,
6230 'PER_ADDRESSES',
6231 'ADDR_ATTRIBUTE9',
6232 p_old_ADDR_ATTRIBUTE9,
6233 p_new_ADDR_ATTRIBUTE9,
6234 p_effective_date
6235 );
6236 --
6237 pay_continuous_calc.event_update(p_business_group_id,
6238 p_legislation_code,
6239 'PER_ADDRESSES',
6240 'ADDR_ATTRIBUTE_CATEGORY',
6241 p_old_ADDR_ATTRIBUTE_CATEGORY,
6242 p_new_ADDR_ATTRIBUTE_CATEGORY,
6243 p_effective_date
6244 );
6245 --
6246 pay_continuous_calc.event_update(p_business_group_id,
6247 p_legislation_code,
6248 'PER_ADDRESSES',
6249 'ADD_INFORMATION13',
6250 p_old_ADD_INFORMATION13,
6251 p_new_ADD_INFORMATION13,
6252 p_effective_date
6253 );
6254 --
6255 pay_continuous_calc.event_update(p_business_group_id,
6256 p_legislation_code,
6257 'PER_ADDRESSES',
6258 'ADD_INFORMATION14',
6259 p_old_ADD_INFORMATION14,
6260 p_new_ADD_INFORMATION14,
6261 p_effective_date
6262 );
6263 --
6264 pay_continuous_calc.event_update(p_business_group_id,
6265 p_legislation_code,
6266 'PER_ADDRESSES',
6267 'ADD_INFORMATION15',
6268 p_old_ADD_INFORMATION15,
6269 p_new_ADD_INFORMATION15,
6270 p_effective_date
6271 );
6272 --
6273 pay_continuous_calc.event_update(p_business_group_id,
6277 p_old_ADD_INFORMATION16,
6274 p_legislation_code,
6275 'PER_ADDRESSES',
6276 'ADD_INFORMATION16',
6278 p_new_ADD_INFORMATION16,
6279 p_effective_date
6280 );
6281 --
6282 pay_continuous_calc.event_update(p_business_group_id,
6283 p_legislation_code,
6284 'PER_ADDRESSES',
6285 'ADD_INFORMATION17',
6286 p_old_ADD_INFORMATION17,
6287 p_new_ADD_INFORMATION17,
6288 p_effective_date
6289 );
6290 --
6291 pay_continuous_calc.event_update(p_business_group_id,
6292 p_legislation_code,
6293 'PER_ADDRESSES',
6294 'ADD_INFORMATION18',
6295 p_old_ADD_INFORMATION18,
6296 p_new_ADD_INFORMATION18,
6297 p_effective_date
6298 );
6299 --
6300 pay_continuous_calc.event_update(p_business_group_id,
6301 p_legislation_code,
6302 'PER_ADDRESSES',
6303 'ADD_INFORMATION19',
6304 p_old_ADD_INFORMATION19,
6305 p_new_ADD_INFORMATION19,
6306 p_effective_date
6307 );
6308 --
6309 pay_continuous_calc.event_update(p_business_group_id,
6310 p_legislation_code,
6311 'PER_ADDRESSES',
6312 'ADD_INFORMATION20',
6313 p_old_ADD_INFORMATION20,
6314 p_new_ADD_INFORMATION20,
6315 p_effective_date
6316 );
6317 --
6318 pay_continuous_calc.event_update(p_business_group_id,
6319 p_legislation_code,
6320 'PER_ADDRESSES',
6321 'BUSINESS_GROUP_ID',
6322 p_old_BUSINESS_GROUP_ID,
6323 p_new_BUSINESS_GROUP_ID,
6324 p_effective_date
6325 );
6326 --
6327 pay_continuous_calc.event_update(p_business_group_id,
6328 p_legislation_code,
6329 'PER_ADDRESSES',
6330 'COUNTRY',
6331 p_old_COUNTRY,
6332 p_new_COUNTRY,
6333 p_effective_date
6334 );
6335 --
6336 pay_continuous_calc.event_update(p_business_group_id,
6337 p_legislation_code,
6338 'PER_ADDRESSES',
6339 'DATE_FROM',
6340 p_old_DATE_FROM,
6341 p_new_DATE_FROM,
6342 p_new_date_from,
6343 least(p_old_date_from,
6344 p_new_date_from)
6345 );
6346 --
6347 pay_continuous_calc.event_update(p_business_group_id,
6348 p_legislation_code,
6349 'PER_ADDRESSES',
6350 'DATE_TO',
6351 p_old_DATE_TO,
6352 p_new_DATE_TO,
6353 nvl(p_new_date_to,p_effective_date),
6354 least(p_old_date_to,
6355 p_new_date_to)
6356 );
6357 --
6358 pay_continuous_calc.event_update(p_business_group_id,
6359 p_legislation_code,
6360 'PER_ADDRESSES',
6361 'PERSON_ID',
6362 p_old_PERSON_ID,
6363 p_new_PERSON_ID,
6364 p_effective_date
6365 );
6366 --
6367 pay_continuous_calc.event_update(p_business_group_id,
6368 p_legislation_code,
6369 'PER_ADDRESSES',
6370 'POSTAL_CODE',
6371 p_old_POSTAL_CODE,
6372 p_new_POSTAL_CODE,
6373 p_effective_date
6374 );
6375 --
6376 pay_continuous_calc.event_update(p_business_group_id,
6377 p_legislation_code,
6378 'PER_ADDRESSES',
6379 'PRIMARY_FLAG',
6380 p_old_PRIMARY_FLAG,
6381 p_new_PRIMARY_FLAG,
6382 p_effective_date
6383 );
6384 --
6385 pay_continuous_calc.event_update(p_business_group_id,
6389 p_old_PROGRAM_APPLICATION_ID,
6386 p_legislation_code,
6387 'PER_ADDRESSES',
6388 'PROGRAM_APPLICATION_ID',
6390 p_new_PROGRAM_APPLICATION_ID,
6391 p_effective_date
6392 );
6393 --
6394 pay_continuous_calc.event_update(p_business_group_id,
6395 p_legislation_code,
6396 'PER_ADDRESSES',
6397 'PROGRAM_ID',
6398 p_old_PROGRAM_ID,
6399 p_new_PROGRAM_ID,
6400 p_effective_date
6401 );
6402 --
6403 pay_continuous_calc.event_update(p_business_group_id,
6404 p_legislation_code,
6405 'PER_ADDRESSES',
6406 'PROGRAM_UPDATE_DATE',
6407 p_old_PROGRAM_UPDATE_DATE,
6408 p_new_PROGRAM_UPDATE_DATE,
6409 p_effective_date
6410 );
6411 --
6412 pay_continuous_calc.event_update(p_business_group_id,
6413 p_legislation_code,
6414 'PER_ADDRESSES',
6415 'REGION_1',
6416 p_old_REGION_1,
6417 p_new_REGION_1,
6418 p_effective_date
6419 );
6420 --
6421 pay_continuous_calc.event_update(p_business_group_id,
6422 p_legislation_code,
6423 'PER_ADDRESSES',
6424 'REGION_2',
6425 p_old_REGION_2,
6426 p_new_REGION_2,
6427 p_effective_date
6428 );
6429 --
6430 pay_continuous_calc.event_update(p_business_group_id,
6431 p_legislation_code,
6432 'PER_ADDRESSES',
6433 'REGION_3',
6434 p_old_REGION_3,
6435 p_new_REGION_3,
6436 p_effective_date
6437 );
6438 --
6439 pay_continuous_calc.event_update(p_business_group_id,
6440 p_legislation_code,
6441 'PER_ADDRESSES',
6442 'REQUEST_ID',
6443 p_old_REQUEST_ID,
6444 p_new_REQUEST_ID,
6445 p_effective_date
6446 );
6447 --
6448 pay_continuous_calc.event_update(p_business_group_id,
6449 p_legislation_code,
6450 'PER_ADDRESSES',
6451 'STYLE',
6452 p_old_STYLE,
6453 p_new_STYLE,
6454 p_effective_date
6455 );
6456 --
6457 pay_continuous_calc.event_update(p_business_group_id,
6458 p_legislation_code,
6459 'PER_ADDRESSES',
6460 'TELEPHONE_NUMBER_1',
6461 p_old_TELEPHONE_NUMBER_1,
6462 p_new_TELEPHONE_NUMBER_1,
6463 p_effective_date
6464 );
6465 --
6466 pay_continuous_calc.event_update(p_business_group_id,
6467 p_legislation_code,
6468 'PER_ADDRESSES',
6469 'TELEPHONE_NUMBER_2',
6470 p_old_TELEPHONE_NUMBER_2,
6471 p_new_TELEPHONE_NUMBER_2,
6472 p_effective_date
6473 );
6474 --
6475 pay_continuous_calc.event_update(p_business_group_id,
6476 p_legislation_code,
6477 'PER_ADDRESSES',
6478 'TELEPHONE_NUMBER_3',
6479 p_old_TELEPHONE_NUMBER_3,
6480 p_new_TELEPHONE_NUMBER_3,
6481 p_effective_date
6482 );
6483 --
6484 pay_continuous_calc.event_update(p_business_group_id,
6485 p_legislation_code,
6486 'PER_ADDRESSES',
6487 'TOWN_OR_CITY',
6488 p_old_TOWN_OR_CITY,
6489 p_new_TOWN_OR_CITY,
6490 p_effective_date
6491 );
6492 --
6493 /* Now call the API for the affected assignments */
6494 declare
6495 l_process_event_id number;
6496 l_object_version_number number;
6497 cnt number;
6498 begin
6499 if (pay_continuous_calc.g_event_list.sz <> 0) then
6500 for asgrec in asgcur (p_old_PERSON_ID) loop
6504 p_effective_date => g_event_list.effective_date(cnt),
6501 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6502 pay_ppe_api.create_process_event(
6503 p_assignment_id => asgrec.assignment_id,
6505 p_change_type => g_event_list.change_type(cnt),
6506 p_status => 'U',
6507 p_description => g_event_list.description(cnt),
6508 p_process_event_id => l_process_event_id,
6509 p_object_version_number => l_object_version_number,
6510 p_event_update_id => g_event_list.event_update_id(cnt),
6511 p_business_group_id => p_business_group_id,
6512 p_calculation_date => g_event_list.calc_date(cnt),
6513 p_surrogate_key => p_old_address_id
6514 );
6515 end loop;
6516 end loop;
6517 end if;
6518 pay_continuous_calc.g_event_list.sz := 0;
6519 end;
6520 --
6521 end PER_ADDRESSES_aru;
6522 --
6523
6524 /* PER_ALL_PEOPLE_F */
6525 /* name : PER_ALL_PEOPLE_F_ard
6526 purpose : This is procedure that records any Delete on people.
6527 */
6528 --
6529 procedure PER_ALL_PEOPLE_F_ard(
6530 p_business_group_id in number,
6531 p_legislation_code in varchar2,
6532 p_old_person_id in number,
6533 p_old_effective_start_date in date,
6534 p_new_effective_start_date in date,
6535 p_old_effective_end_date in date,
6536 p_new_effective_end_date in date
6537 )
6538 is
6539 l_process_event_id number;
6540 l_object_version_number number;
6541 l_effective_date date;
6542 l_proc varchar2(240) := g_package||'.PER_ALL_PEOPLE_F_ard';
6543 --
6544 cursor asgcur (p_person_id number) is
6545 select distinct assignment_id
6546 from per_assignments_f
6547 where person_id = p_person_id;
6548 --
6549 begin
6550 hr_utility.set_location(l_proc, 10);
6551 /* If the continuous calc is overriden then do nothing */
6552 if (g_override_cc = TRUE) then
6553 return;
6554 end if;
6555
6556 pay_continuous_calc.event_update(p_business_group_id,
6557 p_legislation_code,
6558 'PER_ALL_PEOPLE_F',
6559 null,
6560 null,
6561 null,
6562 p_old_effective_start_date,
6563 p_old_effective_start_date,
6564 'D' --l_mode
6565 );
6566
6567 /* Now call the API for the affected assignments */
6568 declare
6569 cnt number;
6570 l_process_event_id number;
6571 l_object_version_number number;
6572 begin
6573 if (pay_continuous_calc.g_event_list.sz <> 0) then
6574 hr_utility.trace('> With in Create Process Event: ');
6575 for asgrec in asgcur (p_old_PERSON_ID) loop
6576 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6577 pay_ppe_api.create_process_event(
6578 p_assignment_id => asgrec.assignment_id,
6582 p_description => g_event_list.description(cnt),
6579 p_effective_date => g_event_list.effective_date(cnt),
6580 p_change_type => g_event_list.change_type(cnt),
6581 p_status => 'U',
6583 p_process_event_id => l_process_event_id,
6584 p_object_version_number => l_object_version_number,
6585 p_event_update_id => g_event_list.event_update_id(cnt),
6586 p_surrogate_key => p_old_person_id,
6587 p_calculation_date => g_event_list.calc_date(cnt),
6588 p_business_group_id => p_business_group_id
6589 );
6590
6591
6592 end loop;
6593 end loop;
6594 end if;
6595 pay_continuous_calc.g_event_list.sz := 0;
6596 end;
6597 hr_utility.set_location(l_proc, 900);
6598 END PER_ALL_PEOPLE_F_ard;
6599
6600 /* PER_SPINAL_POINT_PLACEMENTS_F */
6601 /* name : PER_SPINAL_POINT_PLCMTS_F_ard
6602 purpose : This is procedure that records any Delete on Spinal Point Placements.
6603 */
6604 --
6605 procedure PER_SPIN_PNT_PLACEMENTS_F_ard(
6606 p_business_group_id in number,
6607 p_legislation_code in varchar2,
6608 p_old_placement_id in number,
6609 p_old_effective_start_date in date,
6610 p_new_effective_start_date in date,
6611 p_old_effective_end_date in date,
6612 p_new_effective_end_date in date,
6613 p_old_assignment_id in number
6614 )
6615 is
6616 l_process_event_id number;
6617 l_object_version_number number;
6618 l_proc varchar2(240) := g_package||'.PER_SPIN_PNT_PLACEMENTS_F_ard';
6619 begin
6620 hr_utility.set_location(l_proc, 10);
6621 /* If the continuous calc is overriden then do nothing */
6622 if (g_override_cc = TRUE) then
6623 return;
6624 end if;
6625 --
6626
6627
6628 pay_continuous_calc.event_update(p_business_group_id,
6629 p_legislation_code,
6630 'PER_SPINAL_POINT_PLACEMENTS_F',
6631 null,
6632 null,
6633 null,
6634 p_old_effective_start_date,
6635 p_old_effective_start_date,
6636 'D'
6637 );
6638
6639 /* Now call the API for the affected assignments */
6640 declare
6641 cnt number;
6642 l_process_event_id number;
6643 l_object_version_number number;
6644 begin
6645 if (pay_continuous_calc.g_event_list.sz <> 0) then
6646 hr_utility.trace('> With in Create Process Event: ');
6647 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6648 pay_ppe_api.create_process_event(
6649 p_assignment_id => p_old_assignment_id,
6650 p_effective_date => g_event_list.effective_date(cnt),
6651 p_change_type => g_event_list.change_type(cnt),
6652 p_status => 'U',
6653 p_description => g_event_list.description(cnt),
6654 p_process_event_id => l_process_event_id,
6655 p_object_version_number => l_object_version_number,
6656 p_event_update_id => g_event_list.event_update_id(cnt),
6657 p_surrogate_key => p_old_placement_id,
6658 p_calculation_date => g_event_list.calc_date(cnt),
6659 p_business_group_id => p_business_group_id
6660 );
6661
6662
6663 end loop;
6664 end if;
6665 pay_continuous_calc.g_event_list.sz := 0;
6666 end;
6667 hr_utility.set_location(l_proc, 900);
6668 END PER_SPIN_PNT_PLACEMENTS_F_ard;
6669
6670
6671 /* name : PER_SPINAL_POINT_PLCMTS_F_ari -- Added for bug 6265962
6672 purpose : This is procedure that records any Insert on Spinal Point Placements.
6673 */
6674 --
6675 procedure PER_SPIN_PNT_PLACEMENTS_F_ari(
6676 p_business_group_id in number,
6677 p_legislation_code in varchar2,
6678 p_placement_id in number,
6679 p_assignment_id in number,
6680 p_effective_start_date in date
6681 )
6682 is
6683 l_process_event_id number;
6684 l_object_version_number number;
6685 l_proc varchar2(240) := g_package||'.PER_SPIN_PNT_PLACEMENTS_F_ari';
6686 begin
6687 hr_utility.set_location(l_proc, 10);
6688 /* If the continuous calc is overriden then do nothing */
6689 if (g_override_cc = TRUE) then
6690 return;
6691 end if;
6692 --
6693
6694 pay_continuous_calc.event_update(p_business_group_id,
6698 null,
6695 p_legislation_code,
6696 'PER_SPINAL_POINT_PLACEMENTS_F',
6697 null,
6699 null,
6700 p_effective_start_date,
6701 p_effective_start_date,
6702 'I'
6703 );
6704
6705 /* Now call the API for the affected assignments */
6706 declare
6707 cnt number;
6708 l_process_event_id number;
6709 l_object_version_number number;
6710 begin
6711 if (pay_continuous_calc.g_event_list.sz <> 0) then
6712 hr_utility.trace('> With in Create Process Event: ');
6713 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6714 pay_ppe_api.create_process_event(
6715 p_assignment_id => p_assignment_id,
6716 p_effective_date => g_event_list.effective_date(cnt),
6717 p_change_type => g_event_list.change_type(cnt),
6718 p_status => 'U',
6719 p_description => g_event_list.description(cnt),
6720 p_process_event_id => l_process_event_id,
6721 p_object_version_number => l_object_version_number,
6722 p_event_update_id => g_event_list.event_update_id(cnt),
6723 p_surrogate_key => p_placement_id,
6724 p_calculation_date => g_event_list.calc_date(cnt),
6725 p_business_group_id => p_business_group_id
6726 );
6727
6728
6729 end loop;
6730 end if;
6731 pay_continuous_calc.g_event_list.sz := 0;
6732 end;
6733 hr_utility.set_location(l_proc, 900);
6734 END PER_SPIN_PNT_PLACEMENTS_F_ari;
6735 --
6736
6737 /* PAY_GRADE_RULES_F */
6738 /* name : PAY_GRADE_RULES_F_ard
6739 purpose : This is procedure that records any Delete on Grade Rules.
6740 */
6741 --
6742
6743 procedure PAY_GRADE_RULES_F_ard(
6744 p_business_group_id in number,
6745 p_legislation_code in varchar2,
6746 p_old_grade_rule_id in number,
6747 p_old_effective_start_date in date,
6748 p_new_effective_start_date in date,
6749 p_old_effective_end_date in date,
6750 p_new_effective_end_date in date
6751 )
6752 is
6753 l_process_event_id number;
6754 l_object_version_number number;
6755 l_proc varchar2(240) := g_package||'.PAY_GRADE_RULES_F_ard';
6756 begin
6757 hr_utility.set_location(l_proc, 10);
6758 /* If the continuous calc is overriden then do nothing */
6759 if (g_override_cc = TRUE) then
6760 return;
6761 end if;
6762
6763 pay_continuous_calc.event_update(p_business_group_id,
6764 p_legislation_code,
6765 'PAY_GRADE_RULES_F',
6766 null,
6767 null,
6768 null,
6769 p_old_effective_start_date,
6770 p_old_effective_start_date,
6771 'D' --l_mode
6772 );
6773
6774 /* Now call the API for the affected assignments */
6775 declare
6776 cnt number;
6777 l_process_event_id number;
6778 l_object_version_number number;
6779 begin
6780 if (pay_continuous_calc.g_event_list.sz <> 0) then
6781 hr_utility.trace('> With in Create Process Event: ');
6782 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6783 pay_ppe_api.create_process_event(
6784 p_assignment_id => NULL,
6785 p_effective_date => g_event_list.effective_date(cnt),
6786 p_change_type => g_event_list.change_type(cnt),
6787 p_status => 'U',
6788 p_description => g_event_list.description(cnt),
6789 p_process_event_id => l_process_event_id,
6790 p_object_version_number => l_object_version_number,
6791 p_event_update_id => g_event_list.event_update_id(cnt),
6792 p_surrogate_key => p_old_grade_rule_id,
6793 p_calculation_date => g_event_list.calc_date(cnt),
6794 p_business_group_id => p_business_group_id
6795 );
6796
6797
6798 end loop;
6799 end if;
6800 pay_continuous_calc.g_event_list.sz := 0;
6801 end;
6802 hr_utility.set_location(l_proc, 900);
6803 END PAY_GRADE_RULES_F_ard;
6804
6805 --
6806 /* PER_ALL_PEOPLE_F */
6807 /* name : PER_ALL_PEOPLE_F_aru
6808 purpose : This is procedure that records any updates
6809 on people.
6810 */
6814 p_effective_date in date ,
6811 procedure PER_ALL_PEOPLE_F_aru(
6812 p_business_group_id in number,
6813 p_legislation_code in varchar2,
6815 p_old_APPLICANT_NUMBER in VARCHAR2,
6816 p_new_APPLICANT_NUMBER in VARCHAR2 ,
6817 p_old_ATTRIBUTE1 in VARCHAR2,
6818 p_new_ATTRIBUTE1 in VARCHAR2 ,
6819 p_old_ATTRIBUTE10 in VARCHAR2,
6820 p_new_ATTRIBUTE10 in VARCHAR2 ,
6821 p_old_ATTRIBUTE11 in VARCHAR2,
6822 p_new_ATTRIBUTE11 in VARCHAR2 ,
6823 p_old_ATTRIBUTE12 in VARCHAR2,
6824 p_new_ATTRIBUTE12 in VARCHAR2 ,
6825 p_old_ATTRIBUTE13 in VARCHAR2,
6826 p_new_ATTRIBUTE13 in VARCHAR2 ,
6827 p_old_ATTRIBUTE14 in VARCHAR2,
6828 p_new_ATTRIBUTE14 in VARCHAR2 ,
6829 p_old_ATTRIBUTE15 in VARCHAR2,
6830 p_new_ATTRIBUTE15 in VARCHAR2 ,
6831 p_old_ATTRIBUTE16 in VARCHAR2,
6832 p_new_ATTRIBUTE16 in VARCHAR2 ,
6833 p_old_ATTRIBUTE17 in VARCHAR2,
6834 p_new_ATTRIBUTE17 in VARCHAR2 ,
6835 p_old_ATTRIBUTE18 in VARCHAR2,
6836 p_new_ATTRIBUTE18 in VARCHAR2 ,
6837 p_old_ATTRIBUTE19 in VARCHAR2,
6838 p_new_ATTRIBUTE19 in VARCHAR2 ,
6839 p_old_ATTRIBUTE2 in VARCHAR2,
6840 p_new_ATTRIBUTE2 in VARCHAR2 ,
6841 p_old_ATTRIBUTE20 in VARCHAR2,
6842 p_new_ATTRIBUTE20 in VARCHAR2 ,
6843 p_old_ATTRIBUTE21 in VARCHAR2,
6844 p_new_ATTRIBUTE21 in VARCHAR2 ,
6845 p_old_ATTRIBUTE22 in VARCHAR2,
6846 p_new_ATTRIBUTE22 in VARCHAR2 ,
6847 p_old_ATTRIBUTE23 in VARCHAR2,
6848 p_new_ATTRIBUTE23 in VARCHAR2 ,
6849 p_old_ATTRIBUTE24 in VARCHAR2,
6850 p_new_ATTRIBUTE24 in VARCHAR2 ,
6851 p_old_ATTRIBUTE25 in VARCHAR2,
6852 p_new_ATTRIBUTE25 in VARCHAR2 ,
6853 p_old_ATTRIBUTE26 in VARCHAR2,
6854 p_new_ATTRIBUTE26 in VARCHAR2 ,
6855 p_old_ATTRIBUTE27 in VARCHAR2,
6856 p_new_ATTRIBUTE27 in VARCHAR2 ,
6857 p_old_ATTRIBUTE28 in VARCHAR2,
6858 p_new_ATTRIBUTE28 in VARCHAR2 ,
6859 p_old_ATTRIBUTE29 in VARCHAR2,
6860 p_new_ATTRIBUTE29 in VARCHAR2 ,
6861 p_old_ATTRIBUTE3 in VARCHAR2,
6862 p_new_ATTRIBUTE3 in VARCHAR2 ,
6863 p_old_ATTRIBUTE30 in VARCHAR2,
6864 p_new_ATTRIBUTE30 in VARCHAR2 ,
6865 p_old_ATTRIBUTE4 in VARCHAR2,
6866 p_new_ATTRIBUTE4 in VARCHAR2 ,
6867 p_old_ATTRIBUTE5 in VARCHAR2,
6868 p_new_ATTRIBUTE5 in VARCHAR2 ,
6869 p_old_ATTRIBUTE6 in VARCHAR2,
6870 p_new_ATTRIBUTE6 in VARCHAR2 ,
6871 p_old_ATTRIBUTE7 in VARCHAR2,
6872 p_new_ATTRIBUTE7 in VARCHAR2 ,
6873 p_old_ATTRIBUTE8 in VARCHAR2,
6874 p_new_ATTRIBUTE8 in VARCHAR2 ,
6875 p_old_ATTRIBUTE9 in VARCHAR2,
6876 p_new_ATTRIBUTE9 in VARCHAR2 ,
6877 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
6878 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
6879 p_old_BACKGROUND_CHECK_STATUS in VARCHAR2,
6880 p_new_BACKGROUND_CHECK_STATUS in VARCHAR2 ,
6881 p_old_BACKGROUND_DATE_CHECK in DATE,
6882 p_new_BACKGROUND_DATE_CHECK in DATE ,
6883 p_old_BENEFIT_GROUP_ID in NUMBER,
6884 p_new_BENEFIT_GROUP_ID in NUMBER ,
6885 p_old_BLOOD_TYPE in VARCHAR2,
6886 p_new_BLOOD_TYPE in VARCHAR2 ,
6887 p_old_BUSINESS_GROUP_ID in NUMBER,
6888 p_new_BUSINESS_GROUP_ID in NUMBER ,
6889 p_old_COMMENT_ID in NUMBER,
6890 p_new_COMMENT_ID in NUMBER ,
6891 p_old_COORD_BEN_MED_PLN_NO in VARCHAR2,
6892 p_new_COORD_BEN_MED_PLN_NO in VARCHAR2 ,
6893 p_old_COORD_BEN_NO_CVG_FLAG in VARCHAR2,
6894 p_new_COORD_BEN_NO_CVG_FLAG in VARCHAR2 ,
6895 p_old_CORRESPONDENCE_LANGUAGE in VARCHAR2,
6896 p_new_CORRESPONDENCE_LANGUAGE in VARCHAR2 ,
6897 p_old_COUNTRY_OF_BIRTH in VARCHAR2,
6898 p_new_COUNTRY_OF_BIRTH in VARCHAR2 ,
6899 p_old_CURRENT_APPLICANT_FLAG in VARCHAR2,
6900 p_new_CURRENT_APPLICANT_FLAG in VARCHAR2 ,
6901 p_old_CURRENT_EMPLOYEE_FLAG in VARCHAR2,
6902 p_new_CURRENT_EMPLOYEE_FLAG in VARCHAR2 ,
6903 p_old_CURRENT_EMP_OR_APL_FLAG in VARCHAR2,
6904 p_new_CURRENT_EMP_OR_APL_FLAG in VARCHAR2 ,
6905 p_old_DATE_EMPLOYEE_DATA_VERIF in DATE,
6906 p_new_DATE_EMPLOYEE_DATA_VERIF in DATE ,
6907 p_old_DATE_OF_BIRTH in DATE,
6908 p_new_DATE_OF_BIRTH in DATE ,
6909 p_old_DATE_OF_DEATH in DATE,
6910 p_new_DATE_OF_DEATH in DATE ,
6911 p_old_DPDNT_ADOPTION_DATE in DATE,
6912 p_new_DPDNT_ADOPTION_DATE in DATE ,
6913 p_old_DPDNT_VLNTRY_SVCE_FLAG in VARCHAR2,
6914 p_new_DPDNT_VLNTRY_SVCE_FLAG in VARCHAR2 ,
6915 p_old_EMAIL_ADDRESS in VARCHAR2,
6916 p_new_EMAIL_ADDRESS in VARCHAR2 ,
6917 p_old_EMPLOYEE_NUMBER in VARCHAR2,
6918 p_new_EMPLOYEE_NUMBER in VARCHAR2 ,
6919 p_old_EXPENSE_CHECK_SEND_TO_AD in VARCHAR2,
6920 p_new_EXPENSE_CHECK_SEND_TO_AD in VARCHAR2 ,
6921 p_old_FAST_PATH_EMPLOYEE in VARCHAR2,
6922 p_new_FAST_PATH_EMPLOYEE in VARCHAR2 ,
6923 p_old_FIRST_NAME in VARCHAR2,
6924 p_new_FIRST_NAME in VARCHAR2 ,
6925 p_old_FTE_CAPACITY in NUMBER,
6926 p_new_FTE_CAPACITY in NUMBER ,
6927 p_old_FULL_NAME in VARCHAR2,
6928 p_new_FULL_NAME in VARCHAR2 ,
6929 p_old_GLOBAL_PERSON_ID in VARCHAR2,
6930 p_new_GLOBAL_PERSON_ID in VARCHAR2 ,
6931 p_old_HOLD_APPLICANT_DATE_UNTI in DATE,
6932 p_new_HOLD_APPLICANT_DATE_UNTI in DATE ,
6933 p_old_HONORS in VARCHAR2,
6934 p_new_HONORS in VARCHAR2 ,
6935 p_old_INTERNAL_LOCATION in VARCHAR2,
6936 p_new_INTERNAL_LOCATION in VARCHAR2 ,
6937 p_old_KNOWN_AS in VARCHAR2,
6938 p_new_KNOWN_AS in VARCHAR2 ,
6939 p_old_LAST_MEDICAL_TEST_BY in VARCHAR2,
6940 p_new_LAST_MEDICAL_TEST_BY in VARCHAR2 ,
6941 p_old_LAST_MEDICAL_TEST_DATE in DATE,
6942 p_new_LAST_MEDICAL_TEST_DATE in DATE ,
6943 p_old_LAST_NAME in VARCHAR2,
6944 p_new_LAST_NAME in VARCHAR2 ,
6945 p_old_MAILSTOP in VARCHAR2,
6946 p_new_MAILSTOP in VARCHAR2 ,
6947 p_old_MARITAL_STATUS in VARCHAR2,
6948 p_new_MARITAL_STATUS in VARCHAR2 ,
6949 p_old_MIDDLE_NAMES in VARCHAR2,
6950 p_new_MIDDLE_NAMES in VARCHAR2 ,
6951 p_old_NATIONALITY in VARCHAR2,
6952 p_new_NATIONALITY in VARCHAR2 ,
6953 p_old_NATIONAL_IDENTIFIER in VARCHAR2,
6954 p_new_NATIONAL_IDENTIFIER in VARCHAR2 ,
6955 p_old_OFFICE_NUMBER in VARCHAR2,
6956 p_new_OFFICE_NUMBER in VARCHAR2 ,
6960 p_new_ORDER_NAME in VARCHAR2 ,
6957 p_old_ON_MILITARY_SERVICE in VARCHAR2,
6958 p_new_ON_MILITARY_SERVICE in VARCHAR2 ,
6959 p_old_ORDER_NAME in VARCHAR2,
6961 p_old_ORIGINAL_DATE_OF_HIRE in DATE,
6962 p_new_ORIGINAL_DATE_OF_HIRE in DATE ,
6963 p_old_PERSON_ID in NUMBER,
6964 p_new_PERSON_ID in NUMBER ,
6965 p_old_PERSON_TYPE_ID in NUMBER,
6966 p_new_PERSON_TYPE_ID in NUMBER ,
6967 p_old_PER_INFORMATION1 in VARCHAR2,
6968 p_new_PER_INFORMATION1 in VARCHAR2 ,
6969 p_old_PER_INFORMATION10 in VARCHAR2,
6970 p_new_PER_INFORMATION10 in VARCHAR2 ,
6971 p_old_PER_INFORMATION11 in VARCHAR2,
6972 p_new_PER_INFORMATION11 in VARCHAR2 ,
6973 p_old_PER_INFORMATION12 in VARCHAR2,
6974 p_new_PER_INFORMATION12 in VARCHAR2 ,
6975 p_old_PER_INFORMATION13 in VARCHAR2,
6976 p_new_PER_INFORMATION13 in VARCHAR2 ,
6977 p_old_PER_INFORMATION14 in VARCHAR2,
6978 p_new_PER_INFORMATION14 in VARCHAR2 ,
6979 p_old_PER_INFORMATION15 in VARCHAR2,
6980 p_new_PER_INFORMATION15 in VARCHAR2 ,
6981 p_old_PER_INFORMATION16 in VARCHAR2,
6982 p_new_PER_INFORMATION16 in VARCHAR2 ,
6983 p_old_PER_INFORMATION17 in VARCHAR2,
6984 p_new_PER_INFORMATION17 in VARCHAR2 ,
6985 p_old_PER_INFORMATION18 in VARCHAR2,
6986 p_new_PER_INFORMATION18 in VARCHAR2 ,
6987 p_old_PER_INFORMATION19 in VARCHAR2,
6988 p_new_PER_INFORMATION19 in VARCHAR2 ,
6989 p_old_PER_INFORMATION2 in VARCHAR2,
6990 p_new_PER_INFORMATION2 in VARCHAR2 ,
6991 p_old_PER_INFORMATION20 in VARCHAR2,
6992 p_new_PER_INFORMATION20 in VARCHAR2 ,
6993 p_old_PER_INFORMATION21 in VARCHAR2,
6994 p_new_PER_INFORMATION21 in VARCHAR2 ,
6995 p_old_PER_INFORMATION22 in VARCHAR2,
6996 p_new_PER_INFORMATION22 in VARCHAR2 ,
6997 p_old_PER_INFORMATION23 in VARCHAR2,
6998 p_new_PER_INFORMATION23 in VARCHAR2 ,
6999 p_old_PER_INFORMATION24 in VARCHAR2,
7000 p_new_PER_INFORMATION24 in VARCHAR2 ,
7001 p_old_PER_INFORMATION25 in VARCHAR2,
7002 p_new_PER_INFORMATION25 in VARCHAR2 ,
7003 p_old_PER_INFORMATION26 in VARCHAR2,
7004 p_new_PER_INFORMATION26 in VARCHAR2 ,
7005 p_old_PER_INFORMATION27 in VARCHAR2,
7006 p_new_PER_INFORMATION27 in VARCHAR2 ,
7007 p_old_PER_INFORMATION28 in VARCHAR2,
7008 p_new_PER_INFORMATION28 in VARCHAR2 ,
7009 p_old_PER_INFORMATION29 in VARCHAR2,
7010 p_new_PER_INFORMATION29 in VARCHAR2 ,
7011 p_old_PER_INFORMATION3 in VARCHAR2,
7012 p_new_PER_INFORMATION3 in VARCHAR2 ,
7013 p_old_PER_INFORMATION30 in VARCHAR2,
7014 p_new_PER_INFORMATION30 in VARCHAR2 ,
7015 p_old_PER_INFORMATION4 in VARCHAR2,
7016 p_new_PER_INFORMATION4 in VARCHAR2 ,
7017 p_old_PER_INFORMATION5 in VARCHAR2,
7018 p_new_PER_INFORMATION5 in VARCHAR2 ,
7019 p_old_PER_INFORMATION6 in VARCHAR2,
7020 p_new_PER_INFORMATION6 in VARCHAR2 ,
7021 p_old_PER_INFORMATION7 in VARCHAR2,
7022 p_new_PER_INFORMATION7 in VARCHAR2 ,
7023 p_old_PER_INFORMATION8 in VARCHAR2,
7024 p_new_PER_INFORMATION8 in VARCHAR2 ,
7025 p_old_PER_INFORMATION9 in VARCHAR2,
7026 p_new_PER_INFORMATION9 in VARCHAR2 ,
7027 p_old_PER_INFORMATION_CATEGORY in VARCHAR2,
7028 p_new_PER_INFORMATION_CATEGORY in VARCHAR2 ,
7029 p_old_PREVIOUS_LAST_NAME in VARCHAR2,
7030 p_new_PREVIOUS_LAST_NAME in VARCHAR2 ,
7031 p_old_PRE_NAME_ADJUNCT in VARCHAR2,
7032 p_new_PRE_NAME_ADJUNCT in VARCHAR2 ,
7033 p_old_PROGRAM_APPLICATION_ID in NUMBER,
7034 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
7035 p_old_PROGRAM_ID in NUMBER,
7036 p_new_PROGRAM_ID in NUMBER ,
7037 p_old_PROGRAM_UPDATE_DATE in DATE,
7038 p_new_PROGRAM_UPDATE_DATE in DATE ,
7039 p_old_PROJECTED_START_DATE in DATE,
7040 p_new_PROJECTED_START_DATE in DATE ,
7041 p_old_RECEIPT_OF_DEATH_CERT_DA in DATE,
7042 p_new_RECEIPT_OF_DEATH_CERT_DA in DATE ,
7043 p_old_REGION_OF_BIRTH in VARCHAR2,
7044 p_new_REGION_OF_BIRTH in VARCHAR2 ,
7045 p_old_REGISTERED_DISABLED_FLAG in VARCHAR2,
7046 p_new_REGISTERED_DISABLED_FLAG in VARCHAR2 ,
7047 p_old_REHIRE_AUTHORIZOR in VARCHAR2,
7048 p_new_REHIRE_AUTHORIZOR in VARCHAR2 ,
7049 p_old_REHIRE_REASON in VARCHAR2,
7050 p_new_REHIRE_REASON in VARCHAR2 ,
7051 p_old_REHIRE_RECOMMENDATION in VARCHAR2,
7052 p_new_REHIRE_RECOMMENDATION in VARCHAR2 ,
7053 p_old_REQUEST_ID in NUMBER,
7054 p_new_REQUEST_ID in NUMBER ,
7055 p_old_RESUME_EXISTS in VARCHAR2,
7056 p_new_RESUME_EXISTS in VARCHAR2 ,
7057 p_old_RESUME_LAST_UPDATED in DATE,
7058 p_new_RESUME_LAST_UPDATED in DATE ,
7059 p_old_SECOND_PASSPORT_EXISTS in VARCHAR2,
7060 p_new_SECOND_PASSPORT_EXISTS in VARCHAR2 ,
7061 p_old_SEX in VARCHAR2,
7062 p_new_SEX in VARCHAR2 ,
7063 p_old_START_DATE in DATE,
7064 p_new_START_DATE in DATE ,
7065 p_old_STUDENT_STATUS in VARCHAR2,
7066 p_new_STUDENT_STATUS in VARCHAR2 ,
7067 p_old_SUFFIX in VARCHAR2,
7068 p_new_SUFFIX in VARCHAR2 ,
7069 p_old_TITLE in VARCHAR2,
7070 p_new_TITLE in VARCHAR2 ,
7071 p_old_TOWN_OF_BIRTH in VARCHAR2,
7072 p_new_TOWN_OF_BIRTH in VARCHAR2 ,
7073 p_old_USES_TOBACCO_FLAG in VARCHAR2,
7074 p_new_USES_TOBACCO_FLAG in VARCHAR2 ,
7075 p_old_VENDOR_ID in NUMBER,
7076 p_new_VENDOR_ID in NUMBER ,
7077 p_old_WORK_SCHEDULE in VARCHAR2,
7078 p_new_WORK_SCHEDULE in VARCHAR2 ,
7079 p_old_WORK_TELEPHONE in VARCHAR2,
7080 p_new_WORK_TELEPHONE in VARCHAR2 ,
7081 p_old_EFFECTIVE_END_DATE in DATE,
7082 p_new_EFFECTIVE_END_DATE in DATE ,
7083 p_old_EFFECTIVE_START_DATE in DATE,
7084 p_new_EFFECTIVE_START_DATE in DATE
7085 )
7086 is
7087 --
7088 cursor asgcur (p_person_id number) is
7089 select distinct assignment_id
7090 from per_assignments_f
7091 where person_id = p_person_id;
7092 --
7093 begin
7094 /* If the continuous calc is overriden then do nothing */
7095 if (g_override_cc = TRUE) then
7096 return;
7097 end if;
7098 --
7099 /* If the dates havent changed it must be a correction */
7100 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
7104 p_legislation_code,
7101 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
7102 --
7103 pay_continuous_calc.event_update(p_business_group_id,
7105 'PER_ALL_PEOPLE_F',
7106 'APPLICANT_NUMBER',
7107 p_old_APPLICANT_NUMBER,
7108 p_new_APPLICANT_NUMBER,
7109 p_effective_date
7110 );
7111 --
7112 pay_continuous_calc.event_update(p_business_group_id,
7113 p_legislation_code,
7114 'PER_ALL_PEOPLE_F',
7115 'ATTRIBUTE1',
7116 p_old_ATTRIBUTE1,
7117 p_new_ATTRIBUTE1,
7118 p_effective_date
7119 );
7120 --
7121 pay_continuous_calc.event_update(p_business_group_id,
7122 p_legislation_code,
7123 'PER_ALL_PEOPLE_F',
7124 'ATTRIBUTE10',
7125 p_old_ATTRIBUTE10,
7126 p_new_ATTRIBUTE10,
7127 p_effective_date
7128 );
7129 --
7130 pay_continuous_calc.event_update(p_business_group_id,
7131 p_legislation_code,
7132 'PER_ALL_PEOPLE_F',
7133 'ATTRIBUTE11',
7134 p_old_ATTRIBUTE11,
7135 p_new_ATTRIBUTE11,
7136 p_effective_date
7137 );
7138 --
7139 pay_continuous_calc.event_update(p_business_group_id,
7140 p_legislation_code,
7141 'PER_ALL_PEOPLE_F',
7142 'ATTRIBUTE12',
7143 p_old_ATTRIBUTE12,
7144 p_new_ATTRIBUTE12,
7145 p_effective_date
7146 );
7147 --
7148 pay_continuous_calc.event_update(p_business_group_id,
7149 p_legislation_code,
7150 'PER_ALL_PEOPLE_F',
7151 'ATTRIBUTE13',
7152 p_old_ATTRIBUTE13,
7153 p_new_ATTRIBUTE13,
7154 p_effective_date
7155 );
7156 --
7157 pay_continuous_calc.event_update(p_business_group_id,
7158 p_legislation_code,
7159 'PER_ALL_PEOPLE_F',
7160 'ATTRIBUTE14',
7161 p_old_ATTRIBUTE14,
7162 p_new_ATTRIBUTE14,
7163 p_effective_date
7164 );
7165 --
7166 pay_continuous_calc.event_update(p_business_group_id,
7167 p_legislation_code,
7168 'PER_ALL_PEOPLE_F',
7169 'ATTRIBUTE15',
7170 p_old_ATTRIBUTE15,
7171 p_new_ATTRIBUTE15,
7172 p_effective_date
7173 );
7174 --
7175 pay_continuous_calc.event_update(p_business_group_id,
7176 p_legislation_code,
7177 'PER_ALL_PEOPLE_F',
7178 'ATTRIBUTE16',
7179 p_old_ATTRIBUTE16,
7180 p_new_ATTRIBUTE16,
7181 p_effective_date
7182 );
7183 --
7184 pay_continuous_calc.event_update(p_business_group_id,
7185 p_legislation_code,
7186 'PER_ALL_PEOPLE_F',
7187 'ATTRIBUTE17',
7188 p_old_ATTRIBUTE17,
7189 p_new_ATTRIBUTE17,
7190 p_effective_date
7191 );
7192 --
7193 pay_continuous_calc.event_update(p_business_group_id,
7194 p_legislation_code,
7195 'PER_ALL_PEOPLE_F',
7196 'ATTRIBUTE18',
7197 p_old_ATTRIBUTE18,
7198 p_new_ATTRIBUTE18,
7199 p_effective_date
7200 );
7201 --
7202 pay_continuous_calc.event_update(p_business_group_id,
7203 p_legislation_code,
7204 'PER_ALL_PEOPLE_F',
7205 'ATTRIBUTE19',
7206 p_old_ATTRIBUTE19,
7207 p_new_ATTRIBUTE19,
7208 p_effective_date
7209 );
7210 --
7211 pay_continuous_calc.event_update(p_business_group_id,
7212 p_legislation_code,
7213 'PER_ALL_PEOPLE_F',
7214 'ATTRIBUTE2',
7215 p_old_ATTRIBUTE2,
7216 p_new_ATTRIBUTE2,
7217 p_effective_date
7218 );
7219 --
7220 pay_continuous_calc.event_update(p_business_group_id,
7221 p_legislation_code,
7222 'PER_ALL_PEOPLE_F',
7223 'ATTRIBUTE20',
7224 p_old_ATTRIBUTE20,
7225 p_new_ATTRIBUTE20,
7226 p_effective_date
7227 );
7228 --
7229 pay_continuous_calc.event_update(p_business_group_id,
7230 p_legislation_code,
7231 'PER_ALL_PEOPLE_F',
7232 'ATTRIBUTE21',
7233 p_old_ATTRIBUTE21,
7234 p_new_ATTRIBUTE21,
7235 p_effective_date
7236 );
7237 --
7238 pay_continuous_calc.event_update(p_business_group_id,
7239 p_legislation_code,
7240 'PER_ALL_PEOPLE_F',
7241 'ATTRIBUTE22',
7242 p_old_ATTRIBUTE22,
7243 p_new_ATTRIBUTE22,
7244 p_effective_date
7245 );
7246 --
7247 pay_continuous_calc.event_update(p_business_group_id,
7248 p_legislation_code,
7249 'PER_ALL_PEOPLE_F',
7250 'ATTRIBUTE23',
7251 p_old_ATTRIBUTE23,
7252 p_new_ATTRIBUTE23,
7253 p_effective_date
7254 );
7255 --
7256 pay_continuous_calc.event_update(p_business_group_id,
7257 p_legislation_code,
7258 'PER_ALL_PEOPLE_F',
7259 'ATTRIBUTE24',
7260 p_old_ATTRIBUTE24,
7261 p_new_ATTRIBUTE24,
7262 p_effective_date
7263 );
7264 --
7265 pay_continuous_calc.event_update(p_business_group_id,
7266 p_legislation_code,
7267 'PER_ALL_PEOPLE_F',
7268 'ATTRIBUTE25',
7269 p_old_ATTRIBUTE25,
7270 p_new_ATTRIBUTE25,
7271 p_effective_date
7272 );
7273 --
7274 pay_continuous_calc.event_update(p_business_group_id,
7275 p_legislation_code,
7276 'PER_ALL_PEOPLE_F',
7277 'ATTRIBUTE26',
7278 p_old_ATTRIBUTE26,
7279 p_new_ATTRIBUTE26,
7280 p_effective_date
7281 );
7282 --
7283 pay_continuous_calc.event_update(p_business_group_id,
7284 p_legislation_code,
7285 'PER_ALL_PEOPLE_F',
7286 'ATTRIBUTE27',
7287 p_old_ATTRIBUTE27,
7288 p_new_ATTRIBUTE27,
7289 p_effective_date
7290 );
7291 --
7292 pay_continuous_calc.event_update(p_business_group_id,
7293 p_legislation_code,
7294 'PER_ALL_PEOPLE_F',
7295 'ATTRIBUTE28',
7296 p_old_ATTRIBUTE28,
7297 p_new_ATTRIBUTE28,
7298 p_effective_date
7299 );
7300 --
7301 pay_continuous_calc.event_update(p_business_group_id,
7302 p_legislation_code,
7303 'PER_ALL_PEOPLE_F',
7304 'ATTRIBUTE29',
7305 p_old_ATTRIBUTE29,
7306 p_new_ATTRIBUTE29,
7307 p_effective_date
7308 );
7309 --
7310 pay_continuous_calc.event_update(p_business_group_id,
7311 p_legislation_code,
7312 'PER_ALL_PEOPLE_F',
7313 'ATTRIBUTE3',
7314 p_old_ATTRIBUTE3,
7315 p_new_ATTRIBUTE3,
7316 p_effective_date
7317 );
7318 --
7319 pay_continuous_calc.event_update(p_business_group_id,
7320 p_legislation_code,
7321 'PER_ALL_PEOPLE_F',
7322 'ATTRIBUTE30',
7323 p_old_ATTRIBUTE30,
7324 p_new_ATTRIBUTE30,
7325 p_effective_date
7326 );
7327 --
7328 pay_continuous_calc.event_update(p_business_group_id,
7329 p_legislation_code,
7330 'PER_ALL_PEOPLE_F',
7331 'ATTRIBUTE4',
7332 p_old_ATTRIBUTE4,
7333 p_new_ATTRIBUTE4,
7334 p_effective_date
7335 );
7336 --
7337 pay_continuous_calc.event_update(p_business_group_id,
7338 p_legislation_code,
7339 'PER_ALL_PEOPLE_F',
7340 'ATTRIBUTE5',
7341 p_old_ATTRIBUTE5,
7342 p_new_ATTRIBUTE5,
7343 p_effective_date
7344 );
7345 --
7346 pay_continuous_calc.event_update(p_business_group_id,
7347 p_legislation_code,
7348 'PER_ALL_PEOPLE_F',
7349 'ATTRIBUTE6',
7350 p_old_ATTRIBUTE6,
7351 p_new_ATTRIBUTE6,
7352 p_effective_date
7353 );
7354 --
7355 pay_continuous_calc.event_update(p_business_group_id,
7356 p_legislation_code,
7357 'PER_ALL_PEOPLE_F',
7358 'ATTRIBUTE7',
7359 p_old_ATTRIBUTE7,
7360 p_new_ATTRIBUTE7,
7361 p_effective_date
7362 );
7363 --
7364 pay_continuous_calc.event_update(p_business_group_id,
7365 p_legislation_code,
7366 'PER_ALL_PEOPLE_F',
7367 'ATTRIBUTE8',
7368 p_old_ATTRIBUTE8,
7369 p_new_ATTRIBUTE8,
7370 p_effective_date
7371 );
7372 --
7373 pay_continuous_calc.event_update(p_business_group_id,
7374 p_legislation_code,
7375 'PER_ALL_PEOPLE_F',
7376 'ATTRIBUTE9',
7377 p_old_ATTRIBUTE9,
7378 p_new_ATTRIBUTE9,
7379 p_effective_date
7380 );
7381 --
7382 pay_continuous_calc.event_update(p_business_group_id,
7383 p_legislation_code,
7384 'PER_ALL_PEOPLE_F',
7385 'ATTRIBUTE_CATEGORY',
7386 p_old_ATTRIBUTE_CATEGORY,
7387 p_new_ATTRIBUTE_CATEGORY,
7388 p_effective_date
7389 );
7390 --
7391 pay_continuous_calc.event_update(p_business_group_id,
7392 p_legislation_code,
7393 'PER_ALL_PEOPLE_F',
7394 'BACKGROUND_CHECK_STATUS',
7395 p_old_BACKGROUND_CHECK_STATUS,
7396 p_new_BACKGROUND_CHECK_STATUS,
7397 p_effective_date
7398 );
7399 --
7400 pay_continuous_calc.event_update(p_business_group_id,
7401 p_legislation_code,
7402 'PER_ALL_PEOPLE_F',
7403 'BACKGROUND_DATE_CHECK',
7404 p_old_BACKGROUND_DATE_CHECK,
7405 p_new_BACKGROUND_DATE_CHECK,
7406 p_effective_date
7407 );
7408 --
7409 pay_continuous_calc.event_update(p_business_group_id,
7410 p_legislation_code,
7411 'PER_ALL_PEOPLE_F',
7412 'BENEFIT_GROUP_ID',
7413 p_old_BENEFIT_GROUP_ID,
7414 p_new_BENEFIT_GROUP_ID,
7415 p_effective_date
7416 );
7417 --
7418 pay_continuous_calc.event_update(p_business_group_id,
7419 p_legislation_code,
7420 'PER_ALL_PEOPLE_F',
7421 'BLOOD_TYPE',
7422 p_old_BLOOD_TYPE,
7423 p_new_BLOOD_TYPE,
7424 p_effective_date
7425 );
7426 --
7427 pay_continuous_calc.event_update(p_business_group_id,
7428 p_legislation_code,
7429 'PER_ALL_PEOPLE_F',
7430 'BUSINESS_GROUP_ID',
7431 p_old_BUSINESS_GROUP_ID,
7432 p_new_BUSINESS_GROUP_ID,
7433 p_effective_date
7434 );
7435 --
7436 pay_continuous_calc.event_update(p_business_group_id,
7437 p_legislation_code,
7438 'PER_ALL_PEOPLE_F',
7439 'COMMENT_ID',
7440 p_old_COMMENT_ID,
7441 p_new_COMMENT_ID,
7442 p_effective_date
7443 );
7444 --
7445 pay_continuous_calc.event_update(p_business_group_id,
7446 p_legislation_code,
7447 'PER_ALL_PEOPLE_F',
7448 'COORD_BEN_MED_PLN_NO',
7449 p_old_COORD_BEN_MED_PLN_NO,
7450 p_new_COORD_BEN_MED_PLN_NO,
7451 p_effective_date
7452 );
7453 --
7454 pay_continuous_calc.event_update(p_business_group_id,
7455 p_legislation_code,
7456 'PER_ALL_PEOPLE_F',
7457 'COORD_BEN_NO_CVG_FLAG',
7458 p_old_COORD_BEN_NO_CVG_FLAG,
7459 p_new_COORD_BEN_NO_CVG_FLAG,
7460 p_effective_date
7461 );
7462 --
7463 pay_continuous_calc.event_update(p_business_group_id,
7464 p_legislation_code,
7465 'PER_ALL_PEOPLE_F',
7466 'CORRESPONDENCE_LANGUAGE',
7467 p_old_CORRESPONDENCE_LANGUAGE,
7468 p_new_CORRESPONDENCE_LANGUAGE,
7469 p_effective_date
7470 );
7471 --
7472 pay_continuous_calc.event_update(p_business_group_id,
7473 p_legislation_code,
7474 'PER_ALL_PEOPLE_F',
7475 'COUNTRY_OF_BIRTH',
7476 p_old_COUNTRY_OF_BIRTH,
7477 p_new_COUNTRY_OF_BIRTH,
7478 p_effective_date
7479 );
7480 --
7481 pay_continuous_calc.event_update(p_business_group_id,
7482 p_legislation_code,
7483 'PER_ALL_PEOPLE_F',
7484 'CURRENT_APPLICANT_FLAG',
7485 p_old_CURRENT_APPLICANT_FLAG,
7486 p_new_CURRENT_APPLICANT_FLAG,
7487 p_effective_date
7488 );
7489 --
7490 pay_continuous_calc.event_update(p_business_group_id,
7491 p_legislation_code,
7492 'PER_ALL_PEOPLE_F',
7493 'CURRENT_EMPLOYEE_FLAG',
7494 p_old_CURRENT_EMPLOYEE_FLAG,
7495 p_new_CURRENT_EMPLOYEE_FLAG,
7496 p_effective_date
7497 );
7498 --
7499 pay_continuous_calc.event_update(p_business_group_id,
7500 p_legislation_code,
7501 'PER_ALL_PEOPLE_F',
7502 'CURRENT_EMP_OR_APL_FLAG',
7503 p_old_CURRENT_EMP_OR_APL_FLAG,
7504 p_new_CURRENT_EMP_OR_APL_FLAG,
7505 p_effective_date
7506 );
7507 --
7508 pay_continuous_calc.event_update(p_business_group_id,
7509 p_legislation_code,
7510 'PER_ALL_PEOPLE_F',
7511 'DATE_EMPLOYEE_DATA_VERIFIED',
7512 p_old_DATE_EMPLOYEE_DATA_VERIF,
7513 p_new_DATE_EMPLOYEE_DATA_VERIF,
7514 p_effective_date
7515 );
7516 --
7517 pay_continuous_calc.event_update(p_business_group_id,
7518 p_legislation_code,
7519 'PER_ALL_PEOPLE_F',
7520 'DATE_OF_BIRTH',
7521 p_old_DATE_OF_BIRTH,
7522 p_new_DATE_OF_BIRTH,
7523 p_effective_date
7524 );
7525 --
7526 pay_continuous_calc.event_update(p_business_group_id,
7527 p_legislation_code,
7528 'PER_ALL_PEOPLE_F',
7529 'DATE_OF_DEATH',
7530 p_old_DATE_OF_DEATH,
7531 p_new_DATE_OF_DEATH,
7532 p_effective_date
7533 );
7534 --
7535 pay_continuous_calc.event_update(p_business_group_id,
7536 p_legislation_code,
7537 'PER_ALL_PEOPLE_F',
7538 'DPDNT_ADOPTION_DATE',
7539 p_old_DPDNT_ADOPTION_DATE,
7540 p_new_DPDNT_ADOPTION_DATE,
7541 p_effective_date
7542 );
7543 --
7547 'DPDNT_VLNTRY_SVCE_FLAG',
7544 pay_continuous_calc.event_update(p_business_group_id,
7545 p_legislation_code,
7546 'PER_ALL_PEOPLE_F',
7548 p_old_DPDNT_VLNTRY_SVCE_FLAG,
7549 p_new_DPDNT_VLNTRY_SVCE_FLAG,
7550 p_effective_date
7551 );
7552 --
7553 pay_continuous_calc.event_update(p_business_group_id,
7554 p_legislation_code,
7555 'PER_ALL_PEOPLE_F',
7556 'EMAIL_ADDRESS',
7557 p_old_EMAIL_ADDRESS,
7558 p_new_EMAIL_ADDRESS,
7559 p_effective_date
7560 );
7561 --
7562 pay_continuous_calc.event_update(p_business_group_id,
7563 p_legislation_code,
7564 'PER_ALL_PEOPLE_F',
7565 'EMPLOYEE_NUMBER',
7566 p_old_EMPLOYEE_NUMBER,
7567 p_new_EMPLOYEE_NUMBER,
7568 p_effective_date
7569 );
7570 --
7571 pay_continuous_calc.event_update(p_business_group_id,
7572 p_legislation_code,
7573 'PER_ALL_PEOPLE_F',
7574 'EXPENSE_CHECK_SEND_TO_ADDRESS',
7575 p_old_EXPENSE_CHECK_SEND_TO_AD,
7576 p_new_EXPENSE_CHECK_SEND_TO_AD,
7577 p_effective_date
7578 );
7579 --
7580 pay_continuous_calc.event_update(p_business_group_id,
7581 p_legislation_code,
7582 'PER_ALL_PEOPLE_F',
7583 'FAST_PATH_EMPLOYEE',
7584 p_old_FAST_PATH_EMPLOYEE,
7585 p_new_FAST_PATH_EMPLOYEE,
7586 p_effective_date
7587 );
7588 --
7589 pay_continuous_calc.event_update(p_business_group_id,
7590 p_legislation_code,
7591 'PER_ALL_PEOPLE_F',
7592 'FIRST_NAME',
7593 p_old_FIRST_NAME,
7594 p_new_FIRST_NAME,
7595 p_effective_date
7596 );
7597 --
7598 pay_continuous_calc.event_update(p_business_group_id,
7599 p_legislation_code,
7600 'PER_ALL_PEOPLE_F',
7601 'FTE_CAPACITY',
7602 p_old_FTE_CAPACITY,
7603 p_new_FTE_CAPACITY,
7604 p_effective_date
7605 );
7606 --
7607 pay_continuous_calc.event_update(p_business_group_id,
7608 p_legislation_code,
7609 'PER_ALL_PEOPLE_F',
7610 'FULL_NAME',
7611 p_old_FULL_NAME,
7612 p_new_FULL_NAME,
7613 p_effective_date
7614 );
7615 --
7616 pay_continuous_calc.event_update(p_business_group_id,
7617 p_legislation_code,
7618 'PER_ALL_PEOPLE_F',
7619 'GLOBAL_PERSON_ID',
7620 p_old_GLOBAL_PERSON_ID,
7621 p_new_GLOBAL_PERSON_ID,
7622 p_effective_date
7623 );
7624 --
7625 pay_continuous_calc.event_update(p_business_group_id,
7626 p_legislation_code,
7627 'PER_ALL_PEOPLE_F',
7628 'HOLD_APPLICANT_DATE_UNTIL',
7629 p_old_HOLD_APPLICANT_DATE_UNTI,
7630 p_new_HOLD_APPLICANT_DATE_UNTI,
7631 p_effective_date
7632 );
7633 --
7634 pay_continuous_calc.event_update(p_business_group_id,
7635 p_legislation_code,
7636 'PER_ALL_PEOPLE_F',
7637 'HONORS',
7638 p_old_HONORS,
7639 p_new_HONORS,
7640 p_effective_date
7641 );
7642 --
7643 pay_continuous_calc.event_update(p_business_group_id,
7644 p_legislation_code,
7645 'PER_ALL_PEOPLE_F',
7646 'INTERNAL_LOCATION',
7647 p_old_INTERNAL_LOCATION,
7648 p_new_INTERNAL_LOCATION,
7649 p_effective_date
7650 );
7651 --
7652 pay_continuous_calc.event_update(p_business_group_id,
7653 p_legislation_code,
7657 p_new_KNOWN_AS,
7654 'PER_ALL_PEOPLE_F',
7655 'KNOWN_AS',
7656 p_old_KNOWN_AS,
7658 p_effective_date
7659 );
7660 --
7661 pay_continuous_calc.event_update(p_business_group_id,
7662 p_legislation_code,
7663 'PER_ALL_PEOPLE_F',
7664 'LAST_MEDICAL_TEST_BY',
7665 p_old_LAST_MEDICAL_TEST_BY,
7666 p_new_LAST_MEDICAL_TEST_BY,
7667 p_effective_date
7668 );
7669 --
7670 pay_continuous_calc.event_update(p_business_group_id,
7671 p_legislation_code,
7672 'PER_ALL_PEOPLE_F',
7673 'LAST_MEDICAL_TEST_DATE',
7674 p_old_LAST_MEDICAL_TEST_DATE,
7675 p_new_LAST_MEDICAL_TEST_DATE,
7676 p_effective_date
7677 );
7678 --
7679 pay_continuous_calc.event_update(p_business_group_id,
7680 p_legislation_code,
7681 'PER_ALL_PEOPLE_F',
7682 'LAST_NAME',
7683 p_old_LAST_NAME,
7684 p_new_LAST_NAME,
7685 p_effective_date
7686 );
7687 --
7688 pay_continuous_calc.event_update(p_business_group_id,
7689 p_legislation_code,
7690 'PER_ALL_PEOPLE_F',
7691 'MAILSTOP',
7692 p_old_MAILSTOP,
7693 p_new_MAILSTOP,
7694 p_effective_date
7695 );
7696 --
7697 pay_continuous_calc.event_update(p_business_group_id,
7698 p_legislation_code,
7699 'PER_ALL_PEOPLE_F',
7700 'MARITAL_STATUS',
7701 p_old_MARITAL_STATUS,
7702 p_new_MARITAL_STATUS,
7703 p_effective_date
7704 );
7705 --
7706 pay_continuous_calc.event_update(p_business_group_id,
7707 p_legislation_code,
7708 'PER_ALL_PEOPLE_F',
7709 'MIDDLE_NAMES',
7710 p_old_MIDDLE_NAMES,
7711 p_new_MIDDLE_NAMES,
7712 p_effective_date
7713 );
7714 --
7715 pay_continuous_calc.event_update(p_business_group_id,
7716 p_legislation_code,
7717 'PER_ALL_PEOPLE_F',
7718 'NATIONALITY',
7719 p_old_NATIONALITY,
7720 p_new_NATIONALITY,
7721 p_effective_date
7722 );
7723 --
7724 pay_continuous_calc.event_update(p_business_group_id,
7725 p_legislation_code,
7726 'PER_ALL_PEOPLE_F',
7727 'NATIONAL_IDENTIFIER',
7728 p_old_NATIONAL_IDENTIFIER,
7729 p_new_NATIONAL_IDENTIFIER,
7730 p_effective_date
7731 );
7732 --
7733 pay_continuous_calc.event_update(p_business_group_id,
7734 p_legislation_code,
7735 'PER_ALL_PEOPLE_F',
7736 'OFFICE_NUMBER',
7737 p_old_OFFICE_NUMBER,
7738 p_new_OFFICE_NUMBER,
7739 p_effective_date
7740 );
7741 --
7742 pay_continuous_calc.event_update(p_business_group_id,
7743 p_legislation_code,
7744 'PER_ALL_PEOPLE_F',
7745 'ON_MILITARY_SERVICE',
7746 p_old_ON_MILITARY_SERVICE,
7747 p_new_ON_MILITARY_SERVICE,
7748 p_effective_date
7749 );
7750 --
7751 pay_continuous_calc.event_update(p_business_group_id,
7752 p_legislation_code,
7753 'PER_ALL_PEOPLE_F',
7754 'ORDER_NAME',
7755 p_old_ORDER_NAME,
7756 p_new_ORDER_NAME,
7757 p_effective_date
7758 );
7759 --
7760 pay_continuous_calc.event_update(p_business_group_id,
7761 p_legislation_code,
7762 'PER_ALL_PEOPLE_F',
7763 'ORIGINAL_DATE_OF_HIRE',
7764 p_old_ORIGINAL_DATE_OF_HIRE,
7768 --
7765 p_new_ORIGINAL_DATE_OF_HIRE,
7766 p_effective_date
7767 );
7769 pay_continuous_calc.event_update(p_business_group_id,
7770 p_legislation_code,
7771 'PER_ALL_PEOPLE_F',
7772 'PERSON_ID',
7773 p_old_PERSON_ID,
7774 p_new_PERSON_ID,
7775 p_effective_date
7776 );
7777 --
7778 pay_continuous_calc.event_update(p_business_group_id,
7779 p_legislation_code,
7780 'PER_ALL_PEOPLE_F',
7781 'PERSON_TYPE_ID',
7782 p_old_PERSON_TYPE_ID,
7783 p_new_PERSON_TYPE_ID,
7784 p_effective_date
7785 );
7786 --
7787 pay_continuous_calc.event_update(p_business_group_id,
7788 p_legislation_code,
7789 'PER_ALL_PEOPLE_F',
7790 'PER_INFORMATION1',
7791 p_old_PER_INFORMATION1,
7792 p_new_PER_INFORMATION1,
7793 p_effective_date
7794 );
7795 --
7796 pay_continuous_calc.event_update(p_business_group_id,
7797 p_legislation_code,
7798 'PER_ALL_PEOPLE_F',
7799 'PER_INFORMATION10',
7800 p_old_PER_INFORMATION10,
7801 p_new_PER_INFORMATION10,
7802 p_effective_date
7803 );
7804 --
7805 pay_continuous_calc.event_update(p_business_group_id,
7806 p_legislation_code,
7807 'PER_ALL_PEOPLE_F',
7808 'PER_INFORMATION11',
7809 p_old_PER_INFORMATION11,
7810 p_new_PER_INFORMATION11,
7811 p_effective_date
7812 );
7813 --
7814 pay_continuous_calc.event_update(p_business_group_id,
7815 p_legislation_code,
7816 'PER_ALL_PEOPLE_F',
7817 'PER_INFORMATION12',
7818 p_old_PER_INFORMATION12,
7819 p_new_PER_INFORMATION12,
7820 p_effective_date
7821 );
7822 --
7823 pay_continuous_calc.event_update(p_business_group_id,
7824 p_legislation_code,
7825 'PER_ALL_PEOPLE_F',
7826 'PER_INFORMATION13',
7827 p_old_PER_INFORMATION13,
7828 p_new_PER_INFORMATION13,
7829 p_effective_date
7830 );
7831 --
7832 pay_continuous_calc.event_update(p_business_group_id,
7833 p_legislation_code,
7834 'PER_ALL_PEOPLE_F',
7835 'PER_INFORMATION14',
7836 p_old_PER_INFORMATION14,
7837 p_new_PER_INFORMATION14,
7838 p_effective_date
7839 );
7840 --
7841 pay_continuous_calc.event_update(p_business_group_id,
7842 p_legislation_code,
7843 'PER_ALL_PEOPLE_F',
7844 'PER_INFORMATION15',
7845 p_old_PER_INFORMATION15,
7846 p_new_PER_INFORMATION15,
7847 p_effective_date
7848 );
7849 --
7850 pay_continuous_calc.event_update(p_business_group_id,
7851 p_legislation_code,
7852 'PER_ALL_PEOPLE_F',
7853 'PER_INFORMATION16',
7854 p_old_PER_INFORMATION16,
7855 p_new_PER_INFORMATION16,
7856 p_effective_date
7857 );
7858 --
7859 pay_continuous_calc.event_update(p_business_group_id,
7860 p_legislation_code,
7861 'PER_ALL_PEOPLE_F',
7862 'PER_INFORMATION17',
7863 p_old_PER_INFORMATION17,
7864 p_new_PER_INFORMATION17,
7865 p_effective_date
7866 );
7867 --
7868 pay_continuous_calc.event_update(p_business_group_id,
7869 p_legislation_code,
7870 'PER_ALL_PEOPLE_F',
7871 'PER_INFORMATION18',
7872 p_old_PER_INFORMATION18,
7873 p_new_PER_INFORMATION18,
7874 p_effective_date
7875 );
7876 --
7880 'PER_INFORMATION19',
7877 pay_continuous_calc.event_update(p_business_group_id,
7878 p_legislation_code,
7879 'PER_ALL_PEOPLE_F',
7881 p_old_PER_INFORMATION19,
7882 p_new_PER_INFORMATION19,
7883 p_effective_date
7884 );
7885 --
7886 pay_continuous_calc.event_update(p_business_group_id,
7887 p_legislation_code,
7888 'PER_ALL_PEOPLE_F',
7889 'PER_INFORMATION2',
7890 p_old_PER_INFORMATION2,
7891 p_new_PER_INFORMATION2,
7892 p_effective_date
7893 );
7894 --
7895 pay_continuous_calc.event_update(p_business_group_id,
7896 p_legislation_code,
7897 'PER_ALL_PEOPLE_F',
7898 'PER_INFORMATION20',
7899 p_old_PER_INFORMATION20,
7900 p_new_PER_INFORMATION20,
7901 p_effective_date
7902 );
7903 --
7904 pay_continuous_calc.event_update(p_business_group_id,
7905 p_legislation_code,
7906 'PER_ALL_PEOPLE_F',
7907 'PER_INFORMATION21',
7908 p_old_PER_INFORMATION21,
7909 p_new_PER_INFORMATION21,
7910 p_effective_date
7911 );
7912 --
7913 pay_continuous_calc.event_update(p_business_group_id,
7914 p_legislation_code,
7915 'PER_ALL_PEOPLE_F',
7916 'PER_INFORMATION22',
7917 p_old_PER_INFORMATION22,
7918 p_new_PER_INFORMATION22,
7919 p_effective_date
7920 );
7921 --
7922 pay_continuous_calc.event_update(p_business_group_id,
7923 p_legislation_code,
7924 'PER_ALL_PEOPLE_F',
7925 'PER_INFORMATION23',
7926 p_old_PER_INFORMATION23,
7927 p_new_PER_INFORMATION23,
7928 p_effective_date
7929 );
7930 --
7931 pay_continuous_calc.event_update(p_business_group_id,
7932 p_legislation_code,
7933 'PER_ALL_PEOPLE_F',
7934 'PER_INFORMATION24',
7935 p_old_PER_INFORMATION24,
7936 p_new_PER_INFORMATION24,
7937 p_effective_date
7938 );
7939 --
7940 pay_continuous_calc.event_update(p_business_group_id,
7941 p_legislation_code,
7942 'PER_ALL_PEOPLE_F',
7943 'PER_INFORMATION25',
7944 p_old_PER_INFORMATION25,
7945 p_new_PER_INFORMATION25,
7946 p_effective_date
7947 );
7948 --
7949 pay_continuous_calc.event_update(p_business_group_id,
7950 p_legislation_code,
7951 'PER_ALL_PEOPLE_F',
7952 'PER_INFORMATION26',
7953 p_old_PER_INFORMATION26,
7954 p_new_PER_INFORMATION26,
7955 p_effective_date
7956 );
7957 --
7958 pay_continuous_calc.event_update(p_business_group_id,
7959 p_legislation_code,
7960 'PER_ALL_PEOPLE_F',
7961 'PER_INFORMATION27',
7962 p_old_PER_INFORMATION27,
7963 p_new_PER_INFORMATION27,
7964 p_effective_date
7965 );
7966 --
7967 pay_continuous_calc.event_update(p_business_group_id,
7968 p_legislation_code,
7969 'PER_ALL_PEOPLE_F',
7970 'PER_INFORMATION28',
7971 p_old_PER_INFORMATION28,
7972 p_new_PER_INFORMATION28,
7973 p_effective_date
7974 );
7975 --
7976 pay_continuous_calc.event_update(p_business_group_id,
7977 p_legislation_code,
7978 'PER_ALL_PEOPLE_F',
7979 'PER_INFORMATION29',
7980 p_old_PER_INFORMATION29,
7981 p_new_PER_INFORMATION29,
7982 p_effective_date
7983 );
7984 --
7985 pay_continuous_calc.event_update(p_business_group_id,
7986 p_legislation_code,
7990 p_new_PER_INFORMATION3,
7987 'PER_ALL_PEOPLE_F',
7988 'PER_INFORMATION3',
7989 p_old_PER_INFORMATION3,
7991 p_effective_date
7992 );
7993 --
7994 pay_continuous_calc.event_update(p_business_group_id,
7995 p_legislation_code,
7996 'PER_ALL_PEOPLE_F',
7997 'PER_INFORMATION30',
7998 p_old_PER_INFORMATION30,
7999 p_new_PER_INFORMATION30,
8000 p_effective_date
8001 );
8002 --
8003 pay_continuous_calc.event_update(p_business_group_id,
8004 p_legislation_code,
8005 'PER_ALL_PEOPLE_F',
8006 'PER_INFORMATION4',
8007 p_old_PER_INFORMATION4,
8008 p_new_PER_INFORMATION4,
8009 p_effective_date
8010 );
8011 --
8012 pay_continuous_calc.event_update(p_business_group_id,
8013 p_legislation_code,
8014 'PER_ALL_PEOPLE_F',
8015 'PER_INFORMATION5',
8016 p_old_PER_INFORMATION5,
8017 p_new_PER_INFORMATION5,
8018 p_effective_date
8019 );
8020 --
8021 pay_continuous_calc.event_update(p_business_group_id,
8022 p_legislation_code,
8023 'PER_ALL_PEOPLE_F',
8024 'PER_INFORMATION6',
8025 p_old_PER_INFORMATION6,
8026 p_new_PER_INFORMATION6,
8027 p_effective_date
8028 );
8029 --
8030 pay_continuous_calc.event_update(p_business_group_id,
8031 p_legislation_code,
8032 'PER_ALL_PEOPLE_F',
8033 'PER_INFORMATION7',
8034 p_old_PER_INFORMATION7,
8035 p_new_PER_INFORMATION7,
8036 p_effective_date
8037 );
8038 --
8039 pay_continuous_calc.event_update(p_business_group_id,
8040 p_legislation_code,
8041 'PER_ALL_PEOPLE_F',
8042 'PER_INFORMATION8',
8043 p_old_PER_INFORMATION8,
8044 p_new_PER_INFORMATION8,
8045 p_effective_date
8046 );
8047 --
8048 pay_continuous_calc.event_update(p_business_group_id,
8049 p_legislation_code,
8050 'PER_ALL_PEOPLE_F',
8051 'PER_INFORMATION9',
8052 p_old_PER_INFORMATION9,
8053 p_new_PER_INFORMATION9,
8054 p_effective_date
8055 );
8056 --
8057 pay_continuous_calc.event_update(p_business_group_id,
8058 p_legislation_code,
8059 'PER_ALL_PEOPLE_F',
8060 'PER_INFORMATION_CATEGORY',
8061 p_old_PER_INFORMATION_CATEGORY,
8062 p_new_PER_INFORMATION_CATEGORY,
8063 p_effective_date
8064 );
8065 --
8066 pay_continuous_calc.event_update(p_business_group_id,
8067 p_legislation_code,
8068 'PER_ALL_PEOPLE_F',
8069 'PREVIOUS_LAST_NAME',
8070 p_old_PREVIOUS_LAST_NAME,
8071 p_new_PREVIOUS_LAST_NAME,
8072 p_effective_date
8073 );
8074 --
8075 pay_continuous_calc.event_update(p_business_group_id,
8076 p_legislation_code,
8077 'PER_ALL_PEOPLE_F',
8078 'PRE_NAME_ADJUNCT',
8079 p_old_PRE_NAME_ADJUNCT,
8080 p_new_PRE_NAME_ADJUNCT,
8081 p_effective_date
8082 );
8083 --
8084 pay_continuous_calc.event_update(p_business_group_id,
8085 p_legislation_code,
8086 'PER_ALL_PEOPLE_F',
8087 'PROGRAM_APPLICATION_ID',
8088 p_old_PROGRAM_APPLICATION_ID,
8089 p_new_PROGRAM_APPLICATION_ID,
8090 p_effective_date
8091 );
8092 --
8093 pay_continuous_calc.event_update(p_business_group_id,
8094 p_legislation_code,
8095 'PER_ALL_PEOPLE_F',
8099 p_effective_date
8096 'PROGRAM_ID',
8097 p_old_PROGRAM_ID,
8098 p_new_PROGRAM_ID,
8100 );
8101 --
8102 pay_continuous_calc.event_update(p_business_group_id,
8103 p_legislation_code,
8104 'PER_ALL_PEOPLE_F',
8105 'PROGRAM_UPDATE_DATE',
8106 p_old_PROGRAM_UPDATE_DATE,
8107 p_new_PROGRAM_UPDATE_DATE,
8108 p_effective_date
8109 );
8110 --
8111 pay_continuous_calc.event_update(p_business_group_id,
8112 p_legislation_code,
8113 'PER_ALL_PEOPLE_F',
8114 'PROJECTED_START_DATE',
8115 p_old_PROJECTED_START_DATE,
8116 p_new_PROJECTED_START_DATE,
8117 p_effective_date
8118 );
8119 --
8120 pay_continuous_calc.event_update(p_business_group_id,
8121 p_legislation_code,
8122 'PER_ALL_PEOPLE_F',
8123 'RECEIPT_OF_DEATH_CERT_DATE',
8124 p_old_RECEIPT_OF_DEATH_CERT_DA,
8125 p_new_RECEIPT_OF_DEATH_CERT_DA,
8126 p_effective_date
8127 );
8128 --
8129 pay_continuous_calc.event_update(p_business_group_id,
8130 p_legislation_code,
8131 'PER_ALL_PEOPLE_F',
8132 'REGION_OF_BIRTH',
8133 p_old_REGION_OF_BIRTH,
8134 p_new_REGION_OF_BIRTH,
8135 p_effective_date
8136 );
8137 --
8138 pay_continuous_calc.event_update(p_business_group_id,
8139 p_legislation_code,
8140 'PER_ALL_PEOPLE_F',
8141 'REGISTERED_DISABLED_FLAG',
8142 p_old_REGISTERED_DISABLED_FLAG,
8143 p_new_REGISTERED_DISABLED_FLAG,
8144 p_effective_date
8145 );
8146 --
8147 pay_continuous_calc.event_update(p_business_group_id,
8148 p_legislation_code,
8149 'PER_ALL_PEOPLE_F',
8150 'REHIRE_AUTHORIZOR',
8151 p_old_REHIRE_AUTHORIZOR,
8152 p_new_REHIRE_AUTHORIZOR,
8153 p_effective_date
8154 );
8155 --
8156 pay_continuous_calc.event_update(p_business_group_id,
8157 p_legislation_code,
8158 'PER_ALL_PEOPLE_F',
8159 'REHIRE_REASON',
8160 p_old_REHIRE_REASON,
8161 p_new_REHIRE_REASON,
8162 p_effective_date
8163 );
8164 --
8165 pay_continuous_calc.event_update(p_business_group_id,
8166 p_legislation_code,
8167 'PER_ALL_PEOPLE_F',
8168 'REHIRE_RECOMMENDATION',
8169 p_old_REHIRE_RECOMMENDATION,
8170 p_new_REHIRE_RECOMMENDATION,
8171 p_effective_date
8172 );
8173 --
8174 pay_continuous_calc.event_update(p_business_group_id,
8175 p_legislation_code,
8176 'PER_ALL_PEOPLE_F',
8177 'REQUEST_ID',
8178 p_old_REQUEST_ID,
8179 p_new_REQUEST_ID,
8180 p_effective_date
8181 );
8182 --
8183 pay_continuous_calc.event_update(p_business_group_id,
8184 p_legislation_code,
8185 'PER_ALL_PEOPLE_F',
8186 'RESUME_EXISTS',
8187 p_old_RESUME_EXISTS,
8188 p_new_RESUME_EXISTS,
8189 p_effective_date
8190 );
8191 --
8192 pay_continuous_calc.event_update(p_business_group_id,
8193 p_legislation_code,
8194 'PER_ALL_PEOPLE_F',
8195 'RESUME_LAST_UPDATED',
8196 p_old_RESUME_LAST_UPDATED,
8197 p_new_RESUME_LAST_UPDATED,
8198 p_effective_date
8199 );
8200 --
8201 pay_continuous_calc.event_update(p_business_group_id,
8202 p_legislation_code,
8203 'PER_ALL_PEOPLE_F',
8204 'SECOND_PASSPORT_EXISTS',
8205 p_old_SECOND_PASSPORT_EXISTS,
8206 p_new_SECOND_PASSPORT_EXISTS,
8207 p_effective_date
8208 );
8209 --
8210 pay_continuous_calc.event_update(p_business_group_id,
8211 p_legislation_code,
8212 'PER_ALL_PEOPLE_F',
8213 'SEX',
8214 p_old_SEX,
8215 p_new_SEX,
8216 p_effective_date
8217 );
8218 --
8219 pay_continuous_calc.event_update(p_business_group_id,
8220 p_legislation_code,
8221 'PER_ALL_PEOPLE_F',
8222 'START_DATE',
8223 p_old_START_DATE,
8224 p_new_START_DATE,
8225 p_effective_date
8226 );
8227 --
8228 pay_continuous_calc.event_update(p_business_group_id,
8229 p_legislation_code,
8230 'PER_ALL_PEOPLE_F',
8231 'STUDENT_STATUS',
8232 p_old_STUDENT_STATUS,
8233 p_new_STUDENT_STATUS,
8234 p_effective_date
8235 );
8236 --
8237 pay_continuous_calc.event_update(p_business_group_id,
8238 p_legislation_code,
8239 'PER_ALL_PEOPLE_F',
8240 'SUFFIX',
8241 p_old_SUFFIX,
8242 p_new_SUFFIX,
8243 p_effective_date
8244 );
8245 --
8246 pay_continuous_calc.event_update(p_business_group_id,
8247 p_legislation_code,
8248 'PER_ALL_PEOPLE_F',
8249 'TITLE',
8250 p_old_TITLE,
8251 p_new_TITLE,
8252 p_effective_date
8253 );
8254 --
8255 pay_continuous_calc.event_update(p_business_group_id,
8256 p_legislation_code,
8257 'PER_ALL_PEOPLE_F',
8258 'TOWN_OF_BIRTH',
8259 p_old_TOWN_OF_BIRTH,
8260 p_new_TOWN_OF_BIRTH,
8261 p_effective_date
8262 );
8263 --
8264 pay_continuous_calc.event_update(p_business_group_id,
8265 p_legislation_code,
8266 'PER_ALL_PEOPLE_F',
8267 'USES_TOBACCO_FLAG',
8268 p_old_USES_TOBACCO_FLAG,
8269 p_new_USES_TOBACCO_FLAG,
8270 p_effective_date
8271 );
8272 --
8273 pay_continuous_calc.event_update(p_business_group_id,
8274 p_legislation_code,
8275 'PER_ALL_PEOPLE_F',
8276 'VENDOR_ID',
8277 p_old_VENDOR_ID,
8278 p_new_VENDOR_ID,
8279 p_effective_date
8280 );
8281 --
8282 pay_continuous_calc.event_update(p_business_group_id,
8283 p_legislation_code,
8284 'PER_ALL_PEOPLE_F',
8285 'WORK_SCHEDULE',
8286 p_old_WORK_SCHEDULE,
8287 p_new_WORK_SCHEDULE,
8288 p_effective_date
8289 );
8290 --
8291 pay_continuous_calc.event_update(p_business_group_id,
8292 p_legislation_code,
8293 'PER_ALL_PEOPLE_F',
8294 'WORK_TELEPHONE',
8295 p_old_WORK_TELEPHONE,
8296 p_new_WORK_TELEPHONE,
8297 p_effective_date
8298 );
8299 --
8300 pay_continuous_calc.event_update(p_business_group_id,
8301 p_legislation_code,
8302 'PER_ALL_PEOPLE_F',
8303 'WORK_TELEPHONE',
8304 p_old_WORK_TELEPHONE,
8305 p_new_WORK_TELEPHONE,
8306 p_effective_date
8307 );
8308 else
8309 /* OK it must be a date track change */
8310 --
8311 pay_continuous_calc.event_update(p_business_group_id,
8312 p_legislation_code,
8313 'PER_ALL_PEOPLE_F',
8314 'EFFECTIVE_END_DATE',
8315 p_old_EFFECTIVE_END_DATE,
8316 p_new_EFFECTIVE_END_DATE,
8317 p_new_effective_end_date,
8318 least(p_old_effective_end_date,
8319 p_new_effective_end_date)
8320 );
8321 --
8322 pay_continuous_calc.event_update(p_business_group_id,
8323 p_legislation_code,
8324 'PER_ALL_PEOPLE_F',
8325 'EFFECTIVE_START_DATE',
8326 p_old_EFFECTIVE_START_DATE,
8327 p_new_EFFECTIVE_START_DATE,
8328 p_new_effective_start_date,
8329 least(p_old_effective_start_date,
8330 p_new_effective_start_date)
8331 );
8332
8333 -- bug 3728906, need to handle obscure case
8334 -- effective_start_date and original_hire_date can get updated directly by
8335 -- core code, so do this check as well
8336 --
8337 pay_continuous_calc.event_update(p_business_group_id,
8338 p_legislation_code,
8339 'PER_ALL_PEOPLE_F',
8340 'ORIGINAL_DATE_OF_HIRE',
8341 p_old_ORIGINAL_DATE_OF_HIRE,
8342 p_new_ORIGINAL_DATE_OF_HIRE,
8343 --p_effective_date
8344 least(p_old_effective_start_date,
8345 p_new_effective_start_date)
8346 );
8347
8348
8349 end if;
8350 --
8351 /* Now call the API for the affected assignments */
8352 declare
8353 l_process_event_id number;
8354 l_object_version_number number;
8355 cnt number;
8356 begin
8357 if (pay_continuous_calc.g_event_list.sz <> 0) then
8358 for asgrec in asgcur (p_old_PERSON_ID) loop
8359 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8360 pay_ppe_api.create_process_event(
8361 p_assignment_id => asgrec.assignment_id,
8362 p_effective_date => g_event_list.effective_date(cnt),
8363 p_change_type => g_event_list.change_type(cnt),
8364 p_status => 'U',
8365 p_description => g_event_list.description(cnt),
8366 p_process_event_id => l_process_event_id,
8367 p_object_version_number => l_object_version_number,
8368 p_event_update_id => g_event_list.event_update_id(cnt),
8369 p_business_group_id => p_business_group_id,
8370 p_calculation_date => g_event_list.calc_date(cnt),
8371 p_surrogate_key => p_old_PERSON_ID
8372 );
8373 end loop;
8374 end loop;
8375 end if;
8376 pay_continuous_calc.g_event_list.sz := 0;
8377 end;
8378 --
8379 end PER_ALL_PEOPLE_F_aru;
8380 --
8381 /* PER_SPINAL_POINT_PLACEMENTS_F */
8382 /* name : PER_SPINAL_POINT_PLACEMENTS_F_aru
8383 purpose : This is procedure that records any updates
8384 on spinal point placement.
8385 */
8386 procedure PER_SPIN_PNT_PLACEMENTS_F_aru(
8387 p_business_group_id in number,
8388 p_legislation_code in varchar2,
8389 p_effective_date in date ,
8390 p_old_ASSIGNMENT_ID in NUMBER,
8391 p_new_ASSIGNMENT_ID in NUMBER ,
8392 p_old_AUTO_INCREMENT_FLAG in VARCHAR2,
8393 p_new_AUTO_INCREMENT_FLAG in VARCHAR2 ,
8394 p_old_BUSINESS_GROUP_ID in NUMBER,
8395 p_new_BUSINESS_GROUP_ID in NUMBER ,
8396 p_old_PARENT_SPINE_ID in NUMBER,
8397 p_new_PARENT_SPINE_ID in NUMBER ,
8398 p_old_PLACEMENT_ID in NUMBER,
8399 p_new_PLACEMENT_ID in NUMBER ,
8400 p_old_PROGRAM_APPLICATION_ID in NUMBER,
8401 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
8402 p_old_PROGRAM_ID in NUMBER,
8403 p_new_PROGRAM_ID in NUMBER ,
8404 p_old_PROGRAM_UPDATE_DATE in DATE,
8405 p_new_PROGRAM_UPDATE_DATE in DATE ,
8406 p_old_REASON in VARCHAR2,
8407 p_new_REASON in VARCHAR2 ,
8411 p_new_STEP_ID in NUMBER ,
8408 p_old_REQUEST_ID in NUMBER,
8409 p_new_REQUEST_ID in NUMBER ,
8410 p_old_STEP_ID in NUMBER,
8412 p_old_EFFECTIVE_END_DATE in DATE,
8413 p_new_EFFECTIVE_END_DATE in DATE ,
8414 p_old_EFFECTIVE_START_DATE in DATE,
8415 p_new_EFFECTIVE_START_DATE in DATE
8416 )
8417 is
8418 --
8419 begin
8420 /* If the continuous calc is overriden then do nothing */
8421 if (g_override_cc = TRUE) then
8422 return;
8423 end if;
8424 --
8425 /* If the dates havent changed it must be a correction */
8426 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
8427 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
8428 --
8429 pay_continuous_calc.event_update(p_business_group_id,
8430 p_legislation_code,
8431 'PER_SPINAL_POINT_PLACEMENTS_F',
8432 'ASSIGNMENT_ID',
8433 p_old_ASSIGNMENT_ID,
8434 p_new_ASSIGNMENT_ID,
8435 p_effective_date
8436 );
8437 --
8438 pay_continuous_calc.event_update(p_business_group_id,
8439 p_legislation_code,
8440 'PER_SPINAL_POINT_PLACEMENTS_F',
8441 'AUTO_INCREMENT_FLAG',
8442 p_old_AUTO_INCREMENT_FLAG,
8443 p_new_AUTO_INCREMENT_FLAG,
8444 p_effective_date
8445 );
8446 --
8447 pay_continuous_calc.event_update(p_business_group_id,
8448 p_legislation_code,
8449 'PER_SPINAL_POINT_PLACEMENTS_F',
8450 'BUSINESS_GROUP_ID',
8451 p_old_BUSINESS_GROUP_ID,
8452 p_new_BUSINESS_GROUP_ID,
8453 p_effective_date
8454 );
8455 --
8456 pay_continuous_calc.event_update(p_business_group_id,
8457 p_legislation_code,
8458 'PER_SPINAL_POINT_PLACEMENTS_F',
8459 'PARENT_SPINE_ID',
8460 p_old_PARENT_SPINE_ID,
8461 p_new_PARENT_SPINE_ID,
8462 p_effective_date
8463 );
8464 --
8465 pay_continuous_calc.event_update(p_business_group_id,
8466 p_legislation_code,
8467 'PER_SPINAL_POINT_PLACEMENTS_F',
8468 'PLACEMENT_ID',
8469 p_old_PLACEMENT_ID,
8470 p_new_PLACEMENT_ID,
8471 p_effective_date
8472 );
8473 --
8474 pay_continuous_calc.event_update(p_business_group_id,
8475 p_legislation_code,
8476 'PER_SPINAL_POINT_PLACEMENTS_F',
8477 'PROGRAM_APPLICATION_ID',
8478 p_old_PROGRAM_APPLICATION_ID,
8479 p_new_PROGRAM_APPLICATION_ID,
8480 p_effective_date
8481 );
8482 --
8483 pay_continuous_calc.event_update(p_business_group_id,
8484 p_legislation_code,
8485 'PER_SPINAL_POINT_PLACEMENTS_F',
8486 'PROGRAM_ID',
8487 p_old_PROGRAM_ID,
8488 p_new_PROGRAM_ID,
8489 p_effective_date
8490 );
8491 --
8492 pay_continuous_calc.event_update(p_business_group_id,
8493 p_legislation_code,
8494 'PER_SPINAL_POINT_PLACEMENTS_F',
8495 'PROGRAM_UPDATE_DATE',
8496 p_old_PROGRAM_UPDATE_DATE,
8497 p_new_PROGRAM_UPDATE_DATE,
8498 p_effective_date
8499 );
8500 --
8501 pay_continuous_calc.event_update(p_business_group_id,
8502 p_legislation_code,
8503 'PER_SPINAL_POINT_PLACEMENTS_F',
8504 'REASON',
8505 p_old_REASON,
8506 p_new_REASON,
8507 p_effective_date
8508 );
8509 --
8510 pay_continuous_calc.event_update(p_business_group_id,
8511 p_legislation_code,
8512 'PER_SPINAL_POINT_PLACEMENTS_F',
8513 'REQUEST_ID',
8514 p_old_REQUEST_ID,
8515 p_new_REQUEST_ID,
8516 p_effective_date
8517 );
8518 --
8519 pay_continuous_calc.event_update(p_business_group_id,
8520 p_legislation_code,
8521 'PER_SPINAL_POINT_PLACEMENTS_F',
8522 'STEP_ID',
8523 p_old_STEP_ID,
8524 p_new_STEP_ID,
8525 p_effective_date
8526 );
8527 --
8528 pay_continuous_calc.event_update(p_business_group_id,
8529 p_legislation_code,
8530 'PER_SPINAL_POINT_PLACEMENTS_F',
8531 'STEP_ID',
8532 p_old_STEP_ID,
8533 p_new_STEP_ID,
8534 p_effective_date
8535 );
8536 else
8537 /* OK it must be a date track change */
8538 --
8539 pay_continuous_calc.event_update(p_business_group_id,
8540 p_legislation_code,
8541 'PER_SPINAL_POINT_PLACEMENTS_F',
8542 'EFFECTIVE_END_DATE',
8543 p_old_EFFECTIVE_END_DATE,
8544 p_new_EFFECTIVE_END_DATE,
8545 p_new_effective_end_date,
8546 least(p_old_effective_end_date,
8547 p_new_effective_end_date)
8548 );
8549 --
8550 pay_continuous_calc.event_update(p_business_group_id,
8551 p_legislation_code,
8552 'PER_SPINAL_POINT_PLACEMENTS_F',
8553 'EFFECTIVE_START_DATE',
8554 p_old_EFFECTIVE_START_DATE,
8555 p_new_EFFECTIVE_START_DATE,
8556 p_new_effective_start_date,
8557 least(p_old_effective_start_date,
8558 p_new_effective_start_date)
8559 );
8560
8561 end if;
8562 --
8563 /* Now call the API for the affected assignments */
8564 declare
8565 l_process_event_id number;
8566 l_object_version_number number;
8567 cnt number;
8568 begin
8569 if (pay_continuous_calc.g_event_list.sz <> 0) then
8570 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8571 pay_ppe_api.create_process_event(
8572 p_assignment_id => p_old_ASSIGNMENT_ID,
8573 p_effective_date => g_event_list.effective_date(cnt),
8574 p_change_type => g_event_list.change_type(cnt),
8575 p_status => 'U',
8576 p_description => g_event_list.description(cnt),
8577 p_process_event_id => l_process_event_id,
8578 p_object_version_number => l_object_version_number,
8579 p_event_update_id => g_event_list.event_update_id(cnt),
8580 p_business_group_id => p_business_group_id,
8581 p_calculation_date => g_event_list.calc_date(cnt),
8582 p_surrogate_key => p_old_PLACEMENT_ID
8583 );
8584 end loop;
8585 end if;
8586 pay_continuous_calc.g_event_list.sz := 0;
8587 end;
8588 --
8589 end PER_SPIN_PNT_PLACEMENTS_F_aru;
8590 --
8591 procedure PER_ASSIGN_BUDGET_VALUES_F_aru(
8592 p_business_group_id in number,
8593 p_legislation_code in varchar2,
8594 p_effective_date in date
8595 ,
8596 p_old_ASSIGNMENT_BUDGET_VALUE_ in NUMBER,
8597 p_new_ASSIGNMENT_BUDGET_VALUE_ in NUMBER
8598 ,
8599 p_old_ASSIGNMENT_ID in NUMBER,
8600 p_new_ASSIGNMENT_ID in NUMBER
8601 ,
8602 p_old_BUSINESS_GROUP_ID in NUMBER,
8603 p_new_BUSINESS_GROUP_ID in NUMBER
8604 ,
8605 p_old_PROGRAM_APPLICATION_ID in NUMBER,
8606 p_new_PROGRAM_APPLICATION_ID in NUMBER
8607 ,
8608 p_old_PROGRAM_ID in NUMBER,
8609 p_new_PROGRAM_ID in NUMBER
8610 ,
8611 p_old_PROGRAM_UPDATE_DATE in DATE,
8612 p_new_PROGRAM_UPDATE_DATE in DATE
8613 ,
8614 p_old_REQUEST_ID in NUMBER,
8615 p_new_REQUEST_ID in NUMBER
8616 ,
8617 p_old_UNIT in VARCHAR2,
8618 p_new_UNIT in VARCHAR2
8619 ,
8620 p_old_VALUE in NUMBER,
8621 p_new_VALUE in NUMBER
8622 ,
8623 p_old_EFFECTIVE_END_DATE in DATE,
8624 p_new_EFFECTIVE_END_DATE in DATE
8625 ,
8626 p_old_EFFECTIVE_START_DATE in DATE,
8627 p_new_EFFECTIVE_START_DATE in DATE
8628 )
8629 is
8630 --
8631 begin
8632 /* If the continuous calc is overriden then do nothing */
8633 if (pay_continuous_calc.g_override_cc = TRUE) then
8634 return;
8635 end if;
8636 --
8637 /* If the dates havent changed it must be a correction */
8638 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
8639 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
8640 --
8641 pay_continuous_calc.event_update(p_business_group_id,
8642 p_legislation_code,
8643 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8644 'ASSIGNMENT_BUDGET_VALUE_ID',
8645 p_old_ASSIGNMENT_BUDGET_VALUE_,
8646 p_new_ASSIGNMENT_BUDGET_VALUE_,
8647 p_effective_date
8648 );
8649 --
8650 pay_continuous_calc.event_update(p_business_group_id,
8651 p_legislation_code,
8652 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8653 'ASSIGNMENT_ID',
8654 p_old_ASSIGNMENT_ID,
8655 p_new_ASSIGNMENT_ID,
8656 p_effective_date
8657 );
8658 --
8659 pay_continuous_calc.event_update(p_business_group_id,
8660 p_legislation_code,
8661 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8662 'BUSINESS_GROUP_ID',
8663 p_old_BUSINESS_GROUP_ID,
8664 p_new_BUSINESS_GROUP_ID,
8665 p_effective_date
8666 );
8667 --
8668 pay_continuous_calc.event_update(p_business_group_id,
8669 p_legislation_code,
8670 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8671 'PROGRAM_APPLICATION_ID',
8672 p_old_PROGRAM_APPLICATION_ID,
8673 p_new_PROGRAM_APPLICATION_ID,
8674 p_effective_date
8675 );
8676 --
8677 pay_continuous_calc.event_update(p_business_group_id,
8678 p_legislation_code,
8679 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8680 'PROGRAM_ID',
8681 p_old_PROGRAM_ID,
8682 p_new_PROGRAM_ID,
8683 p_effective_date
8684 );
8685 --
8686 pay_continuous_calc.event_update(p_business_group_id,
8687 p_legislation_code,
8688 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8689 'PROGRAM_UPDATE_DATE',
8690 p_old_PROGRAM_UPDATE_DATE,
8691 p_new_PROGRAM_UPDATE_DATE,
8692 p_effective_date
8693 );
8694 --
8695 pay_continuous_calc.event_update(p_business_group_id,
8696 p_legislation_code,
8697 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8698 'REQUEST_ID',
8699 p_old_REQUEST_ID,
8700 p_new_REQUEST_ID,
8701 p_effective_date
8702 );
8703 --
8704 pay_continuous_calc.event_update(p_business_group_id,
8705 p_legislation_code,
8706 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8707 'UNIT',
8708 p_old_UNIT,
8709 p_new_UNIT,
8710 p_effective_date
8711 );
8712 --
8713 pay_continuous_calc.event_update(p_business_group_id,
8714 p_legislation_code,
8715 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8716 'VALUE',
8717 p_old_VALUE,
8718 p_new_VALUE,
8719 p_effective_date
8720 );
8721 --
8722 pay_continuous_calc.event_update(p_business_group_id,
8723 p_legislation_code,
8724 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8725 'VALUE',
8726 p_old_VALUE,
8727 p_new_VALUE,
8728 p_effective_date
8729 );
8730 else
8731 /* OK it must be a date track change */
8732 --
8733 pay_continuous_calc.event_update(p_business_group_id,
8734 p_legislation_code,
8735 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8736 'EFFECTIVE_END_DATE',
8737 p_old_EFFECTIVE_END_DATE,
8738 p_new_EFFECTIVE_END_DATE,
8739 p_new_effective_end_date,
8740 least(p_old_effective_end_date,
8741 p_new_effective_end_date)
8742 );
8743 --
8744 pay_continuous_calc.event_update(p_business_group_id,
8745 p_legislation_code,
8746 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8747 'EFFECTIVE_START_DATE',
8748 p_old_EFFECTIVE_START_DATE,
8749 p_new_EFFECTIVE_START_DATE,
8750 p_new_effective_start_date,
8751 least(p_old_effective_start_date,
8752 p_new_effective_start_date)
8753 );
8754
8755 end if;
8756 --
8757 /* Now call the API for the affected assignments */
8758 declare
8759 l_process_event_id number;
8760 l_object_version_number number;
8761 cnt number;
8762 begin
8763 if (pay_continuous_calc.g_event_list.sz <> 0) then
8764 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8765 pay_ppe_api.create_process_event(
8766 p_assignment_id => p_new_assignment_id,
8767 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
8768 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
8769 p_status => 'U',
8770 p_description => pay_continuous_calc.g_event_list.description(cnt),
8771 p_process_event_id => l_process_event_id,
8772 p_object_version_number => l_object_version_number,
8773 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
8774 p_business_group_id => p_business_group_id,
8775 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
8776 p_surrogate_key => p_new_assignment_budget_value_
8777 );
8778 end loop;
8779 end if;
8780 pay_continuous_calc.g_event_list.sz := 0;
8781 end;
8782 --
8783 end PER_ASSIGN_BUDGET_VALUES_F_aru;
8784 --
8785 procedure PER_ASSIGN_BUDGET_VALUES_F_ari(
8786 p_business_group_id in number,
8787 p_legislation_code in varchar2,
8788 p_ASSIGNMENT_BUDGET_VALUE_ in NUMBER,
8789 p_ASSIGNMENT_ID in NUMBER,
8790 p_PROGRAM_APPLICATION_ID in NUMBER,
8791 p_PROGRAM_ID in NUMBER,
8792 p_PROGRAM_UPDATE_DATE in DATE,
8793 p_REQUEST_ID in NUMBER,
8794 p_UNIT in VARCHAR2,
8795 p_VALUE in NUMBER,
8796 p_EFFECTIVE_END_DATE in DATE,
8797 p_EFFECTIVE_START_DATE in DATE
8798 )
8799 is
8800 l_process_api boolean;
8801 l_process_event_id number;
8802 l_object_version_number number;
8803 begin
8804 --
8805 /* If the continuous calc is overriden then do nothing */
8806 if (pay_continuous_calc.g_override_cc = TRUE) then
8807 return;
8808 end if;
8809 --
8810 pay_continuous_calc.event_update(p_business_group_id,
8811 p_legislation_code,
8812 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8813 NULL,
8814 NULL,
8815 NULL,
8816 p_effective_start_date,
8817 p_effective_start_date,
8818 'I'
8819 );
8820 /* Now call the API for the affected assignments */
8821 declare
8822 cnt number;
8823 l_process_event_id number;
8824 l_object_version_number number;
8825 begin
8826 if (pay_continuous_calc.g_event_list.sz <> 0) then
8827 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8828 pay_ppe_api.create_process_event(
8829 p_assignment_id => p_assignment_id,
8830 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
8831 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
8835 p_object_version_number => l_object_version_number,
8832 p_status => 'U',
8833 p_description => pay_continuous_calc.g_event_list.description(cnt),
8834 p_process_event_id => l_process_event_id,
8836 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
8837 p_surrogate_key => p_ASSIGNMENT_BUDGET_VALUE_,
8838 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
8839 p_business_group_id => p_business_group_id
8840 );
8841 end loop;
8842 end if;
8843 pay_continuous_calc.g_event_list.sz := 0;
8844 end;
8845 end PER_ASSIGN_BUDGET_VALUES_F_ari;
8846
8847
8848 /* name : personal_payment_methods_ard
8849 purpose : This is procedure that records any deletes
8850 on personal_payment_methods.
8851 */
8852 procedure PER_ASSIGN_BUDGET_VALUES_ard(
8853 p_business_group_id in number,
8854 p_legislation_code in varchar2,
8855 p_assignment_id in number,
8856 p_effective_start_date in date,
8857 p_assignment_budget_value_ in number
8858 )
8859 is
8860 l_process_event_id number;
8861 l_object_version_number number;
8862 l_proc varchar2(240) := g_package||'.per_assign_budget_values_ard';
8863 begin
8864 hr_utility.set_location(l_proc, 10);
8865 /* If the continuous calc is overriden then do nothing */
8866 if (g_override_cc = TRUE) then
8867 return;
8868 end if;
8869 --
8870 pay_continuous_calc.event_update(p_business_group_id,
8871 p_legislation_code,
8872 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8873 NULL,
8874 NULL,
8875 NULL,
8876 p_effective_start_date,
8877 p_effective_start_date,
8878 'D'
8879 );
8880 /* Now call the API for the affected assignments */
8881 declare
8882 cnt number;
8883 l_process_event_id number;
8884 l_object_version_number number;
8885 begin
8886 if (pay_continuous_calc.g_event_list.sz <> 0) then
8887 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8888 pay_ppe_api.create_process_event(
8889 p_assignment_id => p_assignment_id,
8890 p_effective_date => g_event_list.effective_date(cnt),
8891 p_change_type => g_event_list.change_type(cnt),
8892 p_status => 'U',
8893 p_description => g_event_list.description(cnt),
8894 p_process_event_id => l_process_event_id,
8895 p_object_version_number => l_object_version_number,
8896 p_event_update_id => g_event_list.event_update_id(cnt),
8897 p_surrogate_key => p_assignment_budget_value_,
8898 p_calculation_date => g_event_list.calc_date(cnt),
8899 p_business_group_id => p_business_group_id
8900 );
8901 end loop;
8902 end if;
8903 pay_continuous_calc.g_event_list.sz := 0;
8904 end;
8905 hr_utility.set_location(l_proc, 900);
8906 END per_assign_budget_values_ard;
8907
8908 --
8909
8910
8911 --------------------------------------------
8912 -- PER_PERIODS_OF_SERVICE
8913 --------------------------------------------
8914 /* Used generator to build this procedure, but removed the references to
8915 date columns as this is a non-datetrack table
8916 We are assuming always correction
8917 */
8918 /* PER_PERIODS_OF_SERVICE */
8919 /* name : PER_PERIODS_OF_SERVICE_aru
8920 purpose : This is procedure that records any changes for updates
8921 on per_periods_of_service CORRECTION only.
8922 */
8923 procedure PER_PERIODS_OF_SERVICE_aru(
8924 p_business_group_id in number,
8925 p_legislation_code in varchar2,
8926 p_effective_date in date ,
8927 p_old_ACCEPTED_TERMINATION_DAT in DATE,
8928 p_new_ACCEPTED_TERMINATION_DAT in DATE,
8929 p_old_ACTUAL_TERMINATION_DATE in DATE,
8930 p_new_ACTUAL_TERMINATION_DATE in DATE ,
8931 p_old_ADJUSTED_SVC_DATE in DATE,
8932 p_new_ADJUSTED_SVC_DATE in DATE ,
8933 p_old_ATTRIBUTE1 in VARCHAR2,
8934 p_new_ATTRIBUTE1 in VARCHAR2 ,
8935 p_old_ATTRIBUTE10 in VARCHAR2,
8936 p_new_ATTRIBUTE10 in VARCHAR2 ,
8937 p_old_ATTRIBUTE11 in VARCHAR2,
8938 p_new_ATTRIBUTE11 in VARCHAR2 ,
8939 p_old_ATTRIBUTE12 in VARCHAR2,
8940 p_new_ATTRIBUTE12 in VARCHAR2 ,
8941 p_old_ATTRIBUTE13 in VARCHAR2,
8942 p_new_ATTRIBUTE13 in VARCHAR2 ,
8943 p_old_ATTRIBUTE14 in VARCHAR2,
8944 p_new_ATTRIBUTE14 in VARCHAR2 ,
8945 p_old_ATTRIBUTE15 in VARCHAR2,
8946 p_new_ATTRIBUTE15 in VARCHAR2 ,
8947 p_old_ATTRIBUTE16 in VARCHAR2,
8948 p_new_ATTRIBUTE16 in VARCHAR2 ,
8949 p_old_ATTRIBUTE17 in VARCHAR2,
8950 p_new_ATTRIBUTE17 in VARCHAR2 ,
8951 p_old_ATTRIBUTE18 in VARCHAR2,
8952 p_new_ATTRIBUTE18 in VARCHAR2 ,
8953 p_old_ATTRIBUTE19 in VARCHAR2,
8954 p_new_ATTRIBUTE19 in VARCHAR2 ,
8955 p_old_ATTRIBUTE2 in VARCHAR2,
8956 p_new_ATTRIBUTE2 in VARCHAR2 ,
8957 p_old_ATTRIBUTE20 in VARCHAR2,
8958 p_new_ATTRIBUTE20 in VARCHAR2 ,
8959 p_old_ATTRIBUTE3 in VARCHAR2,
8963 p_old_ATTRIBUTE5 in VARCHAR2,
8960 p_new_ATTRIBUTE3 in VARCHAR2 ,
8961 p_old_ATTRIBUTE4 in VARCHAR2,
8962 p_new_ATTRIBUTE4 in VARCHAR2 ,
8964 p_new_ATTRIBUTE5 in VARCHAR2 ,
8965 p_old_ATTRIBUTE6 in VARCHAR2,
8966 p_new_ATTRIBUTE6 in VARCHAR2 ,
8967 p_old_ATTRIBUTE7 in VARCHAR2,
8968 p_new_ATTRIBUTE7 in VARCHAR2 ,
8969 p_old_ATTRIBUTE8 in VARCHAR2,
8970 p_new_ATTRIBUTE8 in VARCHAR2 ,
8971 p_old_ATTRIBUTE9 in VARCHAR2,
8972 p_new_ATTRIBUTE9 in VARCHAR2 ,
8973 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
8974 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
8975 p_old_BUSINESS_GROUP_ID in NUMBER,
8976 p_new_BUSINESS_GROUP_ID in NUMBER ,
8977 p_old_DATE_START in DATE,
8978 p_new_DATE_START in DATE ,
8979 p_old_FINAL_PROCESS_DATE in DATE,
8980 p_new_FINAL_PROCESS_DATE in DATE ,
8981 p_old_LAST_STANDARD_PROCESS_DA in DATE,
8982 p_new_LAST_STANDARD_PROCESS_DA in DATE ,
8983 p_old_LEAVING_REASON in VARCHAR2,
8984 p_new_LEAVING_REASON in VARCHAR2 ,
8985 p_old_NOTIFIED_TERMINATION_DAT in DATE,
8986 p_new_NOTIFIED_TERMINATION_DAT in DATE ,
8987 p_old_PDS_INFORMATION1 in VARCHAR2,
8988 p_new_PDS_INFORMATION1 in VARCHAR2 ,
8989 p_old_PDS_INFORMATION10 in VARCHAR2,
8990 p_new_PDS_INFORMATION10 in VARCHAR2 ,
8991 p_old_PDS_INFORMATION11 in VARCHAR2,
8992 p_new_PDS_INFORMATION11 in VARCHAR2 ,
8993 p_old_PDS_INFORMATION12 in VARCHAR2,
8994 p_new_PDS_INFORMATION12 in VARCHAR2 ,
8995 p_old_PDS_INFORMATION13 in VARCHAR2,
8996 p_new_PDS_INFORMATION13 in VARCHAR2 ,
8997 p_old_PDS_INFORMATION14 in VARCHAR2,
8998 p_new_PDS_INFORMATION14 in VARCHAR2 ,
8999 p_old_PDS_INFORMATION15 in VARCHAR2,
9000 p_new_PDS_INFORMATION15 in VARCHAR2 ,
9001 p_old_PDS_INFORMATION16 in VARCHAR2,
9002 p_new_PDS_INFORMATION16 in VARCHAR2 ,
9003 p_old_PDS_INFORMATION17 in VARCHAR2,
9004 p_new_PDS_INFORMATION17 in VARCHAR2 ,
9005 p_old_PDS_INFORMATION18 in VARCHAR2,
9006 p_new_PDS_INFORMATION18 in VARCHAR2 ,
9007 p_old_PDS_INFORMATION19 in VARCHAR2,
9008 p_new_PDS_INFORMATION19 in VARCHAR2 ,
9009 p_old_PDS_INFORMATION2 in VARCHAR2,
9010 p_new_PDS_INFORMATION2 in VARCHAR2 ,
9011 p_old_PDS_INFORMATION20 in VARCHAR2,
9012 p_new_PDS_INFORMATION20 in VARCHAR2 ,
9013 p_old_PDS_INFORMATION21 in VARCHAR2,
9014 p_new_PDS_INFORMATION21 in VARCHAR2 ,
9015 p_old_PDS_INFORMATION22 in VARCHAR2,
9016 p_new_PDS_INFORMATION22 in VARCHAR2 ,
9017 p_old_PDS_INFORMATION23 in VARCHAR2,
9018 p_new_PDS_INFORMATION23 in VARCHAR2 ,
9019 p_old_PDS_INFORMATION24 in VARCHAR2,
9020 p_new_PDS_INFORMATION24 in VARCHAR2 ,
9021 p_old_PDS_INFORMATION25 in VARCHAR2,
9022 p_new_PDS_INFORMATION25 in VARCHAR2 ,
9023 p_old_PDS_INFORMATION26 in VARCHAR2,
9024 p_new_PDS_INFORMATION26 in VARCHAR2 ,
9025 p_old_PDS_INFORMATION27 in VARCHAR2,
9026 p_new_PDS_INFORMATION27 in VARCHAR2 ,
9027 p_old_PDS_INFORMATION28 in VARCHAR2,
9028 p_new_PDS_INFORMATION28 in VARCHAR2 ,
9029 p_old_PDS_INFORMATION29 in VARCHAR2,
9030 p_new_PDS_INFORMATION29 in VARCHAR2 ,
9031 p_old_PDS_INFORMATION3 in VARCHAR2,
9032 p_new_PDS_INFORMATION3 in VARCHAR2 ,
9033 p_old_PDS_INFORMATION30 in VARCHAR2,
9034 p_new_PDS_INFORMATION30 in VARCHAR2 ,
9035 p_old_PDS_INFORMATION4 in VARCHAR2,
9036 p_new_PDS_INFORMATION4 in VARCHAR2 ,
9037 p_old_PDS_INFORMATION5 in VARCHAR2,
9038 p_new_PDS_INFORMATION5 in VARCHAR2 ,
9039 p_old_PDS_INFORMATION6 in VARCHAR2,
9040 p_new_PDS_INFORMATION6 in VARCHAR2 ,
9041 p_old_PDS_INFORMATION7 in VARCHAR2,
9042 p_new_PDS_INFORMATION7 in VARCHAR2 ,
9043 p_old_PDS_INFORMATION8 in VARCHAR2,
9044 p_new_PDS_INFORMATION8 in VARCHAR2 ,
9045 p_old_PDS_INFORMATION9 in VARCHAR2,
9046 p_new_PDS_INFORMATION9 in VARCHAR2 ,
9047 p_old_PDS_INFORMATION_CATEGORY in VARCHAR2,
9048 p_new_PDS_INFORMATION_CATEGORY in VARCHAR2 ,
9049 p_old_PERIOD_OF_SERVICE_ID in NUMBER,
9050 p_new_PERIOD_OF_SERVICE_ID in NUMBER ,
9051 p_old_PERSON_ID in NUMBER,
9052 p_new_PERSON_ID in NUMBER ,
9053 p_old_PRIOR_EMPLOYMENT_SSP_PAI in DATE,
9054 p_new_PRIOR_EMPLOYMENT_SSP_PAI in DATE ,
9055 p_old_PRIOR_EMPLOYMENT_SSP_WEE in NUMBER,
9056 p_new_PRIOR_EMPLOYMENT_SSP_WEE in NUMBER ,
9057 p_old_PROGRAM_APPLICATION_ID in NUMBER,
9058 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
9059 p_old_PROGRAM_ID in NUMBER,
9060 p_new_PROGRAM_ID in NUMBER ,
9061 p_old_PROGRAM_UPDATE_DATE in DATE,
9062 p_new_PROGRAM_UPDATE_DATE in DATE ,
9063 p_old_PROJECTED_TERMINATION_DA in DATE,
9064 p_new_PROJECTED_TERMINATION_DA in DATE ,
9065 p_old_REQUEST_ID in NUMBER,
9066 p_new_REQUEST_ID in NUMBER ,
9067 p_old_TERMINATION_ACCEPTED_PER in NUMBER,
9068 p_new_TERMINATION_ACCEPTED_PER in NUMBER
9069 )
9070 is
9071 --
9072 cursor asgcur (p_person_id number) is
9073 select distinct assignment_id
9074 from per_assignments_f
9075 where person_id = p_person_id;
9076 l_proc varchar2(240) := g_package||'.per_periods_of_service_aru';
9077
9078 begin
9079 hr_utility.set_location(l_proc,10);
9080
9081 /* If the continuous calc is overriden then do nothing */
9082 if (pay_continuous_calc.g_override_cc = TRUE) then
9083 return;
9084 end if;
9085 --
9086 /* If the dates havent changed it must be a correction */
9087 -- We are assuming always a CORRECTION as non-datetracked table!
9088 --if (p_old_ = p_new_
9089 --and p_old_ = p_new_) then
9090 --
9091 pay_continuous_calc.event_update(p_business_group_id,
9092 p_legislation_code,
9093 'PER_PERIODS_OF_SERVICE',
9094 'ACCEPTED_TERMINATION_DATE',
9095 p_old_ACCEPTED_TERMINATION_DAT,
9096 p_new_ACCEPTED_TERMINATION_DAT,
9097 p_effective_date
9098 );
9099 --
9100 pay_continuous_calc.event_update(p_business_group_id,
9101 p_legislation_code,
9102 'PER_PERIODS_OF_SERVICE',
9103 'ACTUAL_TERMINATION_DATE',
9104 p_old_ACTUAL_TERMINATION_DATE,
9105 p_new_ACTUAL_TERMINATION_DATE,
9106 p_effective_date
9107 );
9108 --
9109 pay_continuous_calc.event_update(p_business_group_id,
9110 p_legislation_code,
9111 'PER_PERIODS_OF_SERVICE',
9112 'ADJUSTED_SVC_DATE',
9113 p_old_ADJUSTED_SVC_DATE,
9114 p_new_ADJUSTED_SVC_DATE,
9115 p_effective_date
9116 );
9117 --
9118 pay_continuous_calc.event_update(p_business_group_id,
9119 p_legislation_code,
9120 'PER_PERIODS_OF_SERVICE',
9121 'ATTRIBUTE1',
9122 p_old_ATTRIBUTE1,
9123 p_new_ATTRIBUTE1,
9124 p_effective_date
9125 );
9126 --
9127 pay_continuous_calc.event_update(p_business_group_id,
9128 p_legislation_code,
9129 'PER_PERIODS_OF_SERVICE',
9130 'ATTRIBUTE10',
9131 p_old_ATTRIBUTE10,
9132 p_new_ATTRIBUTE10,
9133 p_effective_date
9134 );
9135 --
9136 pay_continuous_calc.event_update(p_business_group_id,
9137 p_legislation_code,
9138 'PER_PERIODS_OF_SERVICE',
9139 'ATTRIBUTE11',
9140 p_old_ATTRIBUTE11,
9141 p_new_ATTRIBUTE11,
9142 p_effective_date
9143 );
9144 --
9145 pay_continuous_calc.event_update(p_business_group_id,
9146 p_legislation_code,
9147 'PER_PERIODS_OF_SERVICE',
9148 'ATTRIBUTE12',
9149 p_old_ATTRIBUTE12,
9150 p_new_ATTRIBUTE12,
9151 p_effective_date
9152 );
9153 --
9154 pay_continuous_calc.event_update(p_business_group_id,
9155 p_legislation_code,
9156 'PER_PERIODS_OF_SERVICE',
9157 'ATTRIBUTE13',
9158 p_old_ATTRIBUTE13,
9159 p_new_ATTRIBUTE13,
9160 p_effective_date
9161 );
9162 --
9163 pay_continuous_calc.event_update(p_business_group_id,
9164 p_legislation_code,
9165 'PER_PERIODS_OF_SERVICE',
9166 'ATTRIBUTE14',
9167 p_old_ATTRIBUTE14,
9168 p_new_ATTRIBUTE14,
9169 p_effective_date
9170 );
9171 --
9172 pay_continuous_calc.event_update(p_business_group_id,
9173 p_legislation_code,
9174 'PER_PERIODS_OF_SERVICE',
9175 'ATTRIBUTE15',
9176 p_old_ATTRIBUTE15,
9177 p_new_ATTRIBUTE15,
9178 p_effective_date
9179 );
9180 --
9181 pay_continuous_calc.event_update(p_business_group_id,
9182 p_legislation_code,
9183 'PER_PERIODS_OF_SERVICE',
9184 'ATTRIBUTE16',
9185 p_old_ATTRIBUTE16,
9186 p_new_ATTRIBUTE16,
9187 p_effective_date
9188 );
9189 --
9190 pay_continuous_calc.event_update(p_business_group_id,
9191 p_legislation_code,
9192 'PER_PERIODS_OF_SERVICE',
9193 'ATTRIBUTE17',
9194 p_old_ATTRIBUTE17,
9195 p_new_ATTRIBUTE17,
9196 p_effective_date
9197 );
9198 --
9199 pay_continuous_calc.event_update(p_business_group_id,
9200 p_legislation_code,
9201 'PER_PERIODS_OF_SERVICE',
9202 'ATTRIBUTE18',
9203 p_old_ATTRIBUTE18,
9204 p_new_ATTRIBUTE18,
9205 p_effective_date
9206 );
9207 --
9208 pay_continuous_calc.event_update(p_business_group_id,
9209 p_legislation_code,
9210 'PER_PERIODS_OF_SERVICE',
9211 'ATTRIBUTE19',
9212 p_old_ATTRIBUTE19,
9213 p_new_ATTRIBUTE19,
9214 p_effective_date
9215 );
9216 --
9217 pay_continuous_calc.event_update(p_business_group_id,
9218 p_legislation_code,
9219 'PER_PERIODS_OF_SERVICE',
9220 'ATTRIBUTE2',
9221 p_old_ATTRIBUTE2,
9222 p_new_ATTRIBUTE2,
9223 p_effective_date
9224 );
9225 --
9226 pay_continuous_calc.event_update(p_business_group_id,
9227 p_legislation_code,
9228 'PER_PERIODS_OF_SERVICE',
9229 'ATTRIBUTE20',
9230 p_old_ATTRIBUTE20,
9231 p_new_ATTRIBUTE20,
9232 p_effective_date
9233 );
9234 --
9235 pay_continuous_calc.event_update(p_business_group_id,
9236 p_legislation_code,
9237 'PER_PERIODS_OF_SERVICE',
9238 'ATTRIBUTE3',
9239 p_old_ATTRIBUTE3,
9240 p_new_ATTRIBUTE3,
9241 p_effective_date
9242 );
9243 --
9244 pay_continuous_calc.event_update(p_business_group_id,
9245 p_legislation_code,
9246 'PER_PERIODS_OF_SERVICE',
9247 'ATTRIBUTE4',
9248 p_old_ATTRIBUTE4,
9249 p_new_ATTRIBUTE4,
9250 p_effective_date
9251 );
9252 --
9253 pay_continuous_calc.event_update(p_business_group_id,
9254 p_legislation_code,
9255 'PER_PERIODS_OF_SERVICE',
9256 'ATTRIBUTE5',
9257 p_old_ATTRIBUTE5,
9258 p_new_ATTRIBUTE5,
9259 p_effective_date
9260 );
9261 --
9262 pay_continuous_calc.event_update(p_business_group_id,
9263 p_legislation_code,
9264 'PER_PERIODS_OF_SERVICE',
9265 'ATTRIBUTE6',
9266 p_old_ATTRIBUTE6,
9267 p_new_ATTRIBUTE6,
9268 p_effective_date
9269 );
9270 --
9271 pay_continuous_calc.event_update(p_business_group_id,
9272 p_legislation_code,
9273 'PER_PERIODS_OF_SERVICE',
9274 'ATTRIBUTE7',
9275 p_old_ATTRIBUTE7,
9276 p_new_ATTRIBUTE7,
9277 p_effective_date
9278 );
9279 --
9280 pay_continuous_calc.event_update(p_business_group_id,
9281 p_legislation_code,
9282 'PER_PERIODS_OF_SERVICE',
9283 'ATTRIBUTE8',
9284 p_old_ATTRIBUTE8,
9285 p_new_ATTRIBUTE8,
9286 p_effective_date
9287 );
9288 --
9289 pay_continuous_calc.event_update(p_business_group_id,
9290 p_legislation_code,
9291 'PER_PERIODS_OF_SERVICE',
9292 'ATTRIBUTE9',
9293 p_old_ATTRIBUTE9,
9294 p_new_ATTRIBUTE9,
9295 p_effective_date
9296 );
9297 --
9298 pay_continuous_calc.event_update(p_business_group_id,
9299 p_legislation_code,
9300 'PER_PERIODS_OF_SERVICE',
9301 'ATTRIBUTE_CATEGORY',
9302 p_old_ATTRIBUTE_CATEGORY,
9303 p_new_ATTRIBUTE_CATEGORY,
9304 p_effective_date
9305 );
9306 --
9307 pay_continuous_calc.event_update(p_business_group_id,
9308 p_legislation_code,
9309 'PER_PERIODS_OF_SERVICE',
9310 'BUSINESS_GROUP_ID',
9311 p_old_BUSINESS_GROUP_ID,
9312 p_new_BUSINESS_GROUP_ID,
9313 p_effective_date
9314 );
9315 --
9316 pay_continuous_calc.event_update(p_business_group_id,
9317 p_legislation_code,
9318 'PER_PERIODS_OF_SERVICE',
9319 'DATE_START',
9320 p_old_DATE_START,
9321 p_new_DATE_START,
9322 p_effective_date
9323 );
9324 --
9325 pay_continuous_calc.event_update(p_business_group_id,
9326 p_legislation_code,
9327 'PER_PERIODS_OF_SERVICE',
9328 'FINAL_PROCESS_DATE',
9329 p_old_FINAL_PROCESS_DATE,
9330 p_new_FINAL_PROCESS_DATE,
9331 p_effective_date
9332 );
9333 --
9334 pay_continuous_calc.event_update(p_business_group_id,
9335 p_legislation_code,
9336 'PER_PERIODS_OF_SERVICE',
9337 'LAST_STANDARD_PROCESS_DATE',
9338 p_old_LAST_STANDARD_PROCESS_DA,
9339 p_new_LAST_STANDARD_PROCESS_DA,
9340 p_effective_date
9341 );
9342 --
9343 pay_continuous_calc.event_update(p_business_group_id,
9344 p_legislation_code,
9345 'PER_PERIODS_OF_SERVICE',
9346 'LEAVING_REASON',
9347 p_old_LEAVING_REASON,
9348 p_new_LEAVING_REASON,
9349 p_effective_date
9350 );
9351 --
9352 pay_continuous_calc.event_update(p_business_group_id,
9353 p_legislation_code,
9354 'PER_PERIODS_OF_SERVICE',
9355 'NOTIFIED_TERMINATION_DATE',
9356 p_old_NOTIFIED_TERMINATION_DAT,
9357 p_new_NOTIFIED_TERMINATION_DAT,
9358 p_effective_date
9359 );
9360 --
9361 pay_continuous_calc.event_update(p_business_group_id,
9362 p_legislation_code,
9363 'PER_PERIODS_OF_SERVICE',
9364 'PDS_INFORMATION1',
9365 p_old_PDS_INFORMATION1,
9366 p_new_PDS_INFORMATION1,
9367 p_effective_date
9368 );
9369 --
9370 pay_continuous_calc.event_update(p_business_group_id,
9371 p_legislation_code,
9372 'PER_PERIODS_OF_SERVICE',
9373 'PDS_INFORMATION10',
9374 p_old_PDS_INFORMATION10,
9375 p_new_PDS_INFORMATION10,
9376 p_effective_date
9377 );
9378 --
9379 pay_continuous_calc.event_update(p_business_group_id,
9380 p_legislation_code,
9381 'PER_PERIODS_OF_SERVICE',
9382 'PDS_INFORMATION11',
9386 );
9383 p_old_PDS_INFORMATION11,
9384 p_new_PDS_INFORMATION11,
9385 p_effective_date
9387 --
9388 pay_continuous_calc.event_update(p_business_group_id,
9389 p_legislation_code,
9390 'PER_PERIODS_OF_SERVICE',
9391 'PDS_INFORMATION12',
9392 p_old_PDS_INFORMATION12,
9393 p_new_PDS_INFORMATION12,
9394 p_effective_date
9395 );
9396 --
9397 pay_continuous_calc.event_update(p_business_group_id,
9398 p_legislation_code,
9399 'PER_PERIODS_OF_SERVICE',
9400 'PDS_INFORMATION13',
9401 p_old_PDS_INFORMATION13,
9402 p_new_PDS_INFORMATION13,
9403 p_effective_date
9404 );
9405 --
9406 pay_continuous_calc.event_update(p_business_group_id,
9410 p_old_PDS_INFORMATION14,
9407 p_legislation_code,
9408 'PER_PERIODS_OF_SERVICE',
9409 'PDS_INFORMATION14',
9411 p_new_PDS_INFORMATION14,
9412 p_effective_date
9413 );
9414 --
9415 pay_continuous_calc.event_update(p_business_group_id,
9416 p_legislation_code,
9417 'PER_PERIODS_OF_SERVICE',
9418 'PDS_INFORMATION15',
9419 p_old_PDS_INFORMATION15,
9420 p_new_PDS_INFORMATION15,
9421 p_effective_date
9422 );
9423 --
9424 pay_continuous_calc.event_update(p_business_group_id,
9425 p_legislation_code,
9426 'PER_PERIODS_OF_SERVICE',
9427 'PDS_INFORMATION16',
9428 p_old_PDS_INFORMATION16,
9429 p_new_PDS_INFORMATION16,
9430 p_effective_date
9431 );
9432 --
9433 pay_continuous_calc.event_update(p_business_group_id,
9434 p_legislation_code,
9435 'PER_PERIODS_OF_SERVICE',
9436 'PDS_INFORMATION17',
9437 p_old_PDS_INFORMATION17,
9438 p_new_PDS_INFORMATION17,
9439 p_effective_date
9440 );
9441 --
9442 pay_continuous_calc.event_update(p_business_group_id,
9443 p_legislation_code,
9444 'PER_PERIODS_OF_SERVICE',
9445 'PDS_INFORMATION18',
9446 p_old_PDS_INFORMATION18,
9447 p_new_PDS_INFORMATION18,
9448 p_effective_date
9449 );
9450 --
9451 pay_continuous_calc.event_update(p_business_group_id,
9452 p_legislation_code,
9453 'PER_PERIODS_OF_SERVICE',
9454 'PDS_INFORMATION19',
9455 p_old_PDS_INFORMATION19,
9456 p_new_PDS_INFORMATION19,
9457 p_effective_date
9458 );
9459 --
9460 pay_continuous_calc.event_update(p_business_group_id,
9461 p_legislation_code,
9462 'PER_PERIODS_OF_SERVICE',
9463 'PDS_INFORMATION2',
9464 p_old_PDS_INFORMATION2,
9465 p_new_PDS_INFORMATION2,
9466 p_effective_date
9467 );
9468 --
9469 pay_continuous_calc.event_update(p_business_group_id,
9470 p_legislation_code,
9471 'PER_PERIODS_OF_SERVICE',
9475 p_effective_date
9472 'PDS_INFORMATION20',
9473 p_old_PDS_INFORMATION20,
9474 p_new_PDS_INFORMATION20,
9476 );
9477 --
9478 pay_continuous_calc.event_update(p_business_group_id,
9479 p_legislation_code,
9480 'PER_PERIODS_OF_SERVICE',
9481 'PDS_INFORMATION21',
9482 p_old_PDS_INFORMATION21,
9483 p_new_PDS_INFORMATION21,
9484 p_effective_date
9485 );
9486 --
9487 pay_continuous_calc.event_update(p_business_group_id,
9488 p_legislation_code,
9489 'PER_PERIODS_OF_SERVICE',
9490 'PDS_INFORMATION22',
9491 p_old_PDS_INFORMATION22,
9492 p_new_PDS_INFORMATION22,
9493 p_effective_date
9494 );
9495 --
9496 pay_continuous_calc.event_update(p_business_group_id,
9497 p_legislation_code,
9498 'PER_PERIODS_OF_SERVICE',
9499 'PDS_INFORMATION23',
9500 p_old_PDS_INFORMATION23,
9501 p_new_PDS_INFORMATION23,
9502 p_effective_date
9503 );
9504 --
9505 pay_continuous_calc.event_update(p_business_group_id,
9506 p_legislation_code,
9507 'PER_PERIODS_OF_SERVICE',
9508 'PDS_INFORMATION24',
9509 p_old_PDS_INFORMATION24,
9510 p_new_PDS_INFORMATION24,
9511 p_effective_date
9512 );
9513 --
9514 pay_continuous_calc.event_update(p_business_group_id,
9515 p_legislation_code,
9516 'PER_PERIODS_OF_SERVICE',
9517 'PDS_INFORMATION25',
9518 p_old_PDS_INFORMATION25,
9519 p_new_PDS_INFORMATION25,
9520 p_effective_date
9521 );
9522 --
9523 pay_continuous_calc.event_update(p_business_group_id,
9524 p_legislation_code,
9525 'PER_PERIODS_OF_SERVICE',
9526 'PDS_INFORMATION26',
9527 p_old_PDS_INFORMATION26,
9528 p_new_PDS_INFORMATION26,
9529 p_effective_date
9530 );
9531 --
9532 pay_continuous_calc.event_update(p_business_group_id,
9533 p_legislation_code,
9534 'PER_PERIODS_OF_SERVICE',
9535 'PDS_INFORMATION27',
9536 p_old_PDS_INFORMATION27,
9537 p_new_PDS_INFORMATION27,
9538 p_effective_date
9539 );
9540 --
9544 'PDS_INFORMATION28',
9541 pay_continuous_calc.event_update(p_business_group_id,
9542 p_legislation_code,
9543 'PER_PERIODS_OF_SERVICE',
9545 p_old_PDS_INFORMATION28,
9546 p_new_PDS_INFORMATION28,
9547 p_effective_date
9548 );
9549 --
9550 pay_continuous_calc.event_update(p_business_group_id,
9551 p_legislation_code,
9552 'PER_PERIODS_OF_SERVICE',
9553 'PDS_INFORMATION29',
9554 p_old_PDS_INFORMATION29,
9555 p_new_PDS_INFORMATION29,
9556 p_effective_date
9557 );
9558 --
9559 pay_continuous_calc.event_update(p_business_group_id,
9560 p_legislation_code,
9561 'PER_PERIODS_OF_SERVICE',
9562 'PDS_INFORMATION3',
9563 p_old_PDS_INFORMATION3,
9564 p_new_PDS_INFORMATION3,
9565 p_effective_date
9566 );
9567 --
9568 pay_continuous_calc.event_update(p_business_group_id,
9569 p_legislation_code,
9570 'PER_PERIODS_OF_SERVICE',
9571 'PDS_INFORMATION30',
9572 p_old_PDS_INFORMATION30,
9573 p_new_PDS_INFORMATION30,
9574 p_effective_date
9575 );
9576 --
9577 pay_continuous_calc.event_update(p_business_group_id,
9578 p_legislation_code,
9579 'PER_PERIODS_OF_SERVICE',
9580 'PDS_INFORMATION4',
9581 p_old_PDS_INFORMATION4,
9582 p_new_PDS_INFORMATION4,
9583 p_effective_date
9584 );
9585 --
9586 pay_continuous_calc.event_update(p_business_group_id,
9587 p_legislation_code,
9588 'PER_PERIODS_OF_SERVICE',
9589 'PDS_INFORMATION5',
9590 p_old_PDS_INFORMATION5,
9591 p_new_PDS_INFORMATION5,
9592 p_effective_date
9593 );
9594 --
9595 pay_continuous_calc.event_update(p_business_group_id,
9596 p_legislation_code,
9597 'PER_PERIODS_OF_SERVICE',
9598 'PDS_INFORMATION6',
9599 p_old_PDS_INFORMATION6,
9600 p_new_PDS_INFORMATION6,
9601 p_effective_date
9602 );
9603 --
9604 pay_continuous_calc.event_update(p_business_group_id,
9605 p_legislation_code,
9606 'PER_PERIODS_OF_SERVICE',
9607 'PDS_INFORMATION7',
9608 p_old_PDS_INFORMATION7,
9609 p_new_PDS_INFORMATION7,
9610 p_effective_date
9611 );
9612 --
9613 pay_continuous_calc.event_update(p_business_group_id,
9614 p_legislation_code,
9615 'PER_PERIODS_OF_SERVICE',
9616 'PDS_INFORMATION8',
9617 p_old_PDS_INFORMATION8,
9618 p_new_PDS_INFORMATION8,
9619 p_effective_date
9620 );
9621 --
9622 pay_continuous_calc.event_update(p_business_group_id,
9623 p_legislation_code,
9624 'PER_PERIODS_OF_SERVICE',
9625 'PDS_INFORMATION9',
9626 p_old_PDS_INFORMATION9,
9627 p_new_PDS_INFORMATION9,
9628 p_effective_date
9629 );
9630 --
9631 pay_continuous_calc.event_update(p_business_group_id,
9632 p_legislation_code,
9633 'PER_PERIODS_OF_SERVICE',
9634 'PDS_INFORMATION_CATEGORY',
9635 p_old_PDS_INFORMATION_CATEGORY,
9636 p_new_PDS_INFORMATION_CATEGORY,
9637 p_effective_date
9638 );
9639 --
9640 pay_continuous_calc.event_update(p_business_group_id,
9641 p_legislation_code,
9642 'PER_PERIODS_OF_SERVICE',
9643 'PERIOD_OF_SERVICE_ID',
9644 p_old_PERIOD_OF_SERVICE_ID,
9645 p_new_PERIOD_OF_SERVICE_ID,
9646 p_effective_date
9647 );
9648 --
9649 pay_continuous_calc.event_update(p_business_group_id,
9650 p_legislation_code,
9651 'PER_PERIODS_OF_SERVICE',
9652 'PERSON_ID',
9653 p_old_PERSON_ID,
9654 p_new_PERSON_ID,
9655 p_effective_date
9656 );
9657 --
9658 pay_continuous_calc.event_update(p_business_group_id,
9659 p_legislation_code,
9660 'PER_PERIODS_OF_SERVICE',
9661 'PRIOR_EMPLOYMENT_SSP_PAID_TO',
9662 p_old_PRIOR_EMPLOYMENT_SSP_PAI,
9663 p_new_PRIOR_EMPLOYMENT_SSP_PAI,
9664 p_effective_date
9665 );
9666 --
9667 pay_continuous_calc.event_update(p_business_group_id,
9668 p_legislation_code,
9669 'PER_PERIODS_OF_SERVICE',
9670 'PRIOR_EMPLOYMENT_SSP_WEEKS',
9671 p_old_PRIOR_EMPLOYMENT_SSP_WEE,
9672 p_new_PRIOR_EMPLOYMENT_SSP_WEE,
9673 p_effective_date
9674 );
9675 --
9676 pay_continuous_calc.event_update(p_business_group_id,
9677 p_legislation_code,
9678 'PER_PERIODS_OF_SERVICE',
9679 'PROGRAM_APPLICATION_ID',
9680 p_old_PROGRAM_APPLICATION_ID,
9681 p_new_PROGRAM_APPLICATION_ID,
9682 p_effective_date
9683 );
9684 --
9685 pay_continuous_calc.event_update(p_business_group_id,
9686 p_legislation_code,
9687 'PER_PERIODS_OF_SERVICE',
9688 'PROGRAM_ID',
9689 p_old_PROGRAM_ID,
9690 p_new_PROGRAM_ID,
9691 p_effective_date
9692 );
9693 --
9694 pay_continuous_calc.event_update(p_business_group_id,
9695 p_legislation_code,
9696 'PER_PERIODS_OF_SERVICE',
9697 'PROGRAM_UPDATE_DATE',
9698 p_old_PROGRAM_UPDATE_DATE,
9699 p_new_PROGRAM_UPDATE_DATE,
9700 p_effective_date
9701 );
9702 --
9703 pay_continuous_calc.event_update(p_business_group_id,
9704 p_legislation_code,
9705 'PER_PERIODS_OF_SERVICE',
9706 'PROJECTED_TERMINATION_DATE',
9707 p_old_PROJECTED_TERMINATION_DA,
9708 p_new_PROJECTED_TERMINATION_DA,
9709 p_effective_date
9710 );
9711 --
9712 pay_continuous_calc.event_update(p_business_group_id,
9713 p_legislation_code,
9714 'PER_PERIODS_OF_SERVICE',
9715 'REQUEST_ID',
9716 p_old_REQUEST_ID,
9717 p_new_REQUEST_ID,
9718 p_effective_date
9719 );
9720 --
9721 pay_continuous_calc.event_update(p_business_group_id,
9722 p_legislation_code,
9723 'PER_PERIODS_OF_SERVICE',
9724 'TERMINATION_ACCEPTED_PERSON_ID',
9725 p_old_TERMINATION_ACCEPTED_PER,
9726 p_new_TERMINATION_ACCEPTED_PER,
9727 p_effective_date
9728 );
9729
9730 --end if;
9731 --
9732 hr_utility.set_location(l_proc,50);
9733 /* Now call the API for the affected assignments */
9734 declare
9735 l_process_event_id number;
9736 l_object_version_number number;
9737 cnt number;
9738 begin
9739 if (pay_continuous_calc.g_event_list.sz <> 0) then
9740 for asgrec in asgcur (p_old_PERSON_ID) loop
9741 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
9742 pay_ppe_api.create_process_event(
9743 p_assignment_id => asgrec.assignment_id,
9744 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
9745 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
9746 p_status => 'U',
9747 p_description => pay_continuous_calc.g_event_list.description(cnt),
9748 p_process_event_id => l_process_event_id,
9749 p_object_version_number => l_object_version_number,
9750 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
9751 p_business_group_id => p_business_group_id,
9752 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
9753 p_surrogate_key => p_new_period_of_service_id
9754 );
9755 end loop;
9756 end loop;
9757 end if;
9758 pay_continuous_calc.g_event_list.sz := 0;
9759 end;
9760 --
9761 hr_utility.set_location(l_proc,900);
9762 end PER_PERIODS_OF_SERVICE_aru;
9763
9764 --------------------------------------------
9765 -- PER_PAY_PROPOSALS_aru
9766 --------------------------------------------
9767 /* Used generator to build this procedure, but removed the references to
9768 date columns as this is a non-datetrack table
9769 We are assuming always correction
9770 */
9771 /* PER_PAY_PROPOSALS */
9772 /* name : PER_PAY_PROPOSALS_aru
9773 purpose : This is procedure that records any changes for updates
9774 on per_pay_proposals CORRECTION only.
9775 */
9776
9777 procedure PER_PAY_PROPOSALS_aru(
9778 p_business_group_id in number,
9779 p_legislation_code in varchar2,
9780 p_effective_date in date ,
9781 p_old_APPROVED in VARCHAR2,
9782 p_new_APPROVED in VARCHAR2 ,
9783 p_old_ASSIGNMENT_ID in NUMBER,
9784 p_new_ASSIGNMENT_ID in NUMBER ,
9785 p_old_ATTRIBUTE1 in VARCHAR2,
9786 p_new_ATTRIBUTE1 in VARCHAR2 ,
9787 p_old_ATTRIBUTE10 in VARCHAR2,
9788 p_new_ATTRIBUTE10 in VARCHAR2 ,
9789 p_old_ATTRIBUTE11 in VARCHAR2,
9790 p_new_ATTRIBUTE11 in VARCHAR2 ,
9791 p_old_ATTRIBUTE12 in VARCHAR2,
9792 p_new_ATTRIBUTE12 in VARCHAR2 ,
9793 p_old_ATTRIBUTE13 in VARCHAR2,
9794 p_new_ATTRIBUTE13 in VARCHAR2 ,
9795 p_old_ATTRIBUTE14 in VARCHAR2,
9796 p_new_ATTRIBUTE14 in VARCHAR2 ,
9797 p_old_ATTRIBUTE15 in VARCHAR2,
9798 p_new_ATTRIBUTE15 in VARCHAR2 ,
9799 p_old_ATTRIBUTE16 in VARCHAR2,
9800 p_new_ATTRIBUTE16 in VARCHAR2 ,
9801 p_old_ATTRIBUTE17 in VARCHAR2,
9802 p_new_ATTRIBUTE17 in VARCHAR2 ,
9803 p_old_ATTRIBUTE18 in VARCHAR2,
9804 p_new_ATTRIBUTE18 in VARCHAR2 ,
9805 p_old_ATTRIBUTE19 in VARCHAR2,
9806 p_new_ATTRIBUTE19 in VARCHAR2 ,
9807 p_old_ATTRIBUTE2 in VARCHAR2,
9808 p_new_ATTRIBUTE2 in VARCHAR2 ,
9809 p_old_ATTRIBUTE20 in VARCHAR2,
9810 p_new_ATTRIBUTE20 in VARCHAR2 ,
9811 p_old_ATTRIBUTE3 in VARCHAR2,
9812 p_new_ATTRIBUTE3 in VARCHAR2 ,
9813 p_old_ATTRIBUTE4 in VARCHAR2,
9814 p_new_ATTRIBUTE4 in VARCHAR2 ,
9815 p_old_ATTRIBUTE5 in VARCHAR2,
9816 p_new_ATTRIBUTE5 in VARCHAR2 ,
9817 p_old_ATTRIBUTE6 in VARCHAR2,
9818 p_new_ATTRIBUTE6 in VARCHAR2 ,
9819 p_old_ATTRIBUTE7 in VARCHAR2,
9820 p_new_ATTRIBUTE7 in VARCHAR2 ,
9821 p_old_ATTRIBUTE8 in VARCHAR2,
9822 p_new_ATTRIBUTE8 in VARCHAR2 ,
9823 p_old_ATTRIBUTE9 in VARCHAR2,
9824 p_new_ATTRIBUTE9 in VARCHAR2 ,
9825 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
9826 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
9827 p_old_BUSINESS_GROUP_ID in NUMBER,
9828 p_new_BUSINESS_GROUP_ID in NUMBER ,
9829 p_old_CHANGE_DATE in DATE,
9830 p_new_CHANGE_DATE in DATE ,
9831 p_old_EVENT_ID in NUMBER,
9832 p_new_EVENT_ID in NUMBER ,
9833 p_old_FORCED_RANKING in NUMBER,
9834 p_new_FORCED_RANKING in NUMBER ,
9835 p_old_LAST_CHANGE_DATE in DATE,
9836 p_new_LAST_CHANGE_DATE in DATE ,
9837 p_old_MULTIPLE_COMPONENTS in VARCHAR2,
9838 p_new_MULTIPLE_COMPONENTS in VARCHAR2 ,
9839 p_old_NEXT_PERF_REVIEW_DATE in DATE,
9840 p_new_NEXT_PERF_REVIEW_DATE in DATE ,
9841 p_old_NEXT_SAL_REVIEW_DATE in DATE,
9842 p_new_NEXT_SAL_REVIEW_DATE in DATE ,
9843 p_old_PAY_PROPOSAL_ID in NUMBER,
9844 p_new_PAY_PROPOSAL_ID in NUMBER ,
9845 p_old_PERFORMANCE_RATING in VARCHAR2,
9846 p_new_PERFORMANCE_RATING in VARCHAR2 ,
9847 p_old_PERFORMANCE_REVIEW_ID in NUMBER,
9848 p_new_PERFORMANCE_REVIEW_ID in NUMBER ,
9849 p_old_PROPOSAL_REASON in VARCHAR2,
9850 p_new_PROPOSAL_REASON in VARCHAR2 ,
9851 p_old_PROPOSED_SALARY in VARCHAR2,
9852 p_new_PROPOSED_SALARY in VARCHAR2 ,
9853 p_old_PROPOSED_SALARY_N in NUMBER,
9854 p_new_PROPOSED_SALARY_N in NUMBER ,
9855 p_old_REVIEW_DATE in DATE,
9856 p_new_REVIEW_DATE in DATE)
9857 is
9858 --
9859 l_proc varchar2(240) := g_package||'.per_pay_proposals_aru';
9860 begin
9861 hr_utility.set_location(l_proc,10);
9862 /* If the continuous calc is overriden then do nothing */
9863 if (pay_continuous_calc.g_override_cc = TRUE) then
9864 return;
9865 end if;
9866 --
9867 /* If the dates havent changed it must be a correction */
9868 -- We are assuming always a CORRECTION as non-datetracked table!
9869 --if (p_old_ = p_new_
9870 --and p_old_ = p_new_) then
9871 --
9872 pay_continuous_calc.event_update(p_business_group_id,
9873 p_legislation_code,
9874 'PER_PAY_PROPOSALS',
9875 'APPROVED',
9876 p_old_APPROVED,
9877 p_new_APPROVED,
9878 p_effective_date
9879 );
9880 --
9881 pay_continuous_calc.event_update(p_business_group_id,
9882 p_legislation_code,
9883 'PER_PAY_PROPOSALS',
9884 'ASSIGNMENT_ID',
9885 p_old_ASSIGNMENT_ID,
9886 p_new_ASSIGNMENT_ID,
9887 p_effective_date
9888 );
9889 --
9890 pay_continuous_calc.event_update(p_business_group_id,
9891 p_legislation_code,
9892 'PER_PAY_PROPOSALS',
9893 'ATTRIBUTE1',
9894 p_old_ATTRIBUTE1,
9895 p_new_ATTRIBUTE1,
9896 p_effective_date
9897 );
9898 --
9899 pay_continuous_calc.event_update(p_business_group_id,
9900 p_legislation_code,
9901 'PER_PAY_PROPOSALS',
9902 'ATTRIBUTE10',
9903 p_old_ATTRIBUTE10,
9904 p_new_ATTRIBUTE10,
9905 p_effective_date
9906 );
9907 --
9908 pay_continuous_calc.event_update(p_business_group_id,
9909 p_legislation_code,
9910 'PER_PAY_PROPOSALS',
9911 'ATTRIBUTE11',
9912 p_old_ATTRIBUTE11,
9913 p_new_ATTRIBUTE11,
9914 p_effective_date
9915 );
9916 --
9917 pay_continuous_calc.event_update(p_business_group_id,
9918 p_legislation_code,
9919 'PER_PAY_PROPOSALS',
9920 'ATTRIBUTE12',
9921 p_old_ATTRIBUTE12,
9922 p_new_ATTRIBUTE12,
9923 p_effective_date
9924 );
9925 --
9926 pay_continuous_calc.event_update(p_business_group_id,
9927 p_legislation_code,
9928 'PER_PAY_PROPOSALS',
9929 'ATTRIBUTE13',
9930 p_old_ATTRIBUTE13,
9931 p_new_ATTRIBUTE13,
9932 p_effective_date
9933 );
9934 --
9935 pay_continuous_calc.event_update(p_business_group_id,
9936 p_legislation_code,
9937 'PER_PAY_PROPOSALS',
9938 'ATTRIBUTE14',
9939 p_old_ATTRIBUTE14,
9940 p_new_ATTRIBUTE14,
9941 p_effective_date
9942 );
9943 --
9944 pay_continuous_calc.event_update(p_business_group_id,
9948 p_old_ATTRIBUTE15,
9945 p_legislation_code,
9946 'PER_PAY_PROPOSALS',
9947 'ATTRIBUTE15',
9949 p_new_ATTRIBUTE15,
9950 p_effective_date
9951 );
9952 --
9953 pay_continuous_calc.event_update(p_business_group_id,
9954 p_legislation_code,
9955 'PER_PAY_PROPOSALS',
9956 'ATTRIBUTE16',
9957 p_old_ATTRIBUTE16,
9958 p_new_ATTRIBUTE16,
9959 p_effective_date
9960 );
9961 --
9962 pay_continuous_calc.event_update(p_business_group_id,
9963 p_legislation_code,
9964 'PER_PAY_PROPOSALS',
9965 'ATTRIBUTE17',
9966 p_old_ATTRIBUTE17,
9967 p_new_ATTRIBUTE17,
9968 p_effective_date
9969 );
9970 --
9971 pay_continuous_calc.event_update(p_business_group_id,
9972 p_legislation_code,
9973 'PER_PAY_PROPOSALS',
9974 'ATTRIBUTE18',
9975 p_old_ATTRIBUTE18,
9976 p_new_ATTRIBUTE18,
9977 p_effective_date
9978 );
9979 --
9980 pay_continuous_calc.event_update(p_business_group_id,
9981 p_legislation_code,
9982 'PER_PAY_PROPOSALS',
9983 'ATTRIBUTE19',
9984 p_old_ATTRIBUTE19,
9985 p_new_ATTRIBUTE19,
9986 p_effective_date
9987 );
9988 --
9989 pay_continuous_calc.event_update(p_business_group_id,
9990 p_legislation_code,
9991 'PER_PAY_PROPOSALS',
9992 'ATTRIBUTE2',
9993 p_old_ATTRIBUTE2,
9994 p_new_ATTRIBUTE2,
9995 p_effective_date
9996 );
9997 --
9998 pay_continuous_calc.event_update(p_business_group_id,
9999 p_legislation_code,
10000 'PER_PAY_PROPOSALS',
10001 'ATTRIBUTE20',
10002 p_old_ATTRIBUTE20,
10003 p_new_ATTRIBUTE20,
10004 p_effective_date
10005 );
10006 --
10007 pay_continuous_calc.event_update(p_business_group_id,
10008 p_legislation_code,
10009 'PER_PAY_PROPOSALS',
10010 'ATTRIBUTE3',
10011 p_old_ATTRIBUTE3,
10012 p_new_ATTRIBUTE3,
10013 p_effective_date
10014 );
10015 --
10016 pay_continuous_calc.event_update(p_business_group_id,
10017 p_legislation_code,
10018 'PER_PAY_PROPOSALS',
10019 'ATTRIBUTE4',
10020 p_old_ATTRIBUTE4,
10021 p_new_ATTRIBUTE4,
10022 p_effective_date
10023 );
10024 --
10025 pay_continuous_calc.event_update(p_business_group_id,
10026 p_legislation_code,
10027 'PER_PAY_PROPOSALS',
10028 'ATTRIBUTE5',
10029 p_old_ATTRIBUTE5,
10030 p_new_ATTRIBUTE5,
10031 p_effective_date
10032 );
10033 --
10034 pay_continuous_calc.event_update(p_business_group_id,
10035 p_legislation_code,
10036 'PER_PAY_PROPOSALS',
10037 'ATTRIBUTE6',
10038 p_old_ATTRIBUTE6,
10039 p_new_ATTRIBUTE6,
10040 p_effective_date
10041 );
10042 --
10043 pay_continuous_calc.event_update(p_business_group_id,
10044 p_legislation_code,
10045 'PER_PAY_PROPOSALS',
10046 'ATTRIBUTE7',
10047 p_old_ATTRIBUTE7,
10048 p_new_ATTRIBUTE7,
10049 p_effective_date
10050 );
10051 --
10052 pay_continuous_calc.event_update(p_business_group_id,
10053 p_legislation_code,
10054 'PER_PAY_PROPOSALS',
10055 'ATTRIBUTE8',
10056 p_old_ATTRIBUTE8,
10057 p_new_ATTRIBUTE8,
10058 p_effective_date
10059 );
10060 --
10061 pay_continuous_calc.event_update(p_business_group_id,
10062 p_legislation_code,
10063 'PER_PAY_PROPOSALS',
10064 'ATTRIBUTE9',
10065 p_old_ATTRIBUTE9,
10066 p_new_ATTRIBUTE9,
10067 p_effective_date
10068 );
10069 --
10070 pay_continuous_calc.event_update(p_business_group_id,
10071 p_legislation_code,
10072 'PER_PAY_PROPOSALS',
10073 'ATTRIBUTE_CATEGORY',
10074 p_old_ATTRIBUTE_CATEGORY,
10075 p_new_ATTRIBUTE_CATEGORY,
10076 p_effective_date
10077 );
10078 --
10079 pay_continuous_calc.event_update(p_business_group_id,
10080 p_legislation_code,
10081 'PER_PAY_PROPOSALS',
10082 'BUSINESS_GROUP_ID',
10083 p_old_BUSINESS_GROUP_ID,
10084 p_new_BUSINESS_GROUP_ID,
10085 p_effective_date
10086 );
10087 --
10088 pay_continuous_calc.event_update(p_business_group_id,
10089 p_legislation_code,
10090 'PER_PAY_PROPOSALS',
10091 'CHANGE_DATE',
10092 p_old_CHANGE_DATE,
10093 p_new_CHANGE_DATE,
10094 p_effective_date
10095 );
10096 --
10097 pay_continuous_calc.event_update(p_business_group_id,
10098 p_legislation_code,
10099 'PER_PAY_PROPOSALS',
10100 'EVENT_ID',
10101 p_old_EVENT_ID,
10102 p_new_EVENT_ID,
10103 p_effective_date
10104 );
10105 --
10106 pay_continuous_calc.event_update(p_business_group_id,
10107 p_legislation_code,
10108 'PER_PAY_PROPOSALS',
10109 'FORCED_RANKING',
10110 p_old_FORCED_RANKING,
10111 p_new_FORCED_RANKING,
10112 p_effective_date
10113 );
10114 --
10115 pay_continuous_calc.event_update(p_business_group_id,
10116 p_legislation_code,
10117 'PER_PAY_PROPOSALS',
10118 'LAST_CHANGE_DATE',
10119 p_old_LAST_CHANGE_DATE,
10120 p_new_LAST_CHANGE_DATE,
10121 p_effective_date
10122 );
10123 --
10124 pay_continuous_calc.event_update(p_business_group_id,
10125 p_legislation_code,
10126 'PER_PAY_PROPOSALS',
10127 'MULTIPLE_COMPONENTS',
10128 p_old_MULTIPLE_COMPONENTS,
10129 p_new_MULTIPLE_COMPONENTS,
10130 p_effective_date
10131 );
10132 --
10133 pay_continuous_calc.event_update(p_business_group_id,
10134 p_legislation_code,
10135 'PER_PAY_PROPOSALS',
10136 'NEXT_PERF_REVIEW_DATE',
10137 p_old_NEXT_PERF_REVIEW_DATE,
10138 p_new_NEXT_PERF_REVIEW_DATE,
10139 p_effective_date
10140 );
10141 --
10142 pay_continuous_calc.event_update(p_business_group_id,
10143 p_legislation_code,
10144 'PER_PAY_PROPOSALS',
10145 'NEXT_SAL_REVIEW_DATE',
10146 p_old_NEXT_SAL_REVIEW_DATE,
10147 p_new_NEXT_SAL_REVIEW_DATE,
10148 p_effective_date
10149 );
10150 --
10151 pay_continuous_calc.event_update(p_business_group_id,
10152 p_legislation_code,
10153 'PER_PAY_PROPOSALS',
10154 'PAY_PROPOSAL_ID',
10155 p_old_PAY_PROPOSAL_ID,
10156 p_new_PAY_PROPOSAL_ID,
10157 p_effective_date
10158 );
10159 --
10160 pay_continuous_calc.event_update(p_business_group_id,
10161 p_legislation_code,
10162 'PER_PAY_PROPOSALS',
10163 'PERFORMANCE_RATING',
10164 p_old_PERFORMANCE_RATING,
10165 p_new_PERFORMANCE_RATING,
10166 p_effective_date
10167 );
10168 --
10169 pay_continuous_calc.event_update(p_business_group_id,
10170 p_legislation_code,
10171 'PER_PAY_PROPOSALS',
10172 'PERFORMANCE_REVIEW_ID',
10173 p_old_PERFORMANCE_REVIEW_ID,
10174 p_new_PERFORMANCE_REVIEW_ID,
10175 p_effective_date
10176 );
10177 --
10178 pay_continuous_calc.event_update(p_business_group_id,
10179 p_legislation_code,
10180 'PER_PAY_PROPOSALS',
10181 'PROPOSAL_REASON',
10182 p_old_PROPOSAL_REASON,
10183 p_new_PROPOSAL_REASON,
10184 p_effective_date
10185 );
10186 --
10187 pay_continuous_calc.event_update(p_business_group_id,
10188 p_legislation_code,
10189 'PER_PAY_PROPOSALS',
10190 'PROPOSED_SALARY',
10191 p_old_PROPOSED_SALARY,
10192 p_new_PROPOSED_SALARY,
10193 p_effective_date
10194 );
10195 --
10196 pay_continuous_calc.event_update(p_business_group_id,
10197 p_legislation_code,
10198 'PER_PAY_PROPOSALS',
10199 'PROPOSED_SALARY_N',
10200 p_old_PROPOSED_SALARY_N,
10201 p_new_PROPOSED_SALARY_N,
10202 p_effective_date
10203 );
10204 --
10205 pay_continuous_calc.event_update(p_business_group_id,
10206 p_legislation_code,
10207 'PER_PAY_PROPOSALS',
10208 'REVIEW_DATE',
10209 p_old_REVIEW_DATE,
10210 p_new_REVIEW_DATE,
10211 p_effective_date
10212 );
10213
10214 -- CORRECTION ONLY end if;
10215 --
10216 /* Now call the API for the affected assignments */
10217 hr_utility.set_location(l_proc,50);
10218 declare
10219 l_process_event_id number;
10220 l_object_version_number number;
10221 cnt number;
10222 begin
10223 if (pay_continuous_calc.g_event_list.sz <> 0) then
10224 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10225 pay_ppe_api.create_process_event(
10226 p_assignment_id => p_new_assignment_id,
10227 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
10228 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
10229 p_status => 'U',
10230 p_description => pay_continuous_calc.g_event_list.description(cnt),
10231 p_process_event_id => l_process_event_id,
10232 p_object_version_number => l_object_version_number,
10233 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
10234 p_business_group_id => p_business_group_id,
10235 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
10236 p_surrogate_key => p_new_pay_proposal_id
10237 );
10238 end loop;
10239 end if;
10240 pay_continuous_calc.g_event_list.sz := 0;
10241 end;
10242 --
10243 hr_utility.set_location(l_proc,900);
10244 end PER_PAY_PROPOSALS_aru;
10245
10246 /* PER_PAY_PROPOSALS */
10247 /* name : PER_PAY_PROPOSALS_ari
10248 purpose : This is procedure that records any insert
10249 on per_pay_proposals.
10250 */
10251 procedure per_pay_proposals_ari(
10252 p_business_group_id in number,
10253 p_legislation_code in varchar2,
10254 p_assignment_id in number,
10255 p_effective_start_date in date,
10256 p_pay_proposal_id in number
10257 )
10258 is
10259 l_process_event_id number;
10260 l_object_version_number number;
10261 l_proc varchar2(240) := g_package||'.per_pay_proposals_ari';
10262 begin
10263 hr_utility.set_location(l_proc, 10);
10264 /* If the continuous calc is overriden then do nothing */
10265 if (g_override_cc = TRUE) then
10266 return;
10267 end if;
10268 --
10269 -- Date column notional as this is a non-datetrack table
10270 -- See pycodtrg.ldt to see which value is used as 'effective_start_date'
10271 pay_continuous_calc.event_update(p_business_group_id,
10272 p_legislation_code,
10273 'PER_PAY_PROPOSALS',
10274 NULL,
10275 NULL,
10276 NULL,
10277 p_effective_start_date,
10278 p_effective_start_date,
10279 'I'
10280 );
10281 /* Now call the API for the affected assignments */
10282 declare
10283 cnt number;
10284 l_process_event_id number;
10285 l_object_version_number number;
10286 begin
10287 if (pay_continuous_calc.g_event_list.sz <> 0) then
10288 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10289 pay_ppe_api.create_process_event(
10290 p_assignment_id => p_assignment_id,
10291 p_effective_date => g_event_list.effective_date(cnt),
10292 p_change_type => g_event_list.change_type(cnt),
10293 p_status => 'U',
10294 p_description => g_event_list.description(cnt),
10295 p_process_event_id => l_process_event_id,
10296 p_object_version_number => l_object_version_number,
10297 p_event_update_id => g_event_list.event_update_id(cnt),
10298 p_surrogate_key => p_pay_proposal_id,
10299 p_calculation_date => g_event_list.calc_date(cnt),
10300 p_business_group_id => p_business_group_id
10301 );
10302 end loop;
10303 end if;
10304 pay_continuous_calc.g_event_list.sz := 0;
10305 end;
10306 hr_utility.set_location(l_proc, 900);
10307 end per_pay_proposals_ari;
10308 --
10309 /* name : per_pay_proposals_ard
10310 purpose : This is procedure that records any deletes
10311 on per_pay_proposals.
10312 */
10313 procedure per_pay_proposals_ard(
10314 p_business_group_id in number,
10315 p_legislation_code in varchar2,
10316 p_assignment_id in number,
10317 p_effective_start_date in date,
10318 p_pay_proposal_id in number
10319 )
10320 is
10321 l_process_event_id number;
10322 l_object_version_number number;
10323 l_proc varchar2(240) := g_package||'.per_pay_proposals_ard';
10324 begin
10325 hr_utility.set_location(l_proc, 10);
10326 /* If the continuous calc is overriden then do nothing */
10327 if (g_override_cc = TRUE) then
10328 return;
10329 end if;
10330 --
10331 -- Date column notional as this is a non-datetrack table
10332 -- See pycodtrg.ldt to see which value is used as 'effective_start_date'
10333 pay_continuous_calc.event_update(p_business_group_id,
10334 p_legislation_code,
10335 'PER_PAY_PROPOSALS',
10336 NULL,
10337 NULL,
10338 NULL,
10339 p_effective_start_date,
10340 p_effective_start_date,
10341 'D'
10342 );
10343 /* Now call the API for the affected assignments */
10344 declare
10345 cnt number;
10346 l_process_event_id number;
10347 l_object_version_number number;
10348 begin
10349 if (pay_continuous_calc.g_event_list.sz <> 0) then
10350 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10351 pay_ppe_api.create_process_event(
10352 p_assignment_id => p_assignment_id,
10353 p_effective_date => g_event_list.effective_date(cnt),
10354 p_change_type => g_event_list.change_type(cnt),
10355 p_status => 'U',
10356 p_description => g_event_list.description(cnt),
10357 p_process_event_id => l_process_event_id,
10358 p_object_version_number => l_object_version_number,
10359 p_event_update_id => g_event_list.event_update_id(cnt),
10360 p_surrogate_key => p_pay_proposal_id,
10361 p_calculation_date => g_event_list.calc_date(cnt),
10362 p_business_group_id => p_business_group_id
10363 );
10364 end loop;
10365 end if;
10366 pay_continuous_calc.g_event_list.sz := 0;
10367 end;
10368 hr_utility.set_location(l_proc, 900);
10369 END per_pay_proposals_ard;
10370 --
10371 --------------------------------------------
10372 -- PER_PERFORMANCE_REVIEWS
10373 --------------------------------------------
10374 /* Used generator to build this procedure, but removed the references to
10375 date columns as this is a non-datetrack table
10376 We are assuming always correction
10377 */
10378 /* PER_PERFORMANCE_REVIEWS */
10379 /* name : PER_PERFORMANCE_REVIEWS
10380 purpose : This is procedure that records any changes for updates
10381 on per_performance_reviews CORRECTION only.
10382 */
10383 procedure PER_PERFORMANCE_REVIEWS_aru(
10384 p_business_group_id in number,
10385 p_legislation_code in varchar2,
10386 p_effective_date in date ,
10387 p_old_ATTRIBUTE1 in VARCHAR2,
10388 p_new_ATTRIBUTE1 in VARCHAR2 ,
10389 p_old_ATTRIBUTE10 in VARCHAR2,
10390 p_new_ATTRIBUTE10 in VARCHAR2 ,
10391 p_old_ATTRIBUTE11 in VARCHAR2,
10392 p_new_ATTRIBUTE11 in VARCHAR2 ,
10393 p_old_ATTRIBUTE12 in VARCHAR2,
10394 p_new_ATTRIBUTE12 in VARCHAR2 ,
10395 p_old_ATTRIBUTE13 in VARCHAR2,
10396 p_new_ATTRIBUTE13 in VARCHAR2 ,
10397 p_old_ATTRIBUTE14 in VARCHAR2,
10398 p_new_ATTRIBUTE14 in VARCHAR2 ,
10399 p_old_ATTRIBUTE15 in VARCHAR2,
10400 p_new_ATTRIBUTE15 in VARCHAR2 ,
10401 p_old_ATTRIBUTE16 in VARCHAR2,
10402 p_new_ATTRIBUTE16 in VARCHAR2 ,
10403 p_old_ATTRIBUTE17 in VARCHAR2,
10404 p_new_ATTRIBUTE17 in VARCHAR2 ,
10405 p_old_ATTRIBUTE18 in VARCHAR2,
10406 p_new_ATTRIBUTE18 in VARCHAR2 ,
10407 p_old_ATTRIBUTE19 in VARCHAR2,
10408 p_new_ATTRIBUTE19 in VARCHAR2 ,
10409 p_old_ATTRIBUTE2 in VARCHAR2,
10410 p_new_ATTRIBUTE2 in VARCHAR2 ,
10411 p_old_ATTRIBUTE20 in VARCHAR2,
10412 p_new_ATTRIBUTE20 in VARCHAR2 ,
10413 p_old_ATTRIBUTE21 in VARCHAR2,
10414 p_new_ATTRIBUTE21 in VARCHAR2 ,
10415 p_old_ATTRIBUTE22 in VARCHAR2,
10416 p_new_ATTRIBUTE22 in VARCHAR2 ,
10417 p_old_ATTRIBUTE23 in VARCHAR2,
10418 p_new_ATTRIBUTE23 in VARCHAR2 ,
10419 p_old_ATTRIBUTE24 in VARCHAR2,
10420 p_new_ATTRIBUTE24 in VARCHAR2,
10421 p_old_ATTRIBUTE25 in VARCHAR2,
10422 p_new_ATTRIBUTE25 in VARCHAR2 ,
10423 p_old_ATTRIBUTE26 in VARCHAR2,
10424 p_new_ATTRIBUTE26 in VARCHAR2 ,
10425 p_old_ATTRIBUTE27 in VARCHAR2,
10426 p_new_ATTRIBUTE27 in VARCHAR2 ,
10427 p_old_ATTRIBUTE28 in VARCHAR2,
10428 p_new_ATTRIBUTE28 in VARCHAR2 ,
10429 p_old_ATTRIBUTE29 in VARCHAR2,
10430 p_new_ATTRIBUTE29 in VARCHAR2 ,
10431 p_old_ATTRIBUTE3 in VARCHAR2,
10432 p_new_ATTRIBUTE3 in VARCHAR2 ,
10433 p_old_ATTRIBUTE30 in VARCHAR2,
10434 p_new_ATTRIBUTE30 in VARCHAR2 ,
10435 p_old_ATTRIBUTE4 in VARCHAR2,
10436 p_new_ATTRIBUTE4 in VARCHAR2 ,
10437 p_old_ATTRIBUTE5 in VARCHAR2,
10438 p_new_ATTRIBUTE5 in VARCHAR2 ,
10439 p_old_ATTRIBUTE6 in VARCHAR2,
10440 p_new_ATTRIBUTE6 in VARCHAR2 ,
10441 p_old_ATTRIBUTE7 in VARCHAR2,
10442 p_new_ATTRIBUTE7 in VARCHAR2 ,
10443 p_old_ATTRIBUTE8 in VARCHAR2,
10444 p_new_ATTRIBUTE8 in VARCHAR2 ,
10445 p_old_ATTRIBUTE9 in VARCHAR2,
10446 p_new_ATTRIBUTE9 in VARCHAR2 ,
10447 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
10448 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
10449 p_old_EVENT_ID in NUMBER,
10450 p_new_EVENT_ID in NUMBER ,
10451 p_old_NEXT_PERF_REVIEW_DATE in DATE,
10452 p_new_NEXT_PERF_REVIEW_DATE in DATE ,
10453 p_old_PERFORMANCE_RATING in VARCHAR2,
10454 p_new_PERFORMANCE_RATING in VARCHAR2 ,
10455 p_old_PERFORMANCE_REVIEW_ID in NUMBER,
10456 p_new_PERFORMANCE_REVIEW_ID in NUMBER ,
10457 p_old_PERSON_ID in NUMBER,
10458 p_new_PERSON_ID in NUMBER ,
10459 p_old_REVIEW_DATE in DATE,
10460 p_new_REVIEW_DATE in DATE
10461 )
10462 is
10463 --
10464 cursor asgcur (p_person_id number) is
10465 select distinct assignment_id
10466 from per_assignments_f
10467 where person_id = p_person_id;
10468 l_proc varchar2(240) := g_package||'.per_performance_reviews_aru';
10469
10470 begin
10471 hr_utility.set_location(l_proc,10);
10472
10473 /* If the continuous calc is overriden then do nothing */
10474 if (pay_continuous_calc.g_override_cc = TRUE) then
10475 return;
10476 end if;
10477 --
10478 /* If the dates havent changed it must be a correction */
10479 -- We are assuming always a CORRECTION as non-datetracked table!
10480 --if (p_old_ = p_new_
10481 --and p_old_ = p_new_) then
10482 --
10483 pay_continuous_calc.event_update(p_business_group_id,
10484 p_legislation_code,
10485 'PER_PERFORMANCE_REVIEWS',
10486 'ATTRIBUTE1',
10487 p_old_ATTRIBUTE1,
10488 p_new_ATTRIBUTE1,
10489 p_effective_date
10490 );
10491 --
10492 pay_continuous_calc.event_update(p_business_group_id,
10493 p_legislation_code,
10494 'PER_PERFORMANCE_REVIEWS',
10495 'ATTRIBUTE10',
10496 p_old_ATTRIBUTE10,
10497 p_new_ATTRIBUTE10,
10498 p_effective_date
10499 );
10500 --
10501 pay_continuous_calc.event_update(p_business_group_id,
10502 p_legislation_code,
10503 'PER_PERFORMANCE_REVIEWS',
10504 'ATTRIBUTE11',
10505 p_old_ATTRIBUTE11,
10506 p_new_ATTRIBUTE11,
10507 p_effective_date
10508 );
10509 --
10510 pay_continuous_calc.event_update(p_business_group_id,
10511 p_legislation_code,
10512 'PER_PERFORMANCE_REVIEWS',
10513 'ATTRIBUTE12',
10514 p_old_ATTRIBUTE12,
10515 p_new_ATTRIBUTE12,
10516 p_effective_date
10517 );
10518 --
10519 pay_continuous_calc.event_update(p_business_group_id,
10520 p_legislation_code,
10521 'PER_PERFORMANCE_REVIEWS',
10522 'ATTRIBUTE13',
10523 p_old_ATTRIBUTE13,
10524 p_new_ATTRIBUTE13,
10525 p_effective_date
10526 );
10527 --
10528 pay_continuous_calc.event_update(p_business_group_id,
10529 p_legislation_code,
10530 'PER_PERFORMANCE_REVIEWS',
10531 'ATTRIBUTE14',
10532 p_old_ATTRIBUTE14,
10533 p_new_ATTRIBUTE14,
10534 p_effective_date
10535 );
10536 --
10537 pay_continuous_calc.event_update(p_business_group_id,
10538 p_legislation_code,
10539 'PER_PERFORMANCE_REVIEWS',
10540 'ATTRIBUTE15',
10541 p_old_ATTRIBUTE15,
10542 p_new_ATTRIBUTE15,
10543 p_effective_date
10544 );
10545 --
10546 pay_continuous_calc.event_update(p_business_group_id,
10547 p_legislation_code,
10548 'PER_PERFORMANCE_REVIEWS',
10549 'ATTRIBUTE16',
10550 p_old_ATTRIBUTE16,
10551 p_new_ATTRIBUTE16,
10552 p_effective_date
10553 );
10554 --
10555 pay_continuous_calc.event_update(p_business_group_id,
10556 p_legislation_code,
10557 'PER_PERFORMANCE_REVIEWS',
10558 'ATTRIBUTE17',
10559 p_old_ATTRIBUTE17,
10560 p_new_ATTRIBUTE17,
10561 p_effective_date
10562 );
10563 --
10564 pay_continuous_calc.event_update(p_business_group_id,
10565 p_legislation_code,
10566 'PER_PERFORMANCE_REVIEWS',
10567 'ATTRIBUTE18',
10568 p_old_ATTRIBUTE18,
10569 p_new_ATTRIBUTE18,
10570 p_effective_date
10571 );
10572 --
10573 pay_continuous_calc.event_update(p_business_group_id,
10574 p_legislation_code,
10575 'PER_PERFORMANCE_REVIEWS',
10576 'ATTRIBUTE19',
10577 p_old_ATTRIBUTE19,
10578 p_new_ATTRIBUTE19,
10579 p_effective_date
10580 );
10581 --
10582 pay_continuous_calc.event_update(p_business_group_id,
10583 p_legislation_code,
10584 'PER_PERFORMANCE_REVIEWS',
10585 'ATTRIBUTE2',
10586 p_old_ATTRIBUTE2,
10587 p_new_ATTRIBUTE2,
10588 p_effective_date
10589 );
10590 --
10591 pay_continuous_calc.event_update(p_business_group_id,
10592 p_legislation_code,
10593 'PER_PERFORMANCE_REVIEWS',
10594 'ATTRIBUTE20',
10595 p_old_ATTRIBUTE20,
10596 p_new_ATTRIBUTE20,
10597 p_effective_date
10598 );
10599 --
10600 pay_continuous_calc.event_update(p_business_group_id,
10601 p_legislation_code,
10602 'PER_PERFORMANCE_REVIEWS',
10603 'ATTRIBUTE21',
10604 p_old_ATTRIBUTE21,
10605 p_new_ATTRIBUTE21,
10606 p_effective_date
10607 );
10608 --
10609 pay_continuous_calc.event_update(p_business_group_id,
10610 p_legislation_code,
10611 'PER_PERFORMANCE_REVIEWS',
10612 'ATTRIBUTE22',
10613 p_old_ATTRIBUTE22,
10614 p_new_ATTRIBUTE22,
10615 p_effective_date
10616 );
10617 --
10618 pay_continuous_calc.event_update(p_business_group_id,
10619 p_legislation_code,
10620 'PER_PERFORMANCE_REVIEWS',
10621 'ATTRIBUTE23',
10622 p_old_ATTRIBUTE23,
10623 p_new_ATTRIBUTE23,
10624 p_effective_date
10625 );
10626 --
10627 pay_continuous_calc.event_update(p_business_group_id,
10628 p_legislation_code,
10629 'PER_PERFORMANCE_REVIEWS',
10630 'ATTRIBUTE24',
10631 p_old_ATTRIBUTE24,
10632 p_new_ATTRIBUTE24,
10633 p_effective_date
10634 );
10635 --
10636 pay_continuous_calc.event_update(p_business_group_id,
10637 p_legislation_code,
10638 'PER_PERFORMANCE_REVIEWS',
10639 'ATTRIBUTE25',
10643 );
10640 p_old_ATTRIBUTE25,
10641 p_new_ATTRIBUTE25,
10642 p_effective_date
10644 --
10645 pay_continuous_calc.event_update(p_business_group_id,
10646 p_legislation_code,
10647 'PER_PERFORMANCE_REVIEWS',
10648 'ATTRIBUTE26',
10649 p_old_ATTRIBUTE26,
10650 p_new_ATTRIBUTE26,
10651 p_effective_date
10652 );
10653 --
10654 pay_continuous_calc.event_update(p_business_group_id,
10655 p_legislation_code,
10656 'PER_PERFORMANCE_REVIEWS',
10657 'ATTRIBUTE27',
10658 p_old_ATTRIBUTE27,
10659 p_new_ATTRIBUTE27,
10660 p_effective_date
10661 );
10662 --
10663 pay_continuous_calc.event_update(p_business_group_id,
10664 p_legislation_code,
10665 'PER_PERFORMANCE_REVIEWS',
10666 'ATTRIBUTE28',
10667 p_old_ATTRIBUTE28,
10668 p_new_ATTRIBUTE28,
10669 p_effective_date
10670 );
10671
10672 --
10673 pay_continuous_calc.event_update(p_business_group_id,
10674 p_legislation_code,
10675 'PER_PERFORMANCE_REVIEWS',
10676 'ATTRIBUTE29',
10677 p_old_ATTRIBUTE29,
10678 p_new_ATTRIBUTE29,
10679 p_effective_date
10680 );
10681 --
10682 pay_continuous_calc.event_update(p_business_group_id,
10683 p_legislation_code,
10684 'PER_PERFORMANCE_REVIEWS',
10685 'ATTRIBUTE3',
10686 p_old_ATTRIBUTE3,
10687 p_new_ATTRIBUTE3,
10688 p_effective_date
10689 );
10690 --
10691 pay_continuous_calc.event_update(p_business_group_id,
10692 p_legislation_code,
10693 'PER_PERFORMANCE_REVIEWS',
10694 'ATTRIBUTE30',
10695 p_old_ATTRIBUTE30,
10696 p_new_ATTRIBUTE30,
10697 p_effective_date
10698 );
10699 --
10700 pay_continuous_calc.event_update(p_business_group_id,
10701 p_legislation_code,
10702 'PER_PERFORMANCE_REVIEWS',
10703 'ATTRIBUTE4',
10704 p_old_ATTRIBUTE4,
10705 p_new_ATTRIBUTE4,
10706 p_effective_date
10707 );
10708 --
10709 pay_continuous_calc.event_update(p_business_group_id,
10710 p_legislation_code,
10711 'PER_PERFORMANCE_REVIEWS',
10712 'ATTRIBUTE5',
10713 p_old_ATTRIBUTE5,
10714 p_new_ATTRIBUTE5,
10715 p_effective_date
10716 );
10717 --
10718 pay_continuous_calc.event_update(p_business_group_id,
10719 p_legislation_code,
10720 'PER_PERFORMANCE_REVIEWS',
10721 'ATTRIBUTE6',
10722 p_old_ATTRIBUTE6,
10723 p_new_ATTRIBUTE6,
10724 p_effective_date
10725 );
10726 --
10727 pay_continuous_calc.event_update(p_business_group_id,
10728 p_legislation_code,
10729 'PER_PERFORMANCE_REVIEWS',
10730 'ATTRIBUTE7',
10731 p_old_ATTRIBUTE7,
10732 p_new_ATTRIBUTE7,
10733 p_effective_date
10734 );
10735 --
10736 pay_continuous_calc.event_update(p_business_group_id,
10737 p_legislation_code,
10738 'PER_PERFORMANCE_REVIEWS',
10739 'ATTRIBUTE8',
10740 p_old_ATTRIBUTE8,
10741 p_new_ATTRIBUTE8,
10742 p_effective_date
10743 );
10744 --
10745 pay_continuous_calc.event_update(p_business_group_id,
10746 p_legislation_code,
10747 'PER_PERFORMANCE_REVIEWS',
10748 'ATTRIBUTE9',
10749 p_old_ATTRIBUTE9,
10750 p_new_ATTRIBUTE9,
10751 p_effective_date
10752 );
10753 --
10754 pay_continuous_calc.event_update(p_business_group_id,
10755 p_legislation_code,
10756 'PER_PERFORMANCE_REVIEWS',
10757 'ATTRIBUTE_CATEGORY',
10758 p_old_ATTRIBUTE_CATEGORY,
10759 p_new_ATTRIBUTE_CATEGORY,
10760 p_effective_date
10761 );
10762 --
10763 pay_continuous_calc.event_update(p_business_group_id,
10764 p_legislation_code,
10765 'PER_PERFORMANCE_REVIEWS',
10766 'EVENT_ID',
10767 p_old_EVENT_ID,
10768 p_new_EVENT_ID,
10769 p_effective_date
10770 );
10771 --
10772 pay_continuous_calc.event_update(p_business_group_id,
10773 p_legislation_code,
10774 'PER_PERFORMANCE_REVIEWS',
10775 'NEXT_PERF_REVIEW_DATE',
10776 p_old_NEXT_PERF_REVIEW_DATE,
10777 p_new_NEXT_PERF_REVIEW_DATE,
10778 p_effective_date
10779 );
10780 --
10781 pay_continuous_calc.event_update(p_business_group_id,
10782 p_legislation_code,
10783 'PER_PERFORMANCE_REVIEWS',
10784 'PERFORMANCE_RATING',
10785 p_old_PERFORMANCE_RATING,
10786 p_new_PERFORMANCE_RATING,
10787 p_effective_date
10788 );
10789 --
10790 pay_continuous_calc.event_update(p_business_group_id,
10791 p_legislation_code,
10792 'PER_PERFORMANCE_REVIEWS',
10793 'PERFORMANCE_REVIEW_ID',
10794 p_old_PERFORMANCE_REVIEW_ID,
10795 p_new_PERFORMANCE_REVIEW_ID,
10796 p_effective_date
10797 );
10798 --
10799 pay_continuous_calc.event_update(p_business_group_id,
10800 p_legislation_code,
10801 'PER_PERFORMANCE_REVIEWS',
10802 'PERSON_ID',
10803 p_old_PERSON_ID,
10804 p_new_PERSON_ID,
10805 p_effective_date
10806 );
10807 --
10808 pay_continuous_calc.event_update(p_business_group_id,
10809 p_legislation_code,
10810 'PER_PERFORMANCE_REVIEWS',
10811 'REVIEW_DATE',
10812 p_old_REVIEW_DATE,
10813 p_new_REVIEW_DATE,
10814 p_effective_date
10815 );
10816
10817 --end if;
10818 --
10819 /* Now call the API for the affected assignments */
10820 declare
10821 l_process_event_id number;
10822 l_object_version_number number;
10823 cnt number;
10824 begin
10825 if (pay_continuous_calc.g_event_list.sz <> 0) then
10829 p_assignment_id => asgrec.assignment_id,
10826 for asgrec in asgcur (p_old_PERSON_ID) loop
10827 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10828 pay_ppe_api.create_process_event(
10830 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
10831 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
10832 p_status => 'U',
10833 p_description => pay_continuous_calc.g_event_list.description(cnt),
10834 p_process_event_id => l_process_event_id,
10835 p_object_version_number => l_object_version_number,
10836 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
10837 p_business_group_id => p_business_group_id,
10838 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
10839 p_surrogate_key => p_new_performance_review_id
10840 );
10841 end loop;
10842 end loop;
10843 end if;
10844 pay_continuous_calc.g_event_list.sz := 0;
10845 end;
10846 --
10847 end PER_PERFORMANCE_REVIEWS_aru;
10848
10849 --
10850 procedure PAY_COST_ALLOCATIONS_F_aru(
10851 p_business_group_id in number,
10852 p_legislation_code in varchar2,
10853 p_effective_date in date,
10854 p_old_ASSIGNMENT_ID in NUMBER,
10855 p_new_ASSIGNMENT_ID in NUMBER,
10856 p_old_BUSINESS_GROUP_ID in NUMBER,
10857 p_new_BUSINESS_GROUP_ID in NUMBER,
10858 p_old_COST_ALLOCATION_ID in NUMBER,
10859 p_new_COST_ALLOCATION_ID in NUMBER,
10860 p_old_COST_ALLOCATION_KEYFLEX_ in NUMBER,
10861 p_new_COST_ALLOCATION_KEYFLEX_ in NUMBER,
10862 p_old_PROGRAM_APPLICATION_ID in NUMBER,
10863 p_new_PROGRAM_APPLICATION_ID in NUMBER,
10864 p_old_PROGRAM_ID in NUMBER,
10865 p_new_PROGRAM_ID in NUMBER,
10866 p_old_PROGRAM_UPDATE_DATE in DATE,
10867 p_new_PROGRAM_UPDATE_DATE in DATE,
10868 p_old_PROPORTION in NUMBER,
10869 p_new_PROPORTION in NUMBER,
10870 p_old_REQUEST_ID in NUMBER,
10871 p_new_REQUEST_ID in NUMBER,
10872 p_old_EFFECTIVE_END_DATE in DATE,
10873 p_new_EFFECTIVE_END_DATE in DATE,
10874 p_old_EFFECTIVE_START_DATE in DATE,
10875 p_new_EFFECTIVE_START_DATE in DATE
10876 )
10877 is
10878 --
10879 begin
10880 /* If the continuous calc is overriden then do nothing */
10881 if (pay_continuous_calc.g_override_cc = TRUE) then
10882 return;
10883 end if;
10884 --
10885 /* If the dates havent changed it must be a correction */
10886 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
10887 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
10888 --
10889 pay_continuous_calc.event_update(p_business_group_id,
10890 p_legislation_code,
10891 'PAY_COST_ALLOCATIONS_F',
10892 'ASSIGNMENT_ID',
10893 p_old_ASSIGNMENT_ID,
10894 p_new_ASSIGNMENT_ID,
10895 p_effective_date
10896 );
10897 --
10898 pay_continuous_calc.event_update(p_business_group_id,
10899 p_legislation_code,
10900 'PAY_COST_ALLOCATIONS_F',
10901 'BUSINESS_GROUP_ID',
10902 p_old_BUSINESS_GROUP_ID,
10903 p_new_BUSINESS_GROUP_ID,
10904 p_effective_date
10905 );
10906 --
10907 pay_continuous_calc.event_update(p_business_group_id,
10908 p_legislation_code,
10909 'PAY_COST_ALLOCATIONS_F',
10910 'COST_ALLOCATION_ID',
10911 p_old_COST_ALLOCATION_ID,
10912 p_new_COST_ALLOCATION_ID,
10913 p_effective_date
10914 );
10915 --
10916 pay_continuous_calc.event_update(p_business_group_id,
10917 p_legislation_code,
10918 'PAY_COST_ALLOCATIONS_F',
10919 'COST_ALLOCATION_KEYFLEX_ID',
10920 p_old_COST_ALLOCATION_KEYFLEX_,
10921 p_new_COST_ALLOCATION_KEYFLEX_,
10922 p_effective_date
10923 );
10924 --
10925 pay_continuous_calc.event_update(p_business_group_id,
10926 p_legislation_code,
10927 'PAY_COST_ALLOCATIONS_F',
10928 'PROGRAM_APPLICATION_ID',
10929 p_old_PROGRAM_APPLICATION_ID,
10930 p_new_PROGRAM_APPLICATION_ID,
10931 p_effective_date
10932 );
10933 --
10934 pay_continuous_calc.event_update(p_business_group_id,
10935 p_legislation_code,
10936 'PAY_COST_ALLOCATIONS_F',
10937 'PROGRAM_ID',
10938 p_old_PROGRAM_ID,
10939 p_new_PROGRAM_ID,
10940 p_effective_date
10941 );
10942 --
10943 pay_continuous_calc.event_update(p_business_group_id,
10944 p_legislation_code,
10945 'PAY_COST_ALLOCATIONS_F',
10946 'PROGRAM_UPDATE_DATE',
10947 p_old_PROGRAM_UPDATE_DATE,
10948 p_new_PROGRAM_UPDATE_DATE,
10949 p_effective_date
10950 );
10951 --
10952 pay_continuous_calc.event_update(p_business_group_id,
10953 p_legislation_code,
10954 'PAY_COST_ALLOCATIONS_F',
10955 'PROPORTION',
10956 p_old_PROPORTION,
10957 p_new_PROPORTION,
10958 p_effective_date
10959 );
10960 --
10961 pay_continuous_calc.event_update(p_business_group_id,
10962 p_legislation_code,
10963 'PAY_COST_ALLOCATIONS_F',
10964 'REQUEST_ID',
10965 p_old_REQUEST_ID,
10966 p_new_REQUEST_ID,
10967 p_effective_date
10968 );
10969 else
10970 /* OK it must be a date track change */
10971 --
10972 pay_continuous_calc.event_update(p_business_group_id,
10973 p_legislation_code,
10974 'PAY_COST_ALLOCATIONS_F',
10975 'EFFECTIVE_END_DATE',
10976 p_old_EFFECTIVE_END_DATE,
10977 p_new_EFFECTIVE_END_DATE,
10978 p_new_effective_end_date,
10979 least(p_old_effective_end_date,
10980 p_new_effective_end_date)
10981 );
10982 --
10983 pay_continuous_calc.event_update(p_business_group_id,
10984 p_legislation_code,
10985 'PAY_COST_ALLOCATIONS_F',
10986 'EFFECTIVE_START_DATE',
10987 p_old_EFFECTIVE_START_DATE,
10988 p_new_EFFECTIVE_START_DATE,
10989 p_new_effective_start_date,
10990 least(p_old_effective_start_date,
10991 p_new_effective_start_date)
10992 );
10993
10994 end if;
10995 --
10996 /* Now call the API for the affected assignments */
10997 declare
10998 l_process_event_id number;
10999 l_object_version_number number;
11000 cnt number;
11001 begin
11002 if (pay_continuous_calc.g_event_list.sz <> 0) then
11003 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11004 pay_ppe_api.create_process_event(
11005 p_assignment_id => p_old_assignment_id,
11006 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
11007 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
11008 p_status => 'U',
11009 p_description => pay_continuous_calc.g_event_list.description(cnt),
11010 p_process_event_id => l_process_event_id,
11011 p_object_version_number => l_object_version_number,
11012 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
11013 p_business_group_id => p_business_group_id,
11014 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
11015 p_surrogate_key => p_new_cost_allocation_id
11016 );
11017 end loop;
11018 end if;
11019 pay_continuous_calc.g_event_list.sz := 0;
11020 end;
11021 --
11022 end PAY_COST_ALLOCATIONS_F_aru;
11023 --
11024 /* PAY_COST_ALLOCATIONS_F */
11025 /* name : PAY_COST_ALLOCATIONS_F_ari
11026 purpose : This is procedure that records any insert
11027 on PAY_COST_ALLOCATIONS_F.
11028 */
11029 procedure PAY_COST_ALLOCATIONS_F_ari(
11030 p_business_group_id in number,
11031 p_legislation_code in varchar2,
11032 p_assignment_id in number,
11033 p_effective_start_date in date,
11034 p_cost_allocation_id in number
11035 )
11036 is
11037 l_process_event_id number;
11038 l_object_version_number number;
11039 l_proc varchar2(240) := g_package||'.PAY_COST_ALLOCATIONS_F_ari';
11040 begin
11041 hr_utility.set_location(l_proc, 10);
11042 /* If the continuous calc is overriden then do nothing */
11043 if (g_override_cc = TRUE) then
11044 return;
11045 end if;
11046 --
11047 pay_continuous_calc.event_update(p_business_group_id,
11048 p_legislation_code,
11049 'PAY_COST_ALLOCATIONS_F',
11050 NULL,
11051 NULL,
11052 NULL,
11053 p_effective_start_date,
11054 p_effective_start_date,
11055 'I'
11056 );
11057 /* Now call the API for the affected assignments */
11058 declare
11059 cnt number;
11060 l_process_event_id number;
11061 l_object_version_number number;
11062 begin
11063 if (pay_continuous_calc.g_event_list.sz <> 0) then
11064 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11065 pay_ppe_api.create_process_event(
11066 p_assignment_id => p_assignment_id,
11067 p_effective_date => g_event_list.effective_date(cnt),
11068 p_change_type => g_event_list.change_type(cnt),
11069 p_status => 'U',
11070 p_description => g_event_list.description(cnt),
11071 p_process_event_id => l_process_event_id,
11072 p_object_version_number => l_object_version_number,
11073 p_event_update_id => g_event_list.event_update_id(cnt),
11074 p_surrogate_key => p_cost_allocation_id,
11075 p_calculation_date => g_event_list.calc_date(cnt),
11076 p_business_group_id => p_business_group_id
11077 );
11078 end loop;
11079 end if;
11080 pay_continuous_calc.g_event_list.sz := 0;
11081 end;
11082 hr_utility.set_location(l_proc, 900);
11083 end PAY_COST_ALLOCATIONS_F_ari;
11084 --
11085 /* name : PAY_COST_ALLOCATIONS_F_ard
11086 purpose : This is procedure that records any deletes
11087 on PAY_COST_ALLOCATIONS_F.
11088 */
11089 procedure PAY_COST_ALLOCATIONS_F_ard(
11090 p_business_group_id in number,
11091 p_legislation_code in varchar2,
11092 p_assignment_id in number,
11093 p_old_cost_allocation_ID in number,
11094 p_old_effective_start_date in date,
11095 p_new_effective_start_date in date,
11096 p_old_effective_end_date in date,
11097 p_new_effective_end_date in date
11098 )
11099 is
11100 l_process_event_id number;
11101 l_object_version_number number;
11102 l_effective_date date;
11103 l_mode pay_event_updates.event_type%type;
11104 l_column_name pay_event_updates.column_name%type;
11105 l_old_value date;
11106 l_new_value date;
11107 l_proc varchar2(240) := g_package||'.PAY_COST_ALLOCATIONS_F_ard';
11108 begin
11109 hr_utility.set_location(l_proc, 10);
11110 /* If the continuous calc is overriden then do nothing */
11111 if (g_override_cc = TRUE) then
11112 return;
11113 end if;
11114 --
11115 -- hr_utility.trace('> p_assignment_id: '||p_assignment_id);
11116 -- hr_utility.trace('> p_old_cost_allocation_ID: '||p_old_cost_allocation_ID);
11117 -- hr_utility.trace('> p_old_effective_start_date: '||p_old_effective_start_date);
11118 -- hr_utility.trace('> p_new_effective_start_date: '||p_new_effective_start_date);
11119 -- hr_utility.trace('> pay_dyn_triggers.g_dyt_mode: '||pay_dyn_triggers.g_dyt_mode);
11120 -- hr_utility.trace('> pay_dyn_triggers.g_dbms_dyt: '||pay_dyn_triggers.g_dbms_dyt);
11121
11122 --
11123 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
11124 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
11125 --
11126 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
11127 l_mode := 'D';
11128 else
11129 l_mode := pay_dyn_triggers.g_dyt_mode;
11130 end if;
11131 l_effective_date := p_old_effective_start_date;
11132 l_column_name := null;
11133 l_old_value := null;
11134 l_new_value := null;
11135 --
11136 else
11137 l_mode := pay_dyn_triggers.g_dyt_mode;
11138 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
11139 --
11140 l_effective_date := p_new_effective_end_date;
11141 l_column_name := 'EFFECTIVE_END_DATE';
11142 l_old_value := p_old_effective_end_date;
11143 l_new_value := p_new_effective_end_date;
11144 --
11145 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
11146 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
11147 --
11148 l_effective_date := p_old_effective_start_date;
11149 l_column_name := 'EFFECTIVE_END_DATE';
11153 end if;
11150 l_old_value := p_old_effective_end_date;
11151 l_new_value := p_new_effective_end_date;
11152 --
11154 end if;
11155 --
11156
11157 -- hr_utility.trace('> l_mode: '||l_mode);
11158
11159 pay_continuous_calc.event_update(p_business_group_id,
11160 p_legislation_code,
11161 'PAY_COST_ALLOCATIONS_F',
11162 l_column_name,
11163 l_old_value,
11164 l_new_value,
11165 l_effective_date,
11166 l_effective_date,
11167 l_mode
11168 );
11169 /* Now call the API for the affected assignments */
11170
11171
11172 /* Now call the API for the affected assignments */
11173 declare
11174 cnt number;
11175 l_process_event_id number;
11176 l_object_version_number number;
11177 begin
11178 if (pay_continuous_calc.g_event_list.sz <> 0) then
11179 hr_utility.trace('> With in Create Process Event: ');
11180 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11181 pay_ppe_api.create_process_event(
11182 p_assignment_id => p_assignment_id,
11183 p_effective_date => g_event_list.effective_date(cnt),
11184 p_change_type => g_event_list.change_type(cnt),
11185 p_status => 'U',
11186 p_description => g_event_list.description(cnt),
11187 p_process_event_id => l_process_event_id,
11188 p_object_version_number => l_object_version_number,
11189 p_event_update_id => g_event_list.event_update_id(cnt),
11190 p_surrogate_key => p_old_cost_allocation_id,
11191 p_calculation_date => g_event_list.calc_date(cnt),
11192 p_business_group_id => p_business_group_id
11193 );
11194
11195
11196 end loop;
11197 end if;
11198 pay_continuous_calc.g_event_list.sz := 0;
11199 end;
11200 hr_utility.set_location(l_proc, 900);
11201 END PAY_COST_ALLOCATIONS_F_ard;
11202 --
11203
11204 -- >>>
11205 -- >>> INSERT NEW DYT CODE ABOVE HERE
11206 -- >>>
11207 --
11208 /* OK Here are all the event procedures */
11209 --
11210 /* Name : ee_date_change
11211 Purpose : This procedure is used for an element entry date change check. It checks
11212 the screen entry values for changes.
11213 */
11214 procedure ee_date_change ( p_element_entry_id in number,
11215 p_assignment_action_id in number,
11216 p_surrogate_key in number,
11217 p_column_name in varchar2,
11218 p_old_value in varchar2,
11219 p_new_value in varchar2,
11223 is
11220 p_output_result out nocopy varchar2,
11221 p_date in date default null
11222 )
11224 screen_val pay_element_entry_values_f.screen_entry_value%type;
11225 input_val pay_element_entry_values_f.input_value_id%type;
11226 --
11227 cursor do_start_chk (sk in number,
11228 ed in varchar2)
11229 is
11230 select screen_entry_value,
11231 element_entry_value_id
11232 from pay_element_entry_values_f
11233 where element_entry_id = sk
11234 and ed = effective_start_date
11235 minus
11236 select screen_entry_value,
11237 element_entry_value_id
11238 from pay_element_entry_values_f
11239 where element_entry_id = sk
11240 and ed = to_char(effective_end_date - 1);
11241 --
11242 cursor do_end_chk (sk in number,
11243 ed in varchar2)
11244 is
11245 select screen_entry_value,
11246 element_entry_value_id
11247 from pay_element_entry_values_f
11248 where element_entry_id = sk
11249 and ed = effective_end_date
11250 minus
11251 select screen_entry_value,
11252 element_entry_value_id
11253 from pay_element_entry_values_f
11254 where element_entry_id = sk
11255 and ed = effective_start_date + 1;
11256 --
11257 begin
11258 p_output_result := 'FALSE';
11259 --
11260 if (p_column_name = 'EFFECTIVE_START_DATE') then
11261 --
11262 for chkrec in do_start_chk(p_surrogate_key, p_new_value) loop
11263 p_output_result := 'TRUE';
11264 end loop;
11265 --
11266 else
11267 --
11268 for chkrec in do_end_chk(p_surrogate_key, p_old_value) loop
11269 p_output_result := 'TRUE';
11270 end loop;
11271 --
11272 end if;
11273 --
11274 end ee_date_change;
11275 --
11276 /* Name : grade_rule_change
11277 Purpose : This procedure is used for a grade rule change
11278 to check that an assignment is on that grade.
11279 */
11280 procedure grade_rule_change ( p_element_entry_id in number,
11281 p_assignment_action_id in number,
11282 p_surrogate_key in number,
11283 p_column_name in varchar2,
11284 p_old_value in varchar2,
11285 p_new_value in varchar2,
11286 p_output_result out nocopy varchar2,
11287 p_date in date default null
11288 )
11289 is
11290 --
11291 cursor grade_chk is
11292 select '' chk
11293 from pay_grade_rules_f pgr,
11294 pay_assignment_actions paa,
11295 per_assignments_f paf
11296 where paa.assignment_action_id = p_assignment_action_id
11297 and pgr.grade_rule_id = p_surrogate_key
11298 and p_date between pgr.effective_start_date
11299 and pgr.effective_end_date
11300 and paf.assignment_id = paa.assignment_id
11301 -- and p_date between paf.effective_start_date -- Bug 6625680
11302 -- and paf.effective_end_date
11303 and paf.grade_id = pgr.grade_or_spinal_point_id
11304 union
11305 select '' chk
11306 from pay_grade_rules_f pgr,
11307 pay_assignment_actions paa,
11308 per_spinal_points psp,
11309 per_spinal_point_steps_f psps,
11310 per_spinal_point_placements_f pspp
11311 where paa.assignment_action_id = p_assignment_action_id
11312 and pgr.grade_rule_id = p_surrogate_key
11313 and p_date between pgr.effective_start_date
11314 and pgr.effective_end_date
11315 and pgr.rate_type = 'SP'
11316 and psp.spinal_point_id = pgr.grade_or_spinal_point_id
11317 and psp.spinal_point_id = psps.spinal_point_id
11318 and p_date between psps.effective_start_date
11319 and psps.effective_end_date
11320 and paa.assignment_id = pspp.assignment_id
11321 and pspp.step_id = psps.step_id;
11322 -- and p_date between pspp.effective_start_date -- Bug 6625680
11323 -- and pspp.effective_end_date;
11324 --
11325 begin
11326 --
11327 p_output_result := 'FALSE';
11328 --
11329 for chkrec in grade_chk loop
11330 p_output_result := 'TRUE';
11331 end loop;
11332 --
11333 end grade_rule_change;
11334 --
11335 /* Name : input_value_change
11336 Purpose : This procedure is used for a input value change
11337 to check that an assignment has an entry with that input value.
11338 */
11339 procedure input_value_change ( p_element_entry_id in number,
11340 p_assignment_action_id in number,
11341 p_surrogate_key in number,
11342 p_column_name in varchar2,
11343 p_old_value in varchar2,
11344 p_new_value in varchar2,
11345 p_output_result out nocopy varchar2,
11346 p_date in date default null
11347 )
11348 is
11349 cursor get_et_details is
11350 select piv.hot_default_flag,
11354 from pay_element_entries_f pee,
11351 piv.default_value iv_default_value,
11352 pliv.default_value liv_default_value,
11353 peev.screen_entry_value
11355 pay_element_entry_values_f peev,
11356 pay_element_links_f pel,
11357 pay_link_input_values_f pliv,
11358 pay_element_types_f pet,
11359 pay_input_values_f piv
11360 where pee.element_entry_id = p_element_entry_id
11361 and pee.element_entry_id = peev.element_entry_id
11362 and peev.input_value_id = p_surrogate_key
11363 and pee.element_link_id = pel.element_link_id
11364 and pliv.element_link_id = pel.element_link_id
11365 and pliv.input_value_id = p_surrogate_key
11366 and pet.element_type_id = pel.element_type_id
11367 and pet.element_type_id = piv.element_type_id
11368 and piv.input_value_id = p_surrogate_key
11369 and p_date between piv.effective_start_date
11370 and piv.effective_end_date
11371 and p_date between pet.effective_start_date
11372 and pet.effective_end_date
11373 and p_date between pliv.effective_start_date
11374 and pliv.effective_end_date
11375 and p_date between pel.effective_start_date
11376 and pel.effective_end_date
11377 and p_date between peev.effective_start_date
11378 and peev.effective_end_date
11379 and p_date between pee.effective_start_date
11380 and pee.effective_end_date;
11381
11382 begin
11383 --
11384 p_output_result:= 'FALSE';
11385 --
11386 for get_det in get_et_details loop
11387 --
11388 /* Check the hot default flag for input values */
11389 if (p_column_name = 'DEFAULT_VALUE') then
11390 --
11391 if (get_det.hot_default_flag = 'Y') then
11392 if (get_det.liv_default_value is null
11393 and get_det.screen_entry_value is null) then
11394 --
11395 p_output_result:= 'TRUE';
11396 end if;
11397 end if;
11398 --
11399 end if;
11400 --
11401 end loop;
11402 --
11403 end input_value_change;
11404 --
11405 /* Name : link_iv_change
11406 Purpose : This procedure is used for a link input value change
11407 to check that an assignment has an entry with that input value.
11408 */
11409 procedure link_iv_change ( p_element_entry_id in number,
11410 p_assignment_action_id in number,
11411 p_surrogate_key in number,
11412 p_column_name in varchar2,
11413 p_old_value in varchar2,
11414 p_new_value in varchar2,
11415 p_output_result out nocopy varchar2,
11416 p_date in date default null
11417 )
11418 is
11419 cursor get_et_details is
11420 select piv.hot_default_flag,
11421 piv.default_value iv_default_value,
11422 pliv.default_value liv_default_value,
11423 peev.screen_entry_value
11424 from pay_element_entries_f pee,
11425 pay_element_entry_values_f peev,
11426 pay_element_links_f pel,
11427 pay_link_input_values_f pliv,
11428 pay_element_types_f pet,
11429 pay_input_values_f piv
11430 where pee.element_entry_id = p_element_entry_id
11431 and pee.element_entry_id = peev.element_entry_id
11432 and peev.input_value_id = pliv.input_value_id
11433 and pee.element_link_id = pel.element_link_id
11434 and pliv.element_link_id = pel.element_link_id
11435 and pliv.link_input_value_id = p_surrogate_key
11436 and pet.element_type_id = pel.element_type_id
11437 and pet.element_type_id = piv.element_type_id
11438 and piv.input_value_id = pliv.input_value_id
11439 and p_date between piv.effective_start_date
11440 and piv.effective_end_date
11441 and p_date between pet.effective_start_date
11442 and pet.effective_end_date
11443 and p_date between pliv.effective_start_date
11444 and pliv.effective_end_date
11445 and p_date between pel.effective_start_date
11446 and pel.effective_end_date
11447 and p_date between peev.effective_start_date
11448 and peev.effective_end_date
11449 and p_date between pee.effective_start_date
11450 and pee.effective_end_date;
11451
11452 begin
11453 --
11454 p_output_result:= 'FALSE';
11455 --
11456 for get_det in get_et_details loop
11457 --
11458 -- Check the hot default flag for input values
11459 if (p_column_name = 'DEFAULT_VALUE') then
11460 --
11461 if (get_det.hot_default_flag = 'Y') then
11462 if (get_det.screen_entry_value is null) then
11463 --
11464 p_output_result:= 'TRUE';
11465 end if;
11466 end if;
11467 --
11468 end if;
11469 --
11470 end loop;
11471 --
11472 end link_iv_change;
11473 --
11474 /* PAY_USER_COLUMN_INSTANCES_F */
11475 /* name : PAY_USER_COLUMN_INSTANCES_F_ari
11479 procedure PAY_USER_COL_INSTANCES_F_ari(
11476 purpose : This is procedure that records any insert
11477 on PAY_USER_COLUMN_INSTANCES_F.
11478 */
11480 p_business_group_id in number,
11481 p_legislation_code in varchar2,
11482 p_effective_start_date in date,
11483 p_user_column_instance_id in number
11484 )
11485 is
11486 l_process_event_id number;
11487 l_object_version_number number;
11488 l_proc varchar2(240) := g_package||'.PAY_USER_COLUMN_INSTANCES_F_ari';
11489 begin
11490 hr_utility.set_location(l_proc, 10);
11491 /* If the continuous calc is overriden then do nothing */
11492 if (g_override_cc = TRUE) then
11493 return;
11494 end if;
11495 --
11496 pay_continuous_calc.event_update(p_business_group_id,
11497 p_legislation_code,
11498 'PAY_USER_COLUMN_INSTANCES_F',
11499 NULL,
11500 NULL,
11501 NULL,
11502 p_effective_start_date,
11503 p_effective_start_date,
11504 'I'
11505 );
11506 /* Now call the API for the affected assignments */
11507 declare
11508 cnt number;
11509 l_process_event_id number;
11510 l_object_version_number number;
11511 begin
11512 if (pay_continuous_calc.g_event_list.sz <> 0) then
11513 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11514 pay_ppe_api.create_process_event(
11515 p_assignment_id => NULL,
11516 p_effective_date => g_event_list.effective_date(cnt),
11517 p_change_type => g_event_list.change_type(cnt),
11518 p_status => 'U',
11519 p_description => g_event_list.description(cnt),
11520 p_process_event_id => l_process_event_id,
11521 p_object_version_number => l_object_version_number,
11522 p_event_update_id => g_event_list.event_update_id(cnt),
11523 p_surrogate_key => p_user_column_instance_id,
11524 p_calculation_date => g_event_list.calc_date(cnt),
11525 p_business_group_id => p_business_group_id
11526 );
11527 end loop;
11528 end if;
11529 pay_continuous_calc.g_event_list.sz := 0;
11530 end;
11531 hr_utility.set_location(l_proc, 900);
11532 end PAY_USER_COL_INSTANCES_F_ari;
11533
11534 --
11535 PROCEDURE PAY_USER_COL_INSTANCES_F_aru
11536 ( p_business_group_id IN NUMBER
11537 , p_legislation_code IN VARCHAR2
11538 , p_effective_date IN DATE
11539 , p_old_BUSINESS_GROUP_ID IN VARCHAR2
11540 , p_new_BUSINESS_GROUP_ID IN VARCHAR2
11541 , p_old_EFFECTIVE_END_DATE IN DATE
11542 , p_new_EFFECTIVE_END_DATE IN DATE
11543 , p_old_EFFECTIVE_START_DATE IN DATE
11544 , p_new_EFFECTIVE_START_DATE IN DATE
11545 , p_old_LEGISLATION_CODE IN VARCHAR2
11546 , p_new_LEGISLATION_CODE IN VARCHAR2
11547 , p_old_USER_COLUMN_ID IN NUMBER
11548 , p_new_USER_COLUMN_ID IN NUMBER
11549 , p_old_USER_COLUMN_INSTANCE_ID IN NUMBER
11550 , p_new_USER_COLUMN_INSTANCE_ID IN NUMBER
11551 , p_old_USER_ROW_ID IN NUMBER
11552 , p_new_USER_ROW_ID IN NUMBER
11553 , p_old_VALUE IN VARCHAR2
11554 , p_new_VALUE IN VARCHAR2
11555 )
11556 IS
11557 BEGIN
11558 /* If the continuous calc is overriden then do nothing */
11559 if (pay_continuous_calc.g_override_cc = TRUE) then
11560 return;
11561 end if;
11562 --
11563 /* If the dates havent changed it must be a correction */
11564 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
11565 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
11566 --
11567 pay_continuous_calc.event_update(p_business_group_id,
11568 p_legislation_code,
11569 'PAY_USER_COLUMN_INSTANCES_F',
11570 'BUSINESS_GROUP_ID',
11571 p_old_BUSINESS_GROUP_ID,
11572 p_new_BUSINESS_GROUP_ID,
11573 p_effective_date
11574 );
11575 --
11576 pay_continuous_calc.event_update(p_business_group_id,
11580 p_old_USER_COLUMN_INSTANCE_ID,
11577 p_legislation_code,
11578 'PAY_USER_COLUMN_INSTANCES_F',
11579 'USER_COLUMN_INSTANCE_ID',
11581 p_new_USER_COLUMN_INSTANCE_ID,
11582 p_effective_date
11583 );
11584 --
11585 pay_continuous_calc.event_update(p_business_group_id,
11586 p_legislation_code,
11587 'PAY_USER_COLUMN_INSTANCES_F',
11588 'USER_ROW_ID',
11589 p_old_USER_ROW_ID,
11590 p_new_USER_ROW_ID,
11591 p_effective_date
11592 );
11593 --
11594 pay_continuous_calc.event_update(p_business_group_id,
11595 p_legislation_code,
11596 'PAY_USER_COLUMN_INSTANCES_F',
11597 'USER_COLUMN_ID',
11598 p_old_USER_COLUMN_ID,
11599 p_new_USER_COLUMN_ID,
11600 p_effective_date
11601 );
11602 --
11603 pay_continuous_calc.event_update(p_business_group_id,
11604 p_legislation_code,
11605 'PAY_USER_COLUMN_INSTANCES_F',
11606 'VALUE',
11607 p_old_VALUE,
11608 p_new_VALUE,
11609 p_effective_date
11610 );
11611 else
11612 /* OK it must be a date track change */
11613 --
11614 pay_continuous_calc.event_update(p_business_group_id,
11615 p_legislation_code,
11616 'PAY_USER_COLUMN_INSTANCES_F',
11617 'EFFECTIVE_END_DATE',
11618 p_old_EFFECTIVE_END_DATE,
11619 p_new_EFFECTIVE_END_DATE,
11620 p_new_effective_end_date,
11621 least(p_old_effective_end_date,
11622 p_new_effective_end_date)
11623 );
11624 --
11625 pay_continuous_calc.event_update(p_business_group_id,
11626 p_legislation_code,
11627 'PAY_USER_COLUMN_INSTANCES_F',
11628 'EFFECTIVE_START_DATE',
11629 p_old_EFFECTIVE_START_DATE,
11630 p_new_EFFECTIVE_START_DATE,
11631 p_new_effective_start_date,
11632 least(p_old_effective_start_date,
11633 p_new_effective_start_date)
11634 );
11635
11636 end if;
11637 --
11638 /* Now call the API for the affected assignments */
11639 declare
11640 l_process_event_id number;
11641 l_object_version_number number;
11642 cnt number;
11643 begin
11644 if (pay_continuous_calc.g_event_list.sz <> 0) then
11645 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11646 pay_ppe_api.create_process_event(
11647 p_assignment_id => NULL,
11648 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
11649 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
11650 p_status => 'U',
11651 p_description => pay_continuous_calc.g_event_list.description(cnt),
11652 p_process_event_id => l_process_event_id,
11653 p_object_version_number => l_object_version_number,
11654 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
11655 p_business_group_id => p_business_group_id,
11656 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
11657 p_surrogate_key => p_new_user_column_instance_id
11658 );
11659 end loop;
11660 end if;
11661 pay_continuous_calc.g_event_list.sz := 0;
11662 end;
11663 --
11664
11665 END PAY_USER_COL_INSTANCES_F_aru;
11666
11667 --
11668 /* name : PAY_USER_COLUMN_INSTANCES_F_ard
11669 purpose : This is procedure that records any deletes
11670 on PAY_USER_COLUMN_INSTANCES_F.
11671 */
11672 procedure PAY_USER_COL_INSTANCES_F_ard(
11673 p_business_group_id in number,
11674 p_legislation_code in varchar2,
11675 p_old_user_column_instance_id in number,
11676 p_old_effective_start_date in date,
11677 p_new_effective_start_date in date,
11678 p_old_effective_end_date in date,
11679 p_new_effective_end_date in date
11680 )
11681 is
11682 l_process_event_id number;
11683 l_object_version_number number;
11684 l_effective_date date;
11685 l_mode pay_event_updates.event_type%type;
11689 l_proc varchar2(240) := g_package||'.PAY_USER_COLUMN_INSTANCES_F_ard';
11686 l_column_name pay_event_updates.column_name%type;
11687 l_old_value date;
11688 l_new_value date;
11690 begin
11691 hr_utility.set_location(l_proc, 10);
11692 /* If the continuous calc is overriden then do nothing */
11693 if (g_override_cc = TRUE) then
11694 return;
11695 end if;
11696 --
11697 -- hr_utility.trace('> p_assignment_id: '||p_assignment_id);
11698 -- hr_utility.trace('> p_old_cost_allocation_ID: '||p_old_user_col_instance_id);
11699 -- hr_utility.trace('> p_old_effective_start_date: '||p_old_effective_start_date);
11700 -- hr_utility.trace('> p_new_effective_start_date: '||p_new_effective_start_date);
11701 -- hr_utility.trace('> pay_dyn_triggers.g_dyt_mode: '||pay_dyn_triggers.g_dyt_mode);
11702 -- hr_utility.trace('> pay_dyn_triggers.g_dbms_dyt: '||pay_dyn_triggers.g_dbms_dyt);
11703
11704 --
11705 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
11706 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
11707 --
11708 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
11709 l_mode := 'D';
11710 else
11711 l_mode := pay_dyn_triggers.g_dyt_mode;
11712 end if;
11713 l_effective_date := p_old_effective_start_date;
11714 l_column_name := null;
11715 l_old_value := null;
11716 l_new_value := null;
11717 --
11718 else
11719 l_mode := pay_dyn_triggers.g_dyt_mode;
11720 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
11721 --
11722 l_effective_date := p_new_effective_end_date;
11723 l_column_name := 'EFFECTIVE_END_DATE';
11724 l_old_value := p_old_effective_end_date;
11725 l_new_value := p_new_effective_end_date;
11726 --
11727 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
11728 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
11729 --
11730 l_effective_date := p_old_effective_start_date;
11731 l_column_name := 'EFFECTIVE_END_DATE';
11732 l_old_value := p_old_effective_end_date;
11733 l_new_value := p_new_effective_end_date;
11734 --
11735 end if;
11736 end if;
11737 --
11738
11739 -- hr_utility.trace('> l_mode: '||l_mode);
11740
11741 pay_continuous_calc.event_update(p_business_group_id,
11742 p_legislation_code,
11743 'PAY_USER_COLUMN_INSTANCES_F',
11744 l_column_name,
11745 l_old_value,
11746 l_new_value,
11747 l_effective_date,
11748 l_effective_date,
11749 l_mode
11750 );
11751 /* Now call the API for the affected assignments */
11752
11753
11754 /* Now call the API for the affected assignments */
11755 declare
11756 cnt number;
11757 l_process_event_id number;
11758 l_object_version_number number;
11759 begin
11760 if (pay_continuous_calc.g_event_list.sz <> 0) then
11761 hr_utility.trace('> With in Create Process Event: ');
11762 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11763 pay_ppe_api.create_process_event(
11764 p_assignment_id => NULL,
11765 p_effective_date => g_event_list.effective_date(cnt),
11766 p_change_type => g_event_list.change_type(cnt),
11767 p_status => 'U',
11768 p_description => g_event_list.description(cnt),
11769 p_process_event_id => l_process_event_id,
11770 p_object_version_number => l_object_version_number,
11771 p_event_update_id => g_event_list.event_update_id(cnt),
11772 p_surrogate_key => p_old_user_column_instance_id,
11773 p_calculation_date => g_event_list.calc_date(cnt),
11774 p_business_group_id => p_business_group_id
11775 );
11776
11777
11778 end loop;
11779 end if;
11780 pay_continuous_calc.g_event_list.sz := 0;
11781 end;
11782 hr_utility.set_location(l_proc, 900);
11783 END PAY_USER_COL_INSTANCES_F_ard;
11784
11785 --
11786 /* FF_GLOBALS_F */
11787 /* name : FF_GLOBALS_F_ari
11788 purpose : This is procedure that records any insert
11789 on FF_GLOBALS_F.
11790 */
11791 procedure FF_GLOBALS_F_ari(
11792 p_business_group_id in number,
11793 p_legislation_code in varchar2,
11794 p_effective_start_date in date,
11795 p_global_id in number
11796 )
11797 is
11798 l_process_event_id number;
11799 l_object_version_number number;
11800 l_proc varchar2(240) := g_package||'.FF_GLOBALS_F_ari';
11801 begin
11802 hr_utility.set_location(l_proc, 10);
11803 /* If the continuous calc is overriden then do nothing */
11804 if (g_override_cc = TRUE) then
11805 return;
11806 end if;
11807 --
11808 pay_continuous_calc.event_update(p_business_group_id,
11812 NULL,
11809 p_legislation_code,
11810 'FF_GLOBALS_F',
11811 NULL,
11813 NULL,
11814 p_effective_start_date,
11815 p_effective_start_date,
11816 'I'
11817 );
11818 /* Now call the API for the affected assignments */
11819 declare
11820 cnt number;
11821 l_process_event_id number;
11822 l_object_version_number number;
11823 begin
11824 if (pay_continuous_calc.g_event_list.sz <> 0) then
11825 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11826 pay_ppe_api.create_process_event(
11827 p_assignment_id => NULL,
11828 p_effective_date => g_event_list.effective_date(cnt),
11829 p_change_type => g_event_list.change_type(cnt),
11830 p_status => 'U',
11831 p_description => g_event_list.description(cnt),
11832 p_process_event_id => l_process_event_id,
11833 p_object_version_number => l_object_version_number,
11834 p_event_update_id => g_event_list.event_update_id(cnt),
11835 p_surrogate_key => p_global_id,
11836 p_calculation_date => g_event_list.calc_date(cnt),
11837 p_business_group_id => p_business_group_id
11838 );
11839 end loop;
11840 end if;
11841 pay_continuous_calc.g_event_list.sz := 0;
11842 end;
11843 hr_utility.set_location(l_proc, 900);
11844 end FF_GLOBALS_F_ari;
11845
11846 --
11847 PROCEDURE FF_GLOBALS_F_aru
11848 ( p_business_group_id IN NUMBER
11849 , p_legislation_code IN VARCHAR2
11850 , p_effective_date IN DATE
11851 , p_old_BUSINESS_GROUP_ID IN VARCHAR2
11852 , p_new_BUSINESS_GROUP_ID IN VARCHAR2
11853 , p_old_EFFECTIVE_END_DATE IN DATE
11854 , p_new_EFFECTIVE_END_DATE IN DATE
11855 , p_old_EFFECTIVE_START_DATE IN DATE
11856 , p_new_EFFECTIVE_START_DATE IN DATE
11857 , p_old_LEGISLATION_CODE IN VARCHAR2
11858 , p_new_LEGISLATION_CODE IN VARCHAR2
11859 , p_old_global_ID IN NUMBER
11860 , p_new_global_ID IN NUMBER
11861 , p_old_global_VALUE IN VARCHAR2
11862 , p_new_global_VALUE IN VARCHAR2
11863 , p_old_global_description IN VARCHAR2
11864 , p_new_global_description IN VARCHAR2
11865 )
11866 IS
11867 BEGIN
11868 /* If the continuous calc is overriden then do nothing */
11869 if (pay_continuous_calc.g_override_cc = TRUE) then
11870 return;
11871 end if;
11872 --
11873 /* If the dates havent changed it must be a correction */
11874 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
11875 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
11876 --
11877 pay_continuous_calc.event_update(p_business_group_id,
11878 p_legislation_code,
11879 'FF_GLOBALS_F',
11880 'BUSINESS_GROUP_ID',
11881 p_old_BUSINESS_GROUP_ID,
11882 p_new_BUSINESS_GROUP_ID,
11883 p_effective_date
11884 );
11885 --
11886 pay_continuous_calc.event_update(p_business_group_id,
11887 p_legislation_code,
11888 'FF_GLOBALS_F',
11889 'GLOBAL_ID',
11890 p_old_global_ID,
11891 p_new_global_ID,
11892 p_effective_date
11893 );
11894 --
11895 pay_continuous_calc.event_update(p_business_group_id,
11896 p_legislation_code,
11897 'FF_GLOBALS_F',
11898 'GLOBAL_VALUE',
11899 p_old_global_VALUE,
11900 p_new_global_VALUE,
11901 p_effective_date
11902 );
11903
11904 pay_continuous_calc.event_update(p_business_group_id,
11905 p_legislation_code,
11906 'FF_GLOBALS_F',
11907 'GLOBAL_DESCRIPTION',
11908 p_old_global_description,
11909 p_new_global_description,
11910 p_effective_date
11911 );
11915 --
11912
11913 else
11914 /* OK it must be a date track change */
11916 pay_continuous_calc.event_update(p_business_group_id,
11917 p_legislation_code,
11918 'FF_GLOBALS_F',
11919 'EFFECTIVE_END_DATE',
11920 p_old_EFFECTIVE_END_DATE,
11921 p_new_EFFECTIVE_END_DATE,
11922 p_new_effective_end_date,
11923 least(p_old_effective_end_date,
11924 p_new_effective_end_date)
11925 );
11926 --
11927 pay_continuous_calc.event_update(p_business_group_id,
11928 p_legislation_code,
11929 'FF_GLOBALS_F',
11930 'EFFECTIVE_START_DATE',
11931 p_old_EFFECTIVE_START_DATE,
11932 p_new_EFFECTIVE_START_DATE,
11933 p_new_effective_start_date,
11934 least(p_old_effective_start_date,
11935 p_new_effective_start_date)
11936 );
11937
11938 end if;
11939 --
11940 /* Now call the API for the affected assignments */
11941 declare
11942 l_process_event_id number;
11943 l_object_version_number number;
11944 cnt number;
11945 begin
11946 if (pay_continuous_calc.g_event_list.sz <> 0) then
11947 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11948 pay_ppe_api.create_process_event(
11949 p_assignment_id => NULL,
11950 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
11951 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
11952 p_status => 'U',
11953 p_description => pay_continuous_calc.g_event_list.description(cnt),
11954 p_process_event_id => l_process_event_id,
11955 p_object_version_number => l_object_version_number,
11956 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
11957 p_business_group_id => p_business_group_id,
11958 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
11959 p_surrogate_key => p_new_global_id
11960 );
11961 end loop;
11962 end if;
11963 pay_continuous_calc.g_event_list.sz := 0;
11964 end;
11965 --
11966
11967 END FF_GLOBALS_F_aru;
11968
11969 --
11970 /* name : FF_GLOBALS_F_ard
11971 purpose : This is procedure that records any deletes
11972 on FF_GLOBALS_F.
11973 */
11974 procedure FF_GLOBALS_F_ard(
11975 p_business_group_id in number,
11976 p_legislation_code in varchar2,
11977 p_old_global_id in number,
11978 p_old_effective_start_date in date,
11979 p_new_effective_start_date in date,
11980 p_old_effective_end_date in date,
11981 p_new_effective_end_date in date
11982 )
11983 is
11984 l_process_event_id number;
11985 l_object_version_number number;
11986 l_effective_date date;
11987 l_mode pay_event_updates.event_type%type;
11988 l_column_name pay_event_updates.column_name%type;
11989 l_old_value date;
11990 l_new_value date;
11991 l_proc varchar2(240) := g_package||'.FF_GLOBALS_F_ard';
11992 begin
11993 hr_utility.set_location(l_proc, 10);
11994 /* If the continuous calc is overriden then do nothing */
11995 if (g_override_cc = TRUE) then
11996 return;
11997 end if;
11998 --
11999 -- hr_utility.trace('> p_assignment_id: '||p_assignment_id);
12000 -- hr_utility.trace('> p_old_cost_allocation_ID: '||p_old_user_col_instance_id);
12001 -- hr_utility.trace('> p_old_effective_start_date: '||p_old_effective_start_date);
12002 -- hr_utility.trace('> p_new_effective_start_date: '||p_new_effective_start_date);
12003 -- hr_utility.trace('> pay_dyn_triggers.g_dyt_mode: '||pay_dyn_triggers.g_dyt_mode);
12004 -- hr_utility.trace('> pay_dyn_triggers.g_dbms_dyt: '||pay_dyn_triggers.g_dbms_dyt);
12005
12006 --
12007 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
12008 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
12009 --
12010 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
12011 l_mode := 'D';
12012 else
12013 l_mode := pay_dyn_triggers.g_dyt_mode;
12014 end if;
12015 l_effective_date := p_old_effective_start_date;
12016 l_column_name := null;
12017 l_old_value := null;
12018 l_new_value := null;
12019 --
12020 else
12021 l_mode := pay_dyn_triggers.g_dyt_mode;
12022 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
12023 --
12024 l_effective_date := p_new_effective_end_date;
12025 l_column_name := 'EFFECTIVE_END_DATE';
12026 l_old_value := p_old_effective_end_date;
12027 l_new_value := p_new_effective_end_date;
12028 --
12029 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
12030 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
12031 --
12035 l_new_value := p_new_effective_end_date;
12032 l_effective_date := p_old_effective_start_date;
12033 l_column_name := 'EFFECTIVE_END_DATE';
12034 l_old_value := p_old_effective_end_date;
12036 --
12037 end if;
12038 end if;
12039 --
12040
12041 -- hr_utility.trace('> l_mode: '||l_mode);
12042
12043 pay_continuous_calc.event_update(p_business_group_id,
12044 p_legislation_code,
12045 'FF_GLOBALS_F',
12046 l_column_name,
12047 l_old_value,
12048 l_new_value,
12049 l_effective_date,
12050 l_effective_date,
12051 l_mode
12052 );
12053
12054 /* Now call the API for the affected assignments */
12055 declare
12056 cnt number;
12057 l_process_event_id number;
12058 l_object_version_number number;
12059 begin
12060 if (pay_continuous_calc.g_event_list.sz <> 0) then
12061 hr_utility.trace('> With in Create Process Event: ');
12062 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
12063 pay_ppe_api.create_process_event(
12064 p_assignment_id => NULL,
12065 p_effective_date => g_event_list.effective_date(cnt),
12066 p_change_type => g_event_list.change_type(cnt),
12067 p_status => 'U',
12068 p_description => g_event_list.description(cnt),
12069 p_process_event_id => l_process_event_id,
12070 p_object_version_number => l_object_version_number,
12071 p_event_update_id => g_event_list.event_update_id(cnt),
12072 p_surrogate_key => p_old_global_id,
12073 p_calculation_date => g_event_list.calc_date(cnt),
12074 p_business_group_id => p_business_group_id
12075 );
12076
12077
12078 end loop;
12079 end if;
12080 pay_continuous_calc.g_event_list.sz := 0;
12081 end;
12082 hr_utility.set_location(l_proc, 900);
12083 END FF_GLOBALS_F_ard;
12084
12085 PROCEDURE PQH_RATE_MATRIX_RATES_F_ari( p_business_group_id IN NUMBER
12086 , p_legislation_code IN VARCHAR2
12087 , p_effective_start_date IN DATE
12088 , p_rate_matrix_rate_id IN NUMBER
12089 )
12090 IS
12091 l_process_event_id number;
12092 l_object_version_number number;
12093 l_proc varchar2(240) := g_package||'.PQH_RATE_MATRIX_RATES_F_ari';
12094 BEGIN
12095 hr_utility.set_location(l_proc, 10);
12096 /* If the continuous calc is overriden then do nothing */
12097 if (g_override_cc = TRUE) then
12098 return;
12099 end if;
12100 --
12101 pay_continuous_calc.event_update(p_business_group_id,
12102 p_legislation_code,
12103 'PQH_RATE_MATRIX_RATES_F',
12104 NULL,
12105 NULL,
12106 NULL,
12107 p_effective_start_date,
12108 p_effective_start_date,
12109 'I'
12110 );
12111 /* Now call the API for the affected assignments */
12112 declare
12113 cnt number;
12114 l_process_event_id number;
12115 l_object_version_number number;
12116 begin
12117 if (pay_continuous_calc.g_event_list.sz <> 0) then
12118 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
12119 pay_ppe_api.create_process_event(
12120 p_assignment_id => NULL,
12121 p_effective_date => g_event_list.effective_date(cnt),
12122 p_change_type => g_event_list.change_type(cnt),
12123 p_status => 'U',
12124 p_description => g_event_list.description(cnt),
12125 p_process_event_id => l_process_event_id,
12126 p_object_version_number => l_object_version_number,
12127 p_event_update_id => g_event_list.event_update_id(cnt),
12128 p_surrogate_key => p_rate_matrix_rate_id,
12129 p_calculation_date => g_event_list.calc_date(cnt),
12130 p_business_group_id => p_business_group_id
12131 );
12132 end loop;
12133 end if;
12134 pay_continuous_calc.g_event_list.sz := 0;
12135 end;
12136 hr_utility.set_location(l_proc, 900);
12137
12138 END PQH_RATE_MATRIX_RATES_F_ari;
12139
12140
12141 PROCEDURE PQH_RATE_MATRIX_RATES_F_aru ( p_business_group_id IN NUMBER
12145 , p_new_EFFECTIVE_END_DATE IN DATE
12142 , p_legislation_code IN VARCHAR2
12143 , p_effective_date IN DATE
12144 , p_old_EFFECTIVE_END_DATE IN DATE
12146 , p_old_EFFECTIVE_START_DATE IN DATE
12147 , p_new_EFFECTIVE_START_DATE IN DATE
12148 , p_old_rate_matrix_rate_id IN NUMBER
12149 , p_new_rate_matrix_rate_id IN NUMBER
12150 , p_old_rate_VALUE IN VARCHAR2
12151 , p_new_rate_VALUE IN VARCHAR2
12152 , p_old_min_rate_VALUE IN VARCHAR2
12153 , p_new_min_rate_VALUE IN VARCHAR2
12154 , p_old_max_rate_VALUE IN VARCHAR2
12155 , p_new_max_rate_VALUE IN VARCHAR2
12156 , p_old_mid_rate_VALUE IN VARCHAR2
12157 , p_new_mid_rate_VALUE IN VARCHAR2
12158 )
12159 IS
12160 BEGIN
12161 /* If the continuous calc is overriden then do nothing */
12162 if (pay_continuous_calc.g_override_cc = TRUE) then
12163 return;
12164 end if;
12165 --
12166 /* If the dates havent changed it must be a correction */
12167 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
12168 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
12169 --
12170 pay_continuous_calc.event_update(p_business_group_id,
12171 p_legislation_code,
12172 'PQH_RATE_MATRIX_RATES_F',
12173 'RATE_MATRIX_RATE_ID',
12174 p_old_rate_matrix_rate_id,
12175 p_new_rate_matrix_rate_id,
12176 p_effective_date
12177 );
12178 --
12179 pay_continuous_calc.event_update(p_business_group_id,
12180 p_legislation_code,
12181 'PQH_RATE_MATRIX_RATES_F',
12182 'RATE_VALUE',
12183 p_old_RATE_VALUE,
12184 p_new_RATE_VALUE,
12185 p_effective_date
12186 );
12187 --
12188 pay_continuous_calc.event_update(p_business_group_id,
12189 p_legislation_code,
12190 'PQH_RATE_MATRIX_RATES_F',
12191 'MIN_RATE_VALUE',
12192 p_old_MIN_RATE_VALUE,
12193 p_new_MIN_RATE_VALUE,
12194 p_effective_date
12195 );
12196 --
12197 pay_continuous_calc.event_update(p_business_group_id,
12198 p_legislation_code,
12199 'PQH_RATE_MATRIX_RATES_F',
12200 'MAX_RATE_VALUE',
12201 p_old_MAX_RATE_VALUE,
12202 p_new_MAX_RATE_VALUE,
12203 p_effective_date
12204 );
12205 --
12206 pay_continuous_calc.event_update(p_business_group_id,
12207 p_legislation_code,
12208 'PQH_RATE_MATRIX_RATES_F',
12209 'MID_RATE_VALUE',
12210 p_old_MID_RATE_VALUE,
12211 p_new_MID_RATE_VALUE,
12212 p_effective_date
12213 );
12214 --
12215 else
12216 /* OK it must be a date track change */
12217 --
12218 pay_continuous_calc.event_update(p_business_group_id,
12219 p_legislation_code,
12220 'PQH_RATE_MATRIX_RATES_F',
12221 'EFFECTIVE_END_DATE',
12222 p_old_EFFECTIVE_END_DATE,
12223 p_new_EFFECTIVE_END_DATE,
12224 p_new_effective_end_date,
12228 --
12225 least(p_old_effective_end_date,
12226 p_new_effective_end_date)
12227 );
12229 pay_continuous_calc.event_update(p_business_group_id,
12230 p_legislation_code,
12231 'PQH_RATE_MATRIX_RATES_F',
12232 'EFFECTIVE_START_DATE',
12233 p_old_EFFECTIVE_START_DATE,
12234 p_new_EFFECTIVE_START_DATE,
12235 p_new_effective_start_date,
12239
12236 least(p_old_effective_start_date,
12237 p_new_effective_start_date)
12238 );
12240 end if;
12241 --
12242 /* Now call the API for the affected assignments */
12243 declare
12244 l_process_event_id number;
12245 l_object_version_number number;
12246 cnt number;
12247 begin
12248 if (pay_continuous_calc.g_event_list.sz <> 0) then
12249 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
12250 pay_ppe_api.create_process_event(
12251 p_assignment_id => NULL,
12252 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
12253 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
12254 p_status => 'U',
12255 p_description => pay_continuous_calc.g_event_list.description(cnt),
12256 p_process_event_id => l_process_event_id,
12257 p_object_version_number => l_object_version_number,
12258 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
12259 p_business_group_id => p_business_group_id,
12260 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
12261 p_surrogate_key => p_new_rate_matrix_rate_id
12262 );
12263 end loop;
12264 end if;
12265 pay_continuous_calc.g_event_list.sz := 0;
12266 end;
12267 END PQH_RATE_MATRIX_RATES_F_aru;
12268
12269 PROCEDURE PQH_RATE_MATRIX_RATES_F_ard ( p_business_group_id in number,
12270 p_legislation_code in varchar2,
12271 p_old_rate_matrix_rate_id in number,
12272 p_old_effective_start_date in date,
12273 p_new_effective_start_date in date,
12274 p_old_effective_end_date in date,
12275 p_new_effective_end_date in date
12276 )
12277 IS
12278 l_process_event_id number;
12279 l_object_version_number number;
12280 l_effective_date date;
12281 l_mode pay_event_updates.event_type%type;
12282 l_column_name pay_event_updates.column_name%type;
12283 l_old_value date;
12284 l_new_value date;
12285 l_proc varchar2(240) := g_package||'.PQH_RATE_MATRIX_RATES_F_ard';
12286 BEGIN
12287 hr_utility.set_location(l_proc, 10);
12288 /* If the continuous calc is overriden then do nothing */
12289 if (g_override_cc = TRUE) then
12290 return;
12291 end if;
12292 --
12293 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
12294 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
12295 --
12296 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
12297 l_mode := 'D';
12298 else
12299 l_mode := pay_dyn_triggers.g_dyt_mode;
12300 end if;
12301 l_effective_date := p_old_effective_start_date;
12302 l_column_name := null;
12303 l_old_value := null;
12304 l_new_value := null;
12305 --
12306 else
12307 l_mode := pay_dyn_triggers.g_dyt_mode;
12308 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
12309 --
12310 l_effective_date := p_new_effective_end_date;
12311 l_column_name := 'EFFECTIVE_END_DATE';
12312 l_old_value := p_old_effective_end_date;
12313 l_new_value := p_new_effective_end_date;
12314 --
12315 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
12316 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
12317 --
12318 l_effective_date := p_old_effective_start_date;
12319 l_column_name := 'EFFECTIVE_END_DATE';
12320 l_old_value := p_old_effective_end_date;
12321 l_new_value := p_new_effective_end_date;
12322 --
12323 end if;
12324 end if;
12325 --
12326 hr_utility.trace('> l_mode: '||l_mode);
12327
12328 pay_continuous_calc.event_update(p_business_group_id,
12329 p_legislation_code,
12330 'PQH_RATE_MATRIX_RATES_F',
12331 l_column_name,
12332 l_old_value,
12333 l_new_value,
12334 l_effective_date,
12335 l_effective_date,
12336 l_mode
12337 );
12338
12339 /* Now call the API for the affected assignments */
12340 declare
12341 cnt number;
12342 l_process_event_id number;
12343 l_object_version_number number;
12344 begin
12345 if (pay_continuous_calc.g_event_list.sz <> 0) then
12346 hr_utility.trace('> With in Create Process Event: ');
12347 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
12348 pay_ppe_api.create_process_event(
12349 p_assignment_id => NULL,
12350 p_effective_date => g_event_list.effective_date(cnt),
12351 p_change_type => g_event_list.change_type(cnt),
12352 p_status => 'U',
12356 p_event_update_id => g_event_list.event_update_id(cnt),
12353 p_description => g_event_list.description(cnt),
12354 p_process_event_id => l_process_event_id,
12355 p_object_version_number => l_object_version_number,
12357 p_surrogate_key => p_old_rate_matrix_rate_id,
12358 p_calculation_date => g_event_list.calc_date(cnt),
12359 p_business_group_id => p_business_group_id
12360 );
12361
12362
12363 end loop;
12364 end if;
12365 pay_continuous_calc.g_event_list.sz := 0;
12366 end;
12367 hr_utility.set_location(l_proc, 900);
12368
12369 END PQH_RATE_MATRIX_RATES_F_ard;
12370 /*
12371 PER_CONTACT_RELATIONSHIPS
12372 name : PER_CONTACT_RELATIONSHIPS_ari
12373 purpose : This is procedure that records any inserts
12374 on PER_CONTACT_RELATIONSHIPS.
12375 */
12376 PROCEDURE per_contact_relationships_ari(
12377 p_business_group_id in number,
12378 p_legislation_code in varchar2,
12379 p_person_id in number,
12380 p_contact_relationship_id in number,
12381 p_effective_start_date in date
12382 )
12383 IS
12384 --
12385 cursor asgcur (p_person_id number) is
12386 select distinct assignment_id
12387 from per_all_assignments_f
12388 where person_id = p_person_id;
12389 --
12390 l_process_event_id number;
12391 l_object_version_number number;
12392 l_proc varchar2(240) := 'per_contact_relationships_ari';
12393 --
12394 BEGIN
12395 --
12396 hr_utility.set_location(l_proc, 10);
12397
12398 if p_effective_start_date is null then
12399 hr_utility.set_message(801,'PAY_505050_START_DATE_NULL');
12400 hr_utility.raise_error;
12401 end if;
12402 /* If the continuous calc is overriden then do nothing */
12403 if (pay_continuous_calc.g_override_cc = TRUE) then
12404 return;
12405 end if;
12406 --
12407 pay_continuous_calc.event_update(p_business_group_id,
12408 p_legislation_code,
12409 'PER_CONTACT_RELATIONSHIPS',
12410 NULL,
12411 NULL,
12412 NULL,
12413 p_effective_start_date,
12414 p_effective_start_date,
12415 'I'
12416 );
12417 /* Now call the API for the affected assignments */
12418 DECLARE
12419 cnt number;
12420 l_process_event_id number;
12421 l_object_version_number number;
12422 BEGIN
12423 IF (pay_continuous_calc.g_event_list.sz <> 0) THEN
12424 --
12425 FOR asgrec in asgcur (p_person_id) LOOP
12426 --
12427 FOR cnt in 1..pay_continuous_calc.g_event_list.sz LOOP
12428 --
12429 pay_ppe_api.create_process_event(
12430 p_assignment_id => asgrec.assignment_id,
12431 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
12432 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
12433 p_status => 'U',
12434 p_description => pay_continuous_calc.g_event_list.description(cnt),
12435 p_process_event_id => l_process_event_id,
12436 p_object_version_number => l_object_version_number,
12437 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
12438 p_business_group_id => p_business_group_id,
12439 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
12440 p_surrogate_key => p_contact_relationship_id);
12441 --
12442 END LOOP;
12443 --
12444 END LOOP;
12445 --
12446 END IF;
12447 --
12448 pay_continuous_calc.g_event_list.sz := 0;
12449 --
12450 END;
12451 --
12452 hr_utility.set_location(l_proc, 900);
12453 --
12454 END per_contact_relationships_ari;
12455
12456 /*
12457 PER_CONTACT_RELATIONSHIPS
12458 name : PER_CONTACT_RELATIONSHIPS_aru
12459 purpose : This is procedure that records any updates
12460 on PER_CONTACT_RELATIONSHIPS.
12461 */
12462
12463 procedure PER_CONTACT_RELATIONSHIPS_aru(
12464 p_business_group_id in number,
12465 p_legislation_code in varchar2,
12466 p_effective_date in date,
12467 p_old_BENEFICIARY_FLAG in VARCHAR2,
12468 p_new_BENEFICIARY_FLAG in VARCHAR2,
12469 p_old_BONDHOLDER_FLAG in VARCHAR2,
12470 p_new_BONDHOLDER_FLAG in VARCHAR2,
12471 p_old_BUSINESS_GROUP_ID in NUMBER,
12472 p_new_BUSINESS_GROUP_ID in NUMBER,
12473 p_old_CONTACT_PERSON_ID in NUMBER,
12474 p_new_CONTACT_PERSON_ID in NUMBER,
12475 p_old_CONTACT_RELATIONSHIP_ID in NUMBER,
12476 p_new_CONTACT_RELATIONSHIP_ID in NUMBER,
12477 p_old_CONTACT_TYPE in VARCHAR2,
12478 p_new_CONTACT_TYPE in VARCHAR2,
12479 p_old_CONT_ATTRIBUTE1 in VARCHAR2,
12480 p_new_CONT_ATTRIBUTE1 in VARCHAR2,
12481 p_old_CONT_ATTRIBUTE10 in VARCHAR2,
12482 p_new_CONT_ATTRIBUTE10 in VARCHAR2,
12483 p_old_CONT_ATTRIBUTE11 in VARCHAR2,
12487 p_old_CONT_ATTRIBUTE13 in VARCHAR2,
12484 p_new_CONT_ATTRIBUTE11 in VARCHAR2,
12485 p_old_CONT_ATTRIBUTE12 in VARCHAR2,
12486 p_new_CONT_ATTRIBUTE12 in VARCHAR2,
12488 p_new_CONT_ATTRIBUTE13 in VARCHAR2,
12489 p_old_CONT_ATTRIBUTE14 in VARCHAR2,
12490 p_new_CONT_ATTRIBUTE14 in VARCHAR2,
12491 p_old_CONT_ATTRIBUTE15 in VARCHAR2,
12492 p_new_CONT_ATTRIBUTE15 in VARCHAR2,
12493 p_old_CONT_ATTRIBUTE16 in VARCHAR2,
12494 p_new_CONT_ATTRIBUTE16 in VARCHAR2,
12495 p_old_CONT_ATTRIBUTE17 in VARCHAR2,
12496 p_new_CONT_ATTRIBUTE17 in VARCHAR2,
12497 p_old_CONT_ATTRIBUTE18 in VARCHAR2,
12498 p_new_CONT_ATTRIBUTE18 in VARCHAR2,
12499 p_old_CONT_ATTRIBUTE19 in VARCHAR2,
12500 p_new_CONT_ATTRIBUTE19 in VARCHAR2,
12501 p_old_CONT_ATTRIBUTE2 in VARCHAR2,
12502 p_new_CONT_ATTRIBUTE2 in VARCHAR2,
12503 p_old_CONT_ATTRIBUTE20 in VARCHAR2,
12504 p_new_CONT_ATTRIBUTE20 in VARCHAR2,
12505 p_old_CONT_ATTRIBUTE3 in VARCHAR2,
12506 p_new_CONT_ATTRIBUTE3 in VARCHAR2,
12507 p_old_CONT_ATTRIBUTE4 in VARCHAR2,
12508 p_new_CONT_ATTRIBUTE4 in VARCHAR2,
12509 p_old_CONT_ATTRIBUTE5 in VARCHAR2,
12510 p_new_CONT_ATTRIBUTE5 in VARCHAR2,
12511 p_old_CONT_ATTRIBUTE6 in VARCHAR2,
12512 p_new_CONT_ATTRIBUTE6 in VARCHAR2,
12513 p_old_CONT_ATTRIBUTE7 in VARCHAR2,
12514 p_new_CONT_ATTRIBUTE7 in VARCHAR2,
12515 p_old_CONT_ATTRIBUTE8 in VARCHAR2,
12516 p_new_CONT_ATTRIBUTE8 in VARCHAR2,
12517 p_old_CONT_ATTRIBUTE9 in VARCHAR2,
12518 p_new_CONT_ATTRIBUTE9 in VARCHAR2,
12519 p_old_CONT_ATTRIBUTE_CATEGORY in VARCHAR2,
12520 p_new_CONT_ATTRIBUTE_CATEGORY in VARCHAR2,
12521 p_old_CONT_INFORMATION1 in VARCHAR2,
12522 p_new_CONT_INFORMATION1 in VARCHAR2,
12523 p_old_CONT_INFORMATION10 in VARCHAR2,
12524 p_new_CONT_INFORMATION10 in VARCHAR2,
12525 p_old_CONT_INFORMATION11 in VARCHAR2,
12526 p_new_CONT_INFORMATION11 in VARCHAR2,
12527 p_old_CONT_INFORMATION12 in VARCHAR2,
12528 p_new_CONT_INFORMATION12 in VARCHAR2,
12529 p_old_CONT_INFORMATION13 in VARCHAR2,
12530 p_new_CONT_INFORMATION13 in VARCHAR2,
12531 p_old_CONT_INFORMATION14 in VARCHAR2,
12532 p_new_CONT_INFORMATION14 in VARCHAR2,
12533 p_old_CONT_INFORMATION15 in VARCHAR2,
12534 p_new_CONT_INFORMATION15 in VARCHAR2,
12535 p_old_CONT_INFORMATION16 in VARCHAR2,
12536 p_new_CONT_INFORMATION16 in VARCHAR2,
12537 p_old_CONT_INFORMATION17 in VARCHAR2,
12538 p_new_CONT_INFORMATION17 in VARCHAR2,
12539 p_old_CONT_INFORMATION18 in VARCHAR2,
12540 p_new_CONT_INFORMATION18 in VARCHAR2,
12541 p_old_CONT_INFORMATION19 in VARCHAR2,
12542 p_new_CONT_INFORMATION19 in VARCHAR2,
12543 p_old_CONT_INFORMATION2 in VARCHAR2,
12544 p_new_CONT_INFORMATION2 in VARCHAR2,
12545 p_old_CONT_INFORMATION20 in VARCHAR2,
12546 p_new_CONT_INFORMATION20 in VARCHAR2,
12547 p_old_CONT_INFORMATION3 in VARCHAR2,
12548 p_new_CONT_INFORMATION3 in VARCHAR2,
12549 p_old_CONT_INFORMATION4 in VARCHAR2,
12550 p_new_CONT_INFORMATION4 in VARCHAR2,
12551 p_old_CONT_INFORMATION5 in VARCHAR2,
12552 p_new_CONT_INFORMATION5 in VARCHAR2,
12553 p_old_CONT_INFORMATION6 in VARCHAR2,
12554 p_new_CONT_INFORMATION6 in VARCHAR2,
12555 p_old_CONT_INFORMATION7 in VARCHAR2,
12556 p_new_CONT_INFORMATION7 in VARCHAR2,
12557 p_old_CONT_INFORMATION8 in VARCHAR2,
12558 p_new_CONT_INFORMATION8 in VARCHAR2,
12559 p_old_CONT_INFORMATION9 in VARCHAR2,
12560 p_new_CONT_INFORMATION9 in VARCHAR2,
12561 p_old_CONT_INFORMATION_CATEGOR in VARCHAR2,
12562 p_new_CONT_INFORMATION_CATEGOR in VARCHAR2,
12563 p_old_DEPENDENT_FLAG in VARCHAR2,
12564 p_new_DEPENDENT_FLAG in VARCHAR2,
12565 p_old_END_LIFE_REASON_ID in NUMBER,
12566 p_new_END_LIFE_REASON_ID in NUMBER,
12567 p_old_PARTY_ID in NUMBER,
12568 p_new_PARTY_ID in NUMBER,
12569 p_old_PERSONAL_FLAG in VARCHAR2,
12570 p_new_PERSONAL_FLAG in VARCHAR2,
12571 p_old_PERSON_ID in NUMBER,
12572 p_new_PERSON_ID in NUMBER,
12573 p_old_PRIMARY_CONTACT_FLAG in VARCHAR2,
12574 p_new_PRIMARY_CONTACT_FLAG in VARCHAR2,
12575 p_old_PROGRAM_APPLICATION_ID in NUMBER,
12576 p_new_PROGRAM_APPLICATION_ID in NUMBER,
12577 p_old_PROGRAM_ID in NUMBER,
12578 p_new_PROGRAM_ID in NUMBER,
12579 p_old_PROGRAM_UPDATE_DATE in DATE,
12580 p_new_PROGRAM_UPDATE_DATE in DATE,
12581 p_old_REQUEST_ID in NUMBER,
12582 p_new_REQUEST_ID in NUMBER,
12583 p_old_RLTD_PER_RSDS_W_DSGNTR_F in VARCHAR2,
12584 p_new_RLTD_PER_RSDS_W_DSGNTR_F in VARCHAR2,
12585 p_old_SEQUENCE_NUMBER in NUMBER,
12586 p_new_SEQUENCE_NUMBER in NUMBER,
12587 p_old_START_LIFE_REASON_ID in NUMBER,
12588 p_new_START_LIFE_REASON_ID in NUMBER,
12589 p_old_THIRD_PARTY_PAY_FLAG in VARCHAR2,
12590 p_new_THIRD_PARTY_PAY_FLAG in VARCHAR2,
12591 p_old_DATE_END in DATE,
12592 p_new_DATE_END in DATE,
12593 p_old_DATE_START in DATE,
12594 p_new_DATE_START in DATE
12595 )
12596 is
12597
12598 cursor asgcur (p_person_id number) is
12599 select distinct assignment_id
12600 from per_assignments_f
12601 where person_id = p_person_id;
12602 l_proc varchar2(100) := 'PER_CONTACT_RELATIONSHIPS_ARU';
12603 --
12604 begin
12605 hr_utility.set_location(l_proc,1);
12606 hr_utility.trace('p_business_group_id '||p_business_group_id);
12607 /* If the continuous calc is overriden then do nothing */
12608 if (pay_continuous_calc.g_override_cc = TRUE) then
12609 return;
12610 end if;
12611
12612 hr_utility.set_location(l_proc,2);
12613 pay_continuous_calc.event_update(p_business_group_id,
12614 p_legislation_code,
12618 p_new_BENEFICIARY_FLAG,
12615 'PER_CONTACT_RELATIONSHIPS',
12616 'BENEFICIARY_FLAG',
12617 p_old_BENEFICIARY_FLAG,
12619 p_effective_date
12620 );
12621 --
12622 pay_continuous_calc.event_update(p_business_group_id,
12623 p_legislation_code,
12624 'PER_CONTACT_RELATIONSHIPS',
12625 'BONDHOLDER_FLAG',
12626 p_old_BONDHOLDER_FLAG,
12627 p_new_BONDHOLDER_FLAG,
12628 p_effective_date
12629 );
12630 --
12631 pay_continuous_calc.event_update(p_business_group_id,
12632 p_legislation_code,
12633 'PER_CONTACT_RELATIONSHIPS',
12634 'BUSINESS_GROUP_ID',
12635 p_old_BUSINESS_GROUP_ID,
12636 p_new_BUSINESS_GROUP_ID,
12637 p_effective_date
12638 );
12639 --
12640 pay_continuous_calc.event_update(p_business_group_id,
12641 p_legislation_code,
12642 'PER_CONTACT_RELATIONSHIPS',
12643 'CONTACT_PERSON_ID',
12644 p_old_CONTACT_PERSON_ID,
12645 p_new_CONTACT_PERSON_ID,
12646 p_effective_date
12647 );
12648 --
12649 pay_continuous_calc.event_update(p_business_group_id,
12650 p_legislation_code,
12651 'PER_CONTACT_RELATIONSHIPS',
12652 'CONTACT_RELATIONSHIP_ID',
12653 p_old_CONTACT_RELATIONSHIP_ID,
12654 p_new_CONTACT_RELATIONSHIP_ID,
12655 p_effective_date
12656 );
12657 --
12658 pay_continuous_calc.event_update(p_business_group_id,
12659 p_legislation_code,
12660 'PER_CONTACT_RELATIONSHIPS',
12661 'CONTACT_TYPE',
12662 p_old_CONTACT_TYPE,
12663 p_new_CONTACT_TYPE,
12664 p_effective_date
12665 );
12666 --
12667 pay_continuous_calc.event_update(p_business_group_id,
12668 p_legislation_code,
12669 'PER_CONTACT_RELATIONSHIPS',
12670 'CONT_ATTRIBUTE1',
12671 p_old_CONT_ATTRIBUTE1,
12672 p_new_CONT_ATTRIBUTE1,
12673 p_effective_date
12674 );
12675 --
12676 pay_continuous_calc.event_update(p_business_group_id,
12677 p_legislation_code,
12678 'PER_CONTACT_RELATIONSHIPS',
12679 'CONT_ATTRIBUTE10',
12680 p_old_CONT_ATTRIBUTE10,
12681 p_new_CONT_ATTRIBUTE10,
12682 p_effective_date
12683 );
12684 --
12685 pay_continuous_calc.event_update(p_business_group_id,
12686 p_legislation_code,
12687 'PER_CONTACT_RELATIONSHIPS',
12688 'CONT_ATTRIBUTE11',
12689 p_old_CONT_ATTRIBUTE11,
12690 p_new_CONT_ATTRIBUTE11,
12691 p_effective_date
12692 );
12693 --
12694 pay_continuous_calc.event_update(p_business_group_id,
12695 p_legislation_code,
12696 'PER_CONTACT_RELATIONSHIPS',
12697 'CONT_ATTRIBUTE12',
12698 p_old_CONT_ATTRIBUTE12,
12699 p_new_CONT_ATTRIBUTE12,
12700 p_effective_date
12701 );
12702 --
12703 pay_continuous_calc.event_update(p_business_group_id,
12704 p_legislation_code,
12705 'PER_CONTACT_RELATIONSHIPS',
12706 'CONT_ATTRIBUTE13',
12707 p_old_CONT_ATTRIBUTE13,
12708 p_new_CONT_ATTRIBUTE13,
12709 p_effective_date
12710 );
12711 --
12712 pay_continuous_calc.event_update(p_business_group_id,
12713 p_legislation_code,
12714 'PER_CONTACT_RELATIONSHIPS',
12715 'CONT_ATTRIBUTE14',
12716 p_old_CONT_ATTRIBUTE14,
12717 p_new_CONT_ATTRIBUTE14,
12718 p_effective_date
12719 );
12720 --
12721 pay_continuous_calc.event_update(p_business_group_id,
12725 p_old_CONT_ATTRIBUTE15,
12722 p_legislation_code,
12723 'PER_CONTACT_RELATIONSHIPS',
12724 'CONT_ATTRIBUTE15',
12726 p_new_CONT_ATTRIBUTE15,
12727 p_effective_date
12728 );
12729 --
12730 pay_continuous_calc.event_update(p_business_group_id,
12731 p_legislation_code,
12732 'PER_CONTACT_RELATIONSHIPS',
12733 'CONT_ATTRIBUTE16',
12734 p_old_CONT_ATTRIBUTE16,
12735 p_new_CONT_ATTRIBUTE16,
12736 p_effective_date
12737 );
12738 --
12739 pay_continuous_calc.event_update(p_business_group_id,
12740 p_legislation_code,
12741 'PER_CONTACT_RELATIONSHIPS',
12742 'CONT_ATTRIBUTE17',
12743 p_old_CONT_ATTRIBUTE17,
12744 p_new_CONT_ATTRIBUTE17,
12745 p_effective_date
12746 );
12747 --
12748 pay_continuous_calc.event_update(p_business_group_id,
12749 p_legislation_code,
12750 'PER_CONTACT_RELATIONSHIPS',
12751 'CONT_ATTRIBUTE18',
12752 p_old_CONT_ATTRIBUTE18,
12753 p_new_CONT_ATTRIBUTE18,
12754 p_effective_date
12755 );
12756 --
12757 pay_continuous_calc.event_update(p_business_group_id,
12758 p_legislation_code,
12759 'PER_CONTACT_RELATIONSHIPS',
12760 'CONT_ATTRIBUTE19',
12761 p_old_CONT_ATTRIBUTE19,
12762 p_new_CONT_ATTRIBUTE19,
12763 p_effective_date
12764 );
12765 --
12766 pay_continuous_calc.event_update(p_business_group_id,
12767 p_legislation_code,
12768 'PER_CONTACT_RELATIONSHIPS',
12769 'CONT_ATTRIBUTE2',
12770 p_old_CONT_ATTRIBUTE2,
12771 p_new_CONT_ATTRIBUTE2,
12772 p_effective_date
12773 );
12774 --
12775 pay_continuous_calc.event_update(p_business_group_id,
12776 p_legislation_code,
12777 'PER_CONTACT_RELATIONSHIPS',
12778 'CONT_ATTRIBUTE20',
12779 p_old_CONT_ATTRIBUTE20,
12780 p_new_CONT_ATTRIBUTE20,
12781 p_effective_date
12782 );
12783 --
12784 pay_continuous_calc.event_update(p_business_group_id,
12785 p_legislation_code,
12786 'PER_CONTACT_RELATIONSHIPS',
12787 'CONT_ATTRIBUTE3',
12788 p_old_CONT_ATTRIBUTE3,
12789 p_new_CONT_ATTRIBUTE3,
12790 p_effective_date
12791 );
12792 --
12793 pay_continuous_calc.event_update(p_business_group_id,
12794 p_legislation_code,
12795 'PER_CONTACT_RELATIONSHIPS',
12796 'CONT_ATTRIBUTE4',
12797 p_old_CONT_ATTRIBUTE4,
12798 p_new_CONT_ATTRIBUTE4,
12799 p_effective_date
12800 );
12801 --
12802 pay_continuous_calc.event_update(p_business_group_id,
12803 p_legislation_code,
12804 'PER_CONTACT_RELATIONSHIPS',
12805 'CONT_ATTRIBUTE5',
12806 p_old_CONT_ATTRIBUTE5,
12807 p_new_CONT_ATTRIBUTE5,
12808 p_effective_date
12809 );
12810 --
12811 pay_continuous_calc.event_update(p_business_group_id,
12812 p_legislation_code,
12813 'PER_CONTACT_RELATIONSHIPS',
12814 'CONT_ATTRIBUTE6',
12815 p_old_CONT_ATTRIBUTE6,
12816 p_new_CONT_ATTRIBUTE6,
12817 p_effective_date
12818 );
12819 --
12820 pay_continuous_calc.event_update(p_business_group_id,
12821 p_legislation_code,
12822 'PER_CONTACT_RELATIONSHIPS',
12823 'CONT_ATTRIBUTE7',
12824 p_old_CONT_ATTRIBUTE7,
12825 p_new_CONT_ATTRIBUTE7,
12826 p_effective_date
12827 );
12828 --
12832 'CONT_ATTRIBUTE8',
12829 pay_continuous_calc.event_update(p_business_group_id,
12830 p_legislation_code,
12831 'PER_CONTACT_RELATIONSHIPS',
12833 p_old_CONT_ATTRIBUTE8,
12834 p_new_CONT_ATTRIBUTE8,
12835 p_effective_date
12836 );
12837 --
12838 pay_continuous_calc.event_update(p_business_group_id,
12839 p_legislation_code,
12840 'PER_CONTACT_RELATIONSHIPS',
12841 'CONT_ATTRIBUTE9',
12842 p_old_CONT_ATTRIBUTE9,
12843 p_new_CONT_ATTRIBUTE9,
12844 p_effective_date
12845 );
12846 --
12847 pay_continuous_calc.event_update(p_business_group_id,
12848 p_legislation_code,
12849 'PER_CONTACT_RELATIONSHIPS',
12850 'CONT_ATTRIBUTE_CATEGORY',
12851 p_old_CONT_ATTRIBUTE_CATEGORY,
12852 p_new_CONT_ATTRIBUTE_CATEGORY,
12853 p_effective_date
12854 );
12855 --
12856 pay_continuous_calc.event_update(p_business_group_id,
12857 p_legislation_code,
12858 'PER_CONTACT_RELATIONSHIPS',
12859 'CONT_INFORMATION1',
12860 p_old_CONT_INFORMATION1,
12861 p_new_CONT_INFORMATION1,
12862 p_effective_date
12863 );
12864 --
12865 pay_continuous_calc.event_update(p_business_group_id,
12866 p_legislation_code,
12867 'PER_CONTACT_RELATIONSHIPS',
12868 'CONT_INFORMATION10',
12869 p_old_CONT_INFORMATION10,
12870 p_new_CONT_INFORMATION10,
12871 p_effective_date
12872 );
12873 --
12874 pay_continuous_calc.event_update(p_business_group_id,
12875 p_legislation_code,
12876 'PER_CONTACT_RELATIONSHIPS',
12877 'CONT_INFORMATION11',
12878 p_old_CONT_INFORMATION11,
12879 p_new_CONT_INFORMATION11,
12880 p_effective_date
12881 );
12882 --
12883 pay_continuous_calc.event_update(p_business_group_id,
12884 p_legislation_code,
12885 'PER_CONTACT_RELATIONSHIPS',
12886 'CONT_INFORMATION12',
12887 p_old_CONT_INFORMATION12,
12888 p_new_CONT_INFORMATION12,
12889 p_effective_date
12890 );
12891 --
12892 pay_continuous_calc.event_update(p_business_group_id,
12893 p_legislation_code,
12894 'PER_CONTACT_RELATIONSHIPS',
12895 'CONT_INFORMATION13',
12896 p_old_CONT_INFORMATION13,
12897 p_new_CONT_INFORMATION13,
12898 p_effective_date
12899 );
12900 --
12901 pay_continuous_calc.event_update(p_business_group_id,
12902 p_legislation_code,
12903 'PER_CONTACT_RELATIONSHIPS',
12904 'CONT_INFORMATION14',
12905 p_old_CONT_INFORMATION14,
12906 p_new_CONT_INFORMATION14,
12907 p_effective_date
12908 );
12909 --
12910 pay_continuous_calc.event_update(p_business_group_id,
12911 p_legislation_code,
12912 'PER_CONTACT_RELATIONSHIPS',
12913 'CONT_INFORMATION15',
12914 p_old_CONT_INFORMATION15,
12915 p_new_CONT_INFORMATION15,
12916 p_effective_date
12917 );
12918 --
12919 pay_continuous_calc.event_update(p_business_group_id,
12920 p_legislation_code,
12921 'PER_CONTACT_RELATIONSHIPS',
12922 'CONT_INFORMATION16',
12923 p_old_CONT_INFORMATION16,
12924 p_new_CONT_INFORMATION16,
12925 p_effective_date
12926 );
12927 --
12928 pay_continuous_calc.event_update(p_business_group_id,
12929 p_legislation_code,
12930 'PER_CONTACT_RELATIONSHIPS',
12931 'CONT_INFORMATION17',
12932 p_old_CONT_INFORMATION17,
12936 --
12933 p_new_CONT_INFORMATION17,
12934 p_effective_date
12935 );
12937 pay_continuous_calc.event_update(p_business_group_id,
12938 p_legislation_code,
12939 'PER_CONTACT_RELATIONSHIPS',
12940 'CONT_INFORMATION18',
12941 p_old_CONT_INFORMATION18,
12942 p_new_CONT_INFORMATION18,
12943 p_effective_date
12944 );
12945 --
12946 pay_continuous_calc.event_update(p_business_group_id,
12947 p_legislation_code,
12948 'PER_CONTACT_RELATIONSHIPS',
12949 'CONT_INFORMATION19',
12950 p_old_CONT_INFORMATION19,
12951 p_new_CONT_INFORMATION19,
12952 p_effective_date
12953 );
12954 --
12955 pay_continuous_calc.event_update(p_business_group_id,
12956 p_legislation_code,
12957 'PER_CONTACT_RELATIONSHIPS',
12958 'CONT_INFORMATION2',
12959 p_old_CONT_INFORMATION2,
12960 p_new_CONT_INFORMATION2,
12961 p_effective_date
12962 );
12963 --
12964 pay_continuous_calc.event_update(p_business_group_id,
12965 p_legislation_code,
12966 'PER_CONTACT_RELATIONSHIPS',
12967 'CONT_INFORMATION20',
12968 p_old_CONT_INFORMATION20,
12969 p_new_CONT_INFORMATION20,
12970 p_effective_date
12971 );
12972 --
12973 pay_continuous_calc.event_update(p_business_group_id,
12974 p_legislation_code,
12975 'PER_CONTACT_RELATIONSHIPS',
12976 'CONT_INFORMATION3',
12977 p_old_CONT_INFORMATION3,
12978 p_new_CONT_INFORMATION3,
12979 p_effective_date
12980 );
12981 --
12982 pay_continuous_calc.event_update(p_business_group_id,
12983 p_legislation_code,
12984 'PER_CONTACT_RELATIONSHIPS',
12985 'CONT_INFORMATION4',
12986 p_old_CONT_INFORMATION4,
12987 p_new_CONT_INFORMATION4,
12988 p_effective_date
12989 );
12990 --
12991 pay_continuous_calc.event_update(p_business_group_id,
12992 p_legislation_code,
12993 'PER_CONTACT_RELATIONSHIPS',
12994 'CONT_INFORMATION5',
12995 p_old_CONT_INFORMATION5,
12996 p_new_CONT_INFORMATION5,
12997 p_effective_date
12998 );
12999 --
13000 pay_continuous_calc.event_update(p_business_group_id,
13001 p_legislation_code,
13002 'PER_CONTACT_RELATIONSHIPS',
13003 'CONT_INFORMATION6',
13004 p_old_CONT_INFORMATION6,
13005 p_new_CONT_INFORMATION6,
13006 p_effective_date
13007 );
13008 --
13009 pay_continuous_calc.event_update(p_business_group_id,
13010 p_legislation_code,
13011 'PER_CONTACT_RELATIONSHIPS',
13012 'CONT_INFORMATION7',
13013 p_old_CONT_INFORMATION7,
13014 p_new_CONT_INFORMATION7,
13015 p_effective_date
13016 );
13017 --
13018 pay_continuous_calc.event_update(p_business_group_id,
13019 p_legislation_code,
13020 'PER_CONTACT_RELATIONSHIPS',
13021 'CONT_INFORMATION8',
13022 p_old_CONT_INFORMATION8,
13023 p_new_CONT_INFORMATION8,
13024 p_effective_date
13025 );
13026 --
13027 pay_continuous_calc.event_update(p_business_group_id,
13028 p_legislation_code,
13029 'PER_CONTACT_RELATIONSHIPS',
13030 'CONT_INFORMATION9',
13031 p_old_CONT_INFORMATION9,
13032 p_new_CONT_INFORMATION9,
13033 p_effective_date
13034 );
13035 --
13036 pay_continuous_calc.event_update(p_business_group_id,
13037 p_legislation_code,
13038 'PER_CONTACT_RELATIONSHIPS',
13042 p_effective_date
13039 'CONT_INFORMATION_CATEGORY',
13040 p_old_CONT_INFORMATION_CATEGOR,
13041 p_new_CONT_INFORMATION_CATEGOR,
13043 );
13044 --
13045 pay_continuous_calc.event_update(p_business_group_id,
13046 p_legislation_code,
13047 'PER_CONTACT_RELATIONSHIPS',
13048 'DEPENDENT_FLAG',
13049 p_old_DEPENDENT_FLAG,
13050 p_new_DEPENDENT_FLAG,
13051 p_effective_date
13052 );
13053 --
13054 pay_continuous_calc.event_update(p_business_group_id,
13055 p_legislation_code,
13056 'PER_CONTACT_RELATIONSHIPS',
13057 'END_LIFE_REASON_ID',
13058 p_old_END_LIFE_REASON_ID,
13059 p_new_END_LIFE_REASON_ID,
13060 p_effective_date
13061 );
13062 --
13063 pay_continuous_calc.event_update(p_business_group_id,
13064 p_legislation_code,
13065 'PER_CONTACT_RELATIONSHIPS',
13066 'PARTY_ID',
13067 p_old_PARTY_ID,
13068 p_new_PARTY_ID,
13069 p_effective_date
13070 );
13071 --
13072 pay_continuous_calc.event_update(p_business_group_id,
13073 p_legislation_code,
13074 'PER_CONTACT_RELATIONSHIPS',
13075 'PERSONAL_FLAG',
13076 p_old_PERSONAL_FLAG,
13077 p_new_PERSONAL_FLAG,
13078 p_effective_date
13079 );
13080 --
13081 pay_continuous_calc.event_update(p_business_group_id,
13082 p_legislation_code,
13083 'PER_CONTACT_RELATIONSHIPS',
13084 'PERSON_ID',
13085 p_old_PERSON_ID,
13086 p_new_PERSON_ID,
13087 p_effective_date
13088 );
13089 --
13090 pay_continuous_calc.event_update(p_business_group_id,
13091 p_legislation_code,
13092 'PER_CONTACT_RELATIONSHIPS',
13093 'PRIMARY_CONTACT_FLAG',
13094 p_old_PRIMARY_CONTACT_FLAG,
13095 p_new_PRIMARY_CONTACT_FLAG,
13096 p_effective_date
13097 );
13098 --
13099 pay_continuous_calc.event_update(p_business_group_id,
13100 p_legislation_code,
13101 'PER_CONTACT_RELATIONSHIPS',
13102 'PROGRAM_APPLICATION_ID',
13103 p_old_PROGRAM_APPLICATION_ID,
13104 p_new_PROGRAM_APPLICATION_ID,
13105 p_effective_date
13106 );
13107 --
13108 pay_continuous_calc.event_update(p_business_group_id,
13109 p_legislation_code,
13110 'PER_CONTACT_RELATIONSHIPS',
13111 'PROGRAM_ID',
13112 p_old_PROGRAM_ID,
13113 p_new_PROGRAM_ID,
13114 p_effective_date
13115 );
13116 --
13117 pay_continuous_calc.event_update(p_business_group_id,
13118 p_legislation_code,
13119 'PER_CONTACT_RELATIONSHIPS',
13120 'PROGRAM_UPDATE_DATE',
13121 p_old_PROGRAM_UPDATE_DATE,
13122 p_new_PROGRAM_UPDATE_DATE,
13123 p_effective_date
13124 );
13125 --
13126 pay_continuous_calc.event_update(p_business_group_id,
13127 p_legislation_code,
13128 'PER_CONTACT_RELATIONSHIPS',
13129 'REQUEST_ID',
13130 p_old_REQUEST_ID,
13131 p_new_REQUEST_ID,
13132 p_effective_date
13133 );
13134 --
13135 pay_continuous_calc.event_update(p_business_group_id,
13136 p_legislation_code,
13137 'PER_CONTACT_RELATIONSHIPS',
13138 'RLTD_PER_RSDS_W_DSGNTR_FLAG',
13139 p_old_RLTD_PER_RSDS_W_DSGNTR_F,
13140 p_new_RLTD_PER_RSDS_W_DSGNTR_F,
13141 p_effective_date
13142 );
13143 --
13144 pay_continuous_calc.event_update(p_business_group_id,
13145 p_legislation_code,
13149 p_new_SEQUENCE_NUMBER,
13146 'PER_CONTACT_RELATIONSHIPS',
13147 'SEQUENCE_NUMBER',
13148 p_old_SEQUENCE_NUMBER,
13150 p_effective_date
13151 );
13152 --
13153 pay_continuous_calc.event_update(p_business_group_id,
13154 p_legislation_code,
13155 'PER_CONTACT_RELATIONSHIPS',
13156 'START_LIFE_REASON_ID',
13157 p_old_START_LIFE_REASON_ID,
13158 p_new_START_LIFE_REASON_ID,
13159 p_effective_date
13160 );
13161 --
13162 pay_continuous_calc.event_update(p_business_group_id,
13163 p_legislation_code,
13164 'PER_CONTACT_RELATIONSHIPS',
13165 'THIRD_PARTY_PAY_FLAG',
13166 p_old_THIRD_PARTY_PAY_FLAG,
13167 p_new_THIRD_PARTY_PAY_FLAG,
13168 p_effective_date
13169 );
13170 --
13171 pay_continuous_calc.event_update(p_business_group_id,
13172 p_legislation_code,
13173 'PER_CONTACT_RELATIONSHIPS',
13174 'THIRD_PARTY_PAY_FLAG',
13175 p_old_THIRD_PARTY_PAY_FLAG,
13176 p_new_THIRD_PARTY_PAY_FLAG,
13177 p_effective_date
13178 );
13179
13180 /*Added for the bug 14025159 For the events to get logged on Date_end Column*/
13181 pay_continuous_calc.event_update(p_business_group_id,
13182 p_legislation_code,
13183 'PER_CONTACT_RELATIONSHIPS',
13184 'DATE_END',
13185 p_old_DATE_END,
13186 p_new_DATE_END,
13187 p_effective_date
13188 );
13189
13190 hr_utility.set_location(l_proc,3);
13191 /* Now call the API for the affected assignments */
13192 declare
13193 l_process_event_id number;
13194 l_object_version_number number;
13195 cnt number;
13196 begin
13197 hr_utility.set_location(l_proc,4);
13198 if (pay_continuous_calc.g_event_list.sz <> 0) then
13199 for asgrec in asgcur (p_old_PERSON_ID) loop
13200 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
13201 pay_ppe_api.create_process_event(
13202 p_assignment_id => asgrec.assignment_id,
13203 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
13204 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
13205 p_status => 'U',
13206 p_description => pay_continuous_calc.g_event_list.description(cnt),
13207 p_process_event_id => l_process_event_id,
13208 p_object_version_number => l_object_version_number,
13209 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
13210 p_business_group_id => p_business_group_id,
13211 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
13212 p_surrogate_key => p_new_contact_relationship_id
13213 );
13214 end loop;
13215 end loop;
13216 end if;
13217 pay_continuous_calc.g_event_list.sz := 0;
13218 end;
13219 hr_utility.set_location(l_proc,900);
13220 --
13221 end PER_CONTACT_RELATIONSHIPS_aru;
13222
13223 begin
13224 g_event_cache.sz := 0;
13225 g_event_list.sz := 0;
13226 g_override_cc := FALSE;
13227 END PAY_CONTINUOUS_CALC;