[Home] [Help]
PACKAGE BODY: APPS.PAY_CONTINUOUS_CALC
Source
1 PACKAGE BODY PAY_CONTINUOUS_CALC AS
2 /* $Header: pycontc.pkb 120.19.12010000.1 2008/07/27 22:22:40 appldev 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;
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
91 and g_event_cache.table_name(cnt) = p_table_name
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.');
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);
188 g_event_list.effective_date(g_event_list.sz) := p_effective_date;
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,
310 p_new_ENTRY_INFORMATION11 in VARCHAR2,
311 p_old_ENTRY_INFORMATION12 in VARCHAR2,
312 p_new_ENTRY_INFORMATION12 in VARCHAR2,
313 p_old_ENTRY_INFORMATION13 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,
348 p_new_ENTRY_INFORMATION29 in VARCHAR2,
345 p_old_ENTRY_INFORMATION28 in VARCHAR2,
346 p_new_ENTRY_INFORMATION28 in VARCHAR2,
347 p_old_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,
432 p_effective_date
433 );
434 pay_continuous_calc.event_update(p_business_group_id,
435 p_legislation_code,
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
460 'PAY_ELEMENT_ENTRIES_F',
457 );
458 pay_continuous_calc.event_update(p_business_group_id,
459 p_legislation_code,
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,
531 p_legislation_code,
532 'PAY_ELEMENT_ENTRIES_F',
533 'ATTRIBUTE7',
534 p_old_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,
559 p_new_ATTRIBUTE_CATEGORY,
556 'PAY_ELEMENT_ENTRIES_F',
557 'ATTRIBUTE_CATEGORY',
558 p_old_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 );
653 'ENTRY_INFORMATION18',
650 pay_continuous_calc.event_update(p_business_group_id,
651 p_legislation_code,
652 'PAY_ELEMENT_ENTRIES_F',
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,
747 p_legislation_code,
744 p_effective_date
745 );
746 pay_continuous_calc.event_update(p_business_group_id,
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 );
786 pay_continuous_calc.event_update(p_business_group_id,
787 p_legislation_code,
788 'PAY_ELEMENT_ENTRIES_F',
789 'ENTRY_INFORMATION6',
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',
841 );
838 p_old_PERSONAL_PAYMENT_METHOD_,
839 p_new_PERSONAL_PAYMENT_METHOD_,
840 p_effective_date
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,
867 least(p_old_effective_end_date,
868 p_new_effective_end_date)
869 );
870 pay_continuous_calc.event_update(p_business_group_id,
871 p_legislation_code,
872 'PAY_ELEMENT_ENTRIES_F',
873 'EFFECTIVE_START_DATE',
874 p_old_EFFECTIVE_START_DATE,
875 p_new_EFFECTIVE_START_DATE,
876 p_new_effective_start_date,
877 least(p_old_effective_start_date,
878 p_new_effective_start_date)
879 );
880 end if;
881 --
882 /* Now call the API for the affected assignments */
883 declare
884 cnt number;
885 l_process_event_id number;
886 l_object_version_number number;
887 begin
888 if (pay_continuous_calc.g_event_list.sz <> 0) then
889 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
890 pay_ppe_api.create_process_event(
891 p_assignment_id => p_old_ASSIGNMENT_ID,
892 p_effective_date => g_event_list.effective_date(cnt),
893 p_change_type => g_event_list.change_type(cnt),
894 p_status => 'U',
895 p_description => g_event_list.description(cnt),
896 p_process_event_id => l_process_event_id,
897 p_object_version_number => l_object_version_number,
898 p_event_update_id => g_event_list.event_update_id(cnt),
899 p_surrogate_key => p_old_ELEMENT_ENTRY_ID,
900 p_calculation_date => g_event_list.calc_date(cnt),
901 p_business_group_id => p_business_group_id
902 );
903 end loop;
904 end if;
905 pay_continuous_calc.g_event_list.sz := 0;
906 end;
907 hr_utility.set_location(l_proc, 900);
908 --
909 end PAY_ELEMENT_ENTRIES_F_aru;
910 --
911
912 /* name : element_entries_ari
913 purpose : This is procedure that records any inserts
914 on element_entries.
915 */
916
917 procedure element_entries_ari(
918 p_business_group_id in number,
919 p_legislation_code in varchar2,
920 p_assignment_id in number,
921 p_effective_start_date in date,
922 p_updating_action_id in number,
923 p_new_element_entry_id in number
924 )
925 is
926 l_process_api boolean;
927 l_process_event_id number;
928 l_object_version_number number;
929 l_proc varchar2(240) := g_package||'.element_entries_ari';
930 begin
931 --
932 hr_utility.set_location(l_proc, 10);
933 /* If the continuous calc is overriden then do nothing */
934 if (g_override_cc = TRUE) then
935 return;
936 end if;
937 --
938 --
939 pay_continuous_calc.event_update(p_business_group_id,
940 p_legislation_code,
941 'PAY_ELEMENT_ENTRIES_F',
942 NULL,
943 NULL,
944 NULL,
945 p_effective_start_date,
946 p_effective_start_date,
947 'I'
948 );
949 /* Now call the API for the affected assignments */
950 declare
954 begin
951 cnt number;
952 l_process_event_id number;
953 l_object_version_number number;
955 if (pay_continuous_calc.g_event_list.sz <> 0) then
956 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
957 pay_ppe_api.create_process_event(
958 p_assignment_id => p_assignment_id,
959 p_effective_date => g_event_list.effective_date(cnt),
960 p_change_type => g_event_list.change_type(cnt),
961 p_status => 'U',
962 p_description => g_event_list.description(cnt),
963 p_process_event_id => l_process_event_id,
964 p_object_version_number => l_object_version_number,
965 p_event_update_id => g_event_list.event_update_id(cnt),
966 p_surrogate_key => p_new_ELEMENT_ENTRY_ID,
967 p_calculation_date => g_event_list.calc_date(cnt),
968 p_business_group_id => p_business_group_id
969 );
970 end loop;
971 end if;
972 pay_continuous_calc.g_event_list.sz := 0;
973 end;
974 hr_utility.set_location(l_proc, 900);
975 end element_entries_ari;
976 --
977
978 /* name : element_entries_ard
979 purpose : This is procedure that records any deletes
980 on element_entries.
981 */
982 procedure element_entries_ard(
983 p_business_group_id in number,
984 p_legislation_code in varchar2,
985 p_assignment_id in number,
986 p_old_ELEMENT_ENTRY_ID in number,
987 p_old_effective_start_date in date,
988 p_new_effective_start_date in date,
989 p_old_effective_end_date in date,
990 p_new_effective_end_date in date,
991 p_old_ELEMENT_TYPE_ID in number default null
992 )
993 is
994 l_process_event_id number;
995 l_object_version_number number;
996 l_effective_date date;
997 l_mode pay_event_updates.event_type%type;
998 l_column_name pay_event_updates.column_name%type;
999 l_old_value date;
1000 l_new_value date;
1001 l_noted_value pay_process_events.noted_value%type;
1002 l_proc varchar2(240) := g_package||'.element_entries_ard';
1003 begin
1004 hr_utility.set_location(l_proc, 10);
1005 /* If the continuous calc is overriden then do nothing */
1006 if (g_override_cc = TRUE) then
1007 return;
1008 end if;
1009 --
1010 l_noted_value := null;
1011 --
1012 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
1013 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
1014 --
1015 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
1016 l_mode := 'D';
1017 else
1018 l_mode := pay_dyn_triggers.g_dyt_mode;
1019 end if;
1020 l_effective_date := p_old_effective_start_date;
1021 l_column_name := null;
1022 l_old_value := null;
1023 l_new_value := null;
1024 l_noted_value := p_old_ELEMENT_TYPE_ID;
1025 --
1026 else
1027 l_mode := pay_dyn_triggers.g_dyt_mode;
1028 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
1029 --
1030 l_effective_date := p_new_effective_end_date;
1031 l_column_name := 'EFFECTIVE_END_DATE';
1032 l_old_value := p_old_effective_end_date;
1033 l_new_value := p_new_effective_end_date;
1034 --
1035 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
1036 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
1037 --
1038 l_effective_date := p_old_effective_start_date;
1039 l_column_name := 'EFFECTIVE_END_DATE';
1040 l_old_value := p_old_effective_end_date;
1041 l_new_value := p_new_effective_end_date;
1042 --
1043 end if;
1044 end if;
1045 --
1046 pay_continuous_calc.event_update(p_business_group_id,
1047 p_legislation_code,
1048 'PAY_ELEMENT_ENTRIES_F',
1049 l_column_name,
1050 l_old_value,
1051 l_new_value,
1052 l_effective_date,
1053 l_effective_date,
1054 l_mode
1055 );
1056 /* Now call the API for the affected assignments */
1057 declare
1058 cnt number;
1059 l_process_event_id number;
1060 l_object_version_number number;
1061 begin
1062 if (pay_continuous_calc.g_event_list.sz <> 0) then
1063 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
1064 pay_ppe_api.create_process_event(
1065 p_assignment_id => p_assignment_id,
1066 p_effective_date => g_event_list.effective_date(cnt),
1067 p_change_type => g_event_list.change_type(cnt),
1068 p_status => 'U',
1069 p_description => g_event_list.description(cnt),
1070 p_process_event_id => l_process_event_id,
1074 p_calculation_date => g_event_list.calc_date(cnt),
1071 p_object_version_number => l_object_version_number,
1072 p_event_update_id => g_event_list.event_update_id(cnt),
1073 p_surrogate_key => p_old_ELEMENT_ENTRY_ID,
1075 p_business_group_id => p_business_group_id,
1076 p_noted_value => l_noted_value
1077 );
1078 end loop;
1079 end if;
1080 pay_continuous_calc.g_event_list.sz := 0;
1081 end;
1082 hr_utility.set_location(l_proc, 900);
1083 end element_entries_ard;
1084
1085 --------------------------------------------
1086 -- PAY_ELEMENT_ENTRY_VALUES_F
1087 --------------------------------------------
1088 /* PAY_ELEMENT_ENTRY_VALUES_F */
1089 /* name : PAY_ELEMENT_ENTRY_VALUES_F_aru
1090 purpose : This is procedure that records any changes for updates
1091 on element_entry_values.
1092 */
1093 procedure PAY_ELEMENT_ENTRY_VALUES_F_aru(
1094 p_business_group_id in number,
1095 p_legislation_code in varchar2,
1096 p_effective_date in date,
1097 p_old_ELEMENT_ENTRY_ID in NUMBER,
1098 p_new_ELEMENT_ENTRY_ID in NUMBER,
1099 p_old_SCREEN_ENTRY_VALUE in VARCHAR2,
1100 p_new_SCREEN_ENTRY_VALUE in VARCHAR2,
1101 p_old_ELEMENT_ENTRY_VALUE_ID in NUMBER
1102 )
1103 is
1104 --
1105 cursor get_asg is
1106 select ee.assignment_id
1107 from pay_element_entries_f ee
1108 where ee.element_entry_id = p_old_ELEMENT_ENTRY_ID
1109 and p_effective_date between ee.effective_start_date
1110 and ee.effective_end_date;
1111 --
1112 begin
1113 hr_utility.set_location('pay_cc_dyt_code_pkg.PAY_ELEMENT_ENTRY_VALUES_F_aru', 10);
1114 /* If the continuous calc is overriden then do nothing */
1115 if (g_override_cc = TRUE) then
1116 return;
1117 end if;
1118 --
1119 pay_continuous_calc.event_update(p_business_group_id,
1120 p_legislation_code,
1121 'PAY_ELEMENT_ENTRY_VALUES_F',
1122 'SCREEN_ENTRY_VALUE',
1123 p_old_SCREEN_ENTRY_VALUE,
1124 p_new_SCREEN_ENTRY_VALUE,
1125 p_effective_date,
1126 p_effective_date
1127 );
1128 --
1129 /* Now call the API for the affected assignments */
1130 declare
1131 l_process_event_id number;
1132 l_object_version_number number;
1133 cnt number;
1134 begin
1135 if (pay_continuous_calc.g_event_list.sz <> 0) then
1136 for asgrec in get_asg loop
1137 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
1138 pay_ppe_api.create_process_event(
1139 p_assignment_id => asgrec.assignment_id,
1140 p_effective_date => g_event_list.effective_date(cnt),
1141 p_change_type => g_event_list.change_type(cnt),
1142 p_status => 'U',
1143 p_description => g_event_list.description(cnt),
1144 p_process_event_id => l_process_event_id,
1145 p_object_version_number => l_object_version_number,
1146 p_event_update_id => g_event_list.event_update_id(cnt),
1147 p_business_group_id => p_business_group_id,
1148 p_calculation_date => g_event_list.calc_date(cnt),
1149 p_surrogate_key => p_old_ELEMENT_ENTRY_VALUE_ID
1150 );
1151 end loop;
1152 end loop;
1153 end if;
1154 pay_continuous_calc.g_event_list.sz := 0;
1155 end;
1156 hr_utility.set_location('pay_cc_dyt_code_pkg.PAY_ELEMENT_ENTRY_VALUES_F_aru', 50);
1157 --
1158 end PAY_ELEMENT_ENTRY_VALUES_F_aru;
1159 --
1160
1161 --------------------------------------------
1162 -- PER_CONTRACTS_F
1163 --------------------------------------------
1164 procedure PER_CONTRACTS_F_aru(
1165 p_business_group_id in number,
1166 p_legislation_code in varchar2,
1167 p_effective_date in date ,
1168 p_old_ATTRIBUTE1 in VARCHAR2,
1169 p_new_ATTRIBUTE1 in VARCHAR2 ,
1170 p_old_ATTRIBUTE10 in VARCHAR2,
1171 p_new_ATTRIBUTE10 in VARCHAR2 ,
1172 p_old_ATTRIBUTE11 in VARCHAR2,
1173 p_new_ATTRIBUTE11 in VARCHAR2 ,
1174 p_old_ATTRIBUTE12 in VARCHAR2,
1175 p_new_ATTRIBUTE12 in VARCHAR2 ,
1176 p_old_ATTRIBUTE13 in VARCHAR2,
1177 p_new_ATTRIBUTE13 in VARCHAR2 ,
1178 p_old_ATTRIBUTE14 in VARCHAR2,
1179 p_new_ATTRIBUTE14 in VARCHAR2 ,
1180 p_old_ATTRIBUTE15 in VARCHAR2,
1181 p_new_ATTRIBUTE15 in VARCHAR2 ,
1182 p_old_ATTRIBUTE16 in VARCHAR2,
1183 p_new_ATTRIBUTE16 in VARCHAR2 ,
1184 p_old_ATTRIBUTE17 in VARCHAR2,
1185 p_new_ATTRIBUTE17 in VARCHAR2 ,
1186 p_old_ATTRIBUTE18 in VARCHAR2,
1187 p_new_ATTRIBUTE18 in VARCHAR2 ,
1188 p_old_ATTRIBUTE19 in VARCHAR2,
1189 p_new_ATTRIBUTE19 in VARCHAR2 ,
1190 p_old_ATTRIBUTE2 in VARCHAR2,
1191 p_new_ATTRIBUTE2 in VARCHAR2 ,
1192 p_old_ATTRIBUTE20 in VARCHAR2,
1193 p_new_ATTRIBUTE20 in VARCHAR2 ,
1194 p_old_ATTRIBUTE3 in VARCHAR2,
1195 p_new_ATTRIBUTE3 in VARCHAR2 ,
1196 p_old_ATTRIBUTE4 in VARCHAR2,
1197 p_new_ATTRIBUTE4 in VARCHAR2 ,
1198 p_old_ATTRIBUTE5 in VARCHAR2,
1202 p_old_ATTRIBUTE7 in VARCHAR2,
1199 p_new_ATTRIBUTE5 in VARCHAR2 ,
1200 p_old_ATTRIBUTE6 in VARCHAR2,
1201 p_new_ATTRIBUTE6 in VARCHAR2 ,
1203 p_new_ATTRIBUTE7 in VARCHAR2 ,
1204 p_old_ATTRIBUTE8 in VARCHAR2,
1205 p_new_ATTRIBUTE8 in VARCHAR2 ,
1206 p_old_ATTRIBUTE9 in VARCHAR2,
1207 p_new_ATTRIBUTE9 in VARCHAR2 ,
1208 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
1209 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
1210 p_old_BUSINESS_GROUP_ID in NUMBER,
1211 p_new_BUSINESS_GROUP_ID in NUMBER ,
1212 p_old_CONTRACTUAL_JOB_TITLE in VARCHAR2,
1213 p_new_CONTRACTUAL_JOB_TITLE in VARCHAR2 ,
1214 p_old_CONTRACT_ID in NUMBER,
1215 p_new_CONTRACT_ID in NUMBER ,
1216 p_old_CTR_INFORMATION1 in VARCHAR2,
1217 p_new_CTR_INFORMATION1 in VARCHAR2 ,
1218 p_old_CTR_INFORMATION10 in VARCHAR2,
1219 p_new_CTR_INFORMATION10 in VARCHAR2 ,
1220 p_old_CTR_INFORMATION11 in VARCHAR2,
1221 p_new_CTR_INFORMATION11 in VARCHAR2 ,
1222 p_old_CTR_INFORMATION12 in VARCHAR2,
1223 p_new_CTR_INFORMATION12 in VARCHAR2 ,
1224 p_old_CTR_INFORMATION13 in VARCHAR2,
1225 p_new_CTR_INFORMATION13 in VARCHAR2 ,
1226 p_old_CTR_INFORMATION14 in VARCHAR2,
1227 p_new_CTR_INFORMATION14 in VARCHAR2 ,
1228 p_old_CTR_INFORMATION15 in VARCHAR2,
1229 p_new_CTR_INFORMATION15 in VARCHAR2 ,
1230 p_old_CTR_INFORMATION16 in VARCHAR2,
1231 p_new_CTR_INFORMATION16 in VARCHAR2 ,
1232 p_old_CTR_INFORMATION17 in VARCHAR2,
1233 p_new_CTR_INFORMATION17 in VARCHAR2 ,
1234 p_old_CTR_INFORMATION18 in VARCHAR2,
1235 p_new_CTR_INFORMATION18 in VARCHAR2 ,
1236 p_old_CTR_INFORMATION19 in VARCHAR2,
1237 p_new_CTR_INFORMATION19 in VARCHAR2 ,
1238 p_old_CTR_INFORMATION2 in VARCHAR2,
1239 p_new_CTR_INFORMATION2 in VARCHAR2 ,
1240 p_old_CTR_INFORMATION20 in VARCHAR2,
1241 p_new_CTR_INFORMATION20 in VARCHAR2 ,
1242 p_old_CTR_INFORMATION3 in VARCHAR2,
1243 p_new_CTR_INFORMATION3 in VARCHAR2 ,
1244 p_old_CTR_INFORMATION4 in VARCHAR2,
1245 p_new_CTR_INFORMATION4 in VARCHAR2 ,
1246 p_old_CTR_INFORMATION5 in VARCHAR2,
1247 p_new_CTR_INFORMATION5 in VARCHAR2 ,
1248 p_old_CTR_INFORMATION6 in VARCHAR2,
1249 p_new_CTR_INFORMATION6 in VARCHAR2 ,
1250 p_old_CTR_INFORMATION7 in VARCHAR2,
1251 p_new_CTR_INFORMATION7 in VARCHAR2 ,
1252 p_old_CTR_INFORMATION8 in VARCHAR2,
1253 p_new_CTR_INFORMATION8 in VARCHAR2 ,
1254 p_old_CTR_INFORMATION9 in VARCHAR2,
1255 p_new_CTR_INFORMATION9 in VARCHAR2 ,
1256 p_old_CTR_INFORMATION_CATEGORY in VARCHAR2,
1257 p_new_CTR_INFORMATION_CATEGORY in VARCHAR2 ,
1258 p_old_DESCRIPTION in VARCHAR2,
1259 p_new_DESCRIPTION in VARCHAR2 ,
1260 p_old_DOC_STATUS in VARCHAR2,
1261 p_new_DOC_STATUS in VARCHAR2 ,
1262 p_old_DOC_STATUS_CHANGE_DATE in DATE,
1263 p_new_DOC_STATUS_CHANGE_DATE in DATE ,
1264 p_old_DURATION in NUMBER,
1265 p_new_DURATION in NUMBER ,
1266 p_old_DURATION_UNITS in VARCHAR2,
1267 p_new_DURATION_UNITS in VARCHAR2 ,
1268 p_old_END_REASON in VARCHAR2,
1269 p_new_END_REASON in VARCHAR2 ,
1270 p_old_EXTENSION_PERIOD in NUMBER,
1271 p_new_EXTENSION_PERIOD in NUMBER ,
1272 p_old_EXTENSION_PERIOD_UNITS in VARCHAR2,
1273 p_new_EXTENSION_PERIOD_UNITS in VARCHAR2 ,
1274 p_old_EXTENSION_REASON in VARCHAR2,
1275 p_new_EXTENSION_REASON in VARCHAR2 ,
1276 p_old_NUMBER_OF_EXTENSIONS in NUMBER,
1277 p_new_NUMBER_OF_EXTENSIONS in NUMBER ,
1278 p_old_PARTIES in VARCHAR2,
1279 p_new_PARTIES in VARCHAR2 ,
1280 p_old_PERSON_ID in NUMBER,
1281 p_new_PERSON_ID in NUMBER ,
1282 p_old_REFERENCE in VARCHAR2,
1283 p_new_REFERENCE in VARCHAR2 ,
1284 p_old_START_REASON in VARCHAR2,
1285 p_new_START_REASON in VARCHAR2 ,
1286 p_old_STATUS in VARCHAR2,
1287 p_new_STATUS in VARCHAR2 ,
1288 p_old_STATUS_REASON in VARCHAR2,
1289 p_new_STATUS_REASON in VARCHAR2 ,
1290 p_old_TYPE in VARCHAR2,
1291 p_new_TYPE in VARCHAR2 ,
1292 p_old_EFFECTIVE_END_DATE in DATE,
1293 p_new_EFFECTIVE_END_DATE in DATE ,
1294 p_old_EFFECTIVE_START_DATE in DATE,
1295 p_new_EFFECTIVE_START_DATE in DATE
1296
1297 )
1298 is
1299 --
1300 cursor asgcur (p_person_id number) is
1301 select distinct assignment_id
1302 from per_assignments_f
1303 where person_id = p_person_id;
1304 --
1305 begin
1306 /* If the continuous calc is overriden then do nothing */
1307 if (pay_continuous_calc.g_override_cc = TRUE) then
1308 return;
1309 end if;
1310 --
1311 /* If the dates havent changed it must be a correction */
1312 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
1313 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
1314 --
1315 pay_continuous_calc.event_update(p_business_group_id,
1316 p_legislation_code,
1317 'PER_CONTRACTS_F',
1318 'ATTRIBUTE1',
1319 p_old_ATTRIBUTE1,
1323 --
1320 p_new_ATTRIBUTE1,
1321 p_effective_date
1322 );
1324 pay_continuous_calc.event_update(p_business_group_id,
1325 p_legislation_code,
1326 'PER_CONTRACTS_F',
1327 'ATTRIBUTE10',
1328 p_old_ATTRIBUTE10,
1329 p_new_ATTRIBUTE10,
1330 p_effective_date
1331 );
1332 --
1333 pay_continuous_calc.event_update(p_business_group_id,
1334 p_legislation_code,
1335 'PER_CONTRACTS_F',
1336 'ATTRIBUTE11',
1337 p_old_ATTRIBUTE11,
1338 p_new_ATTRIBUTE11,
1339 p_effective_date
1340 );
1341 --
1342 pay_continuous_calc.event_update(p_business_group_id,
1343 p_legislation_code,
1344 'PER_CONTRACTS_F',
1345 'ATTRIBUTE12',
1346 p_old_ATTRIBUTE12,
1347 p_new_ATTRIBUTE12,
1348 p_effective_date
1349 );
1350 --
1351 pay_continuous_calc.event_update(p_business_group_id,
1352 p_legislation_code,
1353 'PER_CONTRACTS_F',
1354 'ATTRIBUTE13',
1355 p_old_ATTRIBUTE13,
1356 p_new_ATTRIBUTE13,
1357 p_effective_date
1358 );
1359 --
1360 pay_continuous_calc.event_update(p_business_group_id,
1361 p_legislation_code,
1362 'PER_CONTRACTS_F',
1363 'ATTRIBUTE14',
1364 p_old_ATTRIBUTE14,
1365 p_new_ATTRIBUTE14,
1366 p_effective_date
1367 );
1368 --
1369 pay_continuous_calc.event_update(p_business_group_id,
1370 p_legislation_code,
1371 'PER_CONTRACTS_F',
1372 'ATTRIBUTE15',
1373 p_old_ATTRIBUTE15,
1374 p_new_ATTRIBUTE15,
1375 p_effective_date
1376 );
1377 --
1378 pay_continuous_calc.event_update(p_business_group_id,
1379 p_legislation_code,
1380 'PER_CONTRACTS_F',
1381 'ATTRIBUTE16',
1382 p_old_ATTRIBUTE16,
1383 p_new_ATTRIBUTE16,
1384 p_effective_date
1385 );
1386 --
1387 pay_continuous_calc.event_update(p_business_group_id,
1388 p_legislation_code,
1389 'PER_CONTRACTS_F',
1390 'ATTRIBUTE17',
1391 p_old_ATTRIBUTE17,
1392 p_new_ATTRIBUTE17,
1393 p_effective_date
1394 );
1395 --
1396 pay_continuous_calc.event_update(p_business_group_id,
1397 p_legislation_code,
1398 'PER_CONTRACTS_F',
1399 'ATTRIBUTE18',
1400 p_old_ATTRIBUTE18,
1401 p_new_ATTRIBUTE18,
1402 p_effective_date
1403 );
1404 --
1405 pay_continuous_calc.event_update(p_business_group_id,
1406 p_legislation_code,
1407 'PER_CONTRACTS_F',
1408 'ATTRIBUTE19',
1409 p_old_ATTRIBUTE19,
1410 p_new_ATTRIBUTE19,
1411 p_effective_date
1412 );
1413 --
1414 pay_continuous_calc.event_update(p_business_group_id,
1415 p_legislation_code,
1416 'PER_CONTRACTS_F',
1417 'ATTRIBUTE2',
1418 p_old_ATTRIBUTE2,
1419 p_new_ATTRIBUTE2,
1420 p_effective_date
1421 );
1422 --
1423 pay_continuous_calc.event_update(p_business_group_id,
1424 p_legislation_code,
1425 'PER_CONTRACTS_F',
1426 'ATTRIBUTE20',
1427 p_old_ATTRIBUTE20,
1431 --
1428 p_new_ATTRIBUTE20,
1429 p_effective_date
1430 );
1432 pay_continuous_calc.event_update(p_business_group_id,
1433 p_legislation_code,
1434 'PER_CONTRACTS_F',
1435 'ATTRIBUTE3',
1436 p_old_ATTRIBUTE3,
1437 p_new_ATTRIBUTE3,
1438 p_effective_date
1439 );
1440 --
1441 pay_continuous_calc.event_update(p_business_group_id,
1442 p_legislation_code,
1443 'PER_CONTRACTS_F',
1444 'ATTRIBUTE4',
1445 p_old_ATTRIBUTE4,
1446 p_new_ATTRIBUTE4,
1447 p_effective_date
1448 );
1449 --
1450 pay_continuous_calc.event_update(p_business_group_id,
1451 p_legislation_code,
1452 'PER_CONTRACTS_F',
1453 'ATTRIBUTE5',
1454 p_old_ATTRIBUTE5,
1455 p_new_ATTRIBUTE5,
1456 p_effective_date
1457 );
1458 --
1459 pay_continuous_calc.event_update(p_business_group_id,
1460 p_legislation_code,
1461 'PER_CONTRACTS_F',
1462 'ATTRIBUTE6',
1463 p_old_ATTRIBUTE6,
1464 p_new_ATTRIBUTE6,
1465 p_effective_date
1466 );
1467 --
1468 pay_continuous_calc.event_update(p_business_group_id,
1469 p_legislation_code,
1470 'PER_CONTRACTS_F',
1471 'ATTRIBUTE7',
1472 p_old_ATTRIBUTE7,
1473 p_new_ATTRIBUTE7,
1474 p_effective_date
1475 );
1476 --
1477 pay_continuous_calc.event_update(p_business_group_id,
1478 p_legislation_code,
1479 'PER_CONTRACTS_F',
1480 'ATTRIBUTE8',
1481 p_old_ATTRIBUTE8,
1482 p_new_ATTRIBUTE8,
1483 p_effective_date
1484 );
1485 --
1486 pay_continuous_calc.event_update(p_business_group_id,
1487 p_legislation_code,
1488 'PER_CONTRACTS_F',
1489 'ATTRIBUTE9',
1490 p_old_ATTRIBUTE9,
1491 p_new_ATTRIBUTE9,
1492 p_effective_date
1493 );
1494 --
1495 pay_continuous_calc.event_update(p_business_group_id,
1496 p_legislation_code,
1497 'PER_CONTRACTS_F',
1498 'ATTRIBUTE_CATEGORY',
1499 p_old_ATTRIBUTE_CATEGORY,
1500 p_new_ATTRIBUTE_CATEGORY,
1501 p_effective_date
1502 );
1503 --
1504 pay_continuous_calc.event_update(p_business_group_id,
1505 p_legislation_code,
1506 'PER_CONTRACTS_F',
1507 'BUSINESS_GROUP_ID',
1508 p_old_BUSINESS_GROUP_ID,
1509 p_new_BUSINESS_GROUP_ID,
1510 p_effective_date
1511 );
1512 --
1513 pay_continuous_calc.event_update(p_business_group_id,
1514 p_legislation_code,
1515 'PER_CONTRACTS_F',
1516 'CONTRACTUAL_JOB_TITLE',
1517 p_old_CONTRACTUAL_JOB_TITLE,
1518 p_new_CONTRACTUAL_JOB_TITLE,
1519 p_effective_date
1520 );
1521 --
1522 pay_continuous_calc.event_update(p_business_group_id,
1523 p_legislation_code,
1524 'PER_CONTRACTS_F',
1525 'CONTRACT_ID',
1526 p_old_CONTRACT_ID,
1527 p_new_CONTRACT_ID,
1528 p_effective_date
1529 );
1530 --
1531 pay_continuous_calc.event_update(p_business_group_id,
1532 p_legislation_code,
1533 'PER_CONTRACTS_F',
1534 'CTR_INFORMATION1',
1535 p_old_CTR_INFORMATION1,
1539 --
1536 p_new_CTR_INFORMATION1,
1537 p_effective_date
1538 );
1540 pay_continuous_calc.event_update(p_business_group_id,
1541 p_legislation_code,
1542 'PER_CONTRACTS_F',
1543 'CTR_INFORMATION10',
1544 p_old_CTR_INFORMATION10,
1545 p_new_CTR_INFORMATION10,
1546 p_effective_date
1547 );
1548 --
1549 pay_continuous_calc.event_update(p_business_group_id,
1550 p_legislation_code,
1551 'PER_CONTRACTS_F',
1552 'CTR_INFORMATION11',
1553 p_old_CTR_INFORMATION11,
1554 p_new_CTR_INFORMATION11,
1555 p_effective_date
1556 );
1557 --
1558 pay_continuous_calc.event_update(p_business_group_id,
1559 p_legislation_code,
1560 'PER_CONTRACTS_F',
1561 'CTR_INFORMATION12',
1562 p_old_CTR_INFORMATION12,
1563 p_new_CTR_INFORMATION12,
1564 p_effective_date
1565 );
1566 --
1567 pay_continuous_calc.event_update(p_business_group_id,
1568 p_legislation_code,
1569 'PER_CONTRACTS_F',
1570 'CTR_INFORMATION13',
1571 p_old_CTR_INFORMATION13,
1572 p_new_CTR_INFORMATION13,
1573 p_effective_date
1574 );
1575 --
1576 pay_continuous_calc.event_update(p_business_group_id,
1577 p_legislation_code,
1578 'PER_CONTRACTS_F',
1579 'CTR_INFORMATION14',
1580 p_old_CTR_INFORMATION14,
1581 p_new_CTR_INFORMATION14,
1582 p_effective_date
1583 );
1584 --
1585 pay_continuous_calc.event_update(p_business_group_id,
1586 p_legislation_code,
1587 'PER_CONTRACTS_F',
1588 'CTR_INFORMATION15',
1589 p_old_CTR_INFORMATION15,
1590 p_new_CTR_INFORMATION15,
1591 p_effective_date
1592 );
1593 --
1594 pay_continuous_calc.event_update(p_business_group_id,
1595 p_legislation_code,
1596 'PER_CONTRACTS_F',
1597 'CTR_INFORMATION16',
1598 p_old_CTR_INFORMATION16,
1599 p_new_CTR_INFORMATION16,
1600 p_effective_date
1601 );
1602 --
1603 pay_continuous_calc.event_update(p_business_group_id,
1604 p_legislation_code,
1605 'PER_CONTRACTS_F',
1606 'CTR_INFORMATION17',
1607 p_old_CTR_INFORMATION17,
1608 p_new_CTR_INFORMATION17,
1609 p_effective_date
1610 );
1611 --
1612 pay_continuous_calc.event_update(p_business_group_id,
1613 p_legislation_code,
1614 'PER_CONTRACTS_F',
1615 'CTR_INFORMATION18',
1616 p_old_CTR_INFORMATION18,
1617 p_new_CTR_INFORMATION18,
1618 p_effective_date
1619 );
1620 --
1621 pay_continuous_calc.event_update(p_business_group_id,
1622 p_legislation_code,
1623 'PER_CONTRACTS_F',
1624 'CTR_INFORMATION19',
1625 p_old_CTR_INFORMATION19,
1626 p_new_CTR_INFORMATION19,
1627 p_effective_date
1628 );
1629 --
1630 pay_continuous_calc.event_update(p_business_group_id,
1631 p_legislation_code,
1632 'PER_CONTRACTS_F',
1633 'CTR_INFORMATION2',
1634 p_old_CTR_INFORMATION2,
1635 p_new_CTR_INFORMATION2,
1636 p_effective_date
1637 );
1638 --
1639 pay_continuous_calc.event_update(p_business_group_id,
1640 p_legislation_code,
1641 'PER_CONTRACTS_F',
1645 p_effective_date
1642 'CTR_INFORMATION20',
1643 p_old_CTR_INFORMATION20,
1644 p_new_CTR_INFORMATION20,
1646 );
1647 --
1648 pay_continuous_calc.event_update(p_business_group_id,
1649 p_legislation_code,
1650 'PER_CONTRACTS_F',
1651 'CTR_INFORMATION3',
1652 p_old_CTR_INFORMATION3,
1653 p_new_CTR_INFORMATION3,
1654 p_effective_date
1655 );
1656 --
1657 pay_continuous_calc.event_update(p_business_group_id,
1658 p_legislation_code,
1659 'PER_CONTRACTS_F',
1660 'CTR_INFORMATION4',
1661 p_old_CTR_INFORMATION4,
1662 p_new_CTR_INFORMATION4,
1663 p_effective_date
1664 );
1665 --
1666 pay_continuous_calc.event_update(p_business_group_id,
1667 p_legislation_code,
1668 'PER_CONTRACTS_F',
1669 'CTR_INFORMATION5',
1670 p_old_CTR_INFORMATION5,
1671 p_new_CTR_INFORMATION5,
1672 p_effective_date
1673 );
1674 --
1675 pay_continuous_calc.event_update(p_business_group_id,
1676 p_legislation_code,
1677 'PER_CONTRACTS_F',
1678 'CTR_INFORMATION6',
1679 p_old_CTR_INFORMATION6,
1680 p_new_CTR_INFORMATION6,
1681 p_effective_date
1682 );
1683 --
1684 pay_continuous_calc.event_update(p_business_group_id,
1685 p_legislation_code,
1686 'PER_CONTRACTS_F',
1687 'CTR_INFORMATION7',
1688 p_old_CTR_INFORMATION7,
1689 p_new_CTR_INFORMATION7,
1690 p_effective_date
1691 );
1692 --
1693 pay_continuous_calc.event_update(p_business_group_id,
1694 p_legislation_code,
1695 'PER_CONTRACTS_F',
1696 'CTR_INFORMATION8',
1697 p_old_CTR_INFORMATION8,
1698 p_new_CTR_INFORMATION8,
1699 p_effective_date
1700 );
1701 --
1702 pay_continuous_calc.event_update(p_business_group_id,
1703 p_legislation_code,
1704 'PER_CONTRACTS_F',
1705 'CTR_INFORMATION9',
1706 p_old_CTR_INFORMATION9,
1707 p_new_CTR_INFORMATION9,
1708 p_effective_date
1709 );
1710 --
1711 pay_continuous_calc.event_update(p_business_group_id,
1712 p_legislation_code,
1713 'PER_CONTRACTS_F',
1714 'CTR_INFORMATION_CATEGORY',
1715 p_old_CTR_INFORMATION_CATEGORY,
1716 p_new_CTR_INFORMATION_CATEGORY,
1717 p_effective_date
1718 );
1719 --
1720 pay_continuous_calc.event_update(p_business_group_id,
1721 p_legislation_code,
1722 'PER_CONTRACTS_F',
1723 'DESCRIPTION',
1724 p_old_DESCRIPTION,
1725 p_new_DESCRIPTION,
1726 p_effective_date
1727 );
1728 --
1729 pay_continuous_calc.event_update(p_business_group_id,
1730 p_legislation_code,
1731 'PER_CONTRACTS_F',
1732 'DOC_STATUS',
1733 p_old_DOC_STATUS,
1734 p_new_DOC_STATUS,
1735 p_effective_date
1736 );
1737 --
1738 pay_continuous_calc.event_update(p_business_group_id,
1739 p_legislation_code,
1740 'PER_CONTRACTS_F',
1741 'DOC_STATUS_CHANGE_DATE',
1742 p_old_DOC_STATUS_CHANGE_DATE,
1743 p_new_DOC_STATUS_CHANGE_DATE,
1744 p_effective_date
1745 );
1746 --
1747 pay_continuous_calc.event_update(p_business_group_id,
1751 p_old_DURATION,
1748 p_legislation_code,
1749 'PER_CONTRACTS_F',
1750 'DURATION',
1752 p_new_DURATION,
1753 p_effective_date
1754 );
1755 --
1756 pay_continuous_calc.event_update(p_business_group_id,
1757 p_legislation_code,
1758 'PER_CONTRACTS_F',
1759 'DURATION_UNITS',
1760 p_old_DURATION_UNITS,
1761 p_new_DURATION_UNITS,
1762 p_effective_date
1763 );
1764 --
1765 pay_continuous_calc.event_update(p_business_group_id,
1766 p_legislation_code,
1767 'PER_CONTRACTS_F',
1768 'END_REASON',
1769 p_old_END_REASON,
1770 p_new_END_REASON,
1771 p_effective_date
1772 );
1773 --
1774 pay_continuous_calc.event_update(p_business_group_id,
1775 p_legislation_code,
1776 'PER_CONTRACTS_F',
1777 'EXTENSION_PERIOD',
1778 p_old_EXTENSION_PERIOD,
1779 p_new_EXTENSION_PERIOD,
1780 p_effective_date
1781 );
1782 --
1783 pay_continuous_calc.event_update(p_business_group_id,
1784 p_legislation_code,
1785 'PER_CONTRACTS_F',
1786 'EXTENSION_PERIOD_UNITS',
1787 p_old_EXTENSION_PERIOD_UNITS,
1788 p_new_EXTENSION_PERIOD_UNITS,
1789 p_effective_date
1790 );
1791 --
1792 pay_continuous_calc.event_update(p_business_group_id,
1793 p_legislation_code,
1794 'PER_CONTRACTS_F',
1795 'EXTENSION_REASON',
1796 p_old_EXTENSION_REASON,
1797 p_new_EXTENSION_REASON,
1798 p_effective_date
1799 );
1800 --
1801 pay_continuous_calc.event_update(p_business_group_id,
1802 p_legislation_code,
1803 'PER_CONTRACTS_F',
1804 'NUMBER_OF_EXTENSIONS',
1805 p_old_NUMBER_OF_EXTENSIONS,
1806 p_new_NUMBER_OF_EXTENSIONS,
1807 p_effective_date
1808 );
1809 --
1810 pay_continuous_calc.event_update(p_business_group_id,
1811 p_legislation_code,
1812 'PER_CONTRACTS_F',
1813 'PARTIES',
1814 p_old_PARTIES,
1815 p_new_PARTIES,
1816 p_effective_date
1817 );
1818 --
1819 pay_continuous_calc.event_update(p_business_group_id,
1820 p_legislation_code,
1821 'PER_CONTRACTS_F',
1822 'PERSON_ID',
1823 p_old_PERSON_ID,
1824 p_new_PERSON_ID,
1825 p_effective_date
1826 );
1827 --
1828 pay_continuous_calc.event_update(p_business_group_id,
1829 p_legislation_code,
1830 'PER_CONTRACTS_F',
1831 'REFERENCE',
1832 p_old_REFERENCE,
1833 p_new_REFERENCE,
1834 p_effective_date
1835 );
1836 --
1837 pay_continuous_calc.event_update(p_business_group_id,
1838 p_legislation_code,
1839 'PER_CONTRACTS_F',
1840 'START_REASON',
1841 p_old_START_REASON,
1842 p_new_START_REASON,
1843 p_effective_date
1844 );
1845 --
1846 pay_continuous_calc.event_update(p_business_group_id,
1847 p_legislation_code,
1848 'PER_CONTRACTS_F',
1849 'STATUS',
1850 p_old_STATUS,
1851 p_new_STATUS,
1852 p_effective_date
1853 );
1854 --
1858 'STATUS_REASON',
1855 pay_continuous_calc.event_update(p_business_group_id,
1856 p_legislation_code,
1857 'PER_CONTRACTS_F',
1859 p_old_STATUS_REASON,
1860 p_new_STATUS_REASON,
1861 p_effective_date
1862 );
1863 --
1864 pay_continuous_calc.event_update(p_business_group_id,
1865 p_legislation_code,
1866 'PER_CONTRACTS_F',
1867 'TYPE',
1868 p_old_TYPE,
1869 p_new_TYPE,
1870 p_effective_date
1871 );
1872 --
1873 pay_continuous_calc.event_update(p_business_group_id,
1874 p_legislation_code,
1875 'PER_CONTRACTS_F',
1876 'TYPE',
1877 p_old_TYPE,
1878 p_new_TYPE,
1879 p_effective_date
1880 );
1881 else
1882 /* OK it must be a date track change */
1883 --
1884 pay_continuous_calc.event_update(p_business_group_id,
1885 p_legislation_code,
1886 'PER_CONTRACTS_F',
1887 'EFFECTIVE_END_DATE',
1888 p_old_EFFECTIVE_END_DATE,
1889 p_new_EFFECTIVE_END_DATE,
1890 p_new_effective_end_date,
1891 least(p_old_effective_end_date,
1892 p_new_effective_end_date)
1893 );
1894 --
1895 pay_continuous_calc.event_update(p_business_group_id,
1896 p_legislation_code,
1897 'PER_CONTRACTS_F',
1898 'EFFECTIVE_START_DATE',
1899 p_old_EFFECTIVE_START_DATE,
1900 p_new_EFFECTIVE_START_DATE,
1901 p_new_effective_start_date,
1902 least(p_old_effective_start_date,
1903 p_new_effective_start_date)
1904 );
1905
1906 end if;
1907 --
1908 /* Now call the API for the affected assignments */
1909 declare
1910 l_process_event_id number;
1911 l_object_version_number number;
1912 cnt number;
1913 begin
1914 if (pay_continuous_calc.g_event_list.sz <> 0) then
1915 for asgrec in asgcur (p_old_PERSON_ID) loop
1916 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
1917 pay_ppe_api.create_process_event(
1918 p_assignment_id => asgrec.assignment_id,
1919 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
1920 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
1921 p_status => 'U',
1922 p_description => pay_continuous_calc.g_event_list.description(cnt),
1923 p_process_event_id => l_process_event_id,
1924 p_object_version_number => l_object_version_number,
1925 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
1926 p_business_group_id => p_business_group_id,
1927 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
1928 p_surrogate_key => p_new_contract_id
1929 );
1930 end loop;
1931 end loop;
1932 end if;
1933 pay_continuous_calc.g_event_list.sz := 0;
1934 end;
1935 --
1936 end PER_CONTRACTS_F_aru;
1937
1938
1939 --
1940 /* Used generator to build this procedure, but removed some of that table values.
1941 */
1942 /* PER_ALL_ASSIGNMENTS */
1943 /* name : PER_ALL_ASSIGNMENTS_F_aru
1944 purpose : This is procedure that records any updates
1945 on assignments.
1946 */
1947 procedure PER_ALL_ASSIGNMENTS_F_aru(
1948 p_business_group_id in number,
1949 p_legislation_code in varchar2,
1950 p_effective_date in date,
1951 p_old_APPLICATION_ID in NUMBER,
1952 p_new_APPLICATION_ID in NUMBER,
1953 p_old_ASSIGNMENT_ID in NUMBER,
1954 p_new_ASSIGNMENT_ID in NUMBER,
1955 p_old_ASSIGNMENT_NUMBER in VARCHAR2,
1956 p_new_ASSIGNMENT_NUMBER in VARCHAR2,
1957 p_old_ASSIGNMENT_SEQUENCE in NUMBER,
1958 p_new_ASSIGNMENT_SEQUENCE in NUMBER,
1959 p_old_ASSIGNMENT_STATUS_TYPE_I in NUMBER,
1960 p_new_ASSIGNMENT_STATUS_TYPE_I in NUMBER,
1961 p_old_ASSIGNMENT_TYPE in VARCHAR2,
1962 p_new_ASSIGNMENT_TYPE in VARCHAR2,
1963 p_old_ASS_ATTRIBUTE1 in VARCHAR2,
1964 p_new_ASS_ATTRIBUTE1 in VARCHAR2,
1965 p_old_ASS_ATTRIBUTE10 in VARCHAR2,
1966 p_new_ASS_ATTRIBUTE10 in VARCHAR2,
1967 p_old_ASS_ATTRIBUTE11 in VARCHAR2,
1968 p_new_ASS_ATTRIBUTE11 in VARCHAR2,
1969 p_old_ASS_ATTRIBUTE12 in VARCHAR2,
1970 p_new_ASS_ATTRIBUTE12 in VARCHAR2,
1971 p_old_ASS_ATTRIBUTE13 in VARCHAR2,
1972 p_new_ASS_ATTRIBUTE13 in VARCHAR2,
1976 p_new_ASS_ATTRIBUTE15 in VARCHAR2,
1973 p_old_ASS_ATTRIBUTE14 in VARCHAR2,
1974 p_new_ASS_ATTRIBUTE14 in VARCHAR2,
1975 p_old_ASS_ATTRIBUTE15 in VARCHAR2,
1977 p_old_ASS_ATTRIBUTE16 in VARCHAR2,
1978 p_new_ASS_ATTRIBUTE16 in VARCHAR2,
1979 p_old_ASS_ATTRIBUTE17 in VARCHAR2,
1980 p_new_ASS_ATTRIBUTE17 in VARCHAR2,
1981 p_old_ASS_ATTRIBUTE18 in VARCHAR2,
1982 p_new_ASS_ATTRIBUTE18 in VARCHAR2,
1983 p_old_ASS_ATTRIBUTE19 in VARCHAR2,
1984 p_new_ASS_ATTRIBUTE19 in VARCHAR2,
1985 p_old_ASS_ATTRIBUTE2 in VARCHAR2,
1986 p_new_ASS_ATTRIBUTE2 in VARCHAR2,
1987 p_old_ASS_ATTRIBUTE20 in VARCHAR2,
1988 p_new_ASS_ATTRIBUTE20 in VARCHAR2,
1989 p_old_ASS_ATTRIBUTE21 in VARCHAR2,
1990 p_new_ASS_ATTRIBUTE21 in VARCHAR2,
1991 p_old_ASS_ATTRIBUTE22 in VARCHAR2,
1992 p_new_ASS_ATTRIBUTE22 in VARCHAR2,
1993 p_old_ASS_ATTRIBUTE23 in VARCHAR2,
1994 p_new_ASS_ATTRIBUTE23 in VARCHAR2,
1995 p_old_ASS_ATTRIBUTE24 in VARCHAR2,
1996 p_new_ASS_ATTRIBUTE24 in VARCHAR2,
1997 p_old_ASS_ATTRIBUTE25 in VARCHAR2,
1998 p_new_ASS_ATTRIBUTE25 in VARCHAR2,
1999 p_old_ASS_ATTRIBUTE26 in VARCHAR2,
2000 p_new_ASS_ATTRIBUTE26 in VARCHAR2,
2001 p_old_ASS_ATTRIBUTE27 in VARCHAR2,
2002 p_new_ASS_ATTRIBUTE27 in VARCHAR2,
2003 p_old_ASS_ATTRIBUTE28 in VARCHAR2,
2004 p_new_ASS_ATTRIBUTE28 in VARCHAR2,
2005 p_old_ASS_ATTRIBUTE29 in VARCHAR2,
2006 p_new_ASS_ATTRIBUTE29 in VARCHAR2,
2007 p_old_ASS_ATTRIBUTE3 in VARCHAR2,
2008 p_new_ASS_ATTRIBUTE3 in VARCHAR2,
2009 p_old_ASS_ATTRIBUTE30 in VARCHAR2,
2010 p_new_ASS_ATTRIBUTE30 in VARCHAR2,
2011 p_old_ASS_ATTRIBUTE4 in VARCHAR2,
2012 p_new_ASS_ATTRIBUTE4 in VARCHAR2,
2013 p_old_ASS_ATTRIBUTE5 in VARCHAR2,
2014 p_new_ASS_ATTRIBUTE5 in VARCHAR2,
2015 p_old_ASS_ATTRIBUTE6 in VARCHAR2,
2016 p_new_ASS_ATTRIBUTE6 in VARCHAR2,
2017 p_old_ASS_ATTRIBUTE7 in VARCHAR2,
2018 p_new_ASS_ATTRIBUTE7 in VARCHAR2,
2019 p_old_ASS_ATTRIBUTE8 in VARCHAR2,
2020 p_new_ASS_ATTRIBUTE8 in VARCHAR2,
2021 p_old_ASS_ATTRIBUTE9 in VARCHAR2,
2022 p_new_ASS_ATTRIBUTE9 in VARCHAR2,
2023 p_old_ASS_ATTRIBUTE_CATEGORY in VARCHAR2,
2024 p_new_ASS_ATTRIBUTE_CATEGORY in VARCHAR2,
2025 p_old_BARGAINING_UNIT_CODE in VARCHAR2,
2026 p_new_BARGAINING_UNIT_CODE in VARCHAR2,
2027 p_old_BUSINESS_GROUP_ID in NUMBER,
2028 p_new_BUSINESS_GROUP_ID in NUMBER,
2029 p_old_CAGR_GRADE_DEF_ID in NUMBER,
2030 p_new_CAGR_GRADE_DEF_ID in NUMBER,
2031 p_old_CAGR_ID_FLEX_NUM in NUMBER,
2032 p_new_CAGR_ID_FLEX_NUM in NUMBER,
2033 p_old_CHANGE_REASON in VARCHAR2,
2034 p_new_CHANGE_REASON in VARCHAR2,
2035 p_old_COLLECTIVE_AGREEMENT_ID in NUMBER,
2036 p_new_COLLECTIVE_AGREEMENT_ID in NUMBER,
2037 p_old_COMMENT_ID in NUMBER,
2038 p_new_COMMENT_ID in NUMBER,
2039 p_old_CONTRACT_ID in NUMBER,
2040 p_new_CONTRACT_ID in NUMBER,
2041 p_old_DATE_PROBATION_END in DATE,
2042 p_new_DATE_PROBATION_END in DATE,
2043 p_old_DEFAULT_CODE_COMB_ID in NUMBER,
2044 p_new_DEFAULT_CODE_COMB_ID in NUMBER,
2045 p_old_EFFECTIVE_END_DATE in DATE,
2046 p_new_EFFECTIVE_END_DATE in DATE,
2047 p_old_EFFECTIVE_START_DATE in DATE,
2048 p_new_EFFECTIVE_START_DATE in DATE,
2049 p_old_EMPLOYMENT_CATEGORY in VARCHAR2,
2050 p_new_EMPLOYMENT_CATEGORY in VARCHAR2,
2051 p_old_ESTABLISHMENT_ID in NUMBER,
2052 p_new_ESTABLISHMENT_ID in NUMBER,
2053 p_old_FREQUENCY in VARCHAR2,
2054 p_new_FREQUENCY in VARCHAR2,
2055 p_old_GRADE_ID in NUMBER,
2056 p_new_GRADE_ID in NUMBER,
2057 p_old_HOURLY_SALARIED_CODE in VARCHAR2,
2058 p_new_HOURLY_SALARIED_CODE in VARCHAR2,
2059 p_old_INTERNAL_ADDRESS_LINE in VARCHAR2,
2060 p_new_INTERNAL_ADDRESS_LINE in VARCHAR2,
2061 p_old_JOB_ID in NUMBER,
2062 p_new_JOB_ID in NUMBER,
2063 p_old_LABOUR_UNION_MEMBER_FLAG in VARCHAR2,
2064 p_new_LABOUR_UNION_MEMBER_FLAG in VARCHAR2,
2065 p_old_LOCATION_ID in NUMBER,
2066 p_new_LOCATION_ID in NUMBER,
2067 p_old_MANAGER_FLAG in VARCHAR2,
2068 p_new_MANAGER_FLAG in VARCHAR2,
2069 p_old_NORMAL_HOURS in NUMBER,
2070 p_new_NORMAL_HOURS in NUMBER,
2071 p_old_OBJECT_VERSION_NUMBER in NUMBER,
2072 p_new_OBJECT_VERSION_NUMBER in NUMBER,
2073 p_old_ORGANIZATION_ID in NUMBER,
2074 p_new_ORGANIZATION_ID in NUMBER,
2075 p_old_PAYROLL_ID in NUMBER,
2076 p_new_PAYROLL_ID in NUMBER,
2077 p_old_PAY_BASIS_ID in NUMBER,
2078 p_new_PAY_BASIS_ID in NUMBER,
2079 p_old_PEOPLE_GROUP_ID in NUMBER,
2080 p_new_PEOPLE_GROUP_ID in NUMBER,
2081 p_old_PERF_REVIEW_PERIOD in NUMBER,
2082 p_new_PERF_REVIEW_PERIOD in NUMBER,
2083 p_old_PERF_REVIEW_PERIOD_FREQU in VARCHAR2,
2084 p_new_PERF_REVIEW_PERIOD_FREQU in VARCHAR2,
2085 p_old_PERIOD_OF_SERVICE_ID in NUMBER,
2086 p_new_PERIOD_OF_SERVICE_ID in NUMBER,
2087 p_old_PERSON_ID in NUMBER,
2088 p_new_PERSON_ID in NUMBER,
2089 p_old_PERSON_REFERRED_BY_ID in NUMBER,
2090 p_new_PERSON_REFERRED_BY_ID in NUMBER,
2091 p_old_POSITION_ID in NUMBER,
2092 p_new_POSITION_ID in NUMBER,
2093 p_old_PRIMARY_FLAG in VARCHAR2,
2094 p_new_PRIMARY_FLAG in VARCHAR2,
2095 p_old_PROBATION_PERIOD in NUMBER,
2096 p_new_PROBATION_PERIOD in NUMBER,
2097 p_old_PROBATION_UNIT in VARCHAR2,
2098 p_new_PROBATION_UNIT in VARCHAR2,
2099 p_old_PROGRAM_APPLICATION_ID in NUMBER,
2100 p_new_PROGRAM_APPLICATION_ID in NUMBER,
2101 p_old_PROGRAM_ID in NUMBER,
2102 p_new_PROGRAM_ID in NUMBER,
2103 p_old_PROGRAM_UPDATE_DATE in DATE,
2104 p_new_PROGRAM_UPDATE_DATE in DATE,
2105 p_old_RECRUITER_ID in NUMBER,
2106 p_new_RECRUITER_ID in NUMBER,
2107 p_old_RECRUITMENT_ACTIVITY_ID in NUMBER,
2108 p_new_RECRUITMENT_ACTIVITY_ID in NUMBER,
2109 p_old_REQUEST_ID in NUMBER,
2110 p_new_REQUEST_ID in NUMBER,
2114 p_new_SAL_REVIEW_PERIOD_FREQUE in VARCHAR2,
2111 p_old_SAL_REVIEW_PERIOD in NUMBER,
2112 p_new_SAL_REVIEW_PERIOD in NUMBER,
2113 p_old_SAL_REVIEW_PERIOD_FREQUE in VARCHAR2,
2115 p_old_SET_OF_BOOKS_ID in NUMBER,
2116 p_new_SET_OF_BOOKS_ID in NUMBER,
2117 p_old_SOFT_CODING_KEYFLEX_ID in NUMBER,
2118 p_new_SOFT_CODING_KEYFLEX_ID in NUMBER,
2119 p_old_SOURCE_ORGANIZATION_ID in NUMBER,
2120 p_new_SOURCE_ORGANIZATION_ID in NUMBER,
2121 p_old_SOURCE_TYPE in VARCHAR2,
2122 p_new_SOURCE_TYPE in VARCHAR2,
2123 p_old_SPECIAL_CEILING_STEP_ID in NUMBER,
2124 p_new_SPECIAL_CEILING_STEP_ID in NUMBER,
2125 p_old_SUPERVISOR_ID in NUMBER,
2126 p_new_SUPERVISOR_ID in NUMBER,
2127 p_old_TIME_NORMAL_FINISH in VARCHAR2,
2128 p_new_TIME_NORMAL_FINISH in VARCHAR2,
2129 p_old_TIME_NORMAL_START in VARCHAR2,
2130 p_new_TIME_NORMAL_START in VARCHAR2,
2131 p_old_TITLE in VARCHAR2,
2132 p_new_TITLE in VARCHAR2,
2133 p_old_VACANCY_ID in NUMBER,
2134 p_new_VACANCY_ID in NUMBER,
2135 p_old_PROJECTED_ASSIGNMENT_END in DATE default null,
2136 p_new_PROJECTED_ASSIGNMENT_END in DATE default null
2137 )
2138 is
2139 --
2140 begin
2141 hr_utility.set_location('pay_continuous_calc.PER_ALL_ASSIGNMENTS_F_aru', 10);
2142 /* If the continuous calc is overriden then do nothing */
2143 if (g_override_cc = TRUE) then
2144 return;
2145 end if;
2146 --
2147 /* If the dates haven't changed it must be a correction */
2148 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
2149 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
2150 --
2151 pay_continuous_calc.event_update(p_business_group_id,
2152 p_legislation_code,
2153 'PER_ALL_ASSIGNMENTS_F',
2154 'APPLICATION_ID',
2155 p_old_APPLICATION_ID,
2156 p_new_APPLICATION_ID,
2157 p_effective_date
2158 );
2159 pay_continuous_calc.event_update(p_business_group_id,
2160 p_legislation_code,
2161 'PER_ALL_ASSIGNMENTS_F',
2162 'ASSIGNMENT_ID',
2163 p_old_ASSIGNMENT_ID,
2164 p_new_ASSIGNMENT_ID,
2165 p_effective_date
2166 );
2167 pay_continuous_calc.event_update(p_business_group_id,
2168 p_legislation_code,
2169 'PER_ALL_ASSIGNMENTS_F',
2170 'ASSIGNMENT_NUMBER',
2171 p_old_ASSIGNMENT_NUMBER,
2172 p_new_ASSIGNMENT_NUMBER,
2173 p_effective_date
2174 );
2175 pay_continuous_calc.event_update(p_business_group_id,
2176 p_legislation_code,
2177 'PER_ALL_ASSIGNMENTS_F',
2178 'ASSIGNMENT_SEQUENCE',
2179 p_old_ASSIGNMENT_SEQUENCE,
2180 p_new_ASSIGNMENT_SEQUENCE,
2181 p_effective_date
2182 );
2183 pay_continuous_calc.event_update(p_business_group_id,
2184 p_legislation_code,
2185 'PER_ALL_ASSIGNMENTS_F',
2186 'ASSIGNMENT_STATUS_TYPE_ID',
2187 p_old_ASSIGNMENT_STATUS_TYPE_I,
2188 p_new_ASSIGNMENT_STATUS_TYPE_I,
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_TYPE',
2195 p_old_ASSIGNMENT_TYPE,
2196 p_new_ASSIGNMENT_TYPE,
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 'ASS_ATTRIBUTE1',
2203 p_old_ASS_ATTRIBUTE1,
2204 p_new_ASS_ATTRIBUTE1,
2205 p_effective_date
2206 );
2207 pay_continuous_calc.event_update(p_business_group_id,
2208 p_legislation_code,
2209 'PER_ALL_ASSIGNMENTS_F',
2210 'ASS_ATTRIBUTE10',
2211 p_old_ASS_ATTRIBUTE10,
2212 p_new_ASS_ATTRIBUTE10,
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 'ASS_ATTRIBUTE11',
2219 p_old_ASS_ATTRIBUTE11,
2223 pay_continuous_calc.event_update(p_business_group_id,
2220 p_new_ASS_ATTRIBUTE11,
2221 p_effective_date
2222 );
2224 p_legislation_code,
2225 'PER_ALL_ASSIGNMENTS_F',
2226 'ASS_ATTRIBUTE12',
2227 p_old_ASS_ATTRIBUTE12,
2228 p_new_ASS_ATTRIBUTE12,
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_ATTRIBUTE13',
2235 p_old_ASS_ATTRIBUTE13,
2236 p_new_ASS_ATTRIBUTE13,
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_ATTRIBUTE14',
2243 p_old_ASS_ATTRIBUTE14,
2244 p_new_ASS_ATTRIBUTE14,
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_ATTRIBUTE15',
2251 p_old_ASS_ATTRIBUTE15,
2252 p_new_ASS_ATTRIBUTE15,
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_ATTRIBUTE16',
2259 p_old_ASS_ATTRIBUTE16,
2260 p_new_ASS_ATTRIBUTE16,
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_ATTRIBUTE17',
2267 p_old_ASS_ATTRIBUTE17,
2268 p_new_ASS_ATTRIBUTE17,
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_ATTRIBUTE18',
2275 p_old_ASS_ATTRIBUTE18,
2276 p_new_ASS_ATTRIBUTE18,
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_ATTRIBUTE19',
2283 p_old_ASS_ATTRIBUTE19,
2284 p_new_ASS_ATTRIBUTE19,
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_ATTRIBUTE2',
2291 p_old_ASS_ATTRIBUTE2,
2292 p_new_ASS_ATTRIBUTE2,
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_ATTRIBUTE20',
2299 p_old_ASS_ATTRIBUTE20,
2300 p_new_ASS_ATTRIBUTE20,
2301 p_effective_date
2302 );
2303 pay_continuous_calc.event_update(p_business_group_id,
2304 p_legislation_code,
2305 'PER_ALL_ASSIGNMENTS_F',
2306 'ASS_ATTRIBUTE21',
2307 p_old_ASS_ATTRIBUTE21,
2308 p_new_ASS_ATTRIBUTE21,
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_ATTRIBUTE22',
2315 p_old_ASS_ATTRIBUTE22,
2319 pay_continuous_calc.event_update(p_business_group_id,
2316 p_new_ASS_ATTRIBUTE22,
2317 p_effective_date
2318 );
2320 p_legislation_code,
2321 'PER_ALL_ASSIGNMENTS_F',
2322 'ASS_ATTRIBUTE23',
2323 p_old_ASS_ATTRIBUTE23,
2324 p_new_ASS_ATTRIBUTE23,
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_ATTRIBUTE24',
2331 p_old_ASS_ATTRIBUTE24,
2332 p_new_ASS_ATTRIBUTE24,
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_ATTRIBUTE25',
2339 p_old_ASS_ATTRIBUTE25,
2340 p_new_ASS_ATTRIBUTE25,
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_ATTRIBUTE26',
2347 p_old_ASS_ATTRIBUTE26,
2348 p_new_ASS_ATTRIBUTE26,
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_ATTRIBUTE27',
2355 p_old_ASS_ATTRIBUTE27,
2356 p_new_ASS_ATTRIBUTE27,
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_ATTRIBUTE28',
2363 p_old_ASS_ATTRIBUTE28,
2364 p_new_ASS_ATTRIBUTE28,
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_ATTRIBUTE29',
2371 p_old_ASS_ATTRIBUTE29,
2372 p_new_ASS_ATTRIBUTE29,
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_ATTRIBUTE3',
2379 p_old_ASS_ATTRIBUTE3,
2380 p_new_ASS_ATTRIBUTE3,
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_ATTRIBUTE30',
2387 p_old_ASS_ATTRIBUTE30,
2388 p_new_ASS_ATTRIBUTE30,
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_ATTRIBUTE4',
2395 p_old_ASS_ATTRIBUTE4,
2396 p_new_ASS_ATTRIBUTE4,
2397 p_effective_date
2398 );
2399 pay_continuous_calc.event_update(p_business_group_id,
2400 p_legislation_code,
2401 'PER_ALL_ASSIGNMENTS_F',
2402 'ASS_ATTRIBUTE5',
2403 p_old_ASS_ATTRIBUTE5,
2404 p_new_ASS_ATTRIBUTE5,
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_ATTRIBUTE6',
2411 p_old_ASS_ATTRIBUTE6,
2415 pay_continuous_calc.event_update(p_business_group_id,
2412 p_new_ASS_ATTRIBUTE6,
2413 p_effective_date
2414 );
2416 p_legislation_code,
2417 'PER_ALL_ASSIGNMENTS_F',
2418 'ASS_ATTRIBUTE7',
2419 p_old_ASS_ATTRIBUTE7,
2420 p_new_ASS_ATTRIBUTE7,
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_ATTRIBUTE8',
2427 p_old_ASS_ATTRIBUTE8,
2428 p_new_ASS_ATTRIBUTE8,
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_ATTRIBUTE9',
2435 p_old_ASS_ATTRIBUTE9,
2436 p_new_ASS_ATTRIBUTE9,
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_ATTRIBUTE_CATEGORY',
2443 p_old_ASS_ATTRIBUTE_CATEGORY,
2444 p_new_ASS_ATTRIBUTE_CATEGORY,
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 'BARGAINING_UNIT_CODE',
2451 p_old_BARGAINING_UNIT_CODE,
2452 p_new_BARGAINING_UNIT_CODE,
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 'BUSINESS_GROUP_ID',
2459 p_old_BUSINESS_GROUP_ID,
2460 p_new_BUSINESS_GROUP_ID,
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 'CAGR_GRADE_DEF_ID',
2467 p_old_CAGR_GRADE_DEF_ID,
2468 p_new_CAGR_GRADE_DEF_ID,
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 'CAGR_ID_FLEX_NUM',
2475 p_old_CAGR_ID_FLEX_NUM,
2476 p_new_CAGR_ID_FLEX_NUM,
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 'CHANGE_REASON',
2483 p_old_CHANGE_REASON,
2484 p_new_CHANGE_REASON,
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 'COLLECTIVE_AGREEMENT_ID',
2491 p_old_COLLECTIVE_AGREEMENT_ID,
2492 p_new_COLLECTIVE_AGREEMENT_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 'COMMENT_ID',
2499 p_old_COMMENT_ID,
2500 p_new_COMMENT_ID,
2501 p_effective_date
2502 );
2503 pay_continuous_calc.event_update(p_business_group_id,
2504 p_legislation_code,
2505 'PER_ALL_ASSIGNMENTS_F',
2506 'CONTRACT_ID',
2510 );
2507 p_old_CONTRACT_ID,
2508 p_new_CONTRACT_ID,
2509 p_effective_date
2511 pay_continuous_calc.event_update(p_business_group_id,
2512 p_legislation_code,
2513 'PER_ALL_ASSIGNMENTS_F',
2514 'DATE_PROBATION_END',
2515 p_old_DATE_PROBATION_END,
2516 p_new_DATE_PROBATION_END,
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 'DEFAULT_CODE_COMB_ID',
2523 p_old_DEFAULT_CODE_COMB_ID,
2524 p_new_DEFAULT_CODE_COMB_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 'EMPLOYMENT_CATEGORY',
2531 p_old_EMPLOYMENT_CATEGORY,
2532 p_new_EMPLOYMENT_CATEGORY,
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 'ESTABLISHMENT_ID',
2539 p_old_ESTABLISHMENT_ID,
2540 p_new_ESTABLISHMENT_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 'FREQUENCY',
2547 p_old_FREQUENCY,
2548 p_new_FREQUENCY,
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 'GRADE_ID',
2555 p_old_GRADE_ID,
2556 p_new_GRADE_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 'HOURLY_SALARIED_CODE',
2563 p_old_HOURLY_SALARIED_CODE,
2564 p_new_HOURLY_SALARIED_CODE,
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 'INTERNAL_ADDRESS_LINE',
2571 p_old_INTERNAL_ADDRESS_LINE,
2572 p_new_INTERNAL_ADDRESS_LINE,
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 'JOB_ID',
2579 p_old_JOB_ID,
2580 p_new_JOB_ID,
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 'LABOUR_UNION_MEMBER_FLAG',
2587 p_old_LABOUR_UNION_MEMBER_FLAG,
2588 p_new_LABOUR_UNION_MEMBER_FLAG,
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 'LOCATION_ID',
2595 p_old_LOCATION_ID,
2596 p_new_LOCATION_ID,
2597 p_effective_date
2598 );
2599 pay_continuous_calc.event_update(p_business_group_id,
2600 p_legislation_code,
2601 'PER_ALL_ASSIGNMENTS_F',
2602 'MANAGER_FLAG',
2606 );
2603 p_old_MANAGER_FLAG,
2604 p_new_MANAGER_FLAG,
2605 p_effective_date
2607 pay_continuous_calc.event_update(p_business_group_id,
2608 p_legislation_code,
2609 'PER_ALL_ASSIGNMENTS_F',
2610 'NORMAL_HOURS',
2611 p_old_NORMAL_HOURS,
2612 p_new_NORMAL_HOURS,
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 'ORGANIZATION_ID',
2619 p_old_ORGANIZATION_ID,
2620 p_new_ORGANIZATION_ID,
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 'PAYROLL_ID',
2627 p_old_PAYROLL_ID,
2628 p_new_PAYROLL_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 'PAY_BASIS_ID',
2635 p_old_PAY_BASIS_ID,
2636 p_new_PAY_BASIS_ID,
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 'PEOPLE_GROUP_ID',
2643 p_old_PEOPLE_GROUP_ID,
2644 p_new_PEOPLE_GROUP_ID,
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 'PERF_REVIEW_PERIOD',
2651 p_old_PERF_REVIEW_PERIOD,
2652 p_new_PERF_REVIEW_PERIOD,
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 'PERF_REVIEW_PERIOD_FREQUENCY',
2659 p_old_PERF_REVIEW_PERIOD_FREQU,
2660 p_new_PERF_REVIEW_PERIOD_FREQU,
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 'PERIOD_OF_SERVICE_ID',
2667 p_old_PERIOD_OF_SERVICE_ID,
2668 p_new_PERIOD_OF_SERVICE_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 'PERSON_ID',
2675 p_old_PERSON_ID,
2676 p_new_PERSON_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 'PERSON_REFERRED_BY_ID',
2683 p_old_PERSON_REFERRED_BY_ID,
2684 p_new_PERSON_REFERRED_BY_ID,
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 'POSITION_ID',
2691 p_old_POSITION_ID,
2692 p_new_POSITION_ID,
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 'PRIMARY_FLAG',
2702 );
2699 p_old_PRIMARY_FLAG,
2700 p_new_PRIMARY_FLAG,
2701 p_effective_date
2703 pay_continuous_calc.event_update(p_business_group_id,
2704 p_legislation_code,
2705 'PER_ALL_ASSIGNMENTS_F',
2706 'PROBATION_PERIOD',
2707 p_old_PROBATION_PERIOD,
2708 p_new_PROBATION_PERIOD,
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 'PROBATION_UNIT',
2715 p_old_PROBATION_UNIT,
2716 p_new_PROBATION_UNIT,
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 'PROGRAM_APPLICATION_ID',
2723 p_old_PROGRAM_APPLICATION_ID,
2724 p_new_PROGRAM_APPLICATION_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 'PROGRAM_ID',
2731 p_old_PROGRAM_ID,
2732 p_new_PROGRAM_ID,
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 'PROGRAM_UPDATE_DATE',
2739 p_old_PROGRAM_UPDATE_DATE,
2740 p_new_PROGRAM_UPDATE_DATE,
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 'RECRUITER_ID',
2747 p_old_RECRUITER_ID,
2748 p_new_RECRUITER_ID,
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 'RECRUITMENT_ACTIVITY_ID',
2755 p_old_RECRUITMENT_ACTIVITY_ID,
2756 p_new_RECRUITMENT_ACTIVITY_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 'REQUEST_ID',
2763 p_old_REQUEST_ID,
2764 p_new_REQUEST_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 'SAL_REVIEW_PERIOD',
2771 p_old_SAL_REVIEW_PERIOD,
2772 p_new_SAL_REVIEW_PERIOD,
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 'SAL_REVIEW_PERIOD_FREQUENCY',
2779 p_old_SAL_REVIEW_PERIOD_FREQUE,
2780 p_new_SAL_REVIEW_PERIOD_FREQUE,
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 'SET_OF_BOOKS_ID',
2787 p_old_SET_OF_BOOKS_ID,
2788 p_new_SET_OF_BOOKS_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 'SOFT_CODING_KEYFLEX_ID',
2798 );
2795 p_old_SOFT_CODING_KEYFLEX_ID,
2796 p_new_SOFT_CODING_KEYFLEX_ID,
2797 p_effective_date
2799 pay_continuous_calc.event_update(p_business_group_id,
2800 p_legislation_code,
2801 'PER_ALL_ASSIGNMENTS_F',
2802 'SOURCE_ORGANIZATION_ID',
2803 p_old_SOURCE_ORGANIZATION_ID,
2804 p_new_SOURCE_ORGANIZATION_ID,
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 'SOURCE_TYPE',
2811 p_old_SOURCE_TYPE,
2812 p_new_SOURCE_TYPE,
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 'SPECIAL_CEILING_STEP_ID',
2819 p_old_SPECIAL_CEILING_STEP_ID,
2820 p_new_SPECIAL_CEILING_STEP_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 'SUPERVISOR_ID',
2827 p_old_SUPERVISOR_ID,
2828 p_new_SUPERVISOR_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 'TIME_NORMAL_FINISH',
2835 p_old_TIME_NORMAL_FINISH,
2836 p_new_TIME_NORMAL_FINISH,
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 'TIME_NORMAL_START',
2843 p_old_TIME_NORMAL_START,
2844 p_new_TIME_NORMAL_START,
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 'TITLE',
2851 p_old_TITLE,
2852 p_new_TITLE,
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 'VACANCY_ID',
2859 p_old_VACANCY_ID,
2860 p_new_VACANCY_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 'PROJECTED_ASSIGNMENT_END',
2867 p_old_PROJECTED_ASSIGNMENT_END,
2868 p_new_PROJECTED_ASSIGNMENT_END,
2869 p_effective_date
2870 );
2871 else
2872 /* OK it must be a date track change */
2873 pay_continuous_calc.event_update(p_business_group_id,
2874 p_legislation_code,
2875 'PER_ALL_ASSIGNMENTS_F',
2876 'EFFECTIVE_END_DATE',
2877 p_old_EFFECTIVE_END_DATE,
2878 p_new_EFFECTIVE_END_DATE,
2879 p_new_effective_end_date,
2880 least(p_old_effective_end_date,
2881 p_new_effective_end_date)
2882 );
2883 pay_continuous_calc.event_update(p_business_group_id,
2884 p_legislation_code,
2885 'PER_ALL_ASSIGNMENTS_F',
2886 'EFFECTIVE_START_DATE',
2887 p_old_EFFECTIVE_START_DATE,
2888 p_new_EFFECTIVE_START_DATE,
2889 p_new_effective_start_date,
2890 least(p_old_effective_start_date,
2894 --
2891 p_new_effective_start_date)
2892 );
2893 end if;
2895 /* Now call the API for the affected assignments */
2896 declare
2897 l_process_event_id number;
2898 l_object_version_number number;
2899 cnt number;
2900 begin
2901 if (pay_continuous_calc.g_event_list.sz <> 0) then
2902 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
2903 pay_ppe_api.create_process_event(
2904 p_assignment_id => p_old_ASSIGNMENT_ID,
2905 p_effective_date => g_event_list.effective_date(cnt),
2906 p_change_type => g_event_list.change_type(cnt),
2907 p_status => 'U',
2908 p_description => g_event_list.description(cnt),
2909 p_process_event_id => l_process_event_id,
2910 p_object_version_number => l_object_version_number,
2911 p_event_update_id => g_event_list.event_update_id(cnt),
2912 p_surrogate_key => p_old_ASSIGNMENT_ID,
2913 p_calculation_date => g_event_list.calc_date(cnt),
2914 p_business_group_id => p_business_group_id
2915 );
2916 end loop;
2917 end if;
2918 pay_continuous_calc.g_event_list.sz := 0;
2919 end;
2920 hr_utility.set_location('pay_continuous_calc.PER_ALL_ASSIGNMENTS_F_aru', 50);
2921 --
2922 end PER_ALL_ASSIGNMENTS_F_aru;
2923 --
2924 /* PER_ALL_ASSIGNMENTS_F_ari */
2925 /* name : PER_ALL_ASSIGNMENTS_F_ari
2926 purpose : This is procedure that records any insert
2927 on assignments.
2928 */
2929 procedure PER_ALL_ASSIGNMENTS_F_ari(
2930 p_business_group_id in number,
2931 p_legislation_code in varchar2,
2932 p_assignment_id in number,
2933 p_effective_start_date in date
2934 )
2935 is
2936 l_process_event_id number;
2937 l_object_version_number number;
2938 l_proc varchar2(240) := g_package||'.per_all_assignments_f_ari';
2939 begin
2940 hr_utility.set_location(l_proc, 10);
2941 /* If the continuous calc is overriden then do nothing */
2942 if (g_override_cc = TRUE) then
2943 return;
2944 end if;
2945 --
2946 pay_continuous_calc.event_update(p_business_group_id,
2947 p_legislation_code,
2948 'PER_ALL_ASSIGNMENTS_F',
2949 NULL,
2950 NULL,
2951 NULL,
2952 p_effective_start_date,
2953 p_effective_start_date,
2954 'I'
2955 );
2956 /* Now call the API for the affected assignments */
2957 declare
2958 cnt number;
2959 l_process_event_id number;
2960 l_object_version_number number;
2961 begin
2962 if (pay_continuous_calc.g_event_list.sz <> 0) then
2963 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
2964 pay_ppe_api.create_process_event(
2965 p_assignment_id => p_assignment_id,
2966 p_effective_date => g_event_list.effective_date(cnt),
2967 p_change_type => g_event_list.change_type(cnt),
2968 p_status => 'U',
2969 p_description => g_event_list.description(cnt),
2970 p_process_event_id => l_process_event_id,
2971 p_object_version_number => l_object_version_number,
2972 p_event_update_id => g_event_list.event_update_id(cnt),
2973 p_surrogate_key => p_assignment_id,
2974 p_calculation_date => g_event_list.calc_date(cnt),
2975 p_business_group_id => p_business_group_id
2976 );
2977 end loop;
2978 end if;
2979 pay_continuous_calc.g_event_list.sz := 0;
2980 end;
2981 hr_utility.set_location(l_proc, 900);
2982 end per_all_assignments_f_ari;
2983 --
2984 /* name : per_all_assignments_f_ard
2985 purpose : This is procedure that records any deletes
2986 on assignments.
2987 */
2988 procedure per_all_assignments_f_ard(
2989 p_business_group_id in number,
2990 p_legislation_code in varchar2,
2991 p_assignment_id in number,
2992 p_effective_start_date in date
2993 )
2994 is
2995 l_process_event_id number;
2996 l_object_version_number number;
2997 l_proc varchar2(240) := g_package||'.per_all_assignments_f_ard';
2998 begin
2999 hr_utility.set_location(l_proc, 10);
3000 /* If the continuous calc is overriden then do nothing */
3001 if (g_override_cc = TRUE) then
3002 return;
3003 end if;
3004 --
3008 NULL,
3005 pay_continuous_calc.event_update(p_business_group_id,
3006 p_legislation_code,
3007 'PER_ALL_ASSIGNMENTS_F',
3009 NULL,
3010 NULL,
3011 p_effective_start_date,
3012 p_effective_start_date,
3013 'D'
3014 );
3015 /* Now call the API for the affected assignments */
3016 declare
3017 cnt number;
3018 l_process_event_id number;
3019 l_object_version_number number;
3020 begin
3021 if (pay_continuous_calc.g_event_list.sz <> 0) then
3022 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3023 pay_ppe_api.create_process_event(
3024 p_assignment_id => p_assignment_id,
3025 p_effective_date => g_event_list.effective_date(cnt),
3026 p_change_type => g_event_list.change_type(cnt),
3027 p_status => 'U',
3028 p_description => g_event_list.description(cnt),
3029 p_process_event_id => l_process_event_id,
3030 p_object_version_number => l_object_version_number,
3031 p_event_update_id => g_event_list.event_update_id(cnt),
3032 p_surrogate_key => p_assignment_id,
3033 p_calculation_date => g_event_list.calc_date(cnt),
3034 p_business_group_id => p_business_group_id
3035 );
3036 end loop;
3037 end if;
3038 pay_continuous_calc.g_event_list.sz := 0;
3039 end;
3040 hr_utility.set_location(l_proc, 900);
3041 END per_all_assignments_f_ard;
3042
3043
3044 /* PAY_PERSONAL_PAYMENT_METHODS_F */
3045 /* name : PER_ALL_payment_methods_ari
3046 purpose : This is procedure that records any insert
3047 on personal_payment_methods.
3048 */
3049 procedure personal_payment_methods_ari(
3050 p_business_group_id in number,
3051 p_legislation_code in varchar2,
3052 p_assignment_id in number,
3053 p_effective_start_date in date,
3054 p_payment_method_id in number
3055 )
3056 is
3057 l_process_event_id number;
3058 l_object_version_number number;
3059 l_proc varchar2(240) := g_package||'.personal_payment_methods_ari';
3060 begin
3061 hr_utility.set_location(l_proc, 10);
3062 /* If the continuous calc is overriden then do nothing */
3063 if (g_override_cc = TRUE) then
3064 return;
3065 end if;
3066 --
3067 pay_continuous_calc.event_update(p_business_group_id,
3068 p_legislation_code,
3069 'PAY_PERSONAL_PAYMENT_METHODS_F',
3070 NULL,
3071 NULL,
3072 NULL,
3073 p_effective_start_date,
3074 p_effective_start_date,
3075 'I'
3076 );
3077 /* Now call the API for the affected assignments */
3078 declare
3079 cnt number;
3080 l_process_event_id number;
3081 l_object_version_number number;
3082 begin
3083 if (pay_continuous_calc.g_event_list.sz <> 0) then
3084 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3085 pay_ppe_api.create_process_event(
3086 p_assignment_id => p_assignment_id,
3087 p_effective_date => g_event_list.effective_date(cnt),
3088 p_change_type => g_event_list.change_type(cnt),
3089 p_status => 'U',
3090 p_description => g_event_list.description(cnt),
3091 p_process_event_id => l_process_event_id,
3092 p_object_version_number => l_object_version_number,
3093 p_event_update_id => g_event_list.event_update_id(cnt),
3094 p_surrogate_key => p_payment_method_id,
3095 p_calculation_date => g_event_list.calc_date(cnt),
3096 p_business_group_id => p_business_group_id
3097 );
3098 end loop;
3099 end if;
3100 pay_continuous_calc.g_event_list.sz := 0;
3101 end;
3102 hr_utility.set_location(l_proc, 900);
3103 end personal_payment_methods_ari;
3104 --
3105 /* name : personal_payment_methods_ard
3106 purpose : This is procedure that records any deletes
3107 on personal_payment_methods.
3108 */
3112 p_assignment_id in number,
3109 procedure personal_payment_methods_ard(
3110 p_business_group_id in number,
3111 p_legislation_code in varchar2,
3113 p_effective_start_date in date,
3114 p_payment_method_id in number
3115 )
3116 is
3117 l_process_event_id number;
3118 l_object_version_number number;
3119 l_proc varchar2(240) := g_package||'.personal_payment_methods_ard';
3120 begin
3121 hr_utility.set_location(l_proc, 10);
3122 /* If the continuous calc is overriden then do nothing */
3123 if (g_override_cc = TRUE) then
3124 return;
3125 end if;
3126 --
3127 pay_continuous_calc.event_update(p_business_group_id,
3128 p_legislation_code,
3129 'PAY_PERSONAL_PAYMENT_METHODS_F',
3130 NULL,
3131 NULL,
3132 NULL,
3133 p_effective_start_date,
3134 p_effective_start_date,
3135 'D'
3136 );
3137 /* Now call the API for the affected assignments */
3138 declare
3139 cnt number;
3140 l_process_event_id number;
3141 l_object_version_number number;
3142 begin
3143 if (pay_continuous_calc.g_event_list.sz <> 0) then
3144 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3145 pay_ppe_api.create_process_event(
3146 p_assignment_id => p_assignment_id,
3147 p_effective_date => g_event_list.effective_date(cnt),
3148 p_change_type => g_event_list.change_type(cnt),
3149 p_status => 'U',
3150 p_description => g_event_list.description(cnt),
3151 p_process_event_id => l_process_event_id,
3152 p_object_version_number => l_object_version_number,
3153 p_event_update_id => g_event_list.event_update_id(cnt),
3154 p_surrogate_key => p_payment_method_id,
3155 p_calculation_date => g_event_list.calc_date(cnt),
3156 p_business_group_id => p_business_group_id
3157 );
3158 end loop;
3159 end if;
3160 pay_continuous_calc.g_event_list.sz := 0;
3161 end;
3162 hr_utility.set_location(l_proc, 900);
3163 END personal_payment_methods_ard;
3164 --
3165 /* name : PERSONAL_PAYMENT_METHODS_F_aru
3166 purpose : This is procedure that records any updates
3167 on personal_payment_methods.
3168 */
3169 procedure PERSONAL_PAYMENT_METHODS_F_aru(
3170 p_business_group_id in number,
3171 p_legislation_code in varchar2,
3172 p_effective_date in date,
3173 p_old_AMOUNT in NUMBER,
3174 p_new_AMOUNT in NUMBER,
3175 p_old_ASSIGNMENT_ID in NUMBER,
3176 p_new_ASSIGNMENT_ID in NUMBER,
3177 p_old_ATTRIBUTE1 in VARCHAR2,
3178 p_new_ATTRIBUTE1 in VARCHAR2,
3179 p_old_ATTRIBUTE10 in VARCHAR2,
3180 p_new_ATTRIBUTE10 in VARCHAR2,
3181 p_old_ATTRIBUTE11 in VARCHAR2,
3182 p_new_ATTRIBUTE11 in VARCHAR2,
3183 p_old_ATTRIBUTE12 in VARCHAR2,
3184 p_new_ATTRIBUTE12 in VARCHAR2,
3185 p_old_ATTRIBUTE13 in VARCHAR2,
3186 p_new_ATTRIBUTE13 in VARCHAR2,
3187 p_old_ATTRIBUTE14 in VARCHAR2,
3188 p_new_ATTRIBUTE14 in VARCHAR2,
3189 p_old_ATTRIBUTE15 in VARCHAR2,
3190 p_new_ATTRIBUTE15 in VARCHAR2,
3191 p_old_ATTRIBUTE16 in VARCHAR2,
3192 p_new_ATTRIBUTE16 in VARCHAR2,
3193 p_old_ATTRIBUTE17 in VARCHAR2,
3194 p_new_ATTRIBUTE17 in VARCHAR2,
3195 p_old_ATTRIBUTE18 in VARCHAR2,
3196 p_new_ATTRIBUTE18 in VARCHAR2,
3197 p_old_ATTRIBUTE19 in VARCHAR2,
3198 p_new_ATTRIBUTE19 in VARCHAR2,
3199 p_old_ATTRIBUTE2 in VARCHAR2,
3200 p_new_ATTRIBUTE2 in VARCHAR2,
3201 p_old_ATTRIBUTE20 in VARCHAR2,
3202 p_new_ATTRIBUTE20 in VARCHAR2,
3203 p_old_ATTRIBUTE3 in VARCHAR2,
3204 p_new_ATTRIBUTE3 in VARCHAR2,
3205 p_old_ATTRIBUTE4 in VARCHAR2,
3206 p_new_ATTRIBUTE4 in VARCHAR2,
3207 p_old_ATTRIBUTE5 in VARCHAR2,
3208 p_new_ATTRIBUTE5 in VARCHAR2,
3209 p_old_ATTRIBUTE6 in VARCHAR2,
3210 p_new_ATTRIBUTE6 in VARCHAR2,
3211 p_old_ATTRIBUTE7 in VARCHAR2,
3212 p_new_ATTRIBUTE7 in VARCHAR2,
3213 p_old_ATTRIBUTE8 in VARCHAR2,
3214 p_new_ATTRIBUTE8 in VARCHAR2,
3215 p_old_ATTRIBUTE9 in VARCHAR2,
3216 p_new_ATTRIBUTE9 in VARCHAR2,
3217 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
3218 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
3219 p_old_COMMENT_ID in NUMBER,
3220 p_new_COMMENT_ID in NUMBER,
3221 p_old_EFFECTIVE_END_DATE in DATE,
3222 p_new_EFFECTIVE_END_DATE in DATE,
3223 p_old_EFFECTIVE_START_DATE in DATE,
3224 p_new_EFFECTIVE_START_DATE in DATE,
3225 p_old_EXTERNAL_ACCOUNT_ID in NUMBER,
3226 p_new_EXTERNAL_ACCOUNT_ID in NUMBER,
3227 p_old_ORG_PAYMENT_METHOD_ID in NUMBER,
3228 p_new_ORG_PAYMENT_METHOD_ID in NUMBER,
3229 p_old_PAYEE_ID in NUMBER,
3230 p_new_PAYEE_ID in NUMBER,
3234 p_new_PERCENTAGE in NUMBER,
3231 p_old_PAYEE_TYPE in VARCHAR2,
3232 p_new_PAYEE_TYPE in VARCHAR2,
3233 p_old_PERCENTAGE in NUMBER,
3235 p_old_PERSONAL_PAYMENT_METHOD_ in NUMBER,
3236 p_new_PERSONAL_PAYMENT_METHOD_ in NUMBER,
3237 p_old_PRIORITY in NUMBER,
3238 p_new_PRIORITY in NUMBER
3239 )
3240 is
3241 --
3242 begin
3243 --
3244 hr_utility.set_location('pay_continuous_calc.PERSONAL_PAYMENT_METHODS_F_aru', 10);
3245 /* If the continuous calc is overriden then do nothing */
3246 if (g_override_cc = TRUE) then
3247 return;
3248 end if;
3249 --
3250 /* If the dates haven't changed it must be a correction */
3251 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
3252 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
3253 --
3254 pay_continuous_calc.event_update(p_business_group_id,
3255 p_legislation_code,
3256 'PAY_PERSONAL_PAYMENT_METHODS_F',
3257 'AMOUNT',
3258 p_old_AMOUNT,
3259 p_new_AMOUNT,
3260 p_effective_date
3261 );
3262 pay_continuous_calc.event_update(p_business_group_id,
3263 p_legislation_code,
3264 'PAY_PERSONAL_PAYMENT_METHODS_F',
3265 'ASSIGNMENT_ID',
3266 p_old_ASSIGNMENT_ID,
3267 p_new_ASSIGNMENT_ID,
3268 p_effective_date
3269 );
3270 pay_continuous_calc.event_update(p_business_group_id,
3271 p_legislation_code,
3272 'PAY_PERSONAL_PAYMENT_METHODS_F',
3273 'ATTRIBUTE1',
3274 p_old_ATTRIBUTE1,
3275 p_new_ATTRIBUTE1,
3276 p_effective_date
3277 );
3278 pay_continuous_calc.event_update(p_business_group_id,
3279 p_legislation_code,
3280 'PAY_PERSONAL_PAYMENT_METHODS_F',
3281 'ATTRIBUTE10',
3282 p_old_ATTRIBUTE10,
3283 p_new_ATTRIBUTE10,
3284 p_effective_date
3285 );
3286 pay_continuous_calc.event_update(p_business_group_id,
3287 p_legislation_code,
3288 'PAY_PERSONAL_PAYMENT_METHODS_F',
3289 'ATTRIBUTE11',
3290 p_old_ATTRIBUTE11,
3291 p_new_ATTRIBUTE11,
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 'ATTRIBUTE12',
3298 p_old_ATTRIBUTE12,
3299 p_new_ATTRIBUTE12,
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 'ATTRIBUTE13',
3306 p_old_ATTRIBUTE13,
3307 p_new_ATTRIBUTE13,
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 'ATTRIBUTE14',
3314 p_old_ATTRIBUTE14,
3315 p_new_ATTRIBUTE14,
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 'ATTRIBUTE15',
3322 p_old_ATTRIBUTE15,
3323 p_new_ATTRIBUTE15,
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 'ATTRIBUTE16',
3330 p_old_ATTRIBUTE16,
3331 p_new_ATTRIBUTE16,
3332 p_effective_date
3333 );
3334 pay_continuous_calc.event_update(p_business_group_id,
3338 p_old_ATTRIBUTE17,
3335 p_legislation_code,
3336 'PAY_PERSONAL_PAYMENT_METHODS_F',
3337 'ATTRIBUTE17',
3339 p_new_ATTRIBUTE17,
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 'ATTRIBUTE18',
3346 p_old_ATTRIBUTE18,
3347 p_new_ATTRIBUTE18,
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 'ATTRIBUTE19',
3354 p_old_ATTRIBUTE19,
3355 p_new_ATTRIBUTE19,
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 'ATTRIBUTE2',
3362 p_old_ATTRIBUTE2,
3363 p_new_ATTRIBUTE2,
3364 p_effective_date
3365 );
3366 pay_continuous_calc.event_update(p_business_group_id,
3367 p_legislation_code,
3368 'PAY_PERSONAL_PAYMENT_METHODS_F',
3369 'ATTRIBUTE20',
3370 p_old_ATTRIBUTE20,
3371 p_new_ATTRIBUTE20,
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 'ATTRIBUTE3',
3378 p_old_ATTRIBUTE3,
3379 p_new_ATTRIBUTE3,
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 'ATTRIBUTE4',
3386 p_old_ATTRIBUTE4,
3387 p_new_ATTRIBUTE4,
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 'ATTRIBUTE5',
3394 p_old_ATTRIBUTE5,
3395 p_new_ATTRIBUTE5,
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 'ATTRIBUTE6',
3402 p_old_ATTRIBUTE6,
3403 p_new_ATTRIBUTE6,
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 'ATTRIBUTE7',
3410 p_old_ATTRIBUTE7,
3411 p_new_ATTRIBUTE7,
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 'ATTRIBUTE8',
3418 p_old_ATTRIBUTE8,
3419 p_new_ATTRIBUTE8,
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 'ATTRIBUTE9',
3426 p_old_ATTRIBUTE9,
3427 p_new_ATTRIBUTE9,
3428 p_effective_date
3429 );
3430 pay_continuous_calc.event_update(p_business_group_id,
3431 p_legislation_code,
3435 p_new_ATTRIBUTE_CATEGORY,
3432 'PAY_PERSONAL_PAYMENT_METHODS_F',
3433 'ATTRIBUTE_CATEGORY',
3434 p_old_ATTRIBUTE_CATEGORY,
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 'COMMENT_ID',
3442 p_old_COMMENT_ID,
3443 p_new_COMMENT_ID,
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 'EXTERNAL_ACCOUNT_ID',
3450 p_old_EXTERNAL_ACCOUNT_ID,
3451 p_new_EXTERNAL_ACCOUNT_ID,
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 'ORG_PAYMENT_METHOD_ID',
3458 p_old_ORG_PAYMENT_METHOD_ID,
3459 p_new_ORG_PAYMENT_METHOD_ID,
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 'PAYEE_ID',
3466 p_old_PAYEE_ID,
3467 p_new_PAYEE_ID,
3468 p_effective_date
3469 );
3470 pay_continuous_calc.event_update(p_business_group_id,
3471 p_legislation_code,
3472 'PAY_PERSONAL_PAYMENT_METHODS_F',
3473 'PAYEE_TYPE',
3474 p_old_PAYEE_TYPE,
3475 p_new_PAYEE_TYPE,
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 'PERCENTAGE',
3482 p_old_PERCENTAGE,
3483 p_new_PERCENTAGE,
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 'PERSONAL_PAYMENT_METHOD_ID',
3490 p_old_PERSONAL_PAYMENT_METHOD_,
3491 p_new_PERSONAL_PAYMENT_METHOD_,
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 'PRIORITY',
3498 p_old_PRIORITY,
3499 p_new_PRIORITY,
3500 p_effective_date
3501 );
3502 else
3503 /* OK it must be a date track change */
3504 pay_continuous_calc.event_update(p_business_group_id,
3505 p_legislation_code,
3506 'PAY_PERSONAL_PAYMENT_METHODS_F',
3507 'EFFECTIVE_END_DATE',
3508 p_old_EFFECTIVE_END_DATE,
3509 p_new_EFFECTIVE_END_DATE,
3510 p_new_effective_end_date,
3511 least(p_old_effective_end_date,
3512 p_new_effective_end_date)
3513 );
3514 pay_continuous_calc.event_update(p_business_group_id,
3515 p_legislation_code,
3516 'PAY_PERSONAL_PAYMENT_METHODS_F',
3517 'EFFECTIVE_START_DATE',
3518 p_old_EFFECTIVE_START_DATE,
3519 p_new_EFFECTIVE_START_DATE,
3520 p_new_effective_start_date,
3521 least(p_old_effective_start_date,
3522 p_new_effective_start_date)
3523 );
3524 end if;
3525 --
3526 /* Now call the API for the affected assignments */
3527 declare
3528 l_process_event_id number;
3532 if (pay_continuous_calc.g_event_list.sz <> 0) then
3529 l_object_version_number number;
3530 cnt number;
3531 begin
3533 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3534 pay_ppe_api.create_process_event(
3535 p_assignment_id => p_old_ASSIGNMENT_ID,
3536 p_effective_date => g_event_list.effective_date(cnt),
3537 p_change_type => g_event_list.change_type(cnt),
3538 p_status => 'U',
3539 p_description => g_event_list.description(cnt),
3540 p_process_event_id => l_process_event_id,
3541 p_object_version_number => l_object_version_number,
3542 p_event_update_id => g_event_list.event_update_id(cnt),
3543 p_surrogate_key => p_old_PERSONAL_PAYMENT_METHOD_,
3544 p_calculation_date => g_event_list.calc_date(cnt),
3545 p_business_group_id => p_business_group_id
3546 );
3547 end loop;
3548 end if;
3549 pay_continuous_calc.g_event_list.sz := 0;
3550 end;
3551 hr_utility.set_location('pay_continuous_calc.PERSONAL_PAYMENT_METHODS_F_aru', 50);
3552 --
3553 end PERSONAL_PAYMENT_METHODS_F_aru;
3554 --
3555 /* PAY_LINK_INPUT_VALUES */
3556 /* name : PAY_LINK_INPUT_VALUES_F_aru
3557 purpose : This is procedure that records any updates
3558 on link_input_values.
3559 */
3560 procedure PAY_LINK_INPUT_VALUES_F_aru(
3561 p_business_group_id in number,
3562 p_legislation_code in varchar2,
3563 p_effective_date in date,
3564 p_old_COSTED_FLAG in VARCHAR2,
3565 p_new_COSTED_FLAG in VARCHAR2 ,
3566 p_old_DEFAULT_VALUE in VARCHAR2,
3567 p_new_DEFAULT_VALUE in VARCHAR2 ,
3568 p_old_ELEMENT_LINK_ID in NUMBER,
3569 p_new_ELEMENT_LINK_ID in NUMBER ,
3570 p_old_INPUT_VALUE_ID in NUMBER,
3571 p_new_INPUT_VALUE_ID in NUMBER ,
3572 p_old_LINK_INPUT_VALUE_ID in NUMBER,
3573 p_new_LINK_INPUT_VALUE_ID in NUMBER ,
3574 p_old_MAX_VALUE in VARCHAR2,
3575 p_new_MAX_VALUE in VARCHAR2 ,
3576 p_old_MIN_VALUE in VARCHAR2,
3577 p_new_MIN_VALUE in VARCHAR2 ,
3578 p_old_WARNING_OR_ERROR in VARCHAR2,
3579 p_new_WARNING_OR_ERROR in VARCHAR2 ,
3580 p_old_EFFECTIVE_END_DATE in DATE,
3581 p_new_EFFECTIVE_END_DATE in DATE ,
3582 p_old_EFFECTIVE_START_DATE in DATE,
3583 p_new_EFFECTIVE_START_DATE in DATE
3584 )
3585 is
3586 --
3587 begin
3588 /* If the continuous calc is overriden then do nothing */
3589 if (g_override_cc = TRUE) then
3590 return;
3591 end if;
3592 --
3593 /* If the dates havent changed it must be a correction */
3594 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
3595 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
3596 --
3597 pay_continuous_calc.event_update(p_business_group_id,
3598 p_legislation_code,
3599 'PAY_LINK_INPUT_VALUES_F',
3600 'COSTED_FLAG',
3601 p_old_COSTED_FLAG,
3602 p_new_COSTED_FLAG,
3603 p_effective_date
3604 );
3605 --
3606 pay_continuous_calc.event_update(p_business_group_id,
3607 p_legislation_code,
3608 'PAY_LINK_INPUT_VALUES_F',
3609 'DEFAULT_VALUE',
3610 p_old_DEFAULT_VALUE,
3611 p_new_DEFAULT_VALUE,
3612 p_effective_date
3613 );
3614 --
3615 pay_continuous_calc.event_update(p_business_group_id,
3616 p_legislation_code,
3617 'PAY_LINK_INPUT_VALUES_F',
3618 'ELEMENT_LINK_ID',
3619 p_old_ELEMENT_LINK_ID,
3620 p_new_ELEMENT_LINK_ID,
3621 p_effective_date
3622 );
3623 --
3624 pay_continuous_calc.event_update(p_business_group_id,
3625 p_legislation_code,
3626 'PAY_LINK_INPUT_VALUES_F',
3627 'INPUT_VALUE_ID',
3628 p_old_INPUT_VALUE_ID,
3629 p_new_INPUT_VALUE_ID,
3630 p_effective_date
3631 );
3632 --
3633 pay_continuous_calc.event_update(p_business_group_id,
3634 p_legislation_code,
3635 'PAY_LINK_INPUT_VALUES_F',
3636 'LINK_INPUT_VALUE_ID',
3637 p_old_LINK_INPUT_VALUE_ID,
3638 p_new_LINK_INPUT_VALUE_ID,
3639 p_effective_date
3640 );
3641 --
3645 'MAX_VALUE',
3642 pay_continuous_calc.event_update(p_business_group_id,
3643 p_legislation_code,
3644 'PAY_LINK_INPUT_VALUES_F',
3646 p_old_MAX_VALUE,
3647 p_new_MAX_VALUE,
3648 p_effective_date
3649 );
3650 --
3651 pay_continuous_calc.event_update(p_business_group_id,
3652 p_legislation_code,
3653 'PAY_LINK_INPUT_VALUES_F',
3654 'MIN_VALUE',
3655 p_old_MIN_VALUE,
3656 p_new_MIN_VALUE,
3657 p_effective_date
3658 );
3659 --
3660 pay_continuous_calc.event_update(p_business_group_id,
3661 p_legislation_code,
3662 'PAY_LINK_INPUT_VALUES_F',
3663 'WARNING_OR_ERROR',
3664 p_old_WARNING_OR_ERROR,
3665 p_new_WARNING_OR_ERROR,
3666 p_effective_date
3667 );
3668 --
3669 pay_continuous_calc.event_update(p_business_group_id,
3670 p_legislation_code,
3671 'PAY_LINK_INPUT_VALUES_F',
3672 'WARNING_OR_ERROR',
3673 p_old_WARNING_OR_ERROR,
3674 p_new_WARNING_OR_ERROR,
3675 p_effective_date
3676 );
3677 else
3678 /* OK it must be a date track change */
3679 --
3680 pay_continuous_calc.event_update(p_business_group_id,
3681 p_legislation_code,
3682 'PAY_LINK_INPUT_VALUES_F',
3683 'EFFECTIVE_END_DATE',
3684 p_old_EFFECTIVE_END_DATE,
3685 p_new_EFFECTIVE_END_DATE,
3686 p_new_effective_end_date,
3687 least(p_old_effective_end_date,
3688 p_new_effective_end_date)
3689 );
3690 --
3691 pay_continuous_calc.event_update(p_business_group_id,
3692 p_legislation_code,
3693 'PAY_LINK_INPUT_VALUES_F',
3694 'EFFECTIVE_START_DATE',
3695 p_old_EFFECTIVE_START_DATE,
3696 p_new_EFFECTIVE_START_DATE,
3697 p_new_effective_start_date,
3698 least(p_old_effective_start_date,
3699 p_new_effective_start_date)
3700 );
3701
3702 end if;
3703 --
3704 /* Now call the API for the affected assignments */
3705 declare
3706 l_process_event_id number;
3707 l_object_version_number number;
3708 cnt number;
3709 begin
3710 if (pay_continuous_calc.g_event_list.sz <> 0) then
3711 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
3712 pay_ppe_api.create_process_event(
3713 p_assignment_id => null,
3714 p_effective_date => g_event_list.effective_date(cnt),
3715 p_change_type => g_event_list.change_type(cnt),
3716 p_status => 'U',
3717 p_description => g_event_list.description(cnt),
3718 p_process_event_id => l_process_event_id,
3719 p_object_version_number => l_object_version_number,
3720 p_event_update_id => g_event_list.event_update_id(cnt),
3721 p_business_group_id => p_business_group_id,
3722 p_calculation_date => g_event_list.calc_date(cnt),
3723 p_surrogate_key => p_new_LINK_INPUT_VALUE_ID
3724 );
3725 end loop;
3726 end if;
3727 pay_continuous_calc.g_event_list.sz := 0;
3728 end;
3729 --
3730 end PAY_LINK_INPUT_VALUES_F_aru;
3731 --
3732 /* Used generator to build this procedure, but removed some of that table values.
3733 */
3734 /* PAY_ELEMENT_LINKS */
3735 /* name : PAY_ELEMENT_LINKS_F_aru
3736 purpose : This is procedure that records any updates
3737 on element_links.
3738 */
3739 procedure PAY_ELEMENT_LINKS_F_aru(
3740 p_business_group_id in number,
3741 p_legislation_code in varchar2,
3742 p_effective_date in date,
3743 p_old_ATTRIBUTE1 in VARCHAR2,
3744 p_new_ATTRIBUTE1 in VARCHAR2,
3745 p_old_ATTRIBUTE10 in VARCHAR2,
3746 p_new_ATTRIBUTE10 in VARCHAR2,
3747 p_old_ATTRIBUTE11 in VARCHAR2,
3748 p_new_ATTRIBUTE11 in VARCHAR2,
3749 p_old_ATTRIBUTE12 in VARCHAR2,
3753 p_old_ATTRIBUTE14 in VARCHAR2,
3750 p_new_ATTRIBUTE12 in VARCHAR2,
3751 p_old_ATTRIBUTE13 in VARCHAR2,
3752 p_new_ATTRIBUTE13 in VARCHAR2,
3754 p_new_ATTRIBUTE14 in VARCHAR2,
3755 p_old_ATTRIBUTE15 in VARCHAR2,
3756 p_new_ATTRIBUTE15 in VARCHAR2,
3757 p_old_ATTRIBUTE16 in VARCHAR2,
3758 p_new_ATTRIBUTE16 in VARCHAR2,
3759 p_old_ATTRIBUTE17 in VARCHAR2,
3760 p_new_ATTRIBUTE17 in VARCHAR2,
3761 p_old_ATTRIBUTE18 in VARCHAR2,
3762 p_new_ATTRIBUTE18 in VARCHAR2,
3763 p_old_ATTRIBUTE19 in VARCHAR2,
3764 p_new_ATTRIBUTE19 in VARCHAR2,
3765 p_old_ATTRIBUTE2 in VARCHAR2,
3766 p_new_ATTRIBUTE2 in VARCHAR2,
3767 p_old_ATTRIBUTE20 in VARCHAR2,
3768 p_new_ATTRIBUTE20 in VARCHAR2,
3769 p_old_ATTRIBUTE3 in VARCHAR2,
3770 p_new_ATTRIBUTE3 in VARCHAR2,
3771 p_old_ATTRIBUTE4 in VARCHAR2,
3772 p_new_ATTRIBUTE4 in VARCHAR2,
3773 p_old_ATTRIBUTE5 in VARCHAR2,
3774 p_new_ATTRIBUTE5 in VARCHAR2,
3775 p_old_ATTRIBUTE6 in VARCHAR2,
3776 p_new_ATTRIBUTE6 in VARCHAR2,
3777 p_old_ATTRIBUTE7 in VARCHAR2,
3778 p_new_ATTRIBUTE7 in VARCHAR2,
3779 p_old_ATTRIBUTE8 in VARCHAR2,
3780 p_new_ATTRIBUTE8 in VARCHAR2,
3781 p_old_ATTRIBUTE9 in VARCHAR2,
3782 p_new_ATTRIBUTE9 in VARCHAR2,
3783 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
3784 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
3785 p_old_BALANCING_KEYFLEX_ID in NUMBER,
3786 p_new_BALANCING_KEYFLEX_ID in NUMBER,
3787 p_old_COSTABLE_TYPE in VARCHAR2,
3788 p_new_COSTABLE_TYPE in VARCHAR2,
3789 p_old_COST_ALLOCATION_KEYFLEX in NUMBER,
3790 p_new_COST_ALLOCATION_KEYFLEX in NUMBER,
3791 p_old_ELEMENT_LINK_ID in NUMBER,
3792 p_new_ELEMENT_LINK_ID in NUMBER,
3793 p_old_ELEMENT_SET_ID in NUMBER,
3794 p_new_ELEMENT_SET_ID in NUMBER,
3795 p_old_ELEMENT_TYPE_ID in NUMBER,
3796 p_new_ELEMENT_TYPE_ID in NUMBER,
3797 p_old_EFFECTIVE_END_DATE in DATE,
3798 p_new_EFFECTIVE_END_DATE in DATE,
3799 p_old_EFFECTIVE_START_DATE in DATE,
3800 p_new_EFFECTIVE_START_DATE in DATE
3801 )
3802 is
3803 --
3804 begin
3805 hr_utility.set_location('pay_continuous_calc.PAY_ELEMENT_LINKS_F_aru', 10);
3806 /* If the continuous calc is overriden then do nothing */
3807 if (g_override_cc = TRUE) then
3808 return;
3809 end if;
3810 --
3811 /* If the dates havent changed it must be a correction */
3812 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
3813 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
3814 --
3815 pay_continuous_calc.event_update(p_business_group_id,
3816 p_legislation_code,
3817 'PAY_ELEMENT_LINKS_F',
3818 'ATTRIBUTE1',
3819 p_old_ATTRIBUTE1,
3820 p_new_ATTRIBUTE1,
3821 p_effective_date
3822 );
3823 pay_continuous_calc.event_update(p_business_group_id,
3824 p_legislation_code,
3825 'PAY_ELEMENT_LINKS_F',
3826 'ATTRIBUTE10',
3827 p_old_ATTRIBUTE10,
3828 p_new_ATTRIBUTE10,
3829 p_effective_date
3830 );
3831 pay_continuous_calc.event_update(p_business_group_id,
3832 p_legislation_code,
3833 'PAY_ELEMENT_LINKS_F',
3834 'ATTRIBUTE11',
3835 p_old_ATTRIBUTE11,
3836 p_new_ATTRIBUTE11,
3837 p_effective_date
3838 );
3839 pay_continuous_calc.event_update(p_business_group_id,
3840 p_legislation_code,
3841 'PAY_ELEMENT_LINKS_F',
3842 'ATTRIBUTE12',
3843 p_old_ATTRIBUTE12,
3844 p_new_ATTRIBUTE12,
3845 p_effective_date
3846 );
3847 pay_continuous_calc.event_update(p_business_group_id,
3848 p_legislation_code,
3849 'PAY_ELEMENT_LINKS_F',
3850 'ATTRIBUTE13',
3851 p_old_ATTRIBUTE13,
3852 p_new_ATTRIBUTE13,
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 'ATTRIBUTE14',
3859 p_old_ATTRIBUTE14,
3860 p_new_ATTRIBUTE14,
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 'ATTRIBUTE15',
3867 p_old_ATTRIBUTE15,
3868 p_new_ATTRIBUTE15,
3869 p_effective_date
3873 'PAY_ELEMENT_LINKS_F',
3870 );
3871 pay_continuous_calc.event_update(p_business_group_id,
3872 p_legislation_code,
3874 'ATTRIBUTE16',
3875 p_old_ATTRIBUTE16,
3876 p_new_ATTRIBUTE16,
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 'ATTRIBUTE17',
3883 p_old_ATTRIBUTE17,
3884 p_new_ATTRIBUTE17,
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 'ATTRIBUTE18',
3891 p_old_ATTRIBUTE18,
3892 p_new_ATTRIBUTE18,
3893 p_effective_date
3894 );
3895 pay_continuous_calc.event_update(p_business_group_id,
3896 p_legislation_code,
3897 'PAY_ELEMENT_LINKS_F',
3898 'ATTRIBUTE19',
3899 p_old_ATTRIBUTE19,
3900 p_new_ATTRIBUTE19,
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 'ATTRIBUTE2',
3907 p_old_ATTRIBUTE2,
3908 p_new_ATTRIBUTE2,
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 'ATTRIBUTE20',
3915 p_old_ATTRIBUTE20,
3916 p_new_ATTRIBUTE20,
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 'ATTRIBUTE3',
3923 p_old_ATTRIBUTE3,
3924 p_new_ATTRIBUTE3,
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 'ATTRIBUTE4',
3931 p_old_ATTRIBUTE4,
3932 p_new_ATTRIBUTE4,
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 'ATTRIBUTE5',
3939 p_old_ATTRIBUTE5,
3940 p_new_ATTRIBUTE5,
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 'ATTRIBUTE6',
3947 p_old_ATTRIBUTE6,
3948 p_new_ATTRIBUTE6,
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 'ATTRIBUTE7',
3955 p_old_ATTRIBUTE7,
3956 p_new_ATTRIBUTE7,
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 'ATTRIBUTE8',
3963 p_old_ATTRIBUTE8,
3964 p_new_ATTRIBUTE8,
3965 p_effective_date
3966 );
3967 pay_continuous_calc.event_update(p_business_group_id,
3968 p_legislation_code,
3972 p_new_ATTRIBUTE9,
3969 'PAY_ELEMENT_LINKS_F',
3970 'ATTRIBUTE9',
3971 p_old_ATTRIBUTE9,
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 'ATTRIBUTE_CATEGORY',
3979 p_old_ATTRIBUTE_CATEGORY,
3980 p_new_ATTRIBUTE_CATEGORY,
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 'BALANCING_KEYFLEX_ID',
3987 p_old_BALANCING_KEYFLEX_ID,
3988 p_new_BALANCING_KEYFLEX_ID,
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 'COSTABLE_TYPE',
3995 p_old_COSTABLE_TYPE,
3996 p_new_COSTABLE_TYPE,
3997 p_effective_date
3998 );
3999 pay_continuous_calc.event_update(p_business_group_id,
4000 p_legislation_code,
4001 'PAY_ELEMENT_LINKS_F',
4002 'COST_ALLOCATION_KEYFLEX_ID',
4003 p_old_COST_ALLOCATION_KEYFLEX,
4004 p_new_COST_ALLOCATION_KEYFLEX,
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 'ELEMENT_SET_ID',
4011 p_old_ELEMENT_SET_ID,
4012 p_new_ELEMENT_SET_ID,
4013 p_effective_date
4014 );
4015 --
4016 else
4017 /* OK it must be a date track change */
4018 --
4019 pay_continuous_calc.event_update(p_business_group_id,
4020 p_legislation_code,
4021 'PAY_ELEMENT_LINKS_F',
4022 'EFFECTIVE_END_DATE',
4023 p_old_EFFECTIVE_END_DATE,
4024 p_new_EFFECTIVE_END_DATE,
4025 p_new_effective_end_date,
4026 least(p_old_effective_end_date,
4027 p_new_effective_end_date)
4028 );
4029 --
4030 pay_continuous_calc.event_update(p_business_group_id,
4031 p_legislation_code,
4032 'PAY_ELEMENT_LINKS_F',
4033 'EFFECTIVE_START_DATE',
4034 p_old_EFFECTIVE_START_DATE,
4035 p_new_EFFECTIVE_START_DATE,
4036 p_new_effective_start_date,
4037 least(p_old_effective_start_date,
4038 p_new_effective_start_date)
4039 );
4040
4041 end if;
4042 --
4043 /* Now call the API for the affected assignments */
4044 declare
4045 l_process_event_id number;
4046 l_object_version_number number;
4047 cnt number;
4048 begin
4049 if (pay_continuous_calc.g_event_list.sz <> 0) then
4050 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
4051 pay_ppe_api.create_process_event(
4052 p_assignment_id => null,
4053 p_effective_date => g_event_list.effective_date(cnt),
4054 p_change_type => g_event_list.change_type(cnt),
4055 p_status => 'U',
4056 p_description => g_event_list.description(cnt),
4057 p_process_event_id => l_process_event_id,
4058 p_object_version_number => l_object_version_number,
4059 p_event_update_id => g_event_list.event_update_id(cnt),
4060 p_business_group_id => p_business_group_id,
4061 p_calculation_date => g_event_list.calc_date(cnt),
4062 p_surrogate_key => p_new_ELEMENT_LINK_ID
4063 );
4064 end loop;
4065 end if;
4066 pay_continuous_calc.g_event_list.sz := 0;
4067 end;
4071 --
4068 hr_utility.set_location('pay_continuous_calc.PAY_ELEMENT_LINKS_F_aru', 50);
4069 --
4070 end PAY_ELEMENT_LINKS_F_aru;
4072 /* PAY_INPUT_VALUES */
4073 /* name : PAY_INPUT_VALUES_F_aru
4074 purpose : This is procedure that records any updates
4075 on input_values.
4076 */
4077 procedure PAY_INPUT_VALUES_F_aru(
4078 p_business_group_id in number,
4079 p_legislation_code in varchar2,
4080 p_effective_date in date ,
4081 p_old_DEFAULT_VALUE in VARCHAR2,
4082 p_new_DEFAULT_VALUE in VARCHAR2 ,
4083 p_old_DISPLAY_SEQUENCE in NUMBER,
4084 p_new_DISPLAY_SEQUENCE in NUMBER ,
4085 p_old_ELEMENT_TYPE_ID in NUMBER,
4086 p_new_ELEMENT_TYPE_ID in NUMBER ,
4087 p_old_FORMULA_ID in NUMBER,
4088 p_new_FORMULA_ID in NUMBER ,
4089 p_old_GENERATE_DB_ITEMS_FLAG in VARCHAR2,
4090 p_new_GENERATE_DB_ITEMS_FLAG in VARCHAR2 ,
4091 p_old_HOT_DEFAULT_FLAG in VARCHAR2,
4092 p_new_HOT_DEFAULT_FLAG in VARCHAR2 ,
4093 p_old_INPUT_VALUE_ID in NUMBER,
4094 p_new_INPUT_VALUE_ID in NUMBER ,
4095 p_old_LEGISLATION_SUBGROUP in VARCHAR2,
4096 p_new_LEGISLATION_SUBGROUP in VARCHAR2 ,
4097 p_old_LOOKUP_TYPE in VARCHAR2,
4098 p_new_LOOKUP_TYPE in VARCHAR2 ,
4099 p_old_MANDATORY_FLAG in VARCHAR2,
4100 p_new_MANDATORY_FLAG in VARCHAR2 ,
4101 p_old_MAX_VALUE in VARCHAR2,
4102 p_new_MAX_VALUE in VARCHAR2 ,
4103 p_old_MIN_VALUE in VARCHAR2,
4104 p_new_MIN_VALUE in VARCHAR2 ,
4105 p_old_UOM in VARCHAR2,
4106 p_new_UOM in VARCHAR2 ,
4107 p_old_WARNING_OR_ERROR in VARCHAR2,
4108 p_new_WARNING_OR_ERROR in VARCHAR2 ,
4109 p_old_EFFECTIVE_END_DATE in DATE,
4110 p_new_EFFECTIVE_END_DATE in DATE ,
4111 p_old_EFFECTIVE_START_DATE in DATE,
4112 p_new_EFFECTIVE_START_DATE in DATE
4113 )
4114 is
4115 --
4116 begin
4117 /* If the continuous calc is overriden then do nothing */
4118 if (g_override_cc = TRUE) then
4119 return;
4120 end if;
4121 --
4122 /* If the dates havent changed it must be a correction */
4123 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
4124 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
4125 --
4126 pay_continuous_calc.event_update(p_business_group_id,
4127 p_legislation_code,
4128 'PAY_INPUT_VALUES_F',
4129 'DEFAULT_VALUE',
4130 p_old_DEFAULT_VALUE,
4131 p_new_DEFAULT_VALUE,
4132 p_effective_date
4133 );
4134 --
4135 pay_continuous_calc.event_update(p_business_group_id,
4136 p_legislation_code,
4137 'PAY_INPUT_VALUES_F',
4138 'DISPLAY_SEQUENCE',
4139 p_old_DISPLAY_SEQUENCE,
4140 p_new_DISPLAY_SEQUENCE,
4141 p_effective_date
4142 );
4143 --
4144 pay_continuous_calc.event_update(p_business_group_id,
4145 p_legislation_code,
4146 'PAY_INPUT_VALUES_F',
4147 'ELEMENT_TYPE_ID',
4148 p_old_ELEMENT_TYPE_ID,
4149 p_new_ELEMENT_TYPE_ID,
4150 p_effective_date
4151 );
4152 --
4153 pay_continuous_calc.event_update(p_business_group_id,
4154 p_legislation_code,
4155 'PAY_INPUT_VALUES_F',
4156 'FORMULA_ID',
4157 p_old_FORMULA_ID,
4158 p_new_FORMULA_ID,
4159 p_effective_date
4160 );
4161 --
4162 pay_continuous_calc.event_update(p_business_group_id,
4163 p_legislation_code,
4164 'PAY_INPUT_VALUES_F',
4165 'GENERATE_DB_ITEMS_FLAG',
4166 p_old_GENERATE_DB_ITEMS_FLAG,
4167 p_new_GENERATE_DB_ITEMS_FLAG,
4168 p_effective_date
4169 );
4170 --
4171 pay_continuous_calc.event_update(p_business_group_id,
4172 p_legislation_code,
4173 'PAY_INPUT_VALUES_F',
4174 'HOT_DEFAULT_FLAG',
4175 p_old_HOT_DEFAULT_FLAG,
4176 p_new_HOT_DEFAULT_FLAG,
4177 p_effective_date
4178 );
4179 --
4180 pay_continuous_calc.event_update(p_business_group_id,
4181 p_legislation_code,
4182 'PAY_INPUT_VALUES_F',
4183 'INPUT_VALUE_ID',
4184 p_old_INPUT_VALUE_ID,
4185 p_new_INPUT_VALUE_ID,
4186 p_effective_date
4187 );
4188 --
4189 pay_continuous_calc.event_update(p_business_group_id,
4193 p_old_LEGISLATION_SUBGROUP,
4190 p_legislation_code,
4191 'PAY_INPUT_VALUES_F',
4192 'LEGISLATION_SUBGROUP',
4194 p_new_LEGISLATION_SUBGROUP,
4195 p_effective_date
4196 );
4197 --
4198 pay_continuous_calc.event_update(p_business_group_id,
4199 p_legislation_code,
4200 'PAY_INPUT_VALUES_F',
4201 'LOOKUP_TYPE',
4202 p_old_LOOKUP_TYPE,
4203 p_new_LOOKUP_TYPE,
4204 p_effective_date
4205 );
4206 --
4207 pay_continuous_calc.event_update(p_business_group_id,
4208 p_legislation_code,
4209 'PAY_INPUT_VALUES_F',
4210 'MANDATORY_FLAG',
4211 p_old_MANDATORY_FLAG,
4212 p_new_MANDATORY_FLAG,
4213 p_effective_date
4214 );
4215 --
4216 pay_continuous_calc.event_update(p_business_group_id,
4217 p_legislation_code,
4218 'PAY_INPUT_VALUES_F',
4219 'MAX_VALUE',
4220 p_old_MAX_VALUE,
4221 p_new_MAX_VALUE,
4222 p_effective_date
4223 );
4224 --
4225 pay_continuous_calc.event_update(p_business_group_id,
4226 p_legislation_code,
4227 'PAY_INPUT_VALUES_F',
4228 'MIN_VALUE',
4229 p_old_MIN_VALUE,
4230 p_new_MIN_VALUE,
4231 p_effective_date
4232 );
4233 --
4234 pay_continuous_calc.event_update(p_business_group_id,
4235 p_legislation_code,
4236 'PAY_INPUT_VALUES_F',
4237 'UOM',
4238 p_old_UOM,
4239 p_new_UOM,
4240 p_effective_date
4241 );
4242 --
4243 pay_continuous_calc.event_update(p_business_group_id,
4244 p_legislation_code,
4245 'PAY_INPUT_VALUES_F',
4246 'WARNING_OR_ERROR',
4247 p_old_WARNING_OR_ERROR,
4248 p_new_WARNING_OR_ERROR,
4249 p_effective_date
4250 );
4251 --
4252 pay_continuous_calc.event_update(p_business_group_id,
4253 p_legislation_code,
4254 'PAY_INPUT_VALUES_F',
4255 'WARNING_OR_ERROR',
4256 p_old_WARNING_OR_ERROR,
4257 p_new_WARNING_OR_ERROR,
4258 p_effective_date
4259 );
4260 else
4261 /* OK it must be a date track change */
4262 --
4263 pay_continuous_calc.event_update(p_business_group_id,
4264 p_legislation_code,
4265 'PAY_INPUT_VALUES_F',
4266 'EFFECTIVE_END_DATE',
4267 p_old_EFFECTIVE_END_DATE,
4268 p_new_EFFECTIVE_END_DATE,
4269 p_new_effective_end_date,
4270 least(p_old_effective_end_date,
4271 p_new_effective_end_date)
4272 );
4273 --
4274 pay_continuous_calc.event_update(p_business_group_id,
4275 p_legislation_code,
4276 'PAY_INPUT_VALUES_F',
4277 'EFFECTIVE_START_DATE',
4278 p_old_EFFECTIVE_START_DATE,
4279 p_new_EFFECTIVE_START_DATE,
4280 p_new_effective_start_date,
4281 least(p_old_effective_start_date,
4282 p_new_effective_start_date)
4283 );
4284
4285 end if;
4286 --
4287 /* Now call the API for the affected assignments */
4288 declare
4289 l_process_event_id number;
4290 l_object_version_number number;
4291 cnt number;
4292 begin
4293 if (pay_continuous_calc.g_event_list.sz <> 0) then
4294 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
4295 pay_ppe_api.create_process_event(
4296 p_assignment_id => null,
4297 p_effective_date => g_event_list.effective_date(cnt),
4301 p_process_event_id => l_process_event_id,
4298 p_change_type => g_event_list.change_type(cnt),
4299 p_status => 'U',
4300 p_description => g_event_list.description(cnt),
4302 p_object_version_number => l_object_version_number,
4303 p_event_update_id => g_event_list.event_update_id(cnt),
4304 p_business_group_id => p_business_group_id,
4305 p_calculation_date => g_event_list.calc_date(cnt),
4306 p_surrogate_key => p_new_INPUT_VALUE_ID
4307 );
4308 end loop;
4309 end if;
4310 pay_continuous_calc.g_event_list.sz := 0;
4311 end;
4312 --
4313 end PAY_INPUT_VALUES_F_aru;
4314 --
4315 /* Used generator to build this procedure, but removed some of that table values.
4316 */
4317 /* PAY_ALL_PAYROLLS */
4318 /* name : PAY_ALL_PAYROLLS_F_aru
4319 purpose : This is procedure that records any updates
4320 on payrolls.
4321 */
4322 procedure PAY_ALL_PAYROLLS_F_aru(
4323 p_business_group_id in number,
4324 p_legislation_code in varchar2,
4325 p_effective_date in date,
4326 p_old_ATTRIBUTE1 in VARCHAR2,
4327 p_new_ATTRIBUTE1 in VARCHAR2,
4328 p_old_ATTRIBUTE10 in VARCHAR2,
4329 p_new_ATTRIBUTE10 in VARCHAR2,
4330 p_old_ATTRIBUTE11 in VARCHAR2,
4331 p_new_ATTRIBUTE11 in VARCHAR2,
4332 p_old_ATTRIBUTE12 in VARCHAR2,
4333 p_new_ATTRIBUTE12 in VARCHAR2,
4334 p_old_ATTRIBUTE13 in VARCHAR2,
4335 p_new_ATTRIBUTE13 in VARCHAR2,
4336 p_old_ATTRIBUTE14 in VARCHAR2,
4337 p_new_ATTRIBUTE14 in VARCHAR2,
4338 p_old_ATTRIBUTE15 in VARCHAR2,
4339 p_new_ATTRIBUTE15 in VARCHAR2,
4340 p_old_ATTRIBUTE16 in VARCHAR2,
4341 p_new_ATTRIBUTE16 in VARCHAR2,
4342 p_old_ATTRIBUTE17 in VARCHAR2,
4343 p_new_ATTRIBUTE17 in VARCHAR2,
4344 p_old_ATTRIBUTE18 in VARCHAR2,
4345 p_new_ATTRIBUTE18 in VARCHAR2,
4346 p_old_ATTRIBUTE19 in VARCHAR2,
4347 p_new_ATTRIBUTE19 in VARCHAR2,
4348 p_old_ATTRIBUTE2 in VARCHAR2,
4349 p_new_ATTRIBUTE2 in VARCHAR2,
4350 p_old_ATTRIBUTE20 in VARCHAR2,
4351 p_new_ATTRIBUTE20 in VARCHAR2,
4352 p_old_ATTRIBUTE3 in VARCHAR2,
4353 p_new_ATTRIBUTE3 in VARCHAR2,
4354 p_old_ATTRIBUTE4 in VARCHAR2,
4355 p_new_ATTRIBUTE4 in VARCHAR2,
4356 p_old_ATTRIBUTE5 in VARCHAR2,
4357 p_new_ATTRIBUTE5 in VARCHAR2,
4358 p_old_ATTRIBUTE6 in VARCHAR2,
4359 p_new_ATTRIBUTE6 in VARCHAR2,
4360 p_old_ATTRIBUTE7 in VARCHAR2,
4361 p_new_ATTRIBUTE7 in VARCHAR2,
4362 p_old_ATTRIBUTE8 in VARCHAR2,
4363 p_new_ATTRIBUTE8 in VARCHAR2,
4364 p_old_ATTRIBUTE9 in VARCHAR2,
4365 p_new_ATTRIBUTE9 in VARCHAR2,
4366 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
4367 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
4368 p_old_COST_ALLOCATION_KEYFLEX_ in NUMBER,
4369 p_new_COST_ALLOCATION_KEYFLEX_ in NUMBER,
4370 p_old_DEFAULT_PAYMENT_METHOD_I in NUMBER,
4371 p_new_DEFAULT_PAYMENT_METHOD_I in NUMBER,
4372 p_old_PAYROLL_ID in NUMBER,
4373 p_new_PAYROLL_ID in NUMBER,
4374 p_old_PRL_INFORMATION1 in VARCHAR2,
4375 p_new_PRL_INFORMATION1 in VARCHAR2,
4376 p_old_PRL_INFORMATION10 in VARCHAR2,
4377 p_new_PRL_INFORMATION10 in VARCHAR2,
4378 p_old_PRL_INFORMATION11 in VARCHAR2,
4379 p_new_PRL_INFORMATION11 in VARCHAR2,
4380 p_old_PRL_INFORMATION12 in VARCHAR2,
4381 p_new_PRL_INFORMATION12 in VARCHAR2,
4382 p_old_PRL_INFORMATION13 in VARCHAR2,
4383 p_new_PRL_INFORMATION13 in VARCHAR2,
4384 p_old_PRL_INFORMATION14 in VARCHAR2,
4385 p_new_PRL_INFORMATION14 in VARCHAR2,
4386 p_old_PRL_INFORMATION15 in VARCHAR2,
4387 p_new_PRL_INFORMATION15 in VARCHAR2,
4388 p_old_PRL_INFORMATION16 in VARCHAR2,
4389 p_new_PRL_INFORMATION16 in VARCHAR2,
4390 p_old_PRL_INFORMATION17 in VARCHAR2,
4391 p_new_PRL_INFORMATION17 in VARCHAR2,
4392 p_old_PRL_INFORMATION18 in VARCHAR2,
4393 p_new_PRL_INFORMATION18 in VARCHAR2,
4394 p_old_PRL_INFORMATION19 in VARCHAR2,
4395 p_new_PRL_INFORMATION19 in VARCHAR2,
4396 p_old_PRL_INFORMATION2 in VARCHAR2,
4397 p_new_PRL_INFORMATION2 in VARCHAR2,
4398 p_old_PRL_INFORMATION20 in VARCHAR2,
4399 p_new_PRL_INFORMATION20 in VARCHAR2,
4400 p_old_PRL_INFORMATION21 in VARCHAR2,
4401 p_new_PRL_INFORMATION21 in VARCHAR2,
4402 p_old_PRL_INFORMATION22 in VARCHAR2,
4403 p_new_PRL_INFORMATION22 in VARCHAR2,
4404 p_old_PRL_INFORMATION23 in VARCHAR2,
4405 p_new_PRL_INFORMATION23 in VARCHAR2,
4406 p_old_PRL_INFORMATION24 in VARCHAR2,
4407 p_new_PRL_INFORMATION24 in VARCHAR2,
4408 p_old_PRL_INFORMATION25 in VARCHAR2,
4409 p_new_PRL_INFORMATION25 in VARCHAR2,
4410 p_old_PRL_INFORMATION26 in VARCHAR2,
4411 p_new_PRL_INFORMATION26 in VARCHAR2,
4412 p_old_PRL_INFORMATION27 in VARCHAR2,
4413 p_new_PRL_INFORMATION27 in VARCHAR2,
4414 p_old_PRL_INFORMATION28 in VARCHAR2,
4415 p_new_PRL_INFORMATION28 in VARCHAR2,
4416 p_old_PRL_INFORMATION29 in VARCHAR2,
4417 p_new_PRL_INFORMATION29 in VARCHAR2,
4418 p_old_PRL_INFORMATION3 in VARCHAR2,
4419 p_new_PRL_INFORMATION3 in VARCHAR2,
4420 p_old_PRL_INFORMATION30 in VARCHAR2,
4421 p_new_PRL_INFORMATION30 in VARCHAR2,
4422 p_old_PRL_INFORMATION4 in VARCHAR2,
4423 p_new_PRL_INFORMATION4 in VARCHAR2,
4424 p_old_PRL_INFORMATION5 in VARCHAR2,
4425 p_new_PRL_INFORMATION5 in VARCHAR2,
4426 p_old_PRL_INFORMATION6 in VARCHAR2,
4427 p_new_PRL_INFORMATION6 in VARCHAR2,
4431 p_new_PRL_INFORMATION8 in VARCHAR2,
4428 p_old_PRL_INFORMATION7 in VARCHAR2,
4429 p_new_PRL_INFORMATION7 in VARCHAR2,
4430 p_old_PRL_INFORMATION8 in VARCHAR2,
4432 p_old_PRL_INFORMATION9 in VARCHAR2,
4433 p_new_PRL_INFORMATION9 in VARCHAR2,
4434 p_old_PRL_INFORMATION_CATEGORY in VARCHAR2,
4435 p_new_PRL_INFORMATION_CATEGORY in VARCHAR2,
4436 p_old_SOFT_CODING_KEYFLEX_ID in NUMBER,
4437 p_new_SOFT_CODING_KEYFLEX_ID in NUMBER,
4438 p_old_SUSPENSE_ACCOUNT_KEYFLEX in NUMBER,
4439 p_new_SUSPENSE_ACCOUNT_KEYFLEX in NUMBER,
4440 p_old_EFFECTIVE_END_DATE in DATE,
4441 p_new_EFFECTIVE_END_DATE in DATE,
4442 p_old_EFFECTIVE_START_DATE in DATE,
4443 p_new_EFFECTIVE_START_DATE in DATE
4444 )
4445 is
4446 --
4447 cursor get_asg (p_payroll_id in number) is
4448 select distinct asg.assignment_id
4449 from per_assignments_f asg
4450 where asg.payroll_id = p_payroll_id
4451 and p_effective_date < asg.effective_end_date;
4452 --
4453 begin
4454 hr_utility.set_location('pay_continuous_calc.PAY_ALL_PAYROLLS_F_aru', 10);
4455 /* If the continuous calc is overriden then do nothing */
4456 if (g_override_cc = TRUE) then
4457 return;
4458 end if;
4459 --
4460 /* If the dates havent changed it must be a correction */
4461 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
4462 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
4463 --
4464 pay_continuous_calc.event_update(p_business_group_id,
4465 p_legislation_code,
4466 'PAY_ALL_PAYROLLS_F',
4467 'ATTRIBUTE1',
4468 p_old_ATTRIBUTE1,
4469 p_new_ATTRIBUTE1,
4470 p_effective_date
4471 );
4472 pay_continuous_calc.event_update(p_business_group_id,
4473 p_legislation_code,
4474 'PAY_ALL_PAYROLLS_F',
4475 'ATTRIBUTE10',
4476 p_old_ATTRIBUTE10,
4477 p_new_ATTRIBUTE10,
4478 p_effective_date
4479 );
4480 pay_continuous_calc.event_update(p_business_group_id,
4481 p_legislation_code,
4482 'PAY_ALL_PAYROLLS_F',
4483 'ATTRIBUTE11',
4484 p_old_ATTRIBUTE11,
4485 p_new_ATTRIBUTE11,
4486 p_effective_date
4487 );
4488 pay_continuous_calc.event_update(p_business_group_id,
4489 p_legislation_code,
4490 'PAY_ALL_PAYROLLS_F',
4491 'ATTRIBUTE12',
4492 p_old_ATTRIBUTE12,
4493 p_new_ATTRIBUTE12,
4494 p_effective_date
4495 );
4496 pay_continuous_calc.event_update(p_business_group_id,
4497 p_legislation_code,
4498 'PAY_ALL_PAYROLLS_F',
4499 'ATTRIBUTE13',
4500 p_old_ATTRIBUTE13,
4501 p_new_ATTRIBUTE13,
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 'ATTRIBUTE14',
4508 p_old_ATTRIBUTE14,
4509 p_new_ATTRIBUTE14,
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 'ATTRIBUTE15',
4516 p_old_ATTRIBUTE15,
4517 p_new_ATTRIBUTE15,
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 'ATTRIBUTE16',
4524 p_old_ATTRIBUTE16,
4525 p_new_ATTRIBUTE16,
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 'ATTRIBUTE17',
4532 p_old_ATTRIBUTE17,
4533 p_new_ATTRIBUTE17,
4534 p_effective_date
4535 );
4536 pay_continuous_calc.event_update(p_business_group_id,
4540 p_old_ATTRIBUTE18,
4537 p_legislation_code,
4538 'PAY_ALL_PAYROLLS_F',
4539 'ATTRIBUTE18',
4541 p_new_ATTRIBUTE18,
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 'ATTRIBUTE19',
4548 p_old_ATTRIBUTE19,
4549 p_new_ATTRIBUTE19,
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 'ATTRIBUTE2',
4556 p_old_ATTRIBUTE2,
4557 p_new_ATTRIBUTE2,
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 'ATTRIBUTE20',
4564 p_old_ATTRIBUTE20,
4565 p_new_ATTRIBUTE20,
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 'ATTRIBUTE3',
4572 p_old_ATTRIBUTE3,
4573 p_new_ATTRIBUTE3,
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 'ATTRIBUTE4',
4580 p_old_ATTRIBUTE4,
4581 p_new_ATTRIBUTE4,
4582 p_effective_date
4583 );
4584 pay_continuous_calc.event_update(p_business_group_id,
4585 p_legislation_code,
4586 'PAY_ALL_PAYROLLS_F',
4587 'ATTRIBUTE5',
4588 p_old_ATTRIBUTE5,
4589 p_new_ATTRIBUTE5,
4590 p_effective_date
4591 );
4592 pay_continuous_calc.event_update(p_business_group_id,
4593 p_legislation_code,
4594 'PAY_ALL_PAYROLLS_F',
4595 'ATTRIBUTE6',
4596 p_old_ATTRIBUTE6,
4597 p_new_ATTRIBUTE6,
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 'ATTRIBUTE7',
4604 p_old_ATTRIBUTE7,
4605 p_new_ATTRIBUTE7,
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 'ATTRIBUTE8',
4612 p_old_ATTRIBUTE8,
4613 p_new_ATTRIBUTE8,
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 'ATTRIBUTE9',
4620 p_old_ATTRIBUTE9,
4621 p_new_ATTRIBUTE9,
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 'ATTRIBUTE_CATEGORY',
4628 p_old_ATTRIBUTE_CATEGORY,
4629 p_new_ATTRIBUTE_CATEGORY,
4630 p_effective_date
4631 );
4632 pay_continuous_calc.event_update(p_business_group_id,
4633 p_legislation_code,
4634 'PAY_ALL_PAYROLLS_F',
4638 p_effective_date
4635 'COST_ALLOCATION_KEYFLEX_ID',
4636 p_old_COST_ALLOCATION_KEYFLEX_,
4637 p_new_COST_ALLOCATION_KEYFLEX_,
4639 );
4640 pay_continuous_calc.event_update(p_business_group_id,
4641 p_legislation_code,
4642 'PAY_ALL_PAYROLLS_F',
4643 'DEFAULT_PAYMENT_METHOD_ID',
4644 p_old_DEFAULT_PAYMENT_METHOD_I,
4645 p_new_DEFAULT_PAYMENT_METHOD_I,
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 'PRL_INFORMATION1',
4652 p_old_PRL_INFORMATION1,
4653 p_new_PRL_INFORMATION1,
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 'PRL_INFORMATION10',
4660 p_old_PRL_INFORMATION10,
4661 p_new_PRL_INFORMATION10,
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 'PRL_INFORMATION11',
4668 p_old_PRL_INFORMATION11,
4669 p_new_PRL_INFORMATION11,
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 'PRL_INFORMATION12',
4676 p_old_PRL_INFORMATION12,
4677 p_new_PRL_INFORMATION12,
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_INFORMATION13',
4684 p_old_PRL_INFORMATION13,
4685 p_new_PRL_INFORMATION13,
4686 p_effective_date
4687 );
4688 pay_continuous_calc.event_update(p_business_group_id,
4689 p_legislation_code,
4690 'PAY_ALL_PAYROLLS_F',
4691 'PRL_INFORMATION14',
4692 p_old_PRL_INFORMATION14,
4693 p_new_PRL_INFORMATION14,
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_INFORMATION15',
4700 p_old_PRL_INFORMATION15,
4701 p_new_PRL_INFORMATION15,
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_INFORMATION16',
4708 p_old_PRL_INFORMATION16,
4709 p_new_PRL_INFORMATION16,
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_INFORMATION17',
4716 p_old_PRL_INFORMATION17,
4717 p_new_PRL_INFORMATION17,
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_INFORMATION18',
4724 p_old_PRL_INFORMATION18,
4725 p_new_PRL_INFORMATION18,
4726 p_effective_date
4727 );
4728 pay_continuous_calc.event_update(p_business_group_id,
4729 p_legislation_code,
4733 p_new_PRL_INFORMATION19,
4730 'PAY_ALL_PAYROLLS_F',
4731 'PRL_INFORMATION19',
4732 p_old_PRL_INFORMATION19,
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_INFORMATION2',
4740 p_old_PRL_INFORMATION2,
4741 p_new_PRL_INFORMATION2,
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_INFORMATION20',
4748 p_old_PRL_INFORMATION20,
4749 p_new_PRL_INFORMATION20,
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_INFORMATION21',
4756 p_old_PRL_INFORMATION21,
4757 p_new_PRL_INFORMATION21,
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_INFORMATION22',
4764 p_old_PRL_INFORMATION22,
4765 p_new_PRL_INFORMATION22,
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_INFORMATION23',
4772 p_old_PRL_INFORMATION23,
4773 p_new_PRL_INFORMATION23,
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_INFORMATION24',
4780 p_old_PRL_INFORMATION24,
4781 p_new_PRL_INFORMATION24,
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_INFORMATION25',
4788 p_old_PRL_INFORMATION25,
4789 p_new_PRL_INFORMATION25,
4790 p_effective_date
4791 );
4792 pay_continuous_calc.event_update(p_business_group_id,
4793 p_legislation_code,
4794 'PAY_ALL_PAYROLLS_F',
4795 'PRL_INFORMATION26',
4796 p_old_PRL_INFORMATION26,
4797 p_new_PRL_INFORMATION26,
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_INFORMATION27',
4804 p_old_PRL_INFORMATION27,
4805 p_new_PRL_INFORMATION27,
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_INFORMATION28',
4812 p_old_PRL_INFORMATION28,
4813 p_new_PRL_INFORMATION28,
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_INFORMATION29',
4820 p_old_PRL_INFORMATION29,
4821 p_new_PRL_INFORMATION29,
4822 p_effective_date
4823 );
4824 pay_continuous_calc.event_update(p_business_group_id,
4825 p_legislation_code,
4829 p_new_PRL_INFORMATION3,
4826 'PAY_ALL_PAYROLLS_F',
4827 'PRL_INFORMATION3',
4828 p_old_PRL_INFORMATION3,
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_INFORMATION30',
4836 p_old_PRL_INFORMATION30,
4837 p_new_PRL_INFORMATION30,
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_INFORMATION4',
4844 p_old_PRL_INFORMATION4,
4845 p_new_PRL_INFORMATION4,
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_INFORMATION5',
4852 p_old_PRL_INFORMATION5,
4853 p_new_PRL_INFORMATION5,
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_INFORMATION6',
4860 p_old_PRL_INFORMATION6,
4861 p_new_PRL_INFORMATION6,
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_INFORMATION7',
4868 p_old_PRL_INFORMATION7,
4869 p_new_PRL_INFORMATION7,
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_INFORMATION8',
4876 p_old_PRL_INFORMATION8,
4877 p_new_PRL_INFORMATION8,
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_INFORMATION9',
4884 p_old_PRL_INFORMATION9,
4885 p_new_PRL_INFORMATION9,
4886 p_effective_date
4887 );
4888 pay_continuous_calc.event_update(p_business_group_id,
4889 p_legislation_code,
4890 'PAY_ALL_PAYROLLS_F',
4891 'PRL_INFORMATION_CATEGORY',
4892 p_old_PRL_INFORMATION_CATEGORY,
4893 p_new_PRL_INFORMATION_CATEGORY,
4894 p_effective_date
4895 );
4896 pay_continuous_calc.event_update(p_business_group_id,
4897 p_legislation_code,
4898 'PAY_ALL_PAYROLLS_F',
4899 'SOFT_CODING_KEYFLEX_ID',
4900 p_old_SOFT_CODING_KEYFLEX_ID,
4901 p_new_SOFT_CODING_KEYFLEX_ID,
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 'SUSPENSE_ACCOUNT_KEYFLEX',
4908 p_old_SUSPENSE_ACCOUNT_KEYFLEX,
4909 p_new_SUSPENSE_ACCOUNT_KEYFLEX,
4910 p_effective_date
4911 );
4912 --
4913 else
4914 /* OK it must be a date track change */
4915 --
4916 pay_continuous_calc.event_update(p_business_group_id,
4917 p_legislation_code,
4918 'PAY_ALL_PAYROLLS_F',
4919 'EFFECTIVE_END_DATE',
4920 p_old_EFFECTIVE_END_DATE,
4921 p_new_EFFECTIVE_END_DATE,
4922 p_new_effective_end_date,
4926 --
4923 least(p_old_effective_end_date,
4924 p_new_effective_end_date)
4925 );
4927 pay_continuous_calc.event_update(p_business_group_id,
4928 p_legislation_code,
4929 'PAY_ALL_PAYROLLS_F',
4930 'EFFECTIVE_START_DATE',
4931 p_old_EFFECTIVE_START_DATE,
4932 p_new_EFFECTIVE_START_DATE,
4933 p_new_effective_start_date,
4934 least(p_old_effective_start_date,
4935 p_new_effective_start_date)
4936 );
4937
4938 end if;
4939 --
4940 /* Now call the API for the affected assignments */
4941 declare
4942 l_process_event_id number;
4943 l_object_version_number number;
4944 cnt number;
4945 begin
4946 if (pay_continuous_calc.g_event_list.sz <> 0) then
4947 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
4948 pay_ppe_api.create_process_event(
4949 p_assignment_id => null,
4950 p_effective_date => g_event_list.effective_date(cnt),
4951 p_change_type => g_event_list.change_type(cnt),
4952 p_status => 'U',
4953 p_description => g_event_list.description(cnt),
4954 p_process_event_id => l_process_event_id,
4955 p_object_version_number => l_object_version_number,
4956 p_event_update_id => g_event_list.event_update_id(cnt),
4957 p_business_group_id => p_business_group_id,
4958 p_calculation_date => g_event_list.calc_date(cnt),
4959 p_surrogate_key => p_new_PAYROLL_ID
4960 );
4961 end loop;
4962 end if;
4963 pay_continuous_calc.g_event_list.sz := 0;
4964 end;
4965 hr_utility.set_location('pay_continuous_calc.PAY_ALL_PAYROLLS_F_aru', 50);
4966 --
4967 end PAY_ALL_PAYROLLS_F_aru;
4968 --
4969 /* Used generator to build this procedure, but removed some of that table values.
4970 */
4971 /* PAY_ELEMENT_TYEPS_F */
4972 /* name : PAY_ELEMENT_TYPES_F_aru
4973 purpose : This is procedure that records any updates
4974 on element_types.
4975 */
4976 procedure PAY_ELEMENT_TYPES_F_aru(
4977 p_business_group_id in number,
4978 p_legislation_code in varchar2,
4979 p_effective_date in date,
4980 p_old_ATTRIBUTE1 in VARCHAR2,
4981 p_new_ATTRIBUTE1 in VARCHAR2,
4982 p_old_ATTRIBUTE10 in VARCHAR2,
4983 p_new_ATTRIBUTE10 in VARCHAR2,
4984 p_old_ATTRIBUTE11 in VARCHAR2,
4985 p_new_ATTRIBUTE11 in VARCHAR2,
4986 p_old_ATTRIBUTE12 in VARCHAR2,
4987 p_new_ATTRIBUTE12 in VARCHAR2,
4988 p_old_ATTRIBUTE13 in VARCHAR2,
4989 p_new_ATTRIBUTE13 in VARCHAR2,
4990 p_old_ATTRIBUTE14 in VARCHAR2,
4991 p_new_ATTRIBUTE14 in VARCHAR2,
4992 p_old_ATTRIBUTE15 in VARCHAR2,
4993 p_new_ATTRIBUTE15 in VARCHAR2,
4994 p_old_ATTRIBUTE16 in VARCHAR2,
4995 p_new_ATTRIBUTE16 in VARCHAR2,
4996 p_old_ATTRIBUTE17 in VARCHAR2,
4997 p_new_ATTRIBUTE17 in VARCHAR2,
4998 p_old_ATTRIBUTE18 in VARCHAR2,
4999 p_new_ATTRIBUTE18 in VARCHAR2,
5000 p_old_ATTRIBUTE19 in VARCHAR2,
5001 p_new_ATTRIBUTE19 in VARCHAR2,
5002 p_old_ATTRIBUTE2 in VARCHAR2,
5003 p_new_ATTRIBUTE2 in VARCHAR2,
5004 p_old_ATTRIBUTE20 in VARCHAR2,
5005 p_new_ATTRIBUTE20 in VARCHAR2,
5006 p_old_ATTRIBUTE3 in VARCHAR2,
5007 p_new_ATTRIBUTE3 in VARCHAR2,
5008 p_old_ATTRIBUTE4 in VARCHAR2,
5009 p_new_ATTRIBUTE4 in VARCHAR2,
5010 p_old_ATTRIBUTE5 in VARCHAR2,
5011 p_new_ATTRIBUTE5 in VARCHAR2,
5012 p_old_ATTRIBUTE6 in VARCHAR2,
5013 p_new_ATTRIBUTE6 in VARCHAR2,
5014 p_old_ATTRIBUTE7 in VARCHAR2,
5015 p_new_ATTRIBUTE7 in VARCHAR2,
5016 p_old_ATTRIBUTE8 in VARCHAR2,
5017 p_new_ATTRIBUTE8 in VARCHAR2,
5018 p_old_ATTRIBUTE9 in VARCHAR2,
5019 p_new_ATTRIBUTE9 in VARCHAR2,
5020 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
5021 p_new_ATTRIBUTE_CATEGORY in VARCHAR2,
5022 p_old_ELEMENT_INFORMATION1 in VARCHAR2,
5023 p_new_ELEMENT_INFORMATION1 in VARCHAR2,
5024 p_old_ELEMENT_INFORMATION10 in VARCHAR2,
5025 p_new_ELEMENT_INFORMATION10 in VARCHAR2,
5026 p_old_ELEMENT_INFORMATION11 in VARCHAR2,
5027 p_new_ELEMENT_INFORMATION11 in VARCHAR2,
5028 p_old_ELEMENT_INFORMATION12 in VARCHAR2,
5029 p_new_ELEMENT_INFORMATION12 in VARCHAR2,
5030 p_old_ELEMENT_INFORMATION13 in VARCHAR2,
5031 p_new_ELEMENT_INFORMATION13 in VARCHAR2,
5032 p_old_ELEMENT_INFORMATION14 in VARCHAR2,
5033 p_new_ELEMENT_INFORMATION14 in VARCHAR2,
5034 p_old_ELEMENT_INFORMATION15 in VARCHAR2,
5035 p_new_ELEMENT_INFORMATION15 in VARCHAR2,
5036 p_old_ELEMENT_INFORMATION16 in VARCHAR2,
5037 p_new_ELEMENT_INFORMATION16 in VARCHAR2,
5038 p_old_ELEMENT_INFORMATION17 in VARCHAR2,
5039 p_new_ELEMENT_INFORMATION17 in VARCHAR2,
5040 p_old_ELEMENT_INFORMATION18 in VARCHAR2,
5041 p_new_ELEMENT_INFORMATION18 in VARCHAR2,
5042 p_old_ELEMENT_INFORMATION19 in VARCHAR2,
5043 p_new_ELEMENT_INFORMATION19 in VARCHAR2,
5044 p_old_ELEMENT_INFORMATION2 in VARCHAR2,
5048 p_old_ELEMENT_INFORMATION3 in VARCHAR2,
5045 p_new_ELEMENT_INFORMATION2 in VARCHAR2,
5046 p_old_ELEMENT_INFORMATION20 in VARCHAR2,
5047 p_new_ELEMENT_INFORMATION20 in VARCHAR2,
5049 p_new_ELEMENT_INFORMATION3 in VARCHAR2,
5050 p_old_ELEMENT_INFORMATION4 in VARCHAR2,
5051 p_new_ELEMENT_INFORMATION4 in VARCHAR2,
5052 p_old_ELEMENT_INFORMATION5 in VARCHAR2,
5053 p_new_ELEMENT_INFORMATION5 in VARCHAR2,
5054 p_old_ELEMENT_INFORMATION6 in VARCHAR2,
5055 p_new_ELEMENT_INFORMATION6 in VARCHAR2,
5056 p_old_ELEMENT_INFORMATION7 in VARCHAR2,
5057 p_new_ELEMENT_INFORMATION7 in VARCHAR2,
5058 p_old_ELEMENT_INFORMATION8 in VARCHAR2,
5059 p_new_ELEMENT_INFORMATION8 in VARCHAR2,
5060 p_old_ELEMENT_INFORMATION9 in VARCHAR2,
5061 p_new_ELEMENT_INFORMATION9 in VARCHAR2,
5062 p_old_ELEMENT_INFORMATION_CATE in VARCHAR2,
5063 p_new_ELEMENT_INFORMATION_CATE in VARCHAR2,
5064 p_old_ELEMENT_TYPE_ID in NUMBER,
5065 p_new_ELEMENT_TYPE_ID in NUMBER,
5066 p_old_GROSSUP_FLAG in VARCHAR2,
5067 p_new_GROSSUP_FLAG in VARCHAR2,
5068 p_old_ITERATIVE_FLAG in VARCHAR2,
5069 p_new_ITERATIVE_FLAG in VARCHAR2,
5070 p_old_ITERATIVE_FORMULA_ID in NUMBER,
5071 p_new_ITERATIVE_FORMULA_ID in NUMBER,
5072 p_old_ITERATIVE_PRIORITY in NUMBER,
5073 p_new_ITERATIVE_PRIORITY in NUMBER,
5074 p_old_POST_TERMINATION_RULE in VARCHAR2,
5075 p_new_POST_TERMINATION_RULE in VARCHAR2,
5076 p_old_PROCESSING_PRIORITY in NUMBER,
5077 p_new_PROCESSING_PRIORITY in NUMBER,
5078 p_old_PROCESS_MODE in VARCHAR2,
5079 p_new_PROCESS_MODE in VARCHAR2,
5080 p_old_EFFECTIVE_END_DATE in DATE,
5081 p_new_EFFECTIVE_END_DATE in DATE,
5082 p_old_EFFECTIVE_START_DATE in DATE,
5083 p_new_EFFECTIVE_START_DATE in DATE
5084 )
5085 is
5086 --
5087 begin
5088 hr_utility.set_location('pay_continuous_calc.PAY_ELEMENT_TYPES_F_aru', 10);
5089 /* If the continuous calc is overriden then do nothing */
5090 if (g_override_cc = TRUE) then
5091 return;
5092 end if;
5093 --
5094 /* If the dates havent changed it must be a correction */
5095 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
5096 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
5097 --
5098 pay_continuous_calc.event_update(p_business_group_id,
5099 p_legislation_code,
5100 'PAY_ELEMENT_TYPES_F',
5101 'ATTRIBUTE1',
5102 p_old_ATTRIBUTE1,
5103 p_new_ATTRIBUTE1,
5104 p_effective_date
5105 );
5106 pay_continuous_calc.event_update(p_business_group_id,
5107 p_legislation_code,
5108 'PAY_ELEMENT_TYPES_F',
5109 'ATTRIBUTE10',
5110 p_old_ATTRIBUTE10,
5111 p_new_ATTRIBUTE10,
5112 p_effective_date
5113 );
5114 pay_continuous_calc.event_update(p_business_group_id,
5115 p_legislation_code,
5116 'PAY_ELEMENT_TYPES_F',
5117 'ATTRIBUTE11',
5118 p_old_ATTRIBUTE11,
5119 p_new_ATTRIBUTE11,
5120 p_effective_date
5121 );
5122 pay_continuous_calc.event_update(p_business_group_id,
5123 p_legislation_code,
5124 'PAY_ELEMENT_TYPES_F',
5125 'ATTRIBUTE12',
5126 p_old_ATTRIBUTE12,
5127 p_new_ATTRIBUTE12,
5128 p_effective_date
5129 );
5130 pay_continuous_calc.event_update(p_business_group_id,
5131 p_legislation_code,
5132 'PAY_ELEMENT_TYPES_F',
5133 'ATTRIBUTE13',
5134 p_old_ATTRIBUTE13,
5135 p_new_ATTRIBUTE13,
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 'ATTRIBUTE14',
5142 p_old_ATTRIBUTE14,
5143 p_new_ATTRIBUTE14,
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 'ATTRIBUTE15',
5150 p_old_ATTRIBUTE15,
5151 p_new_ATTRIBUTE15,
5152 p_effective_date
5153 );
5154 pay_continuous_calc.event_update(p_business_group_id,
5155 p_legislation_code,
5159 p_new_ATTRIBUTE16,
5156 'PAY_ELEMENT_TYPES_F',
5157 'ATTRIBUTE16',
5158 p_old_ATTRIBUTE16,
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 'ATTRIBUTE17',
5166 p_old_ATTRIBUTE17,
5167 p_new_ATTRIBUTE17,
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 'ATTRIBUTE18',
5174 p_old_ATTRIBUTE18,
5175 p_new_ATTRIBUTE18,
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 'ATTRIBUTE19',
5182 p_old_ATTRIBUTE19,
5183 p_new_ATTRIBUTE19,
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 'ATTRIBUTE2',
5190 p_old_ATTRIBUTE2,
5191 p_new_ATTRIBUTE2,
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 'ATTRIBUTE20',
5198 p_old_ATTRIBUTE20,
5199 p_new_ATTRIBUTE20,
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 'ATTRIBUTE3',
5206 p_old_ATTRIBUTE3,
5207 p_new_ATTRIBUTE3,
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 'ATTRIBUTE4',
5214 p_old_ATTRIBUTE4,
5215 p_new_ATTRIBUTE4,
5216 p_effective_date
5217 );
5218 pay_continuous_calc.event_update(p_business_group_id,
5219 p_legislation_code,
5220 'PAY_ELEMENT_TYPES_F',
5221 'ATTRIBUTE5',
5222 p_old_ATTRIBUTE5,
5223 p_new_ATTRIBUTE5,
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 'ATTRIBUTE6',
5230 p_old_ATTRIBUTE6,
5231 p_new_ATTRIBUTE6,
5232 p_effective_date
5233 );
5234 pay_continuous_calc.event_update(p_business_group_id,
5235 p_legislation_code,
5236 'PAY_ELEMENT_TYPES_F',
5237 'ATTRIBUTE7',
5238 p_old_ATTRIBUTE7,
5239 p_new_ATTRIBUTE7,
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 'ATTRIBUTE8',
5246 p_old_ATTRIBUTE8,
5247 p_new_ATTRIBUTE8,
5248 p_effective_date
5249 );
5250 pay_continuous_calc.event_update(p_business_group_id,
5251 p_legislation_code,
5252 'PAY_ELEMENT_TYPES_F',
5256 p_effective_date
5253 'ATTRIBUTE9',
5254 p_old_ATTRIBUTE9,
5255 p_new_ATTRIBUTE9,
5257 );
5258 pay_continuous_calc.event_update(p_business_group_id,
5259 p_legislation_code,
5260 'PAY_ELEMENT_TYPES_F',
5261 'ATTRIBUTE_CATEGORY',
5262 p_old_ATTRIBUTE_CATEGORY,
5263 p_new_ATTRIBUTE_CATEGORY,
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 'ELEMENT_INFORMATION1',
5270 p_old_ELEMENT_INFORMATION1,
5271 p_new_ELEMENT_INFORMATION1,
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 'ELEMENT_INFORMATION10',
5278 p_old_ELEMENT_INFORMATION10,
5279 p_new_ELEMENT_INFORMATION10,
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 'ELEMENT_INFORMATION11',
5286 p_old_ELEMENT_INFORMATION11,
5287 p_new_ELEMENT_INFORMATION11,
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 'ELEMENT_INFORMATION12',
5294 p_old_ELEMENT_INFORMATION12,
5295 p_new_ELEMENT_INFORMATION12,
5296 p_effective_date
5297 );
5298 pay_continuous_calc.event_update(p_business_group_id,
5299 p_legislation_code,
5300 'PAY_ELEMENT_TYPES_F',
5301 'ELEMENT_INFORMATION13',
5302 p_old_ELEMENT_INFORMATION13,
5303 p_new_ELEMENT_INFORMATION13,
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_INFORMATION14',
5310 p_old_ELEMENT_INFORMATION14,
5311 p_new_ELEMENT_INFORMATION14,
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_INFORMATION15',
5318 p_old_ELEMENT_INFORMATION15,
5319 p_new_ELEMENT_INFORMATION15,
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_INFORMATION16',
5326 p_old_ELEMENT_INFORMATION16,
5327 p_new_ELEMENT_INFORMATION16,
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_INFORMATION17',
5334 p_old_ELEMENT_INFORMATION17,
5335 p_new_ELEMENT_INFORMATION17,
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_INFORMATION18',
5342 p_old_ELEMENT_INFORMATION18,
5343 p_new_ELEMENT_INFORMATION18,
5344 p_effective_date
5345 );
5346 pay_continuous_calc.event_update(p_business_group_id,
5350 p_old_ELEMENT_INFORMATION19,
5347 p_legislation_code,
5348 'PAY_ELEMENT_TYPES_F',
5349 'ELEMENT_INFORMATION19',
5351 p_new_ELEMENT_INFORMATION19,
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_INFORMATION2',
5358 p_old_ELEMENT_INFORMATION2,
5359 p_new_ELEMENT_INFORMATION2,
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_INFORMATION20',
5366 p_old_ELEMENT_INFORMATION20,
5367 p_new_ELEMENT_INFORMATION20,
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_INFORMATION3',
5374 p_old_ELEMENT_INFORMATION3,
5375 p_new_ELEMENT_INFORMATION3,
5376 p_effective_date
5377 );
5378 pay_continuous_calc.event_update(p_business_group_id,
5379 p_legislation_code,
5380 'PAY_ELEMENT_TYPES_F',
5381 'ELEMENT_INFORMATION4',
5382 p_old_ELEMENT_INFORMATION4,
5383 p_new_ELEMENT_INFORMATION4,
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_INFORMATION5',
5390 p_old_ELEMENT_INFORMATION5,
5391 p_new_ELEMENT_INFORMATION5,
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_INFORMATION6',
5398 p_old_ELEMENT_INFORMATION6,
5399 p_new_ELEMENT_INFORMATION6,
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_INFORMATION7',
5406 p_old_ELEMENT_INFORMATION7,
5407 p_new_ELEMENT_INFORMATION7,
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_INFORMATION8',
5414 p_old_ELEMENT_INFORMATION8,
5415 p_new_ELEMENT_INFORMATION8,
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_INFORMATION9',
5422 p_old_ELEMENT_INFORMATION9,
5423 p_new_ELEMENT_INFORMATION9,
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_INFORMATION_CATEGORY',
5430 p_old_ELEMENT_INFORMATION_CATE,
5431 p_new_ELEMENT_INFORMATION_CATE,
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 'GROSSUP_FLAG',
5438 p_old_GROSSUP_FLAG,
5439 p_new_GROSSUP_FLAG,
5440 p_effective_date
5444 'PAY_ELEMENT_TYPES_F',
5441 );
5442 pay_continuous_calc.event_update(p_business_group_id,
5443 p_legislation_code,
5445 'ITERATIVE_FLAG',
5446 p_old_ITERATIVE_FLAG,
5447 p_new_ITERATIVE_FLAG,
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 'ITERATIVE_FORMULA_ID',
5454 p_old_ITERATIVE_FORMULA_ID,
5455 p_new_ITERATIVE_FORMULA_ID,
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 'ITERATIVE_PRIORITY',
5462 p_old_ITERATIVE_PRIORITY,
5463 p_new_ITERATIVE_PRIORITY,
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 'POST_TERMINATION_RULE',
5470 p_old_POST_TERMINATION_RULE,
5471 p_new_POST_TERMINATION_RULE,
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 'PROCESSING_PRIORITY',
5478 p_old_PROCESSING_PRIORITY,
5479 p_new_PROCESSING_PRIORITY,
5480 p_effective_date
5481 );
5482 pay_continuous_calc.event_update(p_business_group_id,
5483 p_legislation_code,
5484 'PAY_ELEMENT_TYPES_F',
5485 'PROCESS_MODE',
5486 p_old_PROCESS_MODE,
5487 p_new_PROCESS_MODE,
5488 p_effective_date
5489 );
5490 --
5491 else
5492 /* OK it must be a date track change */
5493 --
5494 pay_continuous_calc.event_update(p_business_group_id,
5495 p_legislation_code,
5496 'PAY_ELEMENT_TYPES_F',
5497 'EFFECTIVE_END_DATE',
5498 p_old_EFFECTIVE_END_DATE,
5499 p_new_EFFECTIVE_END_DATE,
5500 p_new_effective_end_date,
5501 least(p_old_effective_end_date,
5502 p_new_effective_end_date)
5503 );
5504 --
5505 pay_continuous_calc.event_update(p_business_group_id,
5506 p_legislation_code,
5507 'PAY_ELEMENT_TYPES_F',
5508 'EFFECTIVE_START_DATE',
5509 p_old_EFFECTIVE_START_DATE,
5510 p_new_EFFECTIVE_START_DATE,
5511 p_new_effective_start_date,
5512 least(p_old_effective_start_date,
5513 p_new_effective_start_date)
5514 );
5515
5516 end if;
5517 --
5518 /* Now call the API for the affected assignments */
5519 declare
5520 l_process_event_id number;
5521 l_object_version_number number;
5522 cnt number;
5523 begin
5524 if (pay_continuous_calc.g_event_list.sz <> 0) then
5525 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
5526 pay_ppe_api.create_process_event(
5527 p_assignment_id => null,
5528 p_effective_date => g_event_list.effective_date(cnt),
5529 p_change_type => g_event_list.change_type(cnt),
5530 p_status => 'U',
5531 p_description => g_event_list.description(cnt),
5532 p_process_event_id => l_process_event_id,
5533 p_object_version_number => l_object_version_number,
5534 p_event_update_id => g_event_list.event_update_id(cnt),
5535 p_business_group_id => p_business_group_id,
5536 p_calculation_date => g_event_list.calc_date(cnt),
5540 end if;
5537 p_surrogate_key => p_new_ELEMENT_TYPE_ID
5538 );
5539 end loop;
5541 pay_continuous_calc.g_event_list.sz := 0;
5542 end;
5543 hr_utility.set_location('pay_continuous_calc.PAY_ELEMENT_TYPES_F_aru', 50);
5544 --
5545 end PAY_ELEMENT_TYPES_F_aru;
5546 --
5547 /* PAY_GRADE_RULES_F */
5548 /* name : PAY_GRADE_RULES_F_aru
5549 purpose : This is procedure that records any updates
5550 on grade_rules.
5551 */
5552 procedure PAY_GRADE_RULES_F_aru(
5553 p_business_group_id in number,
5554 p_legislation_code in varchar2,
5555 p_effective_date in date ,
5556 p_old_GRADE_OR_SPINAL_POINT_ID in NUMBER,
5557 p_new_GRADE_OR_SPINAL_POINT_ID in NUMBER ,
5558 p_old_GRADE_RULE_ID in NUMBER,
5559 p_new_GRADE_RULE_ID in NUMBER ,
5560 p_old_MAXIMUM in VARCHAR2,
5561 p_new_MAXIMUM in VARCHAR2 ,
5562 p_old_MID_VALUE in VARCHAR2,
5563 p_new_MID_VALUE in VARCHAR2 ,
5564 p_old_MINIMUM in VARCHAR2,
5565 p_new_MINIMUM in VARCHAR2 ,
5566 p_old_PROGRAM_APPLICATION_ID in NUMBER,
5567 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
5568 p_old_PROGRAM_ID in NUMBER,
5569 p_new_PROGRAM_ID in NUMBER ,
5570 p_old_PROGRAM_UPDATE_DATE in DATE,
5571 p_new_PROGRAM_UPDATE_DATE in DATE ,
5572 p_old_RATE_ID in NUMBER,
5573 p_new_RATE_ID in NUMBER ,
5574 p_old_RATE_TYPE in VARCHAR2,
5575 p_new_RATE_TYPE in VARCHAR2 ,
5576 p_old_REQUEST_ID in NUMBER,
5577 p_new_REQUEST_ID in NUMBER ,
5578 p_old_SEQUENCE in NUMBER,
5579 p_new_SEQUENCE in NUMBER ,
5580 p_old_VALUE in VARCHAR2,
5581 p_new_VALUE in VARCHAR2 ,
5582 p_old_EFFECTIVE_END_DATE in DATE,
5583 p_new_EFFECTIVE_END_DATE in DATE ,
5584 p_old_EFFECTIVE_START_DATE in DATE,
5585 p_new_EFFECTIVE_START_DATE in DATE
5586 )
5587 is
5588 --
5589 begin
5590 /* If the continuous calc is overriden then do nothing */
5591 if (g_override_cc = TRUE) then
5592 return;
5593 end if;
5594 --
5595 /* If the dates havent changed it must be a correction */
5596 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
5597 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
5598 --
5599 pay_continuous_calc.event_update(p_business_group_id,
5600 p_legislation_code,
5601 'PAY_GRADE_RULES_F',
5602 'GRADE_OR_SPINAL_POINT_ID',
5603 p_old_GRADE_OR_SPINAL_POINT_ID,
5604 p_new_GRADE_OR_SPINAL_POINT_ID,
5605 p_effective_date
5606 );
5607 --
5608 pay_continuous_calc.event_update(p_business_group_id,
5609 p_legislation_code,
5610 'PAY_GRADE_RULES_F',
5611 'GRADE_RULE_ID',
5612 p_old_GRADE_RULE_ID,
5613 p_new_GRADE_RULE_ID,
5614 p_effective_date
5615 );
5616 --
5617 pay_continuous_calc.event_update(p_business_group_id,
5618 p_legislation_code,
5619 'PAY_GRADE_RULES_F',
5620 'MAXIMUM',
5621 p_old_MAXIMUM,
5622 p_new_MAXIMUM,
5623 p_effective_date
5624 );
5625 --
5626 pay_continuous_calc.event_update(p_business_group_id,
5627 p_legislation_code,
5628 'PAY_GRADE_RULES_F',
5629 'MID_VALUE',
5630 p_old_MID_VALUE,
5631 p_new_MID_VALUE,
5632 p_effective_date
5633 );
5634 --
5635 pay_continuous_calc.event_update(p_business_group_id,
5636 p_legislation_code,
5637 'PAY_GRADE_RULES_F',
5638 'MINIMUM',
5639 p_old_MINIMUM,
5640 p_new_MINIMUM,
5641 p_effective_date
5642 );
5643 --
5644 pay_continuous_calc.event_update(p_business_group_id,
5645 p_legislation_code,
5646 'PAY_GRADE_RULES_F',
5647 'PROGRAM_APPLICATION_ID',
5648 p_old_PROGRAM_APPLICATION_ID,
5649 p_new_PROGRAM_APPLICATION_ID,
5650 p_effective_date
5651 );
5652 --
5653 pay_continuous_calc.event_update(p_business_group_id,
5654 p_legislation_code,
5655 'PAY_GRADE_RULES_F',
5656 'PROGRAM_ID',
5657 p_old_PROGRAM_ID,
5658 p_new_PROGRAM_ID,
5659 p_effective_date
5660 );
5661 --
5665 'PROGRAM_UPDATE_DATE',
5662 pay_continuous_calc.event_update(p_business_group_id,
5663 p_legislation_code,
5664 'PAY_GRADE_RULES_F',
5666 p_old_PROGRAM_UPDATE_DATE,
5667 p_new_PROGRAM_UPDATE_DATE,
5668 p_effective_date
5669 );
5670 --
5671 pay_continuous_calc.event_update(p_business_group_id,
5672 p_legislation_code,
5673 'PAY_GRADE_RULES_F',
5674 'RATE_ID',
5675 p_old_RATE_ID,
5676 p_new_RATE_ID,
5677 p_effective_date
5678 );
5679 --
5680 pay_continuous_calc.event_update(p_business_group_id,
5681 p_legislation_code,
5682 'PAY_GRADE_RULES_F',
5683 'RATE_TYPE',
5684 p_old_RATE_TYPE,
5685 p_new_RATE_TYPE,
5686 p_effective_date
5687 );
5688 --
5689 pay_continuous_calc.event_update(p_business_group_id,
5690 p_legislation_code,
5691 'PAY_GRADE_RULES_F',
5692 'REQUEST_ID',
5693 p_old_REQUEST_ID,
5694 p_new_REQUEST_ID,
5695 p_effective_date
5696 );
5697 --
5698 pay_continuous_calc.event_update(p_business_group_id,
5699 p_legislation_code,
5700 'PAY_GRADE_RULES_F',
5701 'SEQUENCE',
5702 p_old_SEQUENCE,
5703 p_new_SEQUENCE,
5704 p_effective_date
5705 );
5706 --
5707 pay_continuous_calc.event_update(p_business_group_id,
5708 p_legislation_code,
5709 'PAY_GRADE_RULES_F',
5710 'VALUE',
5711 p_old_VALUE,
5712 p_new_VALUE,
5713 p_effective_date
5714 );
5715 --
5716 pay_continuous_calc.event_update(p_business_group_id,
5717 p_legislation_code,
5718 'PAY_GRADE_RULES_F',
5719 'VALUE',
5720 p_old_VALUE,
5721 p_new_VALUE,
5722 p_effective_date
5723 );
5724 else
5725 /* OK it must be a date track change */
5726 --
5727 pay_continuous_calc.event_update(p_business_group_id,
5728 p_legislation_code,
5729 'PAY_GRADE_RULES_F',
5730 'EFFECTIVE_END_DATE',
5731 p_old_EFFECTIVE_END_DATE,
5732 p_new_EFFECTIVE_END_DATE,
5733 p_new_effective_end_date,
5734 least(p_old_effective_end_date,
5735 p_new_effective_end_date)
5736 );
5737 --
5738 pay_continuous_calc.event_update(p_business_group_id,
5739 p_legislation_code,
5740 'PAY_GRADE_RULES_F',
5741 'EFFECTIVE_START_DATE',
5742 p_old_EFFECTIVE_START_DATE,
5743 p_new_EFFECTIVE_START_DATE,
5744 p_new_effective_start_date,
5745 least(p_old_effective_start_date,
5746 p_new_effective_start_date)
5747 );
5748
5749 end if;
5750 --
5751 /* Now call the API for the affected assignments */
5752 declare
5753 l_process_event_id number;
5754 l_object_version_number number;
5755 cnt number;
5756 begin
5757 if (pay_continuous_calc.g_event_list.sz <> 0) then
5758 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
5759 pay_ppe_api.create_process_event(
5760 p_assignment_id => null,
5761 p_effective_date => g_event_list.effective_date(cnt),
5762 p_change_type => g_event_list.change_type(cnt),
5763 p_status => 'U',
5764 p_description => g_event_list.description(cnt),
5765 p_process_event_id => l_process_event_id,
5766 p_object_version_number => l_object_version_number,
5770 p_surrogate_key => p_new_GRADE_RULE_ID
5767 p_event_update_id => g_event_list.event_update_id(cnt),
5768 p_business_group_id => p_business_group_id,
5769 p_calculation_date => g_event_list.calc_date(cnt),
5771 );
5772 end loop;
5773 end if;
5774 pay_continuous_calc.g_event_list.sz := 0;
5775 end;
5776 --
5777 end PAY_GRADE_RULES_F_aru;
5778 --
5779
5780
5781 /* PER_ADDRESSES */
5782 /* name : PER_ADDRESSES_ari
5783 purpose : This is procedure that records any insert
5784 on addresses table.
5785 */
5786 Procedure PER_ADDRESSES_ari(
5787 p_business_group_id in number,
5788 p_legislation_code in varchar2,
5789 p_person_id in number,
5790 p_effective_start_date in date,
5791 p_new_address_id in number
5792 )
5793 is
5794 --
5795 cursor asgcur (p_person_id number) is
5796 select distinct assignment_id
5797 from per_assignments_f
5798 where person_id = p_person_id;
5799 --
5800 l_process_event_id number;
5801 l_proc varchar2(240) := g_package||'.per_addresses_ari';
5802 begin
5803 hr_utility.set_location(l_proc, 10);
5804 /* If the continuous calc is overriden then do nothing */
5805 if (g_override_cc = TRUE) then
5806 return;
5807 end if;
5808 --
5809 pay_continuous_calc.event_update(p_business_group_id,
5810 p_legislation_code,
5811 'PER_ADDRESSES',
5812 NULL,
5813 NULL,
5814 NULL,
5815 p_effective_start_date,
5816 p_effective_start_date,
5817 'I'
5818 );
5819 /* Now call the API for the affected assignments */
5820 declare
5821 cnt number;
5822 l_process_event_id number;
5823 l_object_version_number number;
5824 begin
5825 if (pay_continuous_calc.g_event_list.sz <> 0) then
5826 for asgrec in asgcur (p_person_id) loop
5827 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
5828 pay_ppe_api.create_process_event(
5829 p_assignment_id => asgrec.assignment_id,
5830 p_effective_date => g_event_list.effective_date(cnt),
5831 p_change_type => g_event_list.change_type(cnt),
5832 p_status => 'U',
5833 p_description => g_event_list.description(cnt),
5834 p_process_event_id => l_process_event_id,
5835 p_object_version_number => l_object_version_number,
5836 p_event_update_id => g_event_list.event_update_id(cnt),
5837 p_business_group_id => p_business_group_id,
5838 p_calculation_date => g_event_list.calc_date(cnt),
5839 p_surrogate_key => p_new_address_id
5840 );
5841 end loop;
5842 end loop;
5843 end if;
5844 pay_continuous_calc.g_event_list.sz := 0;
5845 end;
5846 hr_utility.set_location(l_proc, 900);
5847
5848 end PER_ADDRESSES_ari;
5849
5850 --
5851
5852 /* name : PER_ADDRESSES_aru
5853 purpose : This is procedure that records any updates
5854 on addresses.
5855 */
5856 procedure PER_ADDRESSES_aru(
5857 p_business_group_id in number,
5858 p_legislation_code in varchar2,
5859 p_effective_date in date ,
5860 p_old_ADDRESS_ID in NUMBER,
5861 p_new_ADDRESS_ID in NUMBER ,
5862 p_old_ADDRESS_LINE1 in VARCHAR2,
5863 p_new_ADDRESS_LINE1 in VARCHAR2 ,
5864 p_old_ADDRESS_LINE2 in VARCHAR2,
5865 p_new_ADDRESS_LINE2 in VARCHAR2 ,
5866 p_old_ADDRESS_LINE3 in VARCHAR2,
5867 p_new_ADDRESS_LINE3 in VARCHAR2 ,
5868 p_old_ADDRESS_TYPE in VARCHAR2,
5869 p_new_ADDRESS_TYPE in VARCHAR2 ,
5870 p_old_ADDR_ATTRIBUTE1 in VARCHAR2,
5871 p_new_ADDR_ATTRIBUTE1 in VARCHAR2 ,
5872 p_old_ADDR_ATTRIBUTE10 in VARCHAR2,
5873 p_new_ADDR_ATTRIBUTE10 in VARCHAR2 ,
5874 p_old_ADDR_ATTRIBUTE11 in VARCHAR2,
5875 p_new_ADDR_ATTRIBUTE11 in VARCHAR2 ,
5876 p_old_ADDR_ATTRIBUTE12 in VARCHAR2,
5877 p_new_ADDR_ATTRIBUTE12 in VARCHAR2 ,
5878 p_old_ADDR_ATTRIBUTE13 in VARCHAR2,
5879 p_new_ADDR_ATTRIBUTE13 in VARCHAR2 ,
5880 p_old_ADDR_ATTRIBUTE14 in VARCHAR2,
5881 p_new_ADDR_ATTRIBUTE14 in VARCHAR2 ,
5882 p_old_ADDR_ATTRIBUTE15 in VARCHAR2,
5883 p_new_ADDR_ATTRIBUTE15 in VARCHAR2 ,
5884 p_old_ADDR_ATTRIBUTE16 in VARCHAR2,
5885 p_new_ADDR_ATTRIBUTE16 in VARCHAR2 ,
5886 p_old_ADDR_ATTRIBUTE17 in VARCHAR2,
5887 p_new_ADDR_ATTRIBUTE17 in VARCHAR2 ,
5888 p_old_ADDR_ATTRIBUTE18 in VARCHAR2,
5889 p_new_ADDR_ATTRIBUTE18 in VARCHAR2 ,
5890 p_old_ADDR_ATTRIBUTE19 in VARCHAR2,
5891 p_new_ADDR_ATTRIBUTE19 in VARCHAR2 ,
5892 p_old_ADDR_ATTRIBUTE2 in VARCHAR2,
5893 p_new_ADDR_ATTRIBUTE2 in VARCHAR2 ,
5894 p_old_ADDR_ATTRIBUTE20 in VARCHAR2,
5898 p_old_ADDR_ATTRIBUTE4 in VARCHAR2,
5895 p_new_ADDR_ATTRIBUTE20 in VARCHAR2 ,
5896 p_old_ADDR_ATTRIBUTE3 in VARCHAR2,
5897 p_new_ADDR_ATTRIBUTE3 in VARCHAR2 ,
5899 p_new_ADDR_ATTRIBUTE4 in VARCHAR2 ,
5900 p_old_ADDR_ATTRIBUTE5 in VARCHAR2,
5901 p_new_ADDR_ATTRIBUTE5 in VARCHAR2 ,
5902 p_old_ADDR_ATTRIBUTE6 in VARCHAR2,
5903 p_new_ADDR_ATTRIBUTE6 in VARCHAR2 ,
5904 p_old_ADDR_ATTRIBUTE7 in VARCHAR2,
5905 p_new_ADDR_ATTRIBUTE7 in VARCHAR2 ,
5906 p_old_ADDR_ATTRIBUTE8 in VARCHAR2,
5907 p_new_ADDR_ATTRIBUTE8 in VARCHAR2 ,
5908 p_old_ADDR_ATTRIBUTE9 in VARCHAR2,
5909 p_new_ADDR_ATTRIBUTE9 in VARCHAR2 ,
5910 p_old_ADDR_ATTRIBUTE_CATEGORY in VARCHAR2,
5911 p_new_ADDR_ATTRIBUTE_CATEGORY in VARCHAR2 ,
5912 p_old_ADD_INFORMATION13 in VARCHAR2,
5913 p_new_ADD_INFORMATION13 in VARCHAR2 ,
5914 p_old_ADD_INFORMATION14 in VARCHAR2,
5915 p_new_ADD_INFORMATION14 in VARCHAR2 ,
5916 p_old_ADD_INFORMATION15 in VARCHAR2,
5917 p_new_ADD_INFORMATION15 in VARCHAR2 ,
5918 p_old_ADD_INFORMATION16 in VARCHAR2,
5919 p_new_ADD_INFORMATION16 in VARCHAR2 ,
5920 p_old_ADD_INFORMATION17 in VARCHAR2,
5921 p_new_ADD_INFORMATION17 in VARCHAR2 ,
5922 p_old_ADD_INFORMATION18 in VARCHAR2,
5923 p_new_ADD_INFORMATION18 in VARCHAR2 ,
5924 p_old_ADD_INFORMATION19 in VARCHAR2,
5925 p_new_ADD_INFORMATION19 in VARCHAR2 ,
5926 p_old_ADD_INFORMATION20 in VARCHAR2,
5927 p_new_ADD_INFORMATION20 in VARCHAR2 ,
5928 p_old_BUSINESS_GROUP_ID in NUMBER,
5929 p_new_BUSINESS_GROUP_ID in NUMBER ,
5930 p_old_COUNTRY in VARCHAR2,
5931 p_new_COUNTRY in VARCHAR2 ,
5932 p_old_DATE_FROM in DATE,
5933 p_new_DATE_FROM in DATE ,
5934 p_old_DATE_TO in DATE,
5935 p_new_DATE_TO in DATE ,
5936 p_old_PERSON_ID in NUMBER,
5937 p_new_PERSON_ID in NUMBER ,
5938 p_old_POSTAL_CODE in VARCHAR2,
5939 p_new_POSTAL_CODE in VARCHAR2 ,
5940 p_old_PRIMARY_FLAG in VARCHAR2,
5941 p_new_PRIMARY_FLAG in VARCHAR2 ,
5942 p_old_PROGRAM_APPLICATION_ID in NUMBER,
5943 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
5944 p_old_PROGRAM_ID in NUMBER,
5945 p_new_PROGRAM_ID in NUMBER ,
5946 p_old_PROGRAM_UPDATE_DATE in DATE,
5947 p_new_PROGRAM_UPDATE_DATE in DATE ,
5948 p_old_REGION_1 in VARCHAR2,
5949 p_new_REGION_1 in VARCHAR2 ,
5950 p_old_REGION_2 in VARCHAR2,
5951 p_new_REGION_2 in VARCHAR2 ,
5952 p_old_REGION_3 in VARCHAR2,
5953 p_new_REGION_3 in VARCHAR2 ,
5954 p_old_REQUEST_ID in NUMBER,
5955 p_new_REQUEST_ID in NUMBER ,
5956 p_old_STYLE in VARCHAR2,
5957 p_new_STYLE in VARCHAR2 ,
5958 p_old_TELEPHONE_NUMBER_1 in VARCHAR2,
5959 p_new_TELEPHONE_NUMBER_1 in VARCHAR2 ,
5960 p_old_TELEPHONE_NUMBER_2 in VARCHAR2,
5961 p_new_TELEPHONE_NUMBER_2 in VARCHAR2 ,
5962 p_old_TELEPHONE_NUMBER_3 in VARCHAR2,
5963 p_new_TELEPHONE_NUMBER_3 in VARCHAR2 ,
5964 p_old_TOWN_OR_CITY in VARCHAR2,
5965 p_new_TOWN_OR_CITY in VARCHAR2
5966 )
5967 is
5968 --
5969 cursor asgcur (p_person_id number) is
5970 select distinct assignment_id
5971 from per_assignments_f
5972 where person_id = p_person_id;
5973 --
5974 begin
5975 /* If the continuous calc is overriden then do nothing */
5976 if (g_override_cc = TRUE) then
5977 return;
5978 end if;
5979 --
5980 pay_continuous_calc.event_update(p_business_group_id,
5981 p_legislation_code,
5982 'PER_ADDRESSES',
5983 'ADDRESS_ID',
5984 p_old_ADDRESS_ID,
5985 p_new_ADDRESS_ID,
5986 p_effective_date
5987 );
5988 --
5989 pay_continuous_calc.event_update(p_business_group_id,
5990 p_legislation_code,
5991 'PER_ADDRESSES',
5992 'ADDRESS_LINE1',
5993 p_old_ADDRESS_LINE1,
5994 p_new_ADDRESS_LINE1,
5995 p_effective_date
5996 );
5997 --
5998 pay_continuous_calc.event_update(p_business_group_id,
5999 p_legislation_code,
6000 'PER_ADDRESSES',
6001 'ADDRESS_LINE2',
6002 p_old_ADDRESS_LINE2,
6003 p_new_ADDRESS_LINE2,
6004 p_effective_date
6005 );
6006 --
6007 pay_continuous_calc.event_update(p_business_group_id,
6008 p_legislation_code,
6009 'PER_ADDRESSES',
6010 'ADDRESS_LINE3',
6011 p_old_ADDRESS_LINE3,
6012 p_new_ADDRESS_LINE3,
6013 p_effective_date
6014 );
6015 --
6016 pay_continuous_calc.event_update(p_business_group_id,
6017 p_legislation_code,
6018 'PER_ADDRESSES',
6019 'ADDRESS_TYPE',
6020 p_old_ADDRESS_TYPE,
6021 p_new_ADDRESS_TYPE,
6022 p_effective_date
6023 );
6024 --
6025 pay_continuous_calc.event_update(p_business_group_id,
6029 p_old_ADDR_ATTRIBUTE1,
6026 p_legislation_code,
6027 'PER_ADDRESSES',
6028 'ADDR_ATTRIBUTE1',
6030 p_new_ADDR_ATTRIBUTE1,
6031 p_effective_date
6032 );
6033 --
6034 pay_continuous_calc.event_update(p_business_group_id,
6035 p_legislation_code,
6036 'PER_ADDRESSES',
6037 'ADDR_ATTRIBUTE10',
6038 p_old_ADDR_ATTRIBUTE10,
6039 p_new_ADDR_ATTRIBUTE10,
6040 p_effective_date
6041 );
6042 --
6043 pay_continuous_calc.event_update(p_business_group_id,
6044 p_legislation_code,
6045 'PER_ADDRESSES',
6046 'ADDR_ATTRIBUTE11',
6047 p_old_ADDR_ATTRIBUTE11,
6048 p_new_ADDR_ATTRIBUTE11,
6049 p_effective_date
6050 );
6051 --
6052 pay_continuous_calc.event_update(p_business_group_id,
6053 p_legislation_code,
6054 'PER_ADDRESSES',
6055 'ADDR_ATTRIBUTE12',
6056 p_old_ADDR_ATTRIBUTE12,
6057 p_new_ADDR_ATTRIBUTE12,
6058 p_effective_date
6059 );
6060 --
6061 pay_continuous_calc.event_update(p_business_group_id,
6062 p_legislation_code,
6063 'PER_ADDRESSES',
6064 'ADDR_ATTRIBUTE13',
6065 p_old_ADDR_ATTRIBUTE13,
6066 p_new_ADDR_ATTRIBUTE13,
6067 p_effective_date
6068 );
6069 --
6070 pay_continuous_calc.event_update(p_business_group_id,
6071 p_legislation_code,
6072 'PER_ADDRESSES',
6073 'ADDR_ATTRIBUTE14',
6074 p_old_ADDR_ATTRIBUTE14,
6075 p_new_ADDR_ATTRIBUTE14,
6076 p_effective_date
6077 );
6078 --
6079 pay_continuous_calc.event_update(p_business_group_id,
6080 p_legislation_code,
6081 'PER_ADDRESSES',
6082 'ADDR_ATTRIBUTE15',
6083 p_old_ADDR_ATTRIBUTE15,
6084 p_new_ADDR_ATTRIBUTE15,
6085 p_effective_date
6086 );
6087 --
6088 pay_continuous_calc.event_update(p_business_group_id,
6089 p_legislation_code,
6090 'PER_ADDRESSES',
6091 'ADDR_ATTRIBUTE16',
6092 p_old_ADDR_ATTRIBUTE16,
6093 p_new_ADDR_ATTRIBUTE16,
6094 p_effective_date
6095 );
6096 --
6097 pay_continuous_calc.event_update(p_business_group_id,
6098 p_legislation_code,
6099 'PER_ADDRESSES',
6100 'ADDR_ATTRIBUTE17',
6101 p_old_ADDR_ATTRIBUTE17,
6102 p_new_ADDR_ATTRIBUTE17,
6103 p_effective_date
6104 );
6105 --
6106 pay_continuous_calc.event_update(p_business_group_id,
6107 p_legislation_code,
6108 'PER_ADDRESSES',
6109 'ADDR_ATTRIBUTE18',
6110 p_old_ADDR_ATTRIBUTE18,
6111 p_new_ADDR_ATTRIBUTE18,
6112 p_effective_date
6113 );
6114 --
6115 pay_continuous_calc.event_update(p_business_group_id,
6116 p_legislation_code,
6117 'PER_ADDRESSES',
6118 'ADDR_ATTRIBUTE19',
6119 p_old_ADDR_ATTRIBUTE19,
6120 p_new_ADDR_ATTRIBUTE19,
6121 p_effective_date
6122 );
6123 --
6124 pay_continuous_calc.event_update(p_business_group_id,
6125 p_legislation_code,
6126 'PER_ADDRESSES',
6127 'ADDR_ATTRIBUTE2',
6128 p_old_ADDR_ATTRIBUTE2,
6129 p_new_ADDR_ATTRIBUTE2,
6133 pay_continuous_calc.event_update(p_business_group_id,
6130 p_effective_date
6131 );
6132 --
6134 p_legislation_code,
6135 'PER_ADDRESSES',
6136 'ADDR_ATTRIBUTE20',
6137 p_old_ADDR_ATTRIBUTE20,
6138 p_new_ADDR_ATTRIBUTE20,
6139 p_effective_date
6140 );
6141 --
6142 pay_continuous_calc.event_update(p_business_group_id,
6143 p_legislation_code,
6144 'PER_ADDRESSES',
6145 'ADDR_ATTRIBUTE3',
6146 p_old_ADDR_ATTRIBUTE3,
6147 p_new_ADDR_ATTRIBUTE3,
6148 p_effective_date
6149 );
6150 --
6151 pay_continuous_calc.event_update(p_business_group_id,
6152 p_legislation_code,
6153 'PER_ADDRESSES',
6154 'ADDR_ATTRIBUTE4',
6155 p_old_ADDR_ATTRIBUTE4,
6156 p_new_ADDR_ATTRIBUTE4,
6157 p_effective_date
6158 );
6159 --
6160 pay_continuous_calc.event_update(p_business_group_id,
6161 p_legislation_code,
6162 'PER_ADDRESSES',
6163 'ADDR_ATTRIBUTE5',
6164 p_old_ADDR_ATTRIBUTE5,
6165 p_new_ADDR_ATTRIBUTE5,
6166 p_effective_date
6167 );
6168 --
6169 pay_continuous_calc.event_update(p_business_group_id,
6170 p_legislation_code,
6171 'PER_ADDRESSES',
6172 'ADDR_ATTRIBUTE6',
6173 p_old_ADDR_ATTRIBUTE6,
6174 p_new_ADDR_ATTRIBUTE6,
6175 p_effective_date
6176 );
6177 --
6178 pay_continuous_calc.event_update(p_business_group_id,
6179 p_legislation_code,
6180 'PER_ADDRESSES',
6181 'ADDR_ATTRIBUTE7',
6182 p_old_ADDR_ATTRIBUTE7,
6183 p_new_ADDR_ATTRIBUTE7,
6184 p_effective_date
6185 );
6186 --
6187 pay_continuous_calc.event_update(p_business_group_id,
6188 p_legislation_code,
6189 'PER_ADDRESSES',
6190 'ADDR_ATTRIBUTE8',
6191 p_old_ADDR_ATTRIBUTE8,
6192 p_new_ADDR_ATTRIBUTE8,
6193 p_effective_date
6194 );
6195 --
6196 pay_continuous_calc.event_update(p_business_group_id,
6197 p_legislation_code,
6198 'PER_ADDRESSES',
6199 'ADDR_ATTRIBUTE9',
6200 p_old_ADDR_ATTRIBUTE9,
6201 p_new_ADDR_ATTRIBUTE9,
6202 p_effective_date
6203 );
6204 --
6205 pay_continuous_calc.event_update(p_business_group_id,
6206 p_legislation_code,
6207 'PER_ADDRESSES',
6208 'ADDR_ATTRIBUTE_CATEGORY',
6209 p_old_ADDR_ATTRIBUTE_CATEGORY,
6210 p_new_ADDR_ATTRIBUTE_CATEGORY,
6211 p_effective_date
6212 );
6213 --
6214 pay_continuous_calc.event_update(p_business_group_id,
6215 p_legislation_code,
6216 'PER_ADDRESSES',
6217 'ADD_INFORMATION13',
6218 p_old_ADD_INFORMATION13,
6219 p_new_ADD_INFORMATION13,
6220 p_effective_date
6221 );
6222 --
6223 pay_continuous_calc.event_update(p_business_group_id,
6224 p_legislation_code,
6225 'PER_ADDRESSES',
6226 'ADD_INFORMATION14',
6227 p_old_ADD_INFORMATION14,
6228 p_new_ADD_INFORMATION14,
6229 p_effective_date
6230 );
6231 --
6232 pay_continuous_calc.event_update(p_business_group_id,
6233 p_legislation_code,
6234 'PER_ADDRESSES',
6238 p_effective_date
6235 'ADD_INFORMATION15',
6236 p_old_ADD_INFORMATION15,
6237 p_new_ADD_INFORMATION15,
6239 );
6240 --
6241 pay_continuous_calc.event_update(p_business_group_id,
6242 p_legislation_code,
6243 'PER_ADDRESSES',
6244 'ADD_INFORMATION16',
6245 p_old_ADD_INFORMATION16,
6246 p_new_ADD_INFORMATION16,
6247 p_effective_date
6248 );
6249 --
6250 pay_continuous_calc.event_update(p_business_group_id,
6251 p_legislation_code,
6252 'PER_ADDRESSES',
6253 'ADD_INFORMATION17',
6254 p_old_ADD_INFORMATION17,
6255 p_new_ADD_INFORMATION17,
6256 p_effective_date
6257 );
6258 --
6259 pay_continuous_calc.event_update(p_business_group_id,
6260 p_legislation_code,
6261 'PER_ADDRESSES',
6262 'ADD_INFORMATION18',
6263 p_old_ADD_INFORMATION18,
6264 p_new_ADD_INFORMATION18,
6265 p_effective_date
6266 );
6267 --
6268 pay_continuous_calc.event_update(p_business_group_id,
6269 p_legislation_code,
6270 'PER_ADDRESSES',
6271 'ADD_INFORMATION19',
6272 p_old_ADD_INFORMATION19,
6273 p_new_ADD_INFORMATION19,
6274 p_effective_date
6275 );
6276 --
6277 pay_continuous_calc.event_update(p_business_group_id,
6278 p_legislation_code,
6279 'PER_ADDRESSES',
6280 'ADD_INFORMATION20',
6281 p_old_ADD_INFORMATION20,
6282 p_new_ADD_INFORMATION20,
6283 p_effective_date
6284 );
6285 --
6286 pay_continuous_calc.event_update(p_business_group_id,
6287 p_legislation_code,
6288 'PER_ADDRESSES',
6289 'BUSINESS_GROUP_ID',
6290 p_old_BUSINESS_GROUP_ID,
6291 p_new_BUSINESS_GROUP_ID,
6292 p_effective_date
6293 );
6294 --
6295 pay_continuous_calc.event_update(p_business_group_id,
6296 p_legislation_code,
6297 'PER_ADDRESSES',
6298 'COUNTRY',
6299 p_old_COUNTRY,
6300 p_new_COUNTRY,
6301 p_effective_date
6302 );
6303 --
6304 pay_continuous_calc.event_update(p_business_group_id,
6305 p_legislation_code,
6306 'PER_ADDRESSES',
6307 'DATE_FROM',
6308 p_old_DATE_FROM,
6309 p_new_DATE_FROM,
6310 p_new_date_from,
6311 least(p_old_date_from,
6312 p_new_date_from)
6313 );
6314 --
6315 pay_continuous_calc.event_update(p_business_group_id,
6316 p_legislation_code,
6317 'PER_ADDRESSES',
6318 'DATE_TO',
6319 p_old_DATE_TO,
6320 p_new_DATE_TO,
6321 nvl(p_new_date_to,p_effective_date),
6322 least(p_old_date_to,
6323 p_new_date_to)
6324 );
6325 --
6326 pay_continuous_calc.event_update(p_business_group_id,
6327 p_legislation_code,
6328 'PER_ADDRESSES',
6329 'PERSON_ID',
6330 p_old_PERSON_ID,
6331 p_new_PERSON_ID,
6332 p_effective_date
6333 );
6334 --
6335 pay_continuous_calc.event_update(p_business_group_id,
6336 p_legislation_code,
6337 'PER_ADDRESSES',
6338 'POSTAL_CODE',
6339 p_old_POSTAL_CODE,
6340 p_new_POSTAL_CODE,
6341 p_effective_date
6345 p_legislation_code,
6342 );
6343 --
6344 pay_continuous_calc.event_update(p_business_group_id,
6346 'PER_ADDRESSES',
6347 'PRIMARY_FLAG',
6348 p_old_PRIMARY_FLAG,
6349 p_new_PRIMARY_FLAG,
6350 p_effective_date
6351 );
6352 --
6353 pay_continuous_calc.event_update(p_business_group_id,
6354 p_legislation_code,
6355 'PER_ADDRESSES',
6356 'PROGRAM_APPLICATION_ID',
6357 p_old_PROGRAM_APPLICATION_ID,
6358 p_new_PROGRAM_APPLICATION_ID,
6359 p_effective_date
6360 );
6361 --
6362 pay_continuous_calc.event_update(p_business_group_id,
6363 p_legislation_code,
6364 'PER_ADDRESSES',
6365 'PROGRAM_ID',
6366 p_old_PROGRAM_ID,
6367 p_new_PROGRAM_ID,
6368 p_effective_date
6369 );
6370 --
6371 pay_continuous_calc.event_update(p_business_group_id,
6372 p_legislation_code,
6373 'PER_ADDRESSES',
6374 'PROGRAM_UPDATE_DATE',
6375 p_old_PROGRAM_UPDATE_DATE,
6376 p_new_PROGRAM_UPDATE_DATE,
6377 p_effective_date
6378 );
6379 --
6380 pay_continuous_calc.event_update(p_business_group_id,
6381 p_legislation_code,
6382 'PER_ADDRESSES',
6383 'REGION_1',
6384 p_old_REGION_1,
6385 p_new_REGION_1,
6386 p_effective_date
6387 );
6388 --
6389 pay_continuous_calc.event_update(p_business_group_id,
6390 p_legislation_code,
6391 'PER_ADDRESSES',
6392 'REGION_2',
6393 p_old_REGION_2,
6394 p_new_REGION_2,
6395 p_effective_date
6396 );
6397 --
6398 pay_continuous_calc.event_update(p_business_group_id,
6399 p_legislation_code,
6400 'PER_ADDRESSES',
6401 'REGION_3',
6402 p_old_REGION_3,
6403 p_new_REGION_3,
6404 p_effective_date
6405 );
6406 --
6407 pay_continuous_calc.event_update(p_business_group_id,
6408 p_legislation_code,
6409 'PER_ADDRESSES',
6410 'REQUEST_ID',
6411 p_old_REQUEST_ID,
6412 p_new_REQUEST_ID,
6413 p_effective_date
6414 );
6415 --
6416 pay_continuous_calc.event_update(p_business_group_id,
6417 p_legislation_code,
6418 'PER_ADDRESSES',
6419 'STYLE',
6420 p_old_STYLE,
6421 p_new_STYLE,
6422 p_effective_date
6423 );
6424 --
6425 pay_continuous_calc.event_update(p_business_group_id,
6426 p_legislation_code,
6427 'PER_ADDRESSES',
6428 'TELEPHONE_NUMBER_1',
6429 p_old_TELEPHONE_NUMBER_1,
6430 p_new_TELEPHONE_NUMBER_1,
6431 p_effective_date
6432 );
6433 --
6434 pay_continuous_calc.event_update(p_business_group_id,
6435 p_legislation_code,
6436 'PER_ADDRESSES',
6437 'TELEPHONE_NUMBER_2',
6438 p_old_TELEPHONE_NUMBER_2,
6439 p_new_TELEPHONE_NUMBER_2,
6440 p_effective_date
6441 );
6442 --
6443 pay_continuous_calc.event_update(p_business_group_id,
6444 p_legislation_code,
6445 'PER_ADDRESSES',
6446 'TELEPHONE_NUMBER_3',
6447 p_old_TELEPHONE_NUMBER_3,
6448 p_new_TELEPHONE_NUMBER_3,
6452 pay_continuous_calc.event_update(p_business_group_id,
6449 p_effective_date
6450 );
6451 --
6453 p_legislation_code,
6454 'PER_ADDRESSES',
6455 'TOWN_OR_CITY',
6456 p_old_TOWN_OR_CITY,
6457 p_new_TOWN_OR_CITY,
6458 p_effective_date
6459 );
6460 --
6461 /* Now call the API for the affected assignments */
6462 declare
6463 l_process_event_id number;
6464 l_object_version_number number;
6465 cnt number;
6466 begin
6467 if (pay_continuous_calc.g_event_list.sz <> 0) then
6468 for asgrec in asgcur (p_old_PERSON_ID) loop
6469 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6470 pay_ppe_api.create_process_event(
6471 p_assignment_id => asgrec.assignment_id,
6472 p_effective_date => g_event_list.effective_date(cnt),
6473 p_change_type => g_event_list.change_type(cnt),
6474 p_status => 'U',
6475 p_description => g_event_list.description(cnt),
6476 p_process_event_id => l_process_event_id,
6477 p_object_version_number => l_object_version_number,
6478 p_event_update_id => g_event_list.event_update_id(cnt),
6479 p_business_group_id => p_business_group_id,
6480 p_calculation_date => g_event_list.calc_date(cnt),
6481 p_surrogate_key => p_old_address_id
6482 );
6483 end loop;
6484 end loop;
6485 end if;
6486 pay_continuous_calc.g_event_list.sz := 0;
6487 end;
6488 --
6489 end PER_ADDRESSES_aru;
6490 --
6491
6492 /* PER_ALL_PEOPLE_F */
6493 /* name : PER_ALL_PEOPLE_F_ard
6494 purpose : This is procedure that records any Delete on people.
6495 */
6496 --
6497 procedure PER_ALL_PEOPLE_F_ard(
6498 p_business_group_id in number,
6499 p_legislation_code in varchar2,
6500 p_old_person_id in number,
6501 p_old_effective_start_date in date,
6502 p_new_effective_start_date in date,
6503 p_old_effective_end_date in date,
6504 p_new_effective_end_date in date
6505 )
6506 is
6507 l_process_event_id number;
6508 l_object_version_number number;
6509 l_effective_date date;
6510 l_proc varchar2(240) := g_package||'.PER_ALL_PEOPLE_F_ard';
6511 --
6512 cursor asgcur (p_person_id number) is
6513 select distinct assignment_id
6514 from per_assignments_f
6515 where person_id = p_person_id;
6516 --
6517 begin
6518 hr_utility.set_location(l_proc, 10);
6519 /* If the continuous calc is overriden then do nothing */
6520 if (g_override_cc = TRUE) then
6521 return;
6522 end if;
6523
6524 pay_continuous_calc.event_update(p_business_group_id,
6525 p_legislation_code,
6526 'PER_ALL_PEOPLE_F',
6527 null,
6528 null,
6529 null,
6530 p_old_effective_start_date,
6531 p_old_effective_start_date,
6532 'D' --l_mode
6533 );
6534
6535 /* Now call the API for the affected assignments */
6536 declare
6537 cnt number;
6538 l_process_event_id number;
6539 l_object_version_number number;
6540 begin
6541 if (pay_continuous_calc.g_event_list.sz <> 0) then
6542 hr_utility.trace('> With in Create Process Event: ');
6543 for asgrec in asgcur (p_old_PERSON_ID) loop
6544 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6545 pay_ppe_api.create_process_event(
6546 p_assignment_id => asgrec.assignment_id,
6547 p_effective_date => g_event_list.effective_date(cnt),
6548 p_change_type => g_event_list.change_type(cnt),
6549 p_status => 'U',
6550 p_description => g_event_list.description(cnt),
6551 p_process_event_id => l_process_event_id,
6552 p_object_version_number => l_object_version_number,
6553 p_event_update_id => g_event_list.event_update_id(cnt),
6554 p_surrogate_key => p_old_person_id,
6555 p_calculation_date => g_event_list.calc_date(cnt),
6559
6556 p_business_group_id => p_business_group_id
6557 );
6558
6560 end loop;
6561 end loop;
6562 end if;
6563 pay_continuous_calc.g_event_list.sz := 0;
6564 end;
6565 hr_utility.set_location(l_proc, 900);
6566 END PER_ALL_PEOPLE_F_ard;
6567
6568 /* PER_SPINAL_POINT_PLACEMENTS_F */
6569 /* name : PER_SPINAL_POINT_PLCMTS_F_ard
6570 purpose : This is procedure that records any Delete on Spinal Point Placements.
6571 */
6572 --
6573 procedure PER_SPIN_PNT_PLACEMENTS_F_ard(
6574 p_business_group_id in number,
6575 p_legislation_code in varchar2,
6576 p_old_placement_id in number,
6577 p_old_effective_start_date in date,
6578 p_new_effective_start_date in date,
6579 p_old_effective_end_date in date,
6580 p_new_effective_end_date in date,
6581 p_old_assignment_id in number
6582 )
6583 is
6584 l_process_event_id number;
6585 l_object_version_number number;
6586 l_proc varchar2(240) := g_package||'.PER_SPIN_PNT_PLACEMENTS_F_ard';
6587 begin
6588 hr_utility.set_location(l_proc, 10);
6589 /* If the continuous calc is overriden then do nothing */
6590 if (g_override_cc = TRUE) then
6591 return;
6592 end if;
6593 --
6594
6595
6596 pay_continuous_calc.event_update(p_business_group_id,
6597 p_legislation_code,
6598 'PER_SPINAL_POINT_PLACEMENTS_F',
6599 null,
6600 null,
6601 null,
6602 p_old_effective_start_date,
6603 p_old_effective_start_date,
6604 'D'
6605 );
6606
6607 /* Now call the API for the affected assignments */
6608 declare
6609 cnt number;
6610 l_process_event_id number;
6611 l_object_version_number number;
6612 begin
6613 if (pay_continuous_calc.g_event_list.sz <> 0) then
6614 hr_utility.trace('> With in Create Process Event: ');
6615 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6616 pay_ppe_api.create_process_event(
6617 p_assignment_id => p_old_assignment_id,
6618 p_effective_date => g_event_list.effective_date(cnt),
6619 p_change_type => g_event_list.change_type(cnt),
6620 p_status => 'U',
6621 p_description => g_event_list.description(cnt),
6622 p_process_event_id => l_process_event_id,
6623 p_object_version_number => l_object_version_number,
6624 p_event_update_id => g_event_list.event_update_id(cnt),
6625 p_surrogate_key => p_old_placement_id,
6626 p_calculation_date => g_event_list.calc_date(cnt),
6627 p_business_group_id => p_business_group_id
6628 );
6629
6630
6631 end loop;
6632 end if;
6633 pay_continuous_calc.g_event_list.sz := 0;
6634 end;
6635 hr_utility.set_location(l_proc, 900);
6636 END PER_SPIN_PNT_PLACEMENTS_F_ard;
6637
6638
6639 /* name : PER_SPINAL_POINT_PLCMTS_F_ari -- Added for bug 6265962
6640 purpose : This is procedure that records any Insert on Spinal Point Placements.
6641 */
6642 --
6643 procedure PER_SPIN_PNT_PLACEMENTS_F_ari(
6644 p_business_group_id in number,
6645 p_legislation_code in varchar2,
6646 p_placement_id in number,
6647 p_assignment_id in number,
6648 p_effective_start_date in date
6649 )
6650 is
6651 l_process_event_id number;
6652 l_object_version_number number;
6653 l_proc varchar2(240) := g_package||'.PER_SPIN_PNT_PLACEMENTS_F_ari';
6654 begin
6655 hr_utility.set_location(l_proc, 10);
6656 /* If the continuous calc is overriden then do nothing */
6657 if (g_override_cc = TRUE) then
6658 return;
6659 end if;
6660 --
6661
6662 pay_continuous_calc.event_update(p_business_group_id,
6663 p_legislation_code,
6664 'PER_SPINAL_POINT_PLACEMENTS_F',
6665 null,
6666 null,
6667 null,
6668 p_effective_start_date,
6669 p_effective_start_date,
6670 'I'
6671 );
6672
6673 /* Now call the API for the affected assignments */
6674 declare
6675 cnt number;
6679 if (pay_continuous_calc.g_event_list.sz <> 0) then
6676 l_process_event_id number;
6677 l_object_version_number number;
6678 begin
6680 hr_utility.trace('> With in Create Process Event: ');
6681 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6682 pay_ppe_api.create_process_event(
6683 p_assignment_id => p_assignment_id,
6684 p_effective_date => g_event_list.effective_date(cnt),
6685 p_change_type => g_event_list.change_type(cnt),
6686 p_status => 'U',
6687 p_description => g_event_list.description(cnt),
6688 p_process_event_id => l_process_event_id,
6689 p_object_version_number => l_object_version_number,
6690 p_event_update_id => g_event_list.event_update_id(cnt),
6691 p_surrogate_key => p_placement_id,
6692 p_calculation_date => g_event_list.calc_date(cnt),
6693 p_business_group_id => p_business_group_id
6694 );
6695
6696
6697 end loop;
6698 end if;
6699 pay_continuous_calc.g_event_list.sz := 0;
6700 end;
6701 hr_utility.set_location(l_proc, 900);
6702 END PER_SPIN_PNT_PLACEMENTS_F_ari;
6703 --
6704
6705 /* PAY_GRADE_RULES_F */
6706 /* name : PAY_GRADE_RULES_F_ard
6707 purpose : This is procedure that records any Delete on Grade Rules.
6708 */
6709 --
6710
6711 procedure PAY_GRADE_RULES_F_ard(
6712 p_business_group_id in number,
6713 p_legislation_code in varchar2,
6714 p_old_grade_rule_id in number,
6715 p_old_effective_start_date in date,
6716 p_new_effective_start_date in date,
6717 p_old_effective_end_date in date,
6718 p_new_effective_end_date in date
6719 )
6720 is
6721 l_process_event_id number;
6722 l_object_version_number number;
6723 l_proc varchar2(240) := g_package||'.PAY_GRADE_RULES_F_ard';
6724 begin
6725 hr_utility.set_location(l_proc, 10);
6726 /* If the continuous calc is overriden then do nothing */
6727 if (g_override_cc = TRUE) then
6728 return;
6729 end if;
6730
6731 pay_continuous_calc.event_update(p_business_group_id,
6732 p_legislation_code,
6733 'PAY_GRADE_RULES_F',
6734 null,
6735 null,
6736 null,
6737 p_old_effective_start_date,
6738 p_old_effective_start_date,
6739 'D' --l_mode
6740 );
6741
6742 /* Now call the API for the affected assignments */
6743 declare
6744 cnt number;
6745 l_process_event_id number;
6746 l_object_version_number number;
6747 begin
6748 if (pay_continuous_calc.g_event_list.sz <> 0) then
6749 hr_utility.trace('> With in Create Process Event: ');
6750 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
6751 pay_ppe_api.create_process_event(
6752 p_assignment_id => NULL,
6753 p_effective_date => g_event_list.effective_date(cnt),
6754 p_change_type => g_event_list.change_type(cnt),
6755 p_status => 'U',
6756 p_description => g_event_list.description(cnt),
6757 p_process_event_id => l_process_event_id,
6758 p_object_version_number => l_object_version_number,
6759 p_event_update_id => g_event_list.event_update_id(cnt),
6760 p_surrogate_key => p_old_grade_rule_id,
6761 p_calculation_date => g_event_list.calc_date(cnt),
6762 p_business_group_id => p_business_group_id
6763 );
6764
6765
6766 end loop;
6767 end if;
6768 pay_continuous_calc.g_event_list.sz := 0;
6769 end;
6770 hr_utility.set_location(l_proc, 900);
6771 END PAY_GRADE_RULES_F_ard;
6772
6773 --
6774 /* PER_ALL_PEOPLE_F */
6775 /* name : PER_ALL_PEOPLE_F_aru
6776 purpose : This is procedure that records any updates
6777 on people.
6778 */
6779 procedure PER_ALL_PEOPLE_F_aru(
6780 p_business_group_id in number,
6781 p_legislation_code in varchar2,
6782 p_effective_date in date ,
6783 p_old_APPLICANT_NUMBER in VARCHAR2,
6784 p_new_APPLICANT_NUMBER in VARCHAR2 ,
6785 p_old_ATTRIBUTE1 in VARCHAR2,
6786 p_new_ATTRIBUTE1 in VARCHAR2 ,
6787 p_old_ATTRIBUTE10 in VARCHAR2,
6788 p_new_ATTRIBUTE10 in VARCHAR2 ,
6792 p_new_ATTRIBUTE12 in VARCHAR2 ,
6789 p_old_ATTRIBUTE11 in VARCHAR2,
6790 p_new_ATTRIBUTE11 in VARCHAR2 ,
6791 p_old_ATTRIBUTE12 in VARCHAR2,
6793 p_old_ATTRIBUTE13 in VARCHAR2,
6794 p_new_ATTRIBUTE13 in VARCHAR2 ,
6795 p_old_ATTRIBUTE14 in VARCHAR2,
6796 p_new_ATTRIBUTE14 in VARCHAR2 ,
6797 p_old_ATTRIBUTE15 in VARCHAR2,
6798 p_new_ATTRIBUTE15 in VARCHAR2 ,
6799 p_old_ATTRIBUTE16 in VARCHAR2,
6800 p_new_ATTRIBUTE16 in VARCHAR2 ,
6801 p_old_ATTRIBUTE17 in VARCHAR2,
6802 p_new_ATTRIBUTE17 in VARCHAR2 ,
6803 p_old_ATTRIBUTE18 in VARCHAR2,
6804 p_new_ATTRIBUTE18 in VARCHAR2 ,
6805 p_old_ATTRIBUTE19 in VARCHAR2,
6806 p_new_ATTRIBUTE19 in VARCHAR2 ,
6807 p_old_ATTRIBUTE2 in VARCHAR2,
6808 p_new_ATTRIBUTE2 in VARCHAR2 ,
6809 p_old_ATTRIBUTE20 in VARCHAR2,
6810 p_new_ATTRIBUTE20 in VARCHAR2 ,
6811 p_old_ATTRIBUTE21 in VARCHAR2,
6812 p_new_ATTRIBUTE21 in VARCHAR2 ,
6813 p_old_ATTRIBUTE22 in VARCHAR2,
6814 p_new_ATTRIBUTE22 in VARCHAR2 ,
6815 p_old_ATTRIBUTE23 in VARCHAR2,
6816 p_new_ATTRIBUTE23 in VARCHAR2 ,
6817 p_old_ATTRIBUTE24 in VARCHAR2,
6818 p_new_ATTRIBUTE24 in VARCHAR2 ,
6819 p_old_ATTRIBUTE25 in VARCHAR2,
6820 p_new_ATTRIBUTE25 in VARCHAR2 ,
6821 p_old_ATTRIBUTE26 in VARCHAR2,
6822 p_new_ATTRIBUTE26 in VARCHAR2 ,
6823 p_old_ATTRIBUTE27 in VARCHAR2,
6824 p_new_ATTRIBUTE27 in VARCHAR2 ,
6825 p_old_ATTRIBUTE28 in VARCHAR2,
6826 p_new_ATTRIBUTE28 in VARCHAR2 ,
6827 p_old_ATTRIBUTE29 in VARCHAR2,
6828 p_new_ATTRIBUTE29 in VARCHAR2 ,
6829 p_old_ATTRIBUTE3 in VARCHAR2,
6830 p_new_ATTRIBUTE3 in VARCHAR2 ,
6831 p_old_ATTRIBUTE30 in VARCHAR2,
6832 p_new_ATTRIBUTE30 in VARCHAR2 ,
6833 p_old_ATTRIBUTE4 in VARCHAR2,
6834 p_new_ATTRIBUTE4 in VARCHAR2 ,
6835 p_old_ATTRIBUTE5 in VARCHAR2,
6836 p_new_ATTRIBUTE5 in VARCHAR2 ,
6837 p_old_ATTRIBUTE6 in VARCHAR2,
6838 p_new_ATTRIBUTE6 in VARCHAR2 ,
6839 p_old_ATTRIBUTE7 in VARCHAR2,
6840 p_new_ATTRIBUTE7 in VARCHAR2 ,
6841 p_old_ATTRIBUTE8 in VARCHAR2,
6842 p_new_ATTRIBUTE8 in VARCHAR2 ,
6843 p_old_ATTRIBUTE9 in VARCHAR2,
6844 p_new_ATTRIBUTE9 in VARCHAR2 ,
6845 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
6846 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
6847 p_old_BACKGROUND_CHECK_STATUS in VARCHAR2,
6848 p_new_BACKGROUND_CHECK_STATUS in VARCHAR2 ,
6849 p_old_BACKGROUND_DATE_CHECK in DATE,
6850 p_new_BACKGROUND_DATE_CHECK in DATE ,
6851 p_old_BENEFIT_GROUP_ID in NUMBER,
6852 p_new_BENEFIT_GROUP_ID in NUMBER ,
6853 p_old_BLOOD_TYPE in VARCHAR2,
6854 p_new_BLOOD_TYPE in VARCHAR2 ,
6855 p_old_BUSINESS_GROUP_ID in NUMBER,
6856 p_new_BUSINESS_GROUP_ID in NUMBER ,
6857 p_old_COMMENT_ID in NUMBER,
6858 p_new_COMMENT_ID in NUMBER ,
6859 p_old_COORD_BEN_MED_PLN_NO in VARCHAR2,
6860 p_new_COORD_BEN_MED_PLN_NO in VARCHAR2 ,
6861 p_old_COORD_BEN_NO_CVG_FLAG in VARCHAR2,
6862 p_new_COORD_BEN_NO_CVG_FLAG in VARCHAR2 ,
6863 p_old_CORRESPONDENCE_LANGUAGE in VARCHAR2,
6864 p_new_CORRESPONDENCE_LANGUAGE in VARCHAR2 ,
6865 p_old_COUNTRY_OF_BIRTH in VARCHAR2,
6866 p_new_COUNTRY_OF_BIRTH in VARCHAR2 ,
6867 p_old_CURRENT_APPLICANT_FLAG in VARCHAR2,
6868 p_new_CURRENT_APPLICANT_FLAG in VARCHAR2 ,
6869 p_old_CURRENT_EMPLOYEE_FLAG in VARCHAR2,
6870 p_new_CURRENT_EMPLOYEE_FLAG in VARCHAR2 ,
6871 p_old_CURRENT_EMP_OR_APL_FLAG in VARCHAR2,
6872 p_new_CURRENT_EMP_OR_APL_FLAG in VARCHAR2 ,
6873 p_old_DATE_EMPLOYEE_DATA_VERIF in DATE,
6874 p_new_DATE_EMPLOYEE_DATA_VERIF in DATE ,
6875 p_old_DATE_OF_BIRTH in DATE,
6876 p_new_DATE_OF_BIRTH in DATE ,
6877 p_old_DATE_OF_DEATH in DATE,
6878 p_new_DATE_OF_DEATH in DATE ,
6879 p_old_DPDNT_ADOPTION_DATE in DATE,
6880 p_new_DPDNT_ADOPTION_DATE in DATE ,
6881 p_old_DPDNT_VLNTRY_SVCE_FLAG in VARCHAR2,
6882 p_new_DPDNT_VLNTRY_SVCE_FLAG in VARCHAR2 ,
6883 p_old_EMAIL_ADDRESS in VARCHAR2,
6884 p_new_EMAIL_ADDRESS in VARCHAR2 ,
6885 p_old_EMPLOYEE_NUMBER in VARCHAR2,
6886 p_new_EMPLOYEE_NUMBER in VARCHAR2 ,
6887 p_old_EXPENSE_CHECK_SEND_TO_AD in VARCHAR2,
6888 p_new_EXPENSE_CHECK_SEND_TO_AD in VARCHAR2 ,
6889 p_old_FAST_PATH_EMPLOYEE in VARCHAR2,
6890 p_new_FAST_PATH_EMPLOYEE in VARCHAR2 ,
6891 p_old_FIRST_NAME in VARCHAR2,
6892 p_new_FIRST_NAME in VARCHAR2 ,
6893 p_old_FTE_CAPACITY in NUMBER,
6894 p_new_FTE_CAPACITY in NUMBER ,
6895 p_old_FULL_NAME in VARCHAR2,
6896 p_new_FULL_NAME in VARCHAR2 ,
6897 p_old_GLOBAL_PERSON_ID in VARCHAR2,
6898 p_new_GLOBAL_PERSON_ID in VARCHAR2 ,
6899 p_old_HOLD_APPLICANT_DATE_UNTI in DATE,
6900 p_new_HOLD_APPLICANT_DATE_UNTI in DATE ,
6901 p_old_HONORS in VARCHAR2,
6902 p_new_HONORS in VARCHAR2 ,
6903 p_old_INTERNAL_LOCATION in VARCHAR2,
6904 p_new_INTERNAL_LOCATION in VARCHAR2 ,
6905 p_old_KNOWN_AS in VARCHAR2,
6906 p_new_KNOWN_AS in VARCHAR2 ,
6907 p_old_LAST_MEDICAL_TEST_BY in VARCHAR2,
6908 p_new_LAST_MEDICAL_TEST_BY in VARCHAR2 ,
6909 p_old_LAST_MEDICAL_TEST_DATE in DATE,
6910 p_new_LAST_MEDICAL_TEST_DATE in DATE ,
6911 p_old_LAST_NAME in VARCHAR2,
6912 p_new_LAST_NAME in VARCHAR2 ,
6913 p_old_MAILSTOP in VARCHAR2,
6914 p_new_MAILSTOP in VARCHAR2 ,
6915 p_old_MARITAL_STATUS in VARCHAR2,
6916 p_new_MARITAL_STATUS in VARCHAR2 ,
6917 p_old_MIDDLE_NAMES in VARCHAR2,
6918 p_new_MIDDLE_NAMES in VARCHAR2 ,
6919 p_old_NATIONALITY in VARCHAR2,
6920 p_new_NATIONALITY in VARCHAR2 ,
6921 p_old_NATIONAL_IDENTIFIER in VARCHAR2,
6922 p_new_NATIONAL_IDENTIFIER in VARCHAR2 ,
6923 p_old_OFFICE_NUMBER in VARCHAR2,
6924 p_new_OFFICE_NUMBER in VARCHAR2 ,
6925 p_old_ON_MILITARY_SERVICE in VARCHAR2,
6926 p_new_ON_MILITARY_SERVICE in VARCHAR2 ,
6927 p_old_ORDER_NAME in VARCHAR2,
6928 p_new_ORDER_NAME in VARCHAR2 ,
6932 p_new_PERSON_ID in NUMBER ,
6929 p_old_ORIGINAL_DATE_OF_HIRE in DATE,
6930 p_new_ORIGINAL_DATE_OF_HIRE in DATE ,
6931 p_old_PERSON_ID in NUMBER,
6933 p_old_PERSON_TYPE_ID in NUMBER,
6934 p_new_PERSON_TYPE_ID in NUMBER ,
6935 p_old_PER_INFORMATION1 in VARCHAR2,
6936 p_new_PER_INFORMATION1 in VARCHAR2 ,
6937 p_old_PER_INFORMATION10 in VARCHAR2,
6938 p_new_PER_INFORMATION10 in VARCHAR2 ,
6939 p_old_PER_INFORMATION11 in VARCHAR2,
6940 p_new_PER_INFORMATION11 in VARCHAR2 ,
6941 p_old_PER_INFORMATION12 in VARCHAR2,
6942 p_new_PER_INFORMATION12 in VARCHAR2 ,
6943 p_old_PER_INFORMATION13 in VARCHAR2,
6944 p_new_PER_INFORMATION13 in VARCHAR2 ,
6945 p_old_PER_INFORMATION14 in VARCHAR2,
6946 p_new_PER_INFORMATION14 in VARCHAR2 ,
6947 p_old_PER_INFORMATION15 in VARCHAR2,
6948 p_new_PER_INFORMATION15 in VARCHAR2 ,
6949 p_old_PER_INFORMATION16 in VARCHAR2,
6950 p_new_PER_INFORMATION16 in VARCHAR2 ,
6951 p_old_PER_INFORMATION17 in VARCHAR2,
6952 p_new_PER_INFORMATION17 in VARCHAR2 ,
6953 p_old_PER_INFORMATION18 in VARCHAR2,
6954 p_new_PER_INFORMATION18 in VARCHAR2 ,
6955 p_old_PER_INFORMATION19 in VARCHAR2,
6956 p_new_PER_INFORMATION19 in VARCHAR2 ,
6957 p_old_PER_INFORMATION2 in VARCHAR2,
6958 p_new_PER_INFORMATION2 in VARCHAR2 ,
6959 p_old_PER_INFORMATION20 in VARCHAR2,
6960 p_new_PER_INFORMATION20 in VARCHAR2 ,
6961 p_old_PER_INFORMATION21 in VARCHAR2,
6962 p_new_PER_INFORMATION21 in VARCHAR2 ,
6963 p_old_PER_INFORMATION22 in VARCHAR2,
6964 p_new_PER_INFORMATION22 in VARCHAR2 ,
6965 p_old_PER_INFORMATION23 in VARCHAR2,
6966 p_new_PER_INFORMATION23 in VARCHAR2 ,
6967 p_old_PER_INFORMATION24 in VARCHAR2,
6968 p_new_PER_INFORMATION24 in VARCHAR2 ,
6969 p_old_PER_INFORMATION25 in VARCHAR2,
6970 p_new_PER_INFORMATION25 in VARCHAR2 ,
6971 p_old_PER_INFORMATION26 in VARCHAR2,
6972 p_new_PER_INFORMATION26 in VARCHAR2 ,
6973 p_old_PER_INFORMATION27 in VARCHAR2,
6974 p_new_PER_INFORMATION27 in VARCHAR2 ,
6975 p_old_PER_INFORMATION28 in VARCHAR2,
6976 p_new_PER_INFORMATION28 in VARCHAR2 ,
6977 p_old_PER_INFORMATION29 in VARCHAR2,
6978 p_new_PER_INFORMATION29 in VARCHAR2 ,
6979 p_old_PER_INFORMATION3 in VARCHAR2,
6980 p_new_PER_INFORMATION3 in VARCHAR2 ,
6981 p_old_PER_INFORMATION30 in VARCHAR2,
6982 p_new_PER_INFORMATION30 in VARCHAR2 ,
6983 p_old_PER_INFORMATION4 in VARCHAR2,
6984 p_new_PER_INFORMATION4 in VARCHAR2 ,
6985 p_old_PER_INFORMATION5 in VARCHAR2,
6986 p_new_PER_INFORMATION5 in VARCHAR2 ,
6987 p_old_PER_INFORMATION6 in VARCHAR2,
6988 p_new_PER_INFORMATION6 in VARCHAR2 ,
6989 p_old_PER_INFORMATION7 in VARCHAR2,
6990 p_new_PER_INFORMATION7 in VARCHAR2 ,
6991 p_old_PER_INFORMATION8 in VARCHAR2,
6992 p_new_PER_INFORMATION8 in VARCHAR2 ,
6993 p_old_PER_INFORMATION9 in VARCHAR2,
6994 p_new_PER_INFORMATION9 in VARCHAR2 ,
6995 p_old_PER_INFORMATION_CATEGORY in VARCHAR2,
6996 p_new_PER_INFORMATION_CATEGORY in VARCHAR2 ,
6997 p_old_PREVIOUS_LAST_NAME in VARCHAR2,
6998 p_new_PREVIOUS_LAST_NAME in VARCHAR2 ,
6999 p_old_PRE_NAME_ADJUNCT in VARCHAR2,
7000 p_new_PRE_NAME_ADJUNCT in VARCHAR2 ,
7001 p_old_PROGRAM_APPLICATION_ID in NUMBER,
7002 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
7003 p_old_PROGRAM_ID in NUMBER,
7004 p_new_PROGRAM_ID in NUMBER ,
7005 p_old_PROGRAM_UPDATE_DATE in DATE,
7006 p_new_PROGRAM_UPDATE_DATE in DATE ,
7007 p_old_PROJECTED_START_DATE in DATE,
7008 p_new_PROJECTED_START_DATE in DATE ,
7009 p_old_RECEIPT_OF_DEATH_CERT_DA in DATE,
7010 p_new_RECEIPT_OF_DEATH_CERT_DA in DATE ,
7011 p_old_REGION_OF_BIRTH in VARCHAR2,
7012 p_new_REGION_OF_BIRTH in VARCHAR2 ,
7013 p_old_REGISTERED_DISABLED_FLAG in VARCHAR2,
7014 p_new_REGISTERED_DISABLED_FLAG in VARCHAR2 ,
7015 p_old_REHIRE_AUTHORIZOR in VARCHAR2,
7016 p_new_REHIRE_AUTHORIZOR in VARCHAR2 ,
7017 p_old_REHIRE_REASON in VARCHAR2,
7018 p_new_REHIRE_REASON in VARCHAR2 ,
7019 p_old_REHIRE_RECOMMENDATION in VARCHAR2,
7020 p_new_REHIRE_RECOMMENDATION in VARCHAR2 ,
7021 p_old_REQUEST_ID in NUMBER,
7022 p_new_REQUEST_ID in NUMBER ,
7023 p_old_RESUME_EXISTS in VARCHAR2,
7024 p_new_RESUME_EXISTS in VARCHAR2 ,
7025 p_old_RESUME_LAST_UPDATED in DATE,
7026 p_new_RESUME_LAST_UPDATED in DATE ,
7027 p_old_SECOND_PASSPORT_EXISTS in VARCHAR2,
7028 p_new_SECOND_PASSPORT_EXISTS in VARCHAR2 ,
7029 p_old_SEX in VARCHAR2,
7030 p_new_SEX in VARCHAR2 ,
7031 p_old_START_DATE in DATE,
7032 p_new_START_DATE in DATE ,
7033 p_old_STUDENT_STATUS in VARCHAR2,
7034 p_new_STUDENT_STATUS in VARCHAR2 ,
7035 p_old_SUFFIX in VARCHAR2,
7036 p_new_SUFFIX in VARCHAR2 ,
7037 p_old_TITLE in VARCHAR2,
7038 p_new_TITLE in VARCHAR2 ,
7039 p_old_TOWN_OF_BIRTH in VARCHAR2,
7040 p_new_TOWN_OF_BIRTH in VARCHAR2 ,
7041 p_old_USES_TOBACCO_FLAG in VARCHAR2,
7042 p_new_USES_TOBACCO_FLAG in VARCHAR2 ,
7043 p_old_VENDOR_ID in NUMBER,
7044 p_new_VENDOR_ID in NUMBER ,
7045 p_old_WORK_SCHEDULE in VARCHAR2,
7046 p_new_WORK_SCHEDULE in VARCHAR2 ,
7047 p_old_WORK_TELEPHONE in VARCHAR2,
7048 p_new_WORK_TELEPHONE in VARCHAR2 ,
7049 p_old_EFFECTIVE_END_DATE in DATE,
7050 p_new_EFFECTIVE_END_DATE in DATE ,
7051 p_old_EFFECTIVE_START_DATE in DATE,
7052 p_new_EFFECTIVE_START_DATE in DATE
7053 )
7054 is
7055 --
7056 cursor asgcur (p_person_id number) is
7057 select distinct assignment_id
7058 from per_assignments_f
7059 where person_id = p_person_id;
7060 --
7061 begin
7062 /* If the continuous calc is overriden then do nothing */
7063 if (g_override_cc = TRUE) then
7064 return;
7065 end if;
7066 --
7067 /* If the dates havent changed it must be a correction */
7071 pay_continuous_calc.event_update(p_business_group_id,
7068 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
7069 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
7070 --
7072 p_legislation_code,
7073 'PER_ALL_PEOPLE_F',
7074 'APPLICANT_NUMBER',
7075 p_old_APPLICANT_NUMBER,
7076 p_new_APPLICANT_NUMBER,
7077 p_effective_date
7078 );
7079 --
7080 pay_continuous_calc.event_update(p_business_group_id,
7081 p_legislation_code,
7082 'PER_ALL_PEOPLE_F',
7083 'ATTRIBUTE1',
7084 p_old_ATTRIBUTE1,
7085 p_new_ATTRIBUTE1,
7086 p_effective_date
7087 );
7088 --
7089 pay_continuous_calc.event_update(p_business_group_id,
7090 p_legislation_code,
7091 'PER_ALL_PEOPLE_F',
7092 'ATTRIBUTE10',
7093 p_old_ATTRIBUTE10,
7094 p_new_ATTRIBUTE10,
7095 p_effective_date
7096 );
7097 --
7098 pay_continuous_calc.event_update(p_business_group_id,
7099 p_legislation_code,
7100 'PER_ALL_PEOPLE_F',
7101 'ATTRIBUTE11',
7102 p_old_ATTRIBUTE11,
7103 p_new_ATTRIBUTE11,
7104 p_effective_date
7105 );
7106 --
7107 pay_continuous_calc.event_update(p_business_group_id,
7108 p_legislation_code,
7109 'PER_ALL_PEOPLE_F',
7110 'ATTRIBUTE12',
7111 p_old_ATTRIBUTE12,
7112 p_new_ATTRIBUTE12,
7113 p_effective_date
7114 );
7115 --
7116 pay_continuous_calc.event_update(p_business_group_id,
7117 p_legislation_code,
7118 'PER_ALL_PEOPLE_F',
7119 'ATTRIBUTE13',
7120 p_old_ATTRIBUTE13,
7121 p_new_ATTRIBUTE13,
7122 p_effective_date
7123 );
7124 --
7125 pay_continuous_calc.event_update(p_business_group_id,
7126 p_legislation_code,
7127 'PER_ALL_PEOPLE_F',
7128 'ATTRIBUTE14',
7129 p_old_ATTRIBUTE14,
7130 p_new_ATTRIBUTE14,
7131 p_effective_date
7132 );
7133 --
7134 pay_continuous_calc.event_update(p_business_group_id,
7135 p_legislation_code,
7136 'PER_ALL_PEOPLE_F',
7137 'ATTRIBUTE15',
7138 p_old_ATTRIBUTE15,
7139 p_new_ATTRIBUTE15,
7140 p_effective_date
7141 );
7142 --
7143 pay_continuous_calc.event_update(p_business_group_id,
7144 p_legislation_code,
7145 'PER_ALL_PEOPLE_F',
7146 'ATTRIBUTE16',
7147 p_old_ATTRIBUTE16,
7148 p_new_ATTRIBUTE16,
7149 p_effective_date
7150 );
7151 --
7152 pay_continuous_calc.event_update(p_business_group_id,
7153 p_legislation_code,
7154 'PER_ALL_PEOPLE_F',
7155 'ATTRIBUTE17',
7156 p_old_ATTRIBUTE17,
7157 p_new_ATTRIBUTE17,
7158 p_effective_date
7159 );
7160 --
7161 pay_continuous_calc.event_update(p_business_group_id,
7162 p_legislation_code,
7163 'PER_ALL_PEOPLE_F',
7164 'ATTRIBUTE18',
7165 p_old_ATTRIBUTE18,
7166 p_new_ATTRIBUTE18,
7167 p_effective_date
7168 );
7169 --
7170 pay_continuous_calc.event_update(p_business_group_id,
7171 p_legislation_code,
7172 'PER_ALL_PEOPLE_F',
7173 'ATTRIBUTE19',
7174 p_old_ATTRIBUTE19,
7178 --
7175 p_new_ATTRIBUTE19,
7176 p_effective_date
7177 );
7179 pay_continuous_calc.event_update(p_business_group_id,
7180 p_legislation_code,
7181 'PER_ALL_PEOPLE_F',
7182 'ATTRIBUTE2',
7183 p_old_ATTRIBUTE2,
7184 p_new_ATTRIBUTE2,
7185 p_effective_date
7186 );
7187 --
7188 pay_continuous_calc.event_update(p_business_group_id,
7189 p_legislation_code,
7190 'PER_ALL_PEOPLE_F',
7191 'ATTRIBUTE20',
7192 p_old_ATTRIBUTE20,
7193 p_new_ATTRIBUTE20,
7194 p_effective_date
7195 );
7196 --
7197 pay_continuous_calc.event_update(p_business_group_id,
7198 p_legislation_code,
7199 'PER_ALL_PEOPLE_F',
7200 'ATTRIBUTE21',
7201 p_old_ATTRIBUTE21,
7202 p_new_ATTRIBUTE21,
7203 p_effective_date
7204 );
7205 --
7206 pay_continuous_calc.event_update(p_business_group_id,
7207 p_legislation_code,
7208 'PER_ALL_PEOPLE_F',
7209 'ATTRIBUTE22',
7210 p_old_ATTRIBUTE22,
7211 p_new_ATTRIBUTE22,
7212 p_effective_date
7213 );
7214 --
7215 pay_continuous_calc.event_update(p_business_group_id,
7216 p_legislation_code,
7217 'PER_ALL_PEOPLE_F',
7218 'ATTRIBUTE23',
7219 p_old_ATTRIBUTE23,
7220 p_new_ATTRIBUTE23,
7221 p_effective_date
7222 );
7223 --
7224 pay_continuous_calc.event_update(p_business_group_id,
7225 p_legislation_code,
7226 'PER_ALL_PEOPLE_F',
7227 'ATTRIBUTE24',
7228 p_old_ATTRIBUTE24,
7229 p_new_ATTRIBUTE24,
7230 p_effective_date
7231 );
7232 --
7233 pay_continuous_calc.event_update(p_business_group_id,
7234 p_legislation_code,
7235 'PER_ALL_PEOPLE_F',
7236 'ATTRIBUTE25',
7237 p_old_ATTRIBUTE25,
7238 p_new_ATTRIBUTE25,
7239 p_effective_date
7240 );
7241 --
7242 pay_continuous_calc.event_update(p_business_group_id,
7243 p_legislation_code,
7244 'PER_ALL_PEOPLE_F',
7245 'ATTRIBUTE26',
7246 p_old_ATTRIBUTE26,
7247 p_new_ATTRIBUTE26,
7248 p_effective_date
7249 );
7250 --
7251 pay_continuous_calc.event_update(p_business_group_id,
7252 p_legislation_code,
7253 'PER_ALL_PEOPLE_F',
7254 'ATTRIBUTE27',
7255 p_old_ATTRIBUTE27,
7256 p_new_ATTRIBUTE27,
7257 p_effective_date
7258 );
7259 --
7260 pay_continuous_calc.event_update(p_business_group_id,
7261 p_legislation_code,
7262 'PER_ALL_PEOPLE_F',
7263 'ATTRIBUTE28',
7264 p_old_ATTRIBUTE28,
7265 p_new_ATTRIBUTE28,
7266 p_effective_date
7267 );
7268 --
7269 pay_continuous_calc.event_update(p_business_group_id,
7270 p_legislation_code,
7271 'PER_ALL_PEOPLE_F',
7272 'ATTRIBUTE29',
7273 p_old_ATTRIBUTE29,
7274 p_new_ATTRIBUTE29,
7275 p_effective_date
7276 );
7277 --
7278 pay_continuous_calc.event_update(p_business_group_id,
7279 p_legislation_code,
7280 'PER_ALL_PEOPLE_F',
7281 'ATTRIBUTE3',
7282 p_old_ATTRIBUTE3,
7283 p_new_ATTRIBUTE3,
7287 pay_continuous_calc.event_update(p_business_group_id,
7284 p_effective_date
7285 );
7286 --
7288 p_legislation_code,
7289 'PER_ALL_PEOPLE_F',
7290 'ATTRIBUTE30',
7291 p_old_ATTRIBUTE30,
7292 p_new_ATTRIBUTE30,
7293 p_effective_date
7294 );
7295 --
7296 pay_continuous_calc.event_update(p_business_group_id,
7297 p_legislation_code,
7298 'PER_ALL_PEOPLE_F',
7299 'ATTRIBUTE4',
7300 p_old_ATTRIBUTE4,
7301 p_new_ATTRIBUTE4,
7302 p_effective_date
7303 );
7304 --
7305 pay_continuous_calc.event_update(p_business_group_id,
7306 p_legislation_code,
7307 'PER_ALL_PEOPLE_F',
7308 'ATTRIBUTE5',
7309 p_old_ATTRIBUTE5,
7310 p_new_ATTRIBUTE5,
7311 p_effective_date
7312 );
7313 --
7314 pay_continuous_calc.event_update(p_business_group_id,
7315 p_legislation_code,
7316 'PER_ALL_PEOPLE_F',
7317 'ATTRIBUTE6',
7318 p_old_ATTRIBUTE6,
7319 p_new_ATTRIBUTE6,
7320 p_effective_date
7321 );
7322 --
7323 pay_continuous_calc.event_update(p_business_group_id,
7324 p_legislation_code,
7325 'PER_ALL_PEOPLE_F',
7326 'ATTRIBUTE7',
7327 p_old_ATTRIBUTE7,
7328 p_new_ATTRIBUTE7,
7329 p_effective_date
7330 );
7331 --
7332 pay_continuous_calc.event_update(p_business_group_id,
7333 p_legislation_code,
7334 'PER_ALL_PEOPLE_F',
7335 'ATTRIBUTE8',
7336 p_old_ATTRIBUTE8,
7337 p_new_ATTRIBUTE8,
7338 p_effective_date
7339 );
7340 --
7341 pay_continuous_calc.event_update(p_business_group_id,
7342 p_legislation_code,
7343 'PER_ALL_PEOPLE_F',
7344 'ATTRIBUTE9',
7345 p_old_ATTRIBUTE9,
7346 p_new_ATTRIBUTE9,
7347 p_effective_date
7348 );
7349 --
7350 pay_continuous_calc.event_update(p_business_group_id,
7351 p_legislation_code,
7352 'PER_ALL_PEOPLE_F',
7353 'ATTRIBUTE_CATEGORY',
7354 p_old_ATTRIBUTE_CATEGORY,
7355 p_new_ATTRIBUTE_CATEGORY,
7356 p_effective_date
7357 );
7358 --
7359 pay_continuous_calc.event_update(p_business_group_id,
7360 p_legislation_code,
7361 'PER_ALL_PEOPLE_F',
7362 'BACKGROUND_CHECK_STATUS',
7363 p_old_BACKGROUND_CHECK_STATUS,
7364 p_new_BACKGROUND_CHECK_STATUS,
7365 p_effective_date
7366 );
7367 --
7368 pay_continuous_calc.event_update(p_business_group_id,
7369 p_legislation_code,
7370 'PER_ALL_PEOPLE_F',
7371 'BACKGROUND_DATE_CHECK',
7372 p_old_BACKGROUND_DATE_CHECK,
7373 p_new_BACKGROUND_DATE_CHECK,
7374 p_effective_date
7375 );
7376 --
7377 pay_continuous_calc.event_update(p_business_group_id,
7378 p_legislation_code,
7379 'PER_ALL_PEOPLE_F',
7380 'BENEFIT_GROUP_ID',
7381 p_old_BENEFIT_GROUP_ID,
7382 p_new_BENEFIT_GROUP_ID,
7383 p_effective_date
7384 );
7385 --
7386 pay_continuous_calc.event_update(p_business_group_id,
7387 p_legislation_code,
7388 'PER_ALL_PEOPLE_F',
7389 'BLOOD_TYPE',
7390 p_old_BLOOD_TYPE,
7391 p_new_BLOOD_TYPE,
7395 pay_continuous_calc.event_update(p_business_group_id,
7392 p_effective_date
7393 );
7394 --
7396 p_legislation_code,
7397 'PER_ALL_PEOPLE_F',
7398 'BUSINESS_GROUP_ID',
7399 p_old_BUSINESS_GROUP_ID,
7400 p_new_BUSINESS_GROUP_ID,
7401 p_effective_date
7402 );
7403 --
7404 pay_continuous_calc.event_update(p_business_group_id,
7405 p_legislation_code,
7406 'PER_ALL_PEOPLE_F',
7407 'COMMENT_ID',
7408 p_old_COMMENT_ID,
7409 p_new_COMMENT_ID,
7410 p_effective_date
7411 );
7412 --
7413 pay_continuous_calc.event_update(p_business_group_id,
7414 p_legislation_code,
7415 'PER_ALL_PEOPLE_F',
7416 'COORD_BEN_MED_PLN_NO',
7417 p_old_COORD_BEN_MED_PLN_NO,
7418 p_new_COORD_BEN_MED_PLN_NO,
7419 p_effective_date
7420 );
7421 --
7422 pay_continuous_calc.event_update(p_business_group_id,
7423 p_legislation_code,
7424 'PER_ALL_PEOPLE_F',
7425 'COORD_BEN_NO_CVG_FLAG',
7426 p_old_COORD_BEN_NO_CVG_FLAG,
7427 p_new_COORD_BEN_NO_CVG_FLAG,
7428 p_effective_date
7429 );
7430 --
7431 pay_continuous_calc.event_update(p_business_group_id,
7432 p_legislation_code,
7433 'PER_ALL_PEOPLE_F',
7434 'CORRESPONDENCE_LANGUAGE',
7435 p_old_CORRESPONDENCE_LANGUAGE,
7436 p_new_CORRESPONDENCE_LANGUAGE,
7437 p_effective_date
7438 );
7439 --
7440 pay_continuous_calc.event_update(p_business_group_id,
7441 p_legislation_code,
7442 'PER_ALL_PEOPLE_F',
7443 'COUNTRY_OF_BIRTH',
7444 p_old_COUNTRY_OF_BIRTH,
7445 p_new_COUNTRY_OF_BIRTH,
7446 p_effective_date
7447 );
7448 --
7449 pay_continuous_calc.event_update(p_business_group_id,
7450 p_legislation_code,
7451 'PER_ALL_PEOPLE_F',
7452 'CURRENT_APPLICANT_FLAG',
7453 p_old_CURRENT_APPLICANT_FLAG,
7454 p_new_CURRENT_APPLICANT_FLAG,
7455 p_effective_date
7456 );
7457 --
7458 pay_continuous_calc.event_update(p_business_group_id,
7459 p_legislation_code,
7460 'PER_ALL_PEOPLE_F',
7461 'CURRENT_EMPLOYEE_FLAG',
7462 p_old_CURRENT_EMPLOYEE_FLAG,
7463 p_new_CURRENT_EMPLOYEE_FLAG,
7464 p_effective_date
7465 );
7466 --
7467 pay_continuous_calc.event_update(p_business_group_id,
7468 p_legislation_code,
7469 'PER_ALL_PEOPLE_F',
7470 'CURRENT_EMP_OR_APL_FLAG',
7471 p_old_CURRENT_EMP_OR_APL_FLAG,
7472 p_new_CURRENT_EMP_OR_APL_FLAG,
7473 p_effective_date
7474 );
7475 --
7476 pay_continuous_calc.event_update(p_business_group_id,
7477 p_legislation_code,
7478 'PER_ALL_PEOPLE_F',
7479 'DATE_EMPLOYEE_DATA_VERIFIED',
7480 p_old_DATE_EMPLOYEE_DATA_VERIF,
7481 p_new_DATE_EMPLOYEE_DATA_VERIF,
7482 p_effective_date
7483 );
7484 --
7485 pay_continuous_calc.event_update(p_business_group_id,
7486 p_legislation_code,
7487 'PER_ALL_PEOPLE_F',
7488 'DATE_OF_BIRTH',
7489 p_old_DATE_OF_BIRTH,
7490 p_new_DATE_OF_BIRTH,
7491 p_effective_date
7492 );
7493 --
7494 pay_continuous_calc.event_update(p_business_group_id,
7495 p_legislation_code,
7496 'PER_ALL_PEOPLE_F',
7500 p_effective_date
7497 'DATE_OF_DEATH',
7498 p_old_DATE_OF_DEATH,
7499 p_new_DATE_OF_DEATH,
7501 );
7502 --
7503 pay_continuous_calc.event_update(p_business_group_id,
7504 p_legislation_code,
7505 'PER_ALL_PEOPLE_F',
7506 'DPDNT_ADOPTION_DATE',
7507 p_old_DPDNT_ADOPTION_DATE,
7508 p_new_DPDNT_ADOPTION_DATE,
7509 p_effective_date
7510 );
7511 --
7512 pay_continuous_calc.event_update(p_business_group_id,
7513 p_legislation_code,
7514 'PER_ALL_PEOPLE_F',
7515 'DPDNT_VLNTRY_SVCE_FLAG',
7516 p_old_DPDNT_VLNTRY_SVCE_FLAG,
7517 p_new_DPDNT_VLNTRY_SVCE_FLAG,
7518 p_effective_date
7519 );
7520 --
7521 pay_continuous_calc.event_update(p_business_group_id,
7522 p_legislation_code,
7523 'PER_ALL_PEOPLE_F',
7524 'EMAIL_ADDRESS',
7525 p_old_EMAIL_ADDRESS,
7526 p_new_EMAIL_ADDRESS,
7527 p_effective_date
7528 );
7529 --
7530 pay_continuous_calc.event_update(p_business_group_id,
7531 p_legislation_code,
7532 'PER_ALL_PEOPLE_F',
7533 'EMPLOYEE_NUMBER',
7534 p_old_EMPLOYEE_NUMBER,
7535 p_new_EMPLOYEE_NUMBER,
7536 p_effective_date
7537 );
7538 --
7539 pay_continuous_calc.event_update(p_business_group_id,
7540 p_legislation_code,
7541 'PER_ALL_PEOPLE_F',
7542 'EXPENSE_CHECK_SEND_TO_ADDRESS',
7543 p_old_EXPENSE_CHECK_SEND_TO_AD,
7544 p_new_EXPENSE_CHECK_SEND_TO_AD,
7545 p_effective_date
7546 );
7547 --
7548 pay_continuous_calc.event_update(p_business_group_id,
7549 p_legislation_code,
7550 'PER_ALL_PEOPLE_F',
7551 'FAST_PATH_EMPLOYEE',
7552 p_old_FAST_PATH_EMPLOYEE,
7553 p_new_FAST_PATH_EMPLOYEE,
7554 p_effective_date
7555 );
7556 --
7557 pay_continuous_calc.event_update(p_business_group_id,
7558 p_legislation_code,
7559 'PER_ALL_PEOPLE_F',
7560 'FIRST_NAME',
7561 p_old_FIRST_NAME,
7562 p_new_FIRST_NAME,
7563 p_effective_date
7564 );
7565 --
7566 pay_continuous_calc.event_update(p_business_group_id,
7567 p_legislation_code,
7568 'PER_ALL_PEOPLE_F',
7569 'FTE_CAPACITY',
7570 p_old_FTE_CAPACITY,
7571 p_new_FTE_CAPACITY,
7572 p_effective_date
7573 );
7574 --
7575 pay_continuous_calc.event_update(p_business_group_id,
7576 p_legislation_code,
7577 'PER_ALL_PEOPLE_F',
7578 'FULL_NAME',
7579 p_old_FULL_NAME,
7580 p_new_FULL_NAME,
7581 p_effective_date
7582 );
7583 --
7584 pay_continuous_calc.event_update(p_business_group_id,
7585 p_legislation_code,
7586 'PER_ALL_PEOPLE_F',
7587 'GLOBAL_PERSON_ID',
7588 p_old_GLOBAL_PERSON_ID,
7589 p_new_GLOBAL_PERSON_ID,
7590 p_effective_date
7591 );
7592 --
7593 pay_continuous_calc.event_update(p_business_group_id,
7594 p_legislation_code,
7595 'PER_ALL_PEOPLE_F',
7596 'HOLD_APPLICANT_DATE_UNTIL',
7597 p_old_HOLD_APPLICANT_DATE_UNTI,
7598 p_new_HOLD_APPLICANT_DATE_UNTI,
7599 p_effective_date
7600 );
7601 --
7602 pay_continuous_calc.event_update(p_business_group_id,
7606 p_old_HONORS,
7603 p_legislation_code,
7604 'PER_ALL_PEOPLE_F',
7605 'HONORS',
7607 p_new_HONORS,
7608 p_effective_date
7609 );
7610 --
7611 pay_continuous_calc.event_update(p_business_group_id,
7612 p_legislation_code,
7613 'PER_ALL_PEOPLE_F',
7614 'INTERNAL_LOCATION',
7615 p_old_INTERNAL_LOCATION,
7616 p_new_INTERNAL_LOCATION,
7617 p_effective_date
7618 );
7619 --
7620 pay_continuous_calc.event_update(p_business_group_id,
7621 p_legislation_code,
7622 'PER_ALL_PEOPLE_F',
7623 'KNOWN_AS',
7624 p_old_KNOWN_AS,
7625 p_new_KNOWN_AS,
7626 p_effective_date
7627 );
7628 --
7629 pay_continuous_calc.event_update(p_business_group_id,
7630 p_legislation_code,
7631 'PER_ALL_PEOPLE_F',
7632 'LAST_MEDICAL_TEST_BY',
7633 p_old_LAST_MEDICAL_TEST_BY,
7634 p_new_LAST_MEDICAL_TEST_BY,
7635 p_effective_date
7636 );
7637 --
7638 pay_continuous_calc.event_update(p_business_group_id,
7639 p_legislation_code,
7640 'PER_ALL_PEOPLE_F',
7641 'LAST_MEDICAL_TEST_DATE',
7642 p_old_LAST_MEDICAL_TEST_DATE,
7643 p_new_LAST_MEDICAL_TEST_DATE,
7644 p_effective_date
7645 );
7646 --
7647 pay_continuous_calc.event_update(p_business_group_id,
7648 p_legislation_code,
7649 'PER_ALL_PEOPLE_F',
7650 'LAST_NAME',
7651 p_old_LAST_NAME,
7652 p_new_LAST_NAME,
7653 p_effective_date
7654 );
7655 --
7656 pay_continuous_calc.event_update(p_business_group_id,
7657 p_legislation_code,
7658 'PER_ALL_PEOPLE_F',
7659 'MAILSTOP',
7660 p_old_MAILSTOP,
7661 p_new_MAILSTOP,
7662 p_effective_date
7663 );
7664 --
7665 pay_continuous_calc.event_update(p_business_group_id,
7666 p_legislation_code,
7667 'PER_ALL_PEOPLE_F',
7668 'MARITAL_STATUS',
7669 p_old_MARITAL_STATUS,
7670 p_new_MARITAL_STATUS,
7671 p_effective_date
7672 );
7673 --
7674 pay_continuous_calc.event_update(p_business_group_id,
7675 p_legislation_code,
7676 'PER_ALL_PEOPLE_F',
7677 'MIDDLE_NAMES',
7678 p_old_MIDDLE_NAMES,
7679 p_new_MIDDLE_NAMES,
7680 p_effective_date
7681 );
7682 --
7683 pay_continuous_calc.event_update(p_business_group_id,
7684 p_legislation_code,
7685 'PER_ALL_PEOPLE_F',
7686 'NATIONALITY',
7687 p_old_NATIONALITY,
7688 p_new_NATIONALITY,
7689 p_effective_date
7690 );
7691 --
7692 pay_continuous_calc.event_update(p_business_group_id,
7693 p_legislation_code,
7694 'PER_ALL_PEOPLE_F',
7695 'NATIONAL_IDENTIFIER',
7696 p_old_NATIONAL_IDENTIFIER,
7697 p_new_NATIONAL_IDENTIFIER,
7698 p_effective_date
7699 );
7700 --
7701 pay_continuous_calc.event_update(p_business_group_id,
7702 p_legislation_code,
7703 'PER_ALL_PEOPLE_F',
7704 'OFFICE_NUMBER',
7705 p_old_OFFICE_NUMBER,
7706 p_new_OFFICE_NUMBER,
7707 p_effective_date
7708 );
7709 --
7710 pay_continuous_calc.event_update(p_business_group_id,
7714 p_old_ON_MILITARY_SERVICE,
7711 p_legislation_code,
7712 'PER_ALL_PEOPLE_F',
7713 'ON_MILITARY_SERVICE',
7715 p_new_ON_MILITARY_SERVICE,
7716 p_effective_date
7717 );
7718 --
7719 pay_continuous_calc.event_update(p_business_group_id,
7720 p_legislation_code,
7721 'PER_ALL_PEOPLE_F',
7722 'ORDER_NAME',
7723 p_old_ORDER_NAME,
7724 p_new_ORDER_NAME,
7725 p_effective_date
7726 );
7727 --
7728 pay_continuous_calc.event_update(p_business_group_id,
7729 p_legislation_code,
7730 'PER_ALL_PEOPLE_F',
7731 'ORIGINAL_DATE_OF_HIRE',
7732 p_old_ORIGINAL_DATE_OF_HIRE,
7733 p_new_ORIGINAL_DATE_OF_HIRE,
7734 p_effective_date
7735 );
7736 --
7737 pay_continuous_calc.event_update(p_business_group_id,
7738 p_legislation_code,
7739 'PER_ALL_PEOPLE_F',
7740 'PERSON_ID',
7741 p_old_PERSON_ID,
7742 p_new_PERSON_ID,
7743 p_effective_date
7744 );
7745 --
7746 pay_continuous_calc.event_update(p_business_group_id,
7747 p_legislation_code,
7748 'PER_ALL_PEOPLE_F',
7749 'PERSON_TYPE_ID',
7750 p_old_PERSON_TYPE_ID,
7751 p_new_PERSON_TYPE_ID,
7752 p_effective_date
7753 );
7754 --
7755 pay_continuous_calc.event_update(p_business_group_id,
7756 p_legislation_code,
7757 'PER_ALL_PEOPLE_F',
7758 'PER_INFORMATION1',
7759 p_old_PER_INFORMATION1,
7760 p_new_PER_INFORMATION1,
7761 p_effective_date
7762 );
7763 --
7764 pay_continuous_calc.event_update(p_business_group_id,
7765 p_legislation_code,
7766 'PER_ALL_PEOPLE_F',
7767 'PER_INFORMATION10',
7768 p_old_PER_INFORMATION10,
7769 p_new_PER_INFORMATION10,
7770 p_effective_date
7771 );
7772 --
7773 pay_continuous_calc.event_update(p_business_group_id,
7774 p_legislation_code,
7775 'PER_ALL_PEOPLE_F',
7776 'PER_INFORMATION11',
7777 p_old_PER_INFORMATION11,
7778 p_new_PER_INFORMATION11,
7779 p_effective_date
7780 );
7781 --
7782 pay_continuous_calc.event_update(p_business_group_id,
7783 p_legislation_code,
7784 'PER_ALL_PEOPLE_F',
7785 'PER_INFORMATION12',
7786 p_old_PER_INFORMATION12,
7787 p_new_PER_INFORMATION12,
7788 p_effective_date
7789 );
7790 --
7791 pay_continuous_calc.event_update(p_business_group_id,
7792 p_legislation_code,
7793 'PER_ALL_PEOPLE_F',
7794 'PER_INFORMATION13',
7795 p_old_PER_INFORMATION13,
7796 p_new_PER_INFORMATION13,
7797 p_effective_date
7798 );
7799 --
7800 pay_continuous_calc.event_update(p_business_group_id,
7801 p_legislation_code,
7802 'PER_ALL_PEOPLE_F',
7803 'PER_INFORMATION14',
7804 p_old_PER_INFORMATION14,
7805 p_new_PER_INFORMATION14,
7806 p_effective_date
7807 );
7808 --
7809 pay_continuous_calc.event_update(p_business_group_id,
7810 p_legislation_code,
7811 'PER_ALL_PEOPLE_F',
7812 'PER_INFORMATION15',
7813 p_old_PER_INFORMATION15,
7814 p_new_PER_INFORMATION15,
7818 pay_continuous_calc.event_update(p_business_group_id,
7815 p_effective_date
7816 );
7817 --
7819 p_legislation_code,
7820 'PER_ALL_PEOPLE_F',
7821 'PER_INFORMATION16',
7822 p_old_PER_INFORMATION16,
7823 p_new_PER_INFORMATION16,
7824 p_effective_date
7825 );
7826 --
7827 pay_continuous_calc.event_update(p_business_group_id,
7828 p_legislation_code,
7829 'PER_ALL_PEOPLE_F',
7830 'PER_INFORMATION17',
7831 p_old_PER_INFORMATION17,
7832 p_new_PER_INFORMATION17,
7833 p_effective_date
7834 );
7835 --
7836 pay_continuous_calc.event_update(p_business_group_id,
7837 p_legislation_code,
7838 'PER_ALL_PEOPLE_F',
7839 'PER_INFORMATION18',
7840 p_old_PER_INFORMATION18,
7841 p_new_PER_INFORMATION18,
7842 p_effective_date
7843 );
7844 --
7845 pay_continuous_calc.event_update(p_business_group_id,
7846 p_legislation_code,
7847 'PER_ALL_PEOPLE_F',
7848 'PER_INFORMATION19',
7849 p_old_PER_INFORMATION19,
7850 p_new_PER_INFORMATION19,
7851 p_effective_date
7852 );
7853 --
7854 pay_continuous_calc.event_update(p_business_group_id,
7855 p_legislation_code,
7856 'PER_ALL_PEOPLE_F',
7857 'PER_INFORMATION2',
7858 p_old_PER_INFORMATION2,
7859 p_new_PER_INFORMATION2,
7860 p_effective_date
7861 );
7862 --
7863 pay_continuous_calc.event_update(p_business_group_id,
7864 p_legislation_code,
7865 'PER_ALL_PEOPLE_F',
7866 'PER_INFORMATION20',
7867 p_old_PER_INFORMATION20,
7868 p_new_PER_INFORMATION20,
7869 p_effective_date
7870 );
7871 --
7872 pay_continuous_calc.event_update(p_business_group_id,
7873 p_legislation_code,
7874 'PER_ALL_PEOPLE_F',
7875 'PER_INFORMATION21',
7876 p_old_PER_INFORMATION21,
7877 p_new_PER_INFORMATION21,
7878 p_effective_date
7879 );
7880 --
7881 pay_continuous_calc.event_update(p_business_group_id,
7882 p_legislation_code,
7883 'PER_ALL_PEOPLE_F',
7884 'PER_INFORMATION22',
7885 p_old_PER_INFORMATION22,
7886 p_new_PER_INFORMATION22,
7887 p_effective_date
7888 );
7889 --
7890 pay_continuous_calc.event_update(p_business_group_id,
7891 p_legislation_code,
7892 'PER_ALL_PEOPLE_F',
7893 'PER_INFORMATION23',
7894 p_old_PER_INFORMATION23,
7895 p_new_PER_INFORMATION23,
7896 p_effective_date
7897 );
7898 --
7899 pay_continuous_calc.event_update(p_business_group_id,
7900 p_legislation_code,
7901 'PER_ALL_PEOPLE_F',
7902 'PER_INFORMATION24',
7903 p_old_PER_INFORMATION24,
7904 p_new_PER_INFORMATION24,
7905 p_effective_date
7906 );
7907 --
7908 pay_continuous_calc.event_update(p_business_group_id,
7909 p_legislation_code,
7910 'PER_ALL_PEOPLE_F',
7911 'PER_INFORMATION25',
7912 p_old_PER_INFORMATION25,
7913 p_new_PER_INFORMATION25,
7914 p_effective_date
7915 );
7916 --
7917 pay_continuous_calc.event_update(p_business_group_id,
7918 p_legislation_code,
7919 'PER_ALL_PEOPLE_F',
7920 'PER_INFORMATION26',
7924 );
7921 p_old_PER_INFORMATION26,
7922 p_new_PER_INFORMATION26,
7923 p_effective_date
7925 --
7926 pay_continuous_calc.event_update(p_business_group_id,
7927 p_legislation_code,
7928 'PER_ALL_PEOPLE_F',
7929 'PER_INFORMATION27',
7930 p_old_PER_INFORMATION27,
7931 p_new_PER_INFORMATION27,
7932 p_effective_date
7933 );
7934 --
7935 pay_continuous_calc.event_update(p_business_group_id,
7936 p_legislation_code,
7937 'PER_ALL_PEOPLE_F',
7938 'PER_INFORMATION28',
7939 p_old_PER_INFORMATION28,
7940 p_new_PER_INFORMATION28,
7941 p_effective_date
7942 );
7943 --
7944 pay_continuous_calc.event_update(p_business_group_id,
7945 p_legislation_code,
7946 'PER_ALL_PEOPLE_F',
7947 'PER_INFORMATION29',
7948 p_old_PER_INFORMATION29,
7949 p_new_PER_INFORMATION29,
7950 p_effective_date
7951 );
7952 --
7953 pay_continuous_calc.event_update(p_business_group_id,
7954 p_legislation_code,
7955 'PER_ALL_PEOPLE_F',
7956 'PER_INFORMATION3',
7957 p_old_PER_INFORMATION3,
7958 p_new_PER_INFORMATION3,
7959 p_effective_date
7960 );
7961 --
7962 pay_continuous_calc.event_update(p_business_group_id,
7963 p_legislation_code,
7964 'PER_ALL_PEOPLE_F',
7965 'PER_INFORMATION30',
7966 p_old_PER_INFORMATION30,
7967 p_new_PER_INFORMATION30,
7968 p_effective_date
7969 );
7970 --
7971 pay_continuous_calc.event_update(p_business_group_id,
7972 p_legislation_code,
7973 'PER_ALL_PEOPLE_F',
7974 'PER_INFORMATION4',
7975 p_old_PER_INFORMATION4,
7976 p_new_PER_INFORMATION4,
7977 p_effective_date
7978 );
7979 --
7980 pay_continuous_calc.event_update(p_business_group_id,
7981 p_legislation_code,
7982 'PER_ALL_PEOPLE_F',
7983 'PER_INFORMATION5',
7984 p_old_PER_INFORMATION5,
7985 p_new_PER_INFORMATION5,
7986 p_effective_date
7987 );
7988 --
7989 pay_continuous_calc.event_update(p_business_group_id,
7990 p_legislation_code,
7991 'PER_ALL_PEOPLE_F',
7992 'PER_INFORMATION6',
7993 p_old_PER_INFORMATION6,
7994 p_new_PER_INFORMATION6,
7995 p_effective_date
7996 );
7997 --
7998 pay_continuous_calc.event_update(p_business_group_id,
7999 p_legislation_code,
8000 'PER_ALL_PEOPLE_F',
8001 'PER_INFORMATION7',
8002 p_old_PER_INFORMATION7,
8003 p_new_PER_INFORMATION7,
8004 p_effective_date
8005 );
8006 --
8007 pay_continuous_calc.event_update(p_business_group_id,
8008 p_legislation_code,
8009 'PER_ALL_PEOPLE_F',
8010 'PER_INFORMATION8',
8011 p_old_PER_INFORMATION8,
8012 p_new_PER_INFORMATION8,
8013 p_effective_date
8014 );
8015 --
8016 pay_continuous_calc.event_update(p_business_group_id,
8017 p_legislation_code,
8018 'PER_ALL_PEOPLE_F',
8019 'PER_INFORMATION9',
8020 p_old_PER_INFORMATION9,
8021 p_new_PER_INFORMATION9,
8022 p_effective_date
8023 );
8024 --
8025 pay_continuous_calc.event_update(p_business_group_id,
8029 p_old_PER_INFORMATION_CATEGORY,
8026 p_legislation_code,
8027 'PER_ALL_PEOPLE_F',
8028 'PER_INFORMATION_CATEGORY',
8030 p_new_PER_INFORMATION_CATEGORY,
8031 p_effective_date
8032 );
8033 --
8034 pay_continuous_calc.event_update(p_business_group_id,
8035 p_legislation_code,
8036 'PER_ALL_PEOPLE_F',
8037 'PREVIOUS_LAST_NAME',
8038 p_old_PREVIOUS_LAST_NAME,
8039 p_new_PREVIOUS_LAST_NAME,
8040 p_effective_date
8041 );
8042 --
8043 pay_continuous_calc.event_update(p_business_group_id,
8044 p_legislation_code,
8045 'PER_ALL_PEOPLE_F',
8046 'PRE_NAME_ADJUNCT',
8047 p_old_PRE_NAME_ADJUNCT,
8048 p_new_PRE_NAME_ADJUNCT,
8049 p_effective_date
8050 );
8051 --
8052 pay_continuous_calc.event_update(p_business_group_id,
8053 p_legislation_code,
8054 'PER_ALL_PEOPLE_F',
8055 'PROGRAM_APPLICATION_ID',
8056 p_old_PROGRAM_APPLICATION_ID,
8057 p_new_PROGRAM_APPLICATION_ID,
8058 p_effective_date
8059 );
8060 --
8061 pay_continuous_calc.event_update(p_business_group_id,
8062 p_legislation_code,
8063 'PER_ALL_PEOPLE_F',
8064 'PROGRAM_ID',
8065 p_old_PROGRAM_ID,
8066 p_new_PROGRAM_ID,
8067 p_effective_date
8068 );
8069 --
8070 pay_continuous_calc.event_update(p_business_group_id,
8071 p_legislation_code,
8072 'PER_ALL_PEOPLE_F',
8073 'PROGRAM_UPDATE_DATE',
8074 p_old_PROGRAM_UPDATE_DATE,
8075 p_new_PROGRAM_UPDATE_DATE,
8076 p_effective_date
8077 );
8078 --
8079 pay_continuous_calc.event_update(p_business_group_id,
8080 p_legislation_code,
8081 'PER_ALL_PEOPLE_F',
8082 'PROJECTED_START_DATE',
8083 p_old_PROJECTED_START_DATE,
8084 p_new_PROJECTED_START_DATE,
8085 p_effective_date
8086 );
8087 --
8088 pay_continuous_calc.event_update(p_business_group_id,
8089 p_legislation_code,
8090 'PER_ALL_PEOPLE_F',
8091 'RECEIPT_OF_DEATH_CERT_DATE',
8092 p_old_RECEIPT_OF_DEATH_CERT_DA,
8093 p_new_RECEIPT_OF_DEATH_CERT_DA,
8094 p_effective_date
8095 );
8096 --
8097 pay_continuous_calc.event_update(p_business_group_id,
8098 p_legislation_code,
8099 'PER_ALL_PEOPLE_F',
8100 'REGION_OF_BIRTH',
8101 p_old_REGION_OF_BIRTH,
8102 p_new_REGION_OF_BIRTH,
8103 p_effective_date
8104 );
8105 --
8106 pay_continuous_calc.event_update(p_business_group_id,
8107 p_legislation_code,
8108 'PER_ALL_PEOPLE_F',
8109 'REGISTERED_DISABLED_FLAG',
8110 p_old_REGISTERED_DISABLED_FLAG,
8111 p_new_REGISTERED_DISABLED_FLAG,
8112 p_effective_date
8113 );
8114 --
8115 pay_continuous_calc.event_update(p_business_group_id,
8116 p_legislation_code,
8117 'PER_ALL_PEOPLE_F',
8118 'REHIRE_AUTHORIZOR',
8119 p_old_REHIRE_AUTHORIZOR,
8120 p_new_REHIRE_AUTHORIZOR,
8121 p_effective_date
8122 );
8123 --
8124 pay_continuous_calc.event_update(p_business_group_id,
8125 p_legislation_code,
8126 'PER_ALL_PEOPLE_F',
8127 'REHIRE_REASON',
8128 p_old_REHIRE_REASON,
8129 p_new_REHIRE_REASON,
8133 pay_continuous_calc.event_update(p_business_group_id,
8130 p_effective_date
8131 );
8132 --
8134 p_legislation_code,
8135 'PER_ALL_PEOPLE_F',
8136 'REHIRE_RECOMMENDATION',
8137 p_old_REHIRE_RECOMMENDATION,
8138 p_new_REHIRE_RECOMMENDATION,
8139 p_effective_date
8140 );
8141 --
8142 pay_continuous_calc.event_update(p_business_group_id,
8143 p_legislation_code,
8144 'PER_ALL_PEOPLE_F',
8145 'REQUEST_ID',
8146 p_old_REQUEST_ID,
8147 p_new_REQUEST_ID,
8148 p_effective_date
8149 );
8150 --
8151 pay_continuous_calc.event_update(p_business_group_id,
8152 p_legislation_code,
8153 'PER_ALL_PEOPLE_F',
8154 'RESUME_EXISTS',
8155 p_old_RESUME_EXISTS,
8156 p_new_RESUME_EXISTS,
8157 p_effective_date
8158 );
8159 --
8160 pay_continuous_calc.event_update(p_business_group_id,
8161 p_legislation_code,
8162 'PER_ALL_PEOPLE_F',
8163 'RESUME_LAST_UPDATED',
8164 p_old_RESUME_LAST_UPDATED,
8165 p_new_RESUME_LAST_UPDATED,
8166 p_effective_date
8167 );
8168 --
8169 pay_continuous_calc.event_update(p_business_group_id,
8170 p_legislation_code,
8171 'PER_ALL_PEOPLE_F',
8172 'SECOND_PASSPORT_EXISTS',
8173 p_old_SECOND_PASSPORT_EXISTS,
8174 p_new_SECOND_PASSPORT_EXISTS,
8175 p_effective_date
8176 );
8177 --
8178 pay_continuous_calc.event_update(p_business_group_id,
8179 p_legislation_code,
8180 'PER_ALL_PEOPLE_F',
8181 'SEX',
8182 p_old_SEX,
8183 p_new_SEX,
8184 p_effective_date
8185 );
8186 --
8187 pay_continuous_calc.event_update(p_business_group_id,
8188 p_legislation_code,
8189 'PER_ALL_PEOPLE_F',
8190 'START_DATE',
8191 p_old_START_DATE,
8192 p_new_START_DATE,
8193 p_effective_date
8194 );
8195 --
8196 pay_continuous_calc.event_update(p_business_group_id,
8197 p_legislation_code,
8198 'PER_ALL_PEOPLE_F',
8199 'STUDENT_STATUS',
8200 p_old_STUDENT_STATUS,
8201 p_new_STUDENT_STATUS,
8202 p_effective_date
8203 );
8204 --
8205 pay_continuous_calc.event_update(p_business_group_id,
8206 p_legislation_code,
8207 'PER_ALL_PEOPLE_F',
8208 'SUFFIX',
8209 p_old_SUFFIX,
8210 p_new_SUFFIX,
8211 p_effective_date
8212 );
8213 --
8214 pay_continuous_calc.event_update(p_business_group_id,
8215 p_legislation_code,
8216 'PER_ALL_PEOPLE_F',
8217 'TITLE',
8218 p_old_TITLE,
8219 p_new_TITLE,
8220 p_effective_date
8221 );
8222 --
8223 pay_continuous_calc.event_update(p_business_group_id,
8224 p_legislation_code,
8225 'PER_ALL_PEOPLE_F',
8226 'TOWN_OF_BIRTH',
8227 p_old_TOWN_OF_BIRTH,
8228 p_new_TOWN_OF_BIRTH,
8229 p_effective_date
8230 );
8231 --
8232 pay_continuous_calc.event_update(p_business_group_id,
8233 p_legislation_code,
8234 'PER_ALL_PEOPLE_F',
8235 'USES_TOBACCO_FLAG',
8236 p_old_USES_TOBACCO_FLAG,
8237 p_new_USES_TOBACCO_FLAG,
8241 pay_continuous_calc.event_update(p_business_group_id,
8238 p_effective_date
8239 );
8240 --
8242 p_legislation_code,
8243 'PER_ALL_PEOPLE_F',
8244 'VENDOR_ID',
8245 p_old_VENDOR_ID,
8246 p_new_VENDOR_ID,
8247 p_effective_date
8248 );
8249 --
8250 pay_continuous_calc.event_update(p_business_group_id,
8251 p_legislation_code,
8252 'PER_ALL_PEOPLE_F',
8253 'WORK_SCHEDULE',
8254 p_old_WORK_SCHEDULE,
8255 p_new_WORK_SCHEDULE,
8256 p_effective_date
8257 );
8258 --
8259 pay_continuous_calc.event_update(p_business_group_id,
8260 p_legislation_code,
8261 'PER_ALL_PEOPLE_F',
8262 'WORK_TELEPHONE',
8263 p_old_WORK_TELEPHONE,
8264 p_new_WORK_TELEPHONE,
8265 p_effective_date
8266 );
8267 --
8268 pay_continuous_calc.event_update(p_business_group_id,
8269 p_legislation_code,
8270 'PER_ALL_PEOPLE_F',
8271 'WORK_TELEPHONE',
8272 p_old_WORK_TELEPHONE,
8273 p_new_WORK_TELEPHONE,
8274 p_effective_date
8275 );
8276 else
8277 /* OK it must be a date track change */
8278 --
8279 pay_continuous_calc.event_update(p_business_group_id,
8280 p_legislation_code,
8281 'PER_ALL_PEOPLE_F',
8282 'EFFECTIVE_END_DATE',
8283 p_old_EFFECTIVE_END_DATE,
8284 p_new_EFFECTIVE_END_DATE,
8285 p_new_effective_end_date,
8286 least(p_old_effective_end_date,
8287 p_new_effective_end_date)
8288 );
8289 --
8290 pay_continuous_calc.event_update(p_business_group_id,
8291 p_legislation_code,
8292 'PER_ALL_PEOPLE_F',
8293 'EFFECTIVE_START_DATE',
8294 p_old_EFFECTIVE_START_DATE,
8295 p_new_EFFECTIVE_START_DATE,
8296 p_new_effective_start_date,
8297 least(p_old_effective_start_date,
8298 p_new_effective_start_date)
8299 );
8300
8301 -- bug 3728906, need to handle obscure case
8302 -- effective_start_date and original_hire_date can get updated directly by
8303 -- core code, so do this check as well
8304 --
8305 pay_continuous_calc.event_update(p_business_group_id,
8306 p_legislation_code,
8307 'PER_ALL_PEOPLE_F',
8308 'ORIGINAL_DATE_OF_HIRE',
8309 p_old_ORIGINAL_DATE_OF_HIRE,
8310 p_new_ORIGINAL_DATE_OF_HIRE,
8311 --p_effective_date
8312 least(p_old_effective_start_date,
8313 p_new_effective_start_date)
8314 );
8315
8316
8317 end if;
8318 --
8319 /* Now call the API for the affected assignments */
8320 declare
8321 l_process_event_id number;
8322 l_object_version_number number;
8323 cnt number;
8324 begin
8325 if (pay_continuous_calc.g_event_list.sz <> 0) then
8326 for asgrec in asgcur (p_old_PERSON_ID) loop
8327 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8328 pay_ppe_api.create_process_event(
8329 p_assignment_id => asgrec.assignment_id,
8330 p_effective_date => g_event_list.effective_date(cnt),
8331 p_change_type => g_event_list.change_type(cnt),
8332 p_status => 'U',
8333 p_description => g_event_list.description(cnt),
8334 p_process_event_id => l_process_event_id,
8335 p_object_version_number => l_object_version_number,
8336 p_event_update_id => g_event_list.event_update_id(cnt),
8337 p_business_group_id => p_business_group_id,
8338 p_calculation_date => g_event_list.calc_date(cnt),
8342 end loop;
8339 p_surrogate_key => p_old_PERSON_ID
8340 );
8341 end loop;
8343 end if;
8344 pay_continuous_calc.g_event_list.sz := 0;
8345 end;
8346 --
8347 end PER_ALL_PEOPLE_F_aru;
8348 --
8349 /* PER_SPINAL_POINT_PLACEMENTS_F */
8350 /* name : PER_SPINAL_POINT_PLACEMENTS_F_aru
8351 purpose : This is procedure that records any updates
8352 on spinal point placement.
8353 */
8354 procedure PER_SPIN_PNT_PLACEMENTS_F_aru(
8355 p_business_group_id in number,
8356 p_legislation_code in varchar2,
8357 p_effective_date in date ,
8358 p_old_ASSIGNMENT_ID in NUMBER,
8359 p_new_ASSIGNMENT_ID in NUMBER ,
8360 p_old_AUTO_INCREMENT_FLAG in VARCHAR2,
8361 p_new_AUTO_INCREMENT_FLAG in VARCHAR2 ,
8362 p_old_BUSINESS_GROUP_ID in NUMBER,
8363 p_new_BUSINESS_GROUP_ID in NUMBER ,
8364 p_old_PARENT_SPINE_ID in NUMBER,
8365 p_new_PARENT_SPINE_ID in NUMBER ,
8366 p_old_PLACEMENT_ID in NUMBER,
8367 p_new_PLACEMENT_ID in NUMBER ,
8368 p_old_PROGRAM_APPLICATION_ID in NUMBER,
8369 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
8370 p_old_PROGRAM_ID in NUMBER,
8371 p_new_PROGRAM_ID in NUMBER ,
8372 p_old_PROGRAM_UPDATE_DATE in DATE,
8373 p_new_PROGRAM_UPDATE_DATE in DATE ,
8374 p_old_REASON in VARCHAR2,
8375 p_new_REASON in VARCHAR2 ,
8376 p_old_REQUEST_ID in NUMBER,
8377 p_new_REQUEST_ID in NUMBER ,
8378 p_old_STEP_ID in NUMBER,
8379 p_new_STEP_ID in NUMBER ,
8380 p_old_EFFECTIVE_END_DATE in DATE,
8381 p_new_EFFECTIVE_END_DATE in DATE ,
8382 p_old_EFFECTIVE_START_DATE in DATE,
8383 p_new_EFFECTIVE_START_DATE in DATE
8384 )
8385 is
8386 --
8387 begin
8388 /* If the continuous calc is overriden then do nothing */
8389 if (g_override_cc = TRUE) then
8390 return;
8391 end if;
8392 --
8393 /* If the dates havent changed it must be a correction */
8394 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
8395 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
8396 --
8397 pay_continuous_calc.event_update(p_business_group_id,
8398 p_legislation_code,
8399 'PER_SPINAL_POINT_PLACEMENTS_F',
8400 'ASSIGNMENT_ID',
8401 p_old_ASSIGNMENT_ID,
8402 p_new_ASSIGNMENT_ID,
8403 p_effective_date
8404 );
8405 --
8406 pay_continuous_calc.event_update(p_business_group_id,
8407 p_legislation_code,
8408 'PER_SPINAL_POINT_PLACEMENTS_F',
8409 'AUTO_INCREMENT_FLAG',
8410 p_old_AUTO_INCREMENT_FLAG,
8411 p_new_AUTO_INCREMENT_FLAG,
8412 p_effective_date
8413 );
8414 --
8415 pay_continuous_calc.event_update(p_business_group_id,
8416 p_legislation_code,
8417 'PER_SPINAL_POINT_PLACEMENTS_F',
8418 'BUSINESS_GROUP_ID',
8419 p_old_BUSINESS_GROUP_ID,
8420 p_new_BUSINESS_GROUP_ID,
8421 p_effective_date
8422 );
8423 --
8424 pay_continuous_calc.event_update(p_business_group_id,
8425 p_legislation_code,
8426 'PER_SPINAL_POINT_PLACEMENTS_F',
8427 'PARENT_SPINE_ID',
8428 p_old_PARENT_SPINE_ID,
8429 p_new_PARENT_SPINE_ID,
8430 p_effective_date
8431 );
8432 --
8433 pay_continuous_calc.event_update(p_business_group_id,
8434 p_legislation_code,
8435 'PER_SPINAL_POINT_PLACEMENTS_F',
8436 'PLACEMENT_ID',
8437 p_old_PLACEMENT_ID,
8438 p_new_PLACEMENT_ID,
8439 p_effective_date
8440 );
8441 --
8442 pay_continuous_calc.event_update(p_business_group_id,
8443 p_legislation_code,
8444 'PER_SPINAL_POINT_PLACEMENTS_F',
8445 'PROGRAM_APPLICATION_ID',
8446 p_old_PROGRAM_APPLICATION_ID,
8447 p_new_PROGRAM_APPLICATION_ID,
8448 p_effective_date
8449 );
8450 --
8451 pay_continuous_calc.event_update(p_business_group_id,
8452 p_legislation_code,
8453 'PER_SPINAL_POINT_PLACEMENTS_F',
8454 'PROGRAM_ID',
8455 p_old_PROGRAM_ID,
8456 p_new_PROGRAM_ID,
8457 p_effective_date
8458 );
8459 --
8460 pay_continuous_calc.event_update(p_business_group_id,
8464 p_old_PROGRAM_UPDATE_DATE,
8461 p_legislation_code,
8462 'PER_SPINAL_POINT_PLACEMENTS_F',
8463 'PROGRAM_UPDATE_DATE',
8465 p_new_PROGRAM_UPDATE_DATE,
8466 p_effective_date
8467 );
8468 --
8469 pay_continuous_calc.event_update(p_business_group_id,
8470 p_legislation_code,
8471 'PER_SPINAL_POINT_PLACEMENTS_F',
8472 'REASON',
8473 p_old_REASON,
8474 p_new_REASON,
8475 p_effective_date
8476 );
8477 --
8478 pay_continuous_calc.event_update(p_business_group_id,
8479 p_legislation_code,
8480 'PER_SPINAL_POINT_PLACEMENTS_F',
8481 'REQUEST_ID',
8482 p_old_REQUEST_ID,
8483 p_new_REQUEST_ID,
8484 p_effective_date
8485 );
8486 --
8487 pay_continuous_calc.event_update(p_business_group_id,
8488 p_legislation_code,
8489 'PER_SPINAL_POINT_PLACEMENTS_F',
8490 'STEP_ID',
8491 p_old_STEP_ID,
8492 p_new_STEP_ID,
8493 p_effective_date
8494 );
8495 --
8496 pay_continuous_calc.event_update(p_business_group_id,
8497 p_legislation_code,
8498 'PER_SPINAL_POINT_PLACEMENTS_F',
8499 'STEP_ID',
8500 p_old_STEP_ID,
8501 p_new_STEP_ID,
8502 p_effective_date
8503 );
8504 else
8505 /* OK it must be a date track change */
8506 --
8507 pay_continuous_calc.event_update(p_business_group_id,
8508 p_legislation_code,
8509 'PER_SPINAL_POINT_PLACEMENTS_F',
8510 'EFFECTIVE_END_DATE',
8511 p_old_EFFECTIVE_END_DATE,
8512 p_new_EFFECTIVE_END_DATE,
8513 p_new_effective_end_date,
8514 least(p_old_effective_end_date,
8515 p_new_effective_end_date)
8516 );
8517 --
8518 pay_continuous_calc.event_update(p_business_group_id,
8519 p_legislation_code,
8520 'PER_SPINAL_POINT_PLACEMENTS_F',
8521 'EFFECTIVE_START_DATE',
8522 p_old_EFFECTIVE_START_DATE,
8523 p_new_EFFECTIVE_START_DATE,
8524 p_new_effective_start_date,
8525 least(p_old_effective_start_date,
8526 p_new_effective_start_date)
8527 );
8528
8529 end if;
8530 --
8531 /* Now call the API for the affected assignments */
8532 declare
8533 l_process_event_id number;
8534 l_object_version_number number;
8535 cnt number;
8536 begin
8537 if (pay_continuous_calc.g_event_list.sz <> 0) then
8538 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8539 pay_ppe_api.create_process_event(
8540 p_assignment_id => p_old_ASSIGNMENT_ID,
8541 p_effective_date => g_event_list.effective_date(cnt),
8542 p_change_type => g_event_list.change_type(cnt),
8543 p_status => 'U',
8544 p_description => g_event_list.description(cnt),
8545 p_process_event_id => l_process_event_id,
8546 p_object_version_number => l_object_version_number,
8547 p_event_update_id => g_event_list.event_update_id(cnt),
8548 p_business_group_id => p_business_group_id,
8549 p_calculation_date => g_event_list.calc_date(cnt),
8550 p_surrogate_key => p_old_PLACEMENT_ID
8551 );
8552 end loop;
8553 end if;
8554 pay_continuous_calc.g_event_list.sz := 0;
8555 end;
8556 --
8557 end PER_SPIN_PNT_PLACEMENTS_F_aru;
8558 --
8559 procedure PER_ASSIGN_BUDGET_VALUES_F_aru(
8560 p_business_group_id in number,
8561 p_legislation_code in varchar2,
8562 p_effective_date in date
8563 ,
8564 p_old_ASSIGNMENT_BUDGET_VALUE_ in NUMBER,
8565 p_new_ASSIGNMENT_BUDGET_VALUE_ in NUMBER
8566 ,
8570 p_old_BUSINESS_GROUP_ID in NUMBER,
8567 p_old_ASSIGNMENT_ID in NUMBER,
8568 p_new_ASSIGNMENT_ID in NUMBER
8569 ,
8571 p_new_BUSINESS_GROUP_ID in NUMBER
8572 ,
8573 p_old_PROGRAM_APPLICATION_ID in NUMBER,
8574 p_new_PROGRAM_APPLICATION_ID in NUMBER
8575 ,
8576 p_old_PROGRAM_ID in NUMBER,
8577 p_new_PROGRAM_ID in NUMBER
8578 ,
8579 p_old_PROGRAM_UPDATE_DATE in DATE,
8580 p_new_PROGRAM_UPDATE_DATE in DATE
8581 ,
8582 p_old_REQUEST_ID in NUMBER,
8583 p_new_REQUEST_ID in NUMBER
8584 ,
8585 p_old_UNIT in VARCHAR2,
8586 p_new_UNIT in VARCHAR2
8587 ,
8588 p_old_VALUE in NUMBER,
8589 p_new_VALUE in NUMBER
8590 ,
8591 p_old_EFFECTIVE_END_DATE in DATE,
8592 p_new_EFFECTIVE_END_DATE in DATE
8593 ,
8594 p_old_EFFECTIVE_START_DATE in DATE,
8595 p_new_EFFECTIVE_START_DATE in DATE
8596 )
8597 is
8598 --
8599 begin
8600 /* If the continuous calc is overriden then do nothing */
8601 if (pay_continuous_calc.g_override_cc = TRUE) then
8602 return;
8603 end if;
8604 --
8605 /* If the dates havent changed it must be a correction */
8606 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
8607 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
8608 --
8609 pay_continuous_calc.event_update(p_business_group_id,
8610 p_legislation_code,
8611 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8612 'ASSIGNMENT_BUDGET_VALUE_ID',
8613 p_old_ASSIGNMENT_BUDGET_VALUE_,
8614 p_new_ASSIGNMENT_BUDGET_VALUE_,
8615 p_effective_date
8616 );
8617 --
8618 pay_continuous_calc.event_update(p_business_group_id,
8619 p_legislation_code,
8620 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8621 'ASSIGNMENT_ID',
8622 p_old_ASSIGNMENT_ID,
8623 p_new_ASSIGNMENT_ID,
8624 p_effective_date
8625 );
8626 --
8627 pay_continuous_calc.event_update(p_business_group_id,
8628 p_legislation_code,
8629 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8630 'BUSINESS_GROUP_ID',
8631 p_old_BUSINESS_GROUP_ID,
8632 p_new_BUSINESS_GROUP_ID,
8633 p_effective_date
8634 );
8635 --
8636 pay_continuous_calc.event_update(p_business_group_id,
8637 p_legislation_code,
8638 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8639 'PROGRAM_APPLICATION_ID',
8640 p_old_PROGRAM_APPLICATION_ID,
8641 p_new_PROGRAM_APPLICATION_ID,
8642 p_effective_date
8643 );
8644 --
8645 pay_continuous_calc.event_update(p_business_group_id,
8646 p_legislation_code,
8647 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8648 'PROGRAM_ID',
8649 p_old_PROGRAM_ID,
8650 p_new_PROGRAM_ID,
8651 p_effective_date
8652 );
8653 --
8654 pay_continuous_calc.event_update(p_business_group_id,
8655 p_legislation_code,
8656 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8657 'PROGRAM_UPDATE_DATE',
8658 p_old_PROGRAM_UPDATE_DATE,
8659 p_new_PROGRAM_UPDATE_DATE,
8660 p_effective_date
8661 );
8662 --
8663 pay_continuous_calc.event_update(p_business_group_id,
8664 p_legislation_code,
8665 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8666 'REQUEST_ID',
8667 p_old_REQUEST_ID,
8668 p_new_REQUEST_ID,
8669 p_effective_date
8670 );
8671 --
8672 pay_continuous_calc.event_update(p_business_group_id,
8673 p_legislation_code,
8674 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8675 'UNIT',
8676 p_old_UNIT,
8677 p_new_UNIT,
8678 p_effective_date
8679 );
8680 --
8681 pay_continuous_calc.event_update(p_business_group_id,
8682 p_legislation_code,
8683 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8684 'VALUE',
8685 p_old_VALUE,
8686 p_new_VALUE,
8687 p_effective_date
8688 );
8689 --
8693 'VALUE',
8690 pay_continuous_calc.event_update(p_business_group_id,
8691 p_legislation_code,
8692 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8694 p_old_VALUE,
8695 p_new_VALUE,
8696 p_effective_date
8697 );
8698 else
8699 /* OK it must be a date track change */
8700 --
8701 pay_continuous_calc.event_update(p_business_group_id,
8702 p_legislation_code,
8703 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8704 'EFFECTIVE_END_DATE',
8705 p_old_EFFECTIVE_END_DATE,
8706 p_new_EFFECTIVE_END_DATE,
8707 p_new_effective_end_date,
8708 least(p_old_effective_end_date,
8709 p_new_effective_end_date)
8710 );
8711 --
8712 pay_continuous_calc.event_update(p_business_group_id,
8713 p_legislation_code,
8714 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8715 'EFFECTIVE_START_DATE',
8716 p_old_EFFECTIVE_START_DATE,
8717 p_new_EFFECTIVE_START_DATE,
8718 p_new_effective_start_date,
8719 least(p_old_effective_start_date,
8720 p_new_effective_start_date)
8721 );
8722
8723 end if;
8724 --
8725 /* Now call the API for the affected assignments */
8726 declare
8727 l_process_event_id number;
8728 l_object_version_number number;
8729 cnt number;
8730 begin
8731 if (pay_continuous_calc.g_event_list.sz <> 0) then
8732 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8733 pay_ppe_api.create_process_event(
8734 p_assignment_id => p_new_assignment_id,
8735 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
8736 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
8737 p_status => 'U',
8738 p_description => pay_continuous_calc.g_event_list.description(cnt),
8739 p_process_event_id => l_process_event_id,
8740 p_object_version_number => l_object_version_number,
8741 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
8742 p_business_group_id => p_business_group_id,
8743 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
8744 p_surrogate_key => p_new_assignment_budget_value_
8745 );
8746 end loop;
8747 end if;
8748 pay_continuous_calc.g_event_list.sz := 0;
8749 end;
8750 --
8751 end PER_ASSIGN_BUDGET_VALUES_F_aru;
8752 --
8753 procedure PER_ASSIGN_BUDGET_VALUES_F_ari(
8754 p_business_group_id in number,
8755 p_legislation_code in varchar2,
8756 p_ASSIGNMENT_BUDGET_VALUE_ in NUMBER,
8757 p_ASSIGNMENT_ID in NUMBER,
8758 p_PROGRAM_APPLICATION_ID in NUMBER,
8759 p_PROGRAM_ID in NUMBER,
8760 p_PROGRAM_UPDATE_DATE in DATE,
8761 p_REQUEST_ID in NUMBER,
8762 p_UNIT in VARCHAR2,
8763 p_VALUE in NUMBER,
8764 p_EFFECTIVE_END_DATE in DATE,
8765 p_EFFECTIVE_START_DATE in DATE
8766 )
8767 is
8768 l_process_api boolean;
8769 l_process_event_id number;
8770 l_object_version_number number;
8771 begin
8772 --
8773 /* If the continuous calc is overriden then do nothing */
8774 if (pay_continuous_calc.g_override_cc = TRUE) then
8775 return;
8776 end if;
8777 --
8778 pay_continuous_calc.event_update(p_business_group_id,
8779 p_legislation_code,
8780 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8781 NULL,
8782 NULL,
8783 NULL,
8784 p_effective_start_date,
8785 p_effective_start_date,
8786 'I'
8787 );
8788 /* Now call the API for the affected assignments */
8789 declare
8790 cnt number;
8791 l_process_event_id number;
8792 l_object_version_number number;
8793 begin
8794 if (pay_continuous_calc.g_event_list.sz <> 0) then
8795 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8796 pay_ppe_api.create_process_event(
8800 p_status => 'U',
8797 p_assignment_id => p_assignment_id,
8798 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
8799 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
8801 p_description => pay_continuous_calc.g_event_list.description(cnt),
8802 p_process_event_id => l_process_event_id,
8803 p_object_version_number => l_object_version_number,
8804 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
8805 p_surrogate_key => p_ASSIGNMENT_BUDGET_VALUE_,
8806 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
8807 p_business_group_id => p_business_group_id
8808 );
8809 end loop;
8810 end if;
8811 pay_continuous_calc.g_event_list.sz := 0;
8812 end;
8813 end PER_ASSIGN_BUDGET_VALUES_F_ari;
8814
8815
8816 /* name : personal_payment_methods_ard
8817 purpose : This is procedure that records any deletes
8818 on personal_payment_methods.
8819 */
8820 procedure PER_ASSIGN_BUDGET_VALUES_ard(
8821 p_business_group_id in number,
8822 p_legislation_code in varchar2,
8823 p_assignment_id in number,
8824 p_effective_start_date in date,
8825 p_assignment_budget_value_ in number
8826 )
8827 is
8828 l_process_event_id number;
8829 l_object_version_number number;
8830 l_proc varchar2(240) := g_package||'.per_assign_budget_values_ard';
8831 begin
8832 hr_utility.set_location(l_proc, 10);
8833 /* If the continuous calc is overriden then do nothing */
8834 if (g_override_cc = TRUE) then
8835 return;
8836 end if;
8837 --
8838 pay_continuous_calc.event_update(p_business_group_id,
8839 p_legislation_code,
8840 'PER_ASSIGNMENT_BUDGET_VALUES_F',
8841 NULL,
8842 NULL,
8843 NULL,
8844 p_effective_start_date,
8845 p_effective_start_date,
8846 'D'
8847 );
8848 /* Now call the API for the affected assignments */
8849 declare
8850 cnt number;
8851 l_process_event_id number;
8852 l_object_version_number number;
8853 begin
8854 if (pay_continuous_calc.g_event_list.sz <> 0) then
8855 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
8856 pay_ppe_api.create_process_event(
8857 p_assignment_id => p_assignment_id,
8858 p_effective_date => g_event_list.effective_date(cnt),
8859 p_change_type => g_event_list.change_type(cnt),
8860 p_status => 'U',
8861 p_description => g_event_list.description(cnt),
8862 p_process_event_id => l_process_event_id,
8863 p_object_version_number => l_object_version_number,
8864 p_event_update_id => g_event_list.event_update_id(cnt),
8865 p_surrogate_key => p_assignment_budget_value_,
8866 p_calculation_date => g_event_list.calc_date(cnt),
8867 p_business_group_id => p_business_group_id
8868 );
8869 end loop;
8870 end if;
8871 pay_continuous_calc.g_event_list.sz := 0;
8872 end;
8873 hr_utility.set_location(l_proc, 900);
8874 END per_assign_budget_values_ard;
8875
8876 --
8877
8878
8879 --------------------------------------------
8880 -- PER_PERIODS_OF_SERVICE
8881 --------------------------------------------
8882 /* Used generator to build this procedure, but removed the references to
8883 date columns as this is a non-datetrack table
8884 We are assuming always correction
8885 */
8886 /* PER_PERIODS_OF_SERVICE */
8887 /* name : PER_PERIODS_OF_SERVICE_aru
8888 purpose : This is procedure that records any changes for updates
8889 on per_periods_of_service CORRECTION only.
8890 */
8891 procedure PER_PERIODS_OF_SERVICE_aru(
8892 p_business_group_id in number,
8893 p_legislation_code in varchar2,
8894 p_effective_date in date ,
8895 p_old_ACCEPTED_TERMINATION_DAT in DATE,
8896 p_new_ACCEPTED_TERMINATION_DAT in DATE,
8897 p_old_ACTUAL_TERMINATION_DATE in DATE,
8898 p_new_ACTUAL_TERMINATION_DATE in DATE ,
8899 p_old_ADJUSTED_SVC_DATE in DATE,
8900 p_new_ADJUSTED_SVC_DATE in DATE ,
8901 p_old_ATTRIBUTE1 in VARCHAR2,
8902 p_new_ATTRIBUTE1 in VARCHAR2 ,
8903 p_old_ATTRIBUTE10 in VARCHAR2,
8904 p_new_ATTRIBUTE10 in VARCHAR2 ,
8905 p_old_ATTRIBUTE11 in VARCHAR2,
8906 p_new_ATTRIBUTE11 in VARCHAR2 ,
8907 p_old_ATTRIBUTE12 in VARCHAR2,
8908 p_new_ATTRIBUTE12 in VARCHAR2 ,
8909 p_old_ATTRIBUTE13 in VARCHAR2,
8910 p_new_ATTRIBUTE13 in VARCHAR2 ,
8911 p_old_ATTRIBUTE14 in VARCHAR2,
8912 p_new_ATTRIBUTE14 in VARCHAR2 ,
8913 p_old_ATTRIBUTE15 in VARCHAR2,
8914 p_new_ATTRIBUTE15 in VARCHAR2 ,
8915 p_old_ATTRIBUTE16 in VARCHAR2,
8916 p_new_ATTRIBUTE16 in VARCHAR2 ,
8920 p_new_ATTRIBUTE18 in VARCHAR2 ,
8917 p_old_ATTRIBUTE17 in VARCHAR2,
8918 p_new_ATTRIBUTE17 in VARCHAR2 ,
8919 p_old_ATTRIBUTE18 in VARCHAR2,
8921 p_old_ATTRIBUTE19 in VARCHAR2,
8922 p_new_ATTRIBUTE19 in VARCHAR2 ,
8923 p_old_ATTRIBUTE2 in VARCHAR2,
8924 p_new_ATTRIBUTE2 in VARCHAR2 ,
8925 p_old_ATTRIBUTE20 in VARCHAR2,
8926 p_new_ATTRIBUTE20 in VARCHAR2 ,
8927 p_old_ATTRIBUTE3 in VARCHAR2,
8928 p_new_ATTRIBUTE3 in VARCHAR2 ,
8929 p_old_ATTRIBUTE4 in VARCHAR2,
8930 p_new_ATTRIBUTE4 in VARCHAR2 ,
8931 p_old_ATTRIBUTE5 in VARCHAR2,
8932 p_new_ATTRIBUTE5 in VARCHAR2 ,
8933 p_old_ATTRIBUTE6 in VARCHAR2,
8934 p_new_ATTRIBUTE6 in VARCHAR2 ,
8935 p_old_ATTRIBUTE7 in VARCHAR2,
8936 p_new_ATTRIBUTE7 in VARCHAR2 ,
8937 p_old_ATTRIBUTE8 in VARCHAR2,
8938 p_new_ATTRIBUTE8 in VARCHAR2 ,
8939 p_old_ATTRIBUTE9 in VARCHAR2,
8940 p_new_ATTRIBUTE9 in VARCHAR2 ,
8941 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
8942 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
8943 p_old_BUSINESS_GROUP_ID in NUMBER,
8944 p_new_BUSINESS_GROUP_ID in NUMBER ,
8945 p_old_DATE_START in DATE,
8946 p_new_DATE_START in DATE ,
8947 p_old_FINAL_PROCESS_DATE in DATE,
8948 p_new_FINAL_PROCESS_DATE in DATE ,
8949 p_old_LAST_STANDARD_PROCESS_DA in DATE,
8950 p_new_LAST_STANDARD_PROCESS_DA in DATE ,
8951 p_old_LEAVING_REASON in VARCHAR2,
8952 p_new_LEAVING_REASON in VARCHAR2 ,
8953 p_old_NOTIFIED_TERMINATION_DAT in DATE,
8954 p_new_NOTIFIED_TERMINATION_DAT in DATE ,
8955 p_old_PDS_INFORMATION1 in VARCHAR2,
8956 p_new_PDS_INFORMATION1 in VARCHAR2 ,
8957 p_old_PDS_INFORMATION10 in VARCHAR2,
8958 p_new_PDS_INFORMATION10 in VARCHAR2 ,
8959 p_old_PDS_INFORMATION11 in VARCHAR2,
8960 p_new_PDS_INFORMATION11 in VARCHAR2 ,
8961 p_old_PDS_INFORMATION12 in VARCHAR2,
8962 p_new_PDS_INFORMATION12 in VARCHAR2 ,
8963 p_old_PDS_INFORMATION13 in VARCHAR2,
8964 p_new_PDS_INFORMATION13 in VARCHAR2 ,
8965 p_old_PDS_INFORMATION14 in VARCHAR2,
8966 p_new_PDS_INFORMATION14 in VARCHAR2 ,
8967 p_old_PDS_INFORMATION15 in VARCHAR2,
8968 p_new_PDS_INFORMATION15 in VARCHAR2 ,
8969 p_old_PDS_INFORMATION16 in VARCHAR2,
8970 p_new_PDS_INFORMATION16 in VARCHAR2 ,
8971 p_old_PDS_INFORMATION17 in VARCHAR2,
8972 p_new_PDS_INFORMATION17 in VARCHAR2 ,
8973 p_old_PDS_INFORMATION18 in VARCHAR2,
8974 p_new_PDS_INFORMATION18 in VARCHAR2 ,
8975 p_old_PDS_INFORMATION19 in VARCHAR2,
8976 p_new_PDS_INFORMATION19 in VARCHAR2 ,
8977 p_old_PDS_INFORMATION2 in VARCHAR2,
8978 p_new_PDS_INFORMATION2 in VARCHAR2 ,
8979 p_old_PDS_INFORMATION20 in VARCHAR2,
8980 p_new_PDS_INFORMATION20 in VARCHAR2 ,
8981 p_old_PDS_INFORMATION21 in VARCHAR2,
8982 p_new_PDS_INFORMATION21 in VARCHAR2 ,
8983 p_old_PDS_INFORMATION22 in VARCHAR2,
8984 p_new_PDS_INFORMATION22 in VARCHAR2 ,
8985 p_old_PDS_INFORMATION23 in VARCHAR2,
8986 p_new_PDS_INFORMATION23 in VARCHAR2 ,
8987 p_old_PDS_INFORMATION24 in VARCHAR2,
8988 p_new_PDS_INFORMATION24 in VARCHAR2 ,
8989 p_old_PDS_INFORMATION25 in VARCHAR2,
8990 p_new_PDS_INFORMATION25 in VARCHAR2 ,
8991 p_old_PDS_INFORMATION26 in VARCHAR2,
8992 p_new_PDS_INFORMATION26 in VARCHAR2 ,
8993 p_old_PDS_INFORMATION27 in VARCHAR2,
8994 p_new_PDS_INFORMATION27 in VARCHAR2 ,
8995 p_old_PDS_INFORMATION28 in VARCHAR2,
8996 p_new_PDS_INFORMATION28 in VARCHAR2 ,
8997 p_old_PDS_INFORMATION29 in VARCHAR2,
8998 p_new_PDS_INFORMATION29 in VARCHAR2 ,
8999 p_old_PDS_INFORMATION3 in VARCHAR2,
9000 p_new_PDS_INFORMATION3 in VARCHAR2 ,
9001 p_old_PDS_INFORMATION30 in VARCHAR2,
9002 p_new_PDS_INFORMATION30 in VARCHAR2 ,
9003 p_old_PDS_INFORMATION4 in VARCHAR2,
9004 p_new_PDS_INFORMATION4 in VARCHAR2 ,
9005 p_old_PDS_INFORMATION5 in VARCHAR2,
9006 p_new_PDS_INFORMATION5 in VARCHAR2 ,
9007 p_old_PDS_INFORMATION6 in VARCHAR2,
9008 p_new_PDS_INFORMATION6 in VARCHAR2 ,
9009 p_old_PDS_INFORMATION7 in VARCHAR2,
9010 p_new_PDS_INFORMATION7 in VARCHAR2 ,
9011 p_old_PDS_INFORMATION8 in VARCHAR2,
9012 p_new_PDS_INFORMATION8 in VARCHAR2 ,
9013 p_old_PDS_INFORMATION9 in VARCHAR2,
9014 p_new_PDS_INFORMATION9 in VARCHAR2 ,
9015 p_old_PDS_INFORMATION_CATEGORY in VARCHAR2,
9016 p_new_PDS_INFORMATION_CATEGORY in VARCHAR2 ,
9017 p_old_PERIOD_OF_SERVICE_ID in NUMBER,
9018 p_new_PERIOD_OF_SERVICE_ID in NUMBER ,
9019 p_old_PERSON_ID in NUMBER,
9020 p_new_PERSON_ID in NUMBER ,
9021 p_old_PRIOR_EMPLOYMENT_SSP_PAI in DATE,
9022 p_new_PRIOR_EMPLOYMENT_SSP_PAI in DATE ,
9023 p_old_PRIOR_EMPLOYMENT_SSP_WEE in NUMBER,
9024 p_new_PRIOR_EMPLOYMENT_SSP_WEE in NUMBER ,
9025 p_old_PROGRAM_APPLICATION_ID in NUMBER,
9026 p_new_PROGRAM_APPLICATION_ID in NUMBER ,
9027 p_old_PROGRAM_ID in NUMBER,
9028 p_new_PROGRAM_ID in NUMBER ,
9029 p_old_PROGRAM_UPDATE_DATE in DATE,
9030 p_new_PROGRAM_UPDATE_DATE in DATE ,
9031 p_old_PROJECTED_TERMINATION_DA in DATE,
9032 p_new_PROJECTED_TERMINATION_DA in DATE ,
9033 p_old_REQUEST_ID in NUMBER,
9034 p_new_REQUEST_ID in NUMBER ,
9035 p_old_TERMINATION_ACCEPTED_PER in NUMBER,
9036 p_new_TERMINATION_ACCEPTED_PER in NUMBER
9037 )
9038 is
9039 --
9040 cursor asgcur (p_person_id number) is
9041 select distinct assignment_id
9042 from per_assignments_f
9046 begin
9043 where person_id = p_person_id;
9044 l_proc varchar2(240) := g_package||'.per_periods_of_service_aru';
9045
9047 hr_utility.set_location(l_proc,10);
9048
9049 /* If the continuous calc is overriden then do nothing */
9050 if (pay_continuous_calc.g_override_cc = TRUE) then
9051 return;
9052 end if;
9053 --
9054 /* If the dates havent changed it must be a correction */
9055 -- We are assuming always a CORRECTION as non-datetracked table!
9056 --if (p_old_ = p_new_
9057 --and p_old_ = p_new_) then
9058 --
9059 pay_continuous_calc.event_update(p_business_group_id,
9060 p_legislation_code,
9061 'PER_PERIODS_OF_SERVICE',
9062 'ACCEPTED_TERMINATION_DATE',
9063 p_old_ACCEPTED_TERMINATION_DAT,
9064 p_new_ACCEPTED_TERMINATION_DAT,
9065 p_effective_date
9066 );
9067 --
9068 pay_continuous_calc.event_update(p_business_group_id,
9069 p_legislation_code,
9070 'PER_PERIODS_OF_SERVICE',
9071 'ACTUAL_TERMINATION_DATE',
9072 p_old_ACTUAL_TERMINATION_DATE,
9073 p_new_ACTUAL_TERMINATION_DATE,
9074 p_effective_date
9075 );
9076 --
9077 pay_continuous_calc.event_update(p_business_group_id,
9078 p_legislation_code,
9079 'PER_PERIODS_OF_SERVICE',
9080 'ADJUSTED_SVC_DATE',
9081 p_old_ADJUSTED_SVC_DATE,
9082 p_new_ADJUSTED_SVC_DATE,
9083 p_effective_date
9084 );
9085 --
9086 pay_continuous_calc.event_update(p_business_group_id,
9087 p_legislation_code,
9088 'PER_PERIODS_OF_SERVICE',
9089 'ATTRIBUTE1',
9090 p_old_ATTRIBUTE1,
9091 p_new_ATTRIBUTE1,
9092 p_effective_date
9093 );
9094 --
9095 pay_continuous_calc.event_update(p_business_group_id,
9096 p_legislation_code,
9097 'PER_PERIODS_OF_SERVICE',
9098 'ATTRIBUTE10',
9099 p_old_ATTRIBUTE10,
9100 p_new_ATTRIBUTE10,
9101 p_effective_date
9102 );
9103 --
9104 pay_continuous_calc.event_update(p_business_group_id,
9105 p_legislation_code,
9106 'PER_PERIODS_OF_SERVICE',
9107 'ATTRIBUTE11',
9108 p_old_ATTRIBUTE11,
9109 p_new_ATTRIBUTE11,
9110 p_effective_date
9111 );
9112 --
9113 pay_continuous_calc.event_update(p_business_group_id,
9114 p_legislation_code,
9115 'PER_PERIODS_OF_SERVICE',
9116 'ATTRIBUTE12',
9117 p_old_ATTRIBUTE12,
9118 p_new_ATTRIBUTE12,
9119 p_effective_date
9120 );
9121 --
9122 pay_continuous_calc.event_update(p_business_group_id,
9123 p_legislation_code,
9124 'PER_PERIODS_OF_SERVICE',
9125 'ATTRIBUTE13',
9126 p_old_ATTRIBUTE13,
9127 p_new_ATTRIBUTE13,
9128 p_effective_date
9129 );
9130 --
9131 pay_continuous_calc.event_update(p_business_group_id,
9132 p_legislation_code,
9133 'PER_PERIODS_OF_SERVICE',
9134 'ATTRIBUTE14',
9135 p_old_ATTRIBUTE14,
9136 p_new_ATTRIBUTE14,
9137 p_effective_date
9138 );
9139 --
9140 pay_continuous_calc.event_update(p_business_group_id,
9141 p_legislation_code,
9142 'PER_PERIODS_OF_SERVICE',
9143 'ATTRIBUTE15',
9144 p_old_ATTRIBUTE15,
9145 p_new_ATTRIBUTE15,
9146 p_effective_date
9147 );
9148 --
9149 pay_continuous_calc.event_update(p_business_group_id,
9150 p_legislation_code,
9151 'PER_PERIODS_OF_SERVICE',
9152 'ATTRIBUTE16',
9156 );
9153 p_old_ATTRIBUTE16,
9154 p_new_ATTRIBUTE16,
9155 p_effective_date
9157 --
9158 pay_continuous_calc.event_update(p_business_group_id,
9159 p_legislation_code,
9160 'PER_PERIODS_OF_SERVICE',
9161 'ATTRIBUTE17',
9162 p_old_ATTRIBUTE17,
9163 p_new_ATTRIBUTE17,
9164 p_effective_date
9165 );
9166 --
9167 pay_continuous_calc.event_update(p_business_group_id,
9168 p_legislation_code,
9169 'PER_PERIODS_OF_SERVICE',
9170 'ATTRIBUTE18',
9171 p_old_ATTRIBUTE18,
9172 p_new_ATTRIBUTE18,
9173 p_effective_date
9174 );
9175 --
9176 pay_continuous_calc.event_update(p_business_group_id,
9177 p_legislation_code,
9178 'PER_PERIODS_OF_SERVICE',
9179 'ATTRIBUTE19',
9180 p_old_ATTRIBUTE19,
9181 p_new_ATTRIBUTE19,
9182 p_effective_date
9183 );
9184 --
9185 pay_continuous_calc.event_update(p_business_group_id,
9186 p_legislation_code,
9187 'PER_PERIODS_OF_SERVICE',
9188 'ATTRIBUTE2',
9189 p_old_ATTRIBUTE2,
9190 p_new_ATTRIBUTE2,
9191 p_effective_date
9192 );
9193 --
9194 pay_continuous_calc.event_update(p_business_group_id,
9195 p_legislation_code,
9196 'PER_PERIODS_OF_SERVICE',
9197 'ATTRIBUTE20',
9198 p_old_ATTRIBUTE20,
9199 p_new_ATTRIBUTE20,
9200 p_effective_date
9201 );
9202 --
9203 pay_continuous_calc.event_update(p_business_group_id,
9204 p_legislation_code,
9205 'PER_PERIODS_OF_SERVICE',
9206 'ATTRIBUTE3',
9207 p_old_ATTRIBUTE3,
9208 p_new_ATTRIBUTE3,
9209 p_effective_date
9210 );
9211 --
9212 pay_continuous_calc.event_update(p_business_group_id,
9213 p_legislation_code,
9214 'PER_PERIODS_OF_SERVICE',
9215 'ATTRIBUTE4',
9216 p_old_ATTRIBUTE4,
9217 p_new_ATTRIBUTE4,
9218 p_effective_date
9219 );
9220 --
9221 pay_continuous_calc.event_update(p_business_group_id,
9222 p_legislation_code,
9223 'PER_PERIODS_OF_SERVICE',
9224 'ATTRIBUTE5',
9225 p_old_ATTRIBUTE5,
9226 p_new_ATTRIBUTE5,
9227 p_effective_date
9228 );
9229 --
9230 pay_continuous_calc.event_update(p_business_group_id,
9231 p_legislation_code,
9232 'PER_PERIODS_OF_SERVICE',
9233 'ATTRIBUTE6',
9234 p_old_ATTRIBUTE6,
9235 p_new_ATTRIBUTE6,
9236 p_effective_date
9237 );
9238 --
9239 pay_continuous_calc.event_update(p_business_group_id,
9240 p_legislation_code,
9241 'PER_PERIODS_OF_SERVICE',
9242 'ATTRIBUTE7',
9243 p_old_ATTRIBUTE7,
9244 p_new_ATTRIBUTE7,
9245 p_effective_date
9246 );
9247 --
9248 pay_continuous_calc.event_update(p_business_group_id,
9249 p_legislation_code,
9250 'PER_PERIODS_OF_SERVICE',
9251 'ATTRIBUTE8',
9252 p_old_ATTRIBUTE8,
9253 p_new_ATTRIBUTE8,
9254 p_effective_date
9255 );
9256 --
9257 pay_continuous_calc.event_update(p_business_group_id,
9258 p_legislation_code,
9259 'PER_PERIODS_OF_SERVICE',
9260 'ATTRIBUTE9',
9264 );
9261 p_old_ATTRIBUTE9,
9262 p_new_ATTRIBUTE9,
9263 p_effective_date
9265 --
9266 pay_continuous_calc.event_update(p_business_group_id,
9267 p_legislation_code,
9268 'PER_PERIODS_OF_SERVICE',
9269 'ATTRIBUTE_CATEGORY',
9270 p_old_ATTRIBUTE_CATEGORY,
9271 p_new_ATTRIBUTE_CATEGORY,
9272 p_effective_date
9273 );
9274 --
9275 pay_continuous_calc.event_update(p_business_group_id,
9276 p_legislation_code,
9277 'PER_PERIODS_OF_SERVICE',
9278 'BUSINESS_GROUP_ID',
9279 p_old_BUSINESS_GROUP_ID,
9280 p_new_BUSINESS_GROUP_ID,
9281 p_effective_date
9282 );
9283 --
9284 pay_continuous_calc.event_update(p_business_group_id,
9285 p_legislation_code,
9286 'PER_PERIODS_OF_SERVICE',
9287 'DATE_START',
9288 p_old_DATE_START,
9289 p_new_DATE_START,
9290 p_effective_date
9291 );
9292 --
9293 pay_continuous_calc.event_update(p_business_group_id,
9294 p_legislation_code,
9295 'PER_PERIODS_OF_SERVICE',
9296 'FINAL_PROCESS_DATE',
9297 p_old_FINAL_PROCESS_DATE,
9298 p_new_FINAL_PROCESS_DATE,
9299 p_effective_date
9300 );
9301 --
9302 pay_continuous_calc.event_update(p_business_group_id,
9303 p_legislation_code,
9304 'PER_PERIODS_OF_SERVICE',
9305 'LAST_STANDARD_PROCESS_DATE',
9306 p_old_LAST_STANDARD_PROCESS_DA,
9307 p_new_LAST_STANDARD_PROCESS_DA,
9308 p_effective_date
9309 );
9310 --
9311 pay_continuous_calc.event_update(p_business_group_id,
9312 p_legislation_code,
9313 'PER_PERIODS_OF_SERVICE',
9314 'LEAVING_REASON',
9315 p_old_LEAVING_REASON,
9316 p_new_LEAVING_REASON,
9317 p_effective_date
9318 );
9319 --
9320 pay_continuous_calc.event_update(p_business_group_id,
9321 p_legislation_code,
9322 'PER_PERIODS_OF_SERVICE',
9323 'NOTIFIED_TERMINATION_DATE',
9324 p_old_NOTIFIED_TERMINATION_DAT,
9325 p_new_NOTIFIED_TERMINATION_DAT,
9326 p_effective_date
9327 );
9328 --
9329 pay_continuous_calc.event_update(p_business_group_id,
9330 p_legislation_code,
9331 'PER_PERIODS_OF_SERVICE',
9332 'PDS_INFORMATION1',
9333 p_old_PDS_INFORMATION1,
9334 p_new_PDS_INFORMATION1,
9335 p_effective_date
9336 );
9337 --
9338 pay_continuous_calc.event_update(p_business_group_id,
9339 p_legislation_code,
9340 'PER_PERIODS_OF_SERVICE',
9341 'PDS_INFORMATION10',
9342 p_old_PDS_INFORMATION10,
9343 p_new_PDS_INFORMATION10,
9344 p_effective_date
9345 );
9346 --
9347 pay_continuous_calc.event_update(p_business_group_id,
9348 p_legislation_code,
9349 'PER_PERIODS_OF_SERVICE',
9350 'PDS_INFORMATION11',
9351 p_old_PDS_INFORMATION11,
9352 p_new_PDS_INFORMATION11,
9353 p_effective_date
9354 );
9355 --
9356 pay_continuous_calc.event_update(p_business_group_id,
9357 p_legislation_code,
9358 'PER_PERIODS_OF_SERVICE',
9359 'PDS_INFORMATION12',
9360 p_old_PDS_INFORMATION12,
9361 p_new_PDS_INFORMATION12,
9362 p_effective_date
9363 );
9364 --
9365 pay_continuous_calc.event_update(p_business_group_id,
9369 p_old_PDS_INFORMATION13,
9366 p_legislation_code,
9367 'PER_PERIODS_OF_SERVICE',
9368 'PDS_INFORMATION13',
9370 p_new_PDS_INFORMATION13,
9371 p_effective_date
9372 );
9373 --
9374 pay_continuous_calc.event_update(p_business_group_id,
9375 p_legislation_code,
9376 'PER_PERIODS_OF_SERVICE',
9377 'PDS_INFORMATION14',
9378 p_old_PDS_INFORMATION14,
9379 p_new_PDS_INFORMATION14,
9380 p_effective_date
9381 );
9382 --
9383 pay_continuous_calc.event_update(p_business_group_id,
9384 p_legislation_code,
9385 'PER_PERIODS_OF_SERVICE',
9386 'PDS_INFORMATION15',
9387 p_old_PDS_INFORMATION15,
9388 p_new_PDS_INFORMATION15,
9389 p_effective_date
9390 );
9391 --
9392 pay_continuous_calc.event_update(p_business_group_id,
9393 p_legislation_code,
9394 'PER_PERIODS_OF_SERVICE',
9395 'PDS_INFORMATION16',
9396 p_old_PDS_INFORMATION16,
9397 p_new_PDS_INFORMATION16,
9398 p_effective_date
9399 );
9400 --
9401 pay_continuous_calc.event_update(p_business_group_id,
9402 p_legislation_code,
9403 'PER_PERIODS_OF_SERVICE',
9404 'PDS_INFORMATION17',
9405 p_old_PDS_INFORMATION17,
9406 p_new_PDS_INFORMATION17,
9407 p_effective_date
9408 );
9409 --
9410 pay_continuous_calc.event_update(p_business_group_id,
9411 p_legislation_code,
9412 'PER_PERIODS_OF_SERVICE',
9413 'PDS_INFORMATION18',
9414 p_old_PDS_INFORMATION18,
9415 p_new_PDS_INFORMATION18,
9416 p_effective_date
9417 );
9418 --
9419 pay_continuous_calc.event_update(p_business_group_id,
9420 p_legislation_code,
9421 'PER_PERIODS_OF_SERVICE',
9422 'PDS_INFORMATION19',
9423 p_old_PDS_INFORMATION19,
9424 p_new_PDS_INFORMATION19,
9425 p_effective_date
9426 );
9427 --
9428 pay_continuous_calc.event_update(p_business_group_id,
9429 p_legislation_code,
9430 'PER_PERIODS_OF_SERVICE',
9431 'PDS_INFORMATION2',
9432 p_old_PDS_INFORMATION2,
9433 p_new_PDS_INFORMATION2,
9434 p_effective_date
9435 );
9436 --
9437 pay_continuous_calc.event_update(p_business_group_id,
9438 p_legislation_code,
9439 'PER_PERIODS_OF_SERVICE',
9440 'PDS_INFORMATION20',
9441 p_old_PDS_INFORMATION20,
9442 p_new_PDS_INFORMATION20,
9443 p_effective_date
9444 );
9445 --
9446 pay_continuous_calc.event_update(p_business_group_id,
9447 p_legislation_code,
9448 'PER_PERIODS_OF_SERVICE',
9449 'PDS_INFORMATION21',
9450 p_old_PDS_INFORMATION21,
9451 p_new_PDS_INFORMATION21,
9452 p_effective_date
9453 );
9454 --
9455 pay_continuous_calc.event_update(p_business_group_id,
9456 p_legislation_code,
9457 'PER_PERIODS_OF_SERVICE',
9458 'PDS_INFORMATION22',
9459 p_old_PDS_INFORMATION22,
9460 p_new_PDS_INFORMATION22,
9461 p_effective_date
9462 );
9463 --
9464 pay_continuous_calc.event_update(p_business_group_id,
9465 p_legislation_code,
9466 'PER_PERIODS_OF_SERVICE',
9467 'PDS_INFORMATION23',
9468 p_old_PDS_INFORMATION23,
9469 p_new_PDS_INFORMATION23,
9473 pay_continuous_calc.event_update(p_business_group_id,
9470 p_effective_date
9471 );
9472 --
9474 p_legislation_code,
9475 'PER_PERIODS_OF_SERVICE',
9476 'PDS_INFORMATION24',
9477 p_old_PDS_INFORMATION24,
9478 p_new_PDS_INFORMATION24,
9479 p_effective_date
9480 );
9481 --
9482 pay_continuous_calc.event_update(p_business_group_id,
9483 p_legislation_code,
9484 'PER_PERIODS_OF_SERVICE',
9485 'PDS_INFORMATION25',
9486 p_old_PDS_INFORMATION25,
9487 p_new_PDS_INFORMATION25,
9488 p_effective_date
9489 );
9490 --
9491 pay_continuous_calc.event_update(p_business_group_id,
9492 p_legislation_code,
9493 'PER_PERIODS_OF_SERVICE',
9494 'PDS_INFORMATION26',
9495 p_old_PDS_INFORMATION26,
9496 p_new_PDS_INFORMATION26,
9497 p_effective_date
9498 );
9499 --
9500 pay_continuous_calc.event_update(p_business_group_id,
9501 p_legislation_code,
9502 'PER_PERIODS_OF_SERVICE',
9503 'PDS_INFORMATION27',
9504 p_old_PDS_INFORMATION27,
9505 p_new_PDS_INFORMATION27,
9506 p_effective_date
9507 );
9508 --
9509 pay_continuous_calc.event_update(p_business_group_id,
9510 p_legislation_code,
9511 'PER_PERIODS_OF_SERVICE',
9512 'PDS_INFORMATION28',
9513 p_old_PDS_INFORMATION28,
9514 p_new_PDS_INFORMATION28,
9515 p_effective_date
9516 );
9517 --
9518 pay_continuous_calc.event_update(p_business_group_id,
9519 p_legislation_code,
9520 'PER_PERIODS_OF_SERVICE',
9521 'PDS_INFORMATION29',
9522 p_old_PDS_INFORMATION29,
9523 p_new_PDS_INFORMATION29,
9524 p_effective_date
9525 );
9526 --
9527 pay_continuous_calc.event_update(p_business_group_id,
9528 p_legislation_code,
9529 'PER_PERIODS_OF_SERVICE',
9530 'PDS_INFORMATION3',
9531 p_old_PDS_INFORMATION3,
9532 p_new_PDS_INFORMATION3,
9533 p_effective_date
9534 );
9535 --
9536 pay_continuous_calc.event_update(p_business_group_id,
9537 p_legislation_code,
9538 'PER_PERIODS_OF_SERVICE',
9539 'PDS_INFORMATION30',
9540 p_old_PDS_INFORMATION30,
9541 p_new_PDS_INFORMATION30,
9542 p_effective_date
9543 );
9544 --
9545 pay_continuous_calc.event_update(p_business_group_id,
9546 p_legislation_code,
9547 'PER_PERIODS_OF_SERVICE',
9548 'PDS_INFORMATION4',
9549 p_old_PDS_INFORMATION4,
9550 p_new_PDS_INFORMATION4,
9551 p_effective_date
9552 );
9553 --
9554 pay_continuous_calc.event_update(p_business_group_id,
9555 p_legislation_code,
9556 'PER_PERIODS_OF_SERVICE',
9557 'PDS_INFORMATION5',
9558 p_old_PDS_INFORMATION5,
9559 p_new_PDS_INFORMATION5,
9560 p_effective_date
9561 );
9562 --
9563 pay_continuous_calc.event_update(p_business_group_id,
9564 p_legislation_code,
9565 'PER_PERIODS_OF_SERVICE',
9566 'PDS_INFORMATION6',
9567 p_old_PDS_INFORMATION6,
9568 p_new_PDS_INFORMATION6,
9569 p_effective_date
9570 );
9571 --
9572 pay_continuous_calc.event_update(p_business_group_id,
9573 p_legislation_code,
9574 'PER_PERIODS_OF_SERVICE',
9575 'PDS_INFORMATION7',
9579 );
9576 p_old_PDS_INFORMATION7,
9577 p_new_PDS_INFORMATION7,
9578 p_effective_date
9580 --
9581 pay_continuous_calc.event_update(p_business_group_id,
9582 p_legislation_code,
9583 'PER_PERIODS_OF_SERVICE',
9584 'PDS_INFORMATION8',
9585 p_old_PDS_INFORMATION8,
9586 p_new_PDS_INFORMATION8,
9587 p_effective_date
9588 );
9589 --
9590 pay_continuous_calc.event_update(p_business_group_id,
9591 p_legislation_code,
9592 'PER_PERIODS_OF_SERVICE',
9593 'PDS_INFORMATION9',
9594 p_old_PDS_INFORMATION9,
9595 p_new_PDS_INFORMATION9,
9596 p_effective_date
9597 );
9598 --
9599 pay_continuous_calc.event_update(p_business_group_id,
9600 p_legislation_code,
9601 'PER_PERIODS_OF_SERVICE',
9602 'PDS_INFORMATION_CATEGORY',
9603 p_old_PDS_INFORMATION_CATEGORY,
9604 p_new_PDS_INFORMATION_CATEGORY,
9605 p_effective_date
9606 );
9607 --
9608 pay_continuous_calc.event_update(p_business_group_id,
9609 p_legislation_code,
9610 'PER_PERIODS_OF_SERVICE',
9611 'PERIOD_OF_SERVICE_ID',
9612 p_old_PERIOD_OF_SERVICE_ID,
9613 p_new_PERIOD_OF_SERVICE_ID,
9614 p_effective_date
9615 );
9616 --
9617 pay_continuous_calc.event_update(p_business_group_id,
9618 p_legislation_code,
9619 'PER_PERIODS_OF_SERVICE',
9620 'PERSON_ID',
9621 p_old_PERSON_ID,
9622 p_new_PERSON_ID,
9623 p_effective_date
9624 );
9625 --
9626 pay_continuous_calc.event_update(p_business_group_id,
9627 p_legislation_code,
9628 'PER_PERIODS_OF_SERVICE',
9629 'PRIOR_EMPLOYMENT_SSP_PAID_TO',
9630 p_old_PRIOR_EMPLOYMENT_SSP_PAI,
9631 p_new_PRIOR_EMPLOYMENT_SSP_PAI,
9632 p_effective_date
9633 );
9634 --
9635 pay_continuous_calc.event_update(p_business_group_id,
9636 p_legislation_code,
9637 'PER_PERIODS_OF_SERVICE',
9638 'PRIOR_EMPLOYMENT_SSP_WEEKS',
9639 p_old_PRIOR_EMPLOYMENT_SSP_WEE,
9640 p_new_PRIOR_EMPLOYMENT_SSP_WEE,
9641 p_effective_date
9642 );
9643 --
9644 pay_continuous_calc.event_update(p_business_group_id,
9645 p_legislation_code,
9646 'PER_PERIODS_OF_SERVICE',
9647 'PROGRAM_APPLICATION_ID',
9648 p_old_PROGRAM_APPLICATION_ID,
9649 p_new_PROGRAM_APPLICATION_ID,
9650 p_effective_date
9651 );
9652 --
9653 pay_continuous_calc.event_update(p_business_group_id,
9654 p_legislation_code,
9655 'PER_PERIODS_OF_SERVICE',
9656 'PROGRAM_ID',
9657 p_old_PROGRAM_ID,
9658 p_new_PROGRAM_ID,
9659 p_effective_date
9660 );
9661 --
9662 pay_continuous_calc.event_update(p_business_group_id,
9663 p_legislation_code,
9664 'PER_PERIODS_OF_SERVICE',
9665 'PROGRAM_UPDATE_DATE',
9666 p_old_PROGRAM_UPDATE_DATE,
9667 p_new_PROGRAM_UPDATE_DATE,
9668 p_effective_date
9669 );
9670 --
9671 pay_continuous_calc.event_update(p_business_group_id,
9672 p_legislation_code,
9673 'PER_PERIODS_OF_SERVICE',
9674 'PROJECTED_TERMINATION_DATE',
9675 p_old_PROJECTED_TERMINATION_DA,
9676 p_new_PROJECTED_TERMINATION_DA,
9677 p_effective_date
9678 );
9679 --
9683 'REQUEST_ID',
9680 pay_continuous_calc.event_update(p_business_group_id,
9681 p_legislation_code,
9682 'PER_PERIODS_OF_SERVICE',
9684 p_old_REQUEST_ID,
9685 p_new_REQUEST_ID,
9686 p_effective_date
9687 );
9688 --
9689 pay_continuous_calc.event_update(p_business_group_id,
9690 p_legislation_code,
9691 'PER_PERIODS_OF_SERVICE',
9692 'TERMINATION_ACCEPTED_PERSON_ID',
9693 p_old_TERMINATION_ACCEPTED_PER,
9694 p_new_TERMINATION_ACCEPTED_PER,
9695 p_effective_date
9696 );
9697
9698 --end if;
9699 --
9700 hr_utility.set_location(l_proc,50);
9701 /* Now call the API for the affected assignments */
9702 declare
9703 l_process_event_id number;
9704 l_object_version_number number;
9705 cnt number;
9706 begin
9707 if (pay_continuous_calc.g_event_list.sz <> 0) then
9708 for asgrec in asgcur (p_old_PERSON_ID) loop
9709 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
9710 pay_ppe_api.create_process_event(
9711 p_assignment_id => asgrec.assignment_id,
9712 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
9713 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
9714 p_status => 'U',
9715 p_description => pay_continuous_calc.g_event_list.description(cnt),
9716 p_process_event_id => l_process_event_id,
9717 p_object_version_number => l_object_version_number,
9718 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
9719 p_business_group_id => p_business_group_id,
9720 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
9721 p_surrogate_key => p_new_period_of_service_id
9722 );
9723 end loop;
9724 end loop;
9725 end if;
9726 pay_continuous_calc.g_event_list.sz := 0;
9727 end;
9728 --
9729 hr_utility.set_location(l_proc,900);
9730 end PER_PERIODS_OF_SERVICE_aru;
9731
9732 --------------------------------------------
9733 -- PER_PAY_PROPOSALS_aru
9734 --------------------------------------------
9735 /* Used generator to build this procedure, but removed the references to
9736 date columns as this is a non-datetrack table
9737 We are assuming always correction
9738 */
9739 /* PER_PAY_PROPOSALS */
9740 /* name : PER_PAY_PROPOSALS_aru
9741 purpose : This is procedure that records any changes for updates
9742 on per_pay_proposals CORRECTION only.
9743 */
9744
9745 procedure PER_PAY_PROPOSALS_aru(
9746 p_business_group_id in number,
9747 p_legislation_code in varchar2,
9748 p_effective_date in date ,
9749 p_old_APPROVED in VARCHAR2,
9750 p_new_APPROVED in VARCHAR2 ,
9751 p_old_ASSIGNMENT_ID in NUMBER,
9752 p_new_ASSIGNMENT_ID in NUMBER ,
9753 p_old_ATTRIBUTE1 in VARCHAR2,
9754 p_new_ATTRIBUTE1 in VARCHAR2 ,
9755 p_old_ATTRIBUTE10 in VARCHAR2,
9756 p_new_ATTRIBUTE10 in VARCHAR2 ,
9757 p_old_ATTRIBUTE11 in VARCHAR2,
9758 p_new_ATTRIBUTE11 in VARCHAR2 ,
9759 p_old_ATTRIBUTE12 in VARCHAR2,
9760 p_new_ATTRIBUTE12 in VARCHAR2 ,
9761 p_old_ATTRIBUTE13 in VARCHAR2,
9762 p_new_ATTRIBUTE13 in VARCHAR2 ,
9763 p_old_ATTRIBUTE14 in VARCHAR2,
9764 p_new_ATTRIBUTE14 in VARCHAR2 ,
9765 p_old_ATTRIBUTE15 in VARCHAR2,
9766 p_new_ATTRIBUTE15 in VARCHAR2 ,
9767 p_old_ATTRIBUTE16 in VARCHAR2,
9768 p_new_ATTRIBUTE16 in VARCHAR2 ,
9769 p_old_ATTRIBUTE17 in VARCHAR2,
9770 p_new_ATTRIBUTE17 in VARCHAR2 ,
9771 p_old_ATTRIBUTE18 in VARCHAR2,
9772 p_new_ATTRIBUTE18 in VARCHAR2 ,
9773 p_old_ATTRIBUTE19 in VARCHAR2,
9774 p_new_ATTRIBUTE19 in VARCHAR2 ,
9775 p_old_ATTRIBUTE2 in VARCHAR2,
9776 p_new_ATTRIBUTE2 in VARCHAR2 ,
9777 p_old_ATTRIBUTE20 in VARCHAR2,
9778 p_new_ATTRIBUTE20 in VARCHAR2 ,
9779 p_old_ATTRIBUTE3 in VARCHAR2,
9780 p_new_ATTRIBUTE3 in VARCHAR2 ,
9781 p_old_ATTRIBUTE4 in VARCHAR2,
9782 p_new_ATTRIBUTE4 in VARCHAR2 ,
9783 p_old_ATTRIBUTE5 in VARCHAR2,
9784 p_new_ATTRIBUTE5 in VARCHAR2 ,
9785 p_old_ATTRIBUTE6 in VARCHAR2,
9786 p_new_ATTRIBUTE6 in VARCHAR2 ,
9787 p_old_ATTRIBUTE7 in VARCHAR2,
9788 p_new_ATTRIBUTE7 in VARCHAR2 ,
9789 p_old_ATTRIBUTE8 in VARCHAR2,
9790 p_new_ATTRIBUTE8 in VARCHAR2 ,
9791 p_old_ATTRIBUTE9 in VARCHAR2,
9792 p_new_ATTRIBUTE9 in VARCHAR2 ,
9793 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
9794 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
9795 p_old_BUSINESS_GROUP_ID in NUMBER,
9796 p_new_BUSINESS_GROUP_ID in NUMBER ,
9797 p_old_CHANGE_DATE in DATE,
9798 p_new_CHANGE_DATE in DATE ,
9799 p_old_EVENT_ID in NUMBER,
9800 p_new_EVENT_ID in NUMBER ,
9801 p_old_FORCED_RANKING in NUMBER,
9802 p_new_FORCED_RANKING in NUMBER ,
9803 p_old_LAST_CHANGE_DATE in DATE,
9804 p_new_LAST_CHANGE_DATE in DATE ,
9805 p_old_MULTIPLE_COMPONENTS in VARCHAR2,
9809 p_old_NEXT_SAL_REVIEW_DATE in DATE,
9806 p_new_MULTIPLE_COMPONENTS in VARCHAR2 ,
9807 p_old_NEXT_PERF_REVIEW_DATE in DATE,
9808 p_new_NEXT_PERF_REVIEW_DATE in DATE ,
9810 p_new_NEXT_SAL_REVIEW_DATE in DATE ,
9811 p_old_PAY_PROPOSAL_ID in NUMBER,
9812 p_new_PAY_PROPOSAL_ID in NUMBER ,
9813 p_old_PERFORMANCE_RATING in VARCHAR2,
9814 p_new_PERFORMANCE_RATING in VARCHAR2 ,
9815 p_old_PERFORMANCE_REVIEW_ID in NUMBER,
9816 p_new_PERFORMANCE_REVIEW_ID in NUMBER ,
9817 p_old_PROPOSAL_REASON in VARCHAR2,
9818 p_new_PROPOSAL_REASON in VARCHAR2 ,
9819 p_old_PROPOSED_SALARY in VARCHAR2,
9820 p_new_PROPOSED_SALARY in VARCHAR2 ,
9821 p_old_PROPOSED_SALARY_N in NUMBER,
9822 p_new_PROPOSED_SALARY_N in NUMBER ,
9823 p_old_REVIEW_DATE in DATE,
9824 p_new_REVIEW_DATE in DATE)
9825 is
9826 --
9827 l_proc varchar2(240) := g_package||'.per_pay_proposals_aru';
9828 begin
9829 hr_utility.set_location(l_proc,10);
9830 /* If the continuous calc is overriden then do nothing */
9831 if (pay_continuous_calc.g_override_cc = TRUE) then
9832 return;
9833 end if;
9834 --
9835 /* If the dates havent changed it must be a correction */
9836 -- We are assuming always a CORRECTION as non-datetracked table!
9837 --if (p_old_ = p_new_
9838 --and p_old_ = p_new_) then
9839 --
9840 pay_continuous_calc.event_update(p_business_group_id,
9841 p_legislation_code,
9842 'PER_PAY_PROPOSALS',
9843 'APPROVED',
9844 p_old_APPROVED,
9845 p_new_APPROVED,
9846 p_effective_date
9847 );
9848 --
9849 pay_continuous_calc.event_update(p_business_group_id,
9850 p_legislation_code,
9851 'PER_PAY_PROPOSALS',
9852 'ASSIGNMENT_ID',
9853 p_old_ASSIGNMENT_ID,
9854 p_new_ASSIGNMENT_ID,
9855 p_effective_date
9856 );
9857 --
9858 pay_continuous_calc.event_update(p_business_group_id,
9859 p_legislation_code,
9860 'PER_PAY_PROPOSALS',
9861 'ATTRIBUTE1',
9862 p_old_ATTRIBUTE1,
9863 p_new_ATTRIBUTE1,
9864 p_effective_date
9865 );
9866 --
9867 pay_continuous_calc.event_update(p_business_group_id,
9868 p_legislation_code,
9869 'PER_PAY_PROPOSALS',
9870 'ATTRIBUTE10',
9871 p_old_ATTRIBUTE10,
9872 p_new_ATTRIBUTE10,
9873 p_effective_date
9874 );
9875 --
9876 pay_continuous_calc.event_update(p_business_group_id,
9877 p_legislation_code,
9878 'PER_PAY_PROPOSALS',
9879 'ATTRIBUTE11',
9880 p_old_ATTRIBUTE11,
9881 p_new_ATTRIBUTE11,
9882 p_effective_date
9883 );
9884 --
9885 pay_continuous_calc.event_update(p_business_group_id,
9886 p_legislation_code,
9887 'PER_PAY_PROPOSALS',
9888 'ATTRIBUTE12',
9889 p_old_ATTRIBUTE12,
9890 p_new_ATTRIBUTE12,
9891 p_effective_date
9892 );
9893 --
9894 pay_continuous_calc.event_update(p_business_group_id,
9895 p_legislation_code,
9896 'PER_PAY_PROPOSALS',
9897 'ATTRIBUTE13',
9898 p_old_ATTRIBUTE13,
9899 p_new_ATTRIBUTE13,
9900 p_effective_date
9901 );
9902 --
9903 pay_continuous_calc.event_update(p_business_group_id,
9904 p_legislation_code,
9905 'PER_PAY_PROPOSALS',
9906 'ATTRIBUTE14',
9907 p_old_ATTRIBUTE14,
9908 p_new_ATTRIBUTE14,
9909 p_effective_date
9910 );
9911 --
9912 pay_continuous_calc.event_update(p_business_group_id,
9913 p_legislation_code,
9914 'PER_PAY_PROPOSALS',
9915 'ATTRIBUTE15',
9916 p_old_ATTRIBUTE15,
9917 p_new_ATTRIBUTE15,
9918 p_effective_date
9919 );
9920 --
9921 pay_continuous_calc.event_update(p_business_group_id,
9925 p_old_ATTRIBUTE16,
9922 p_legislation_code,
9923 'PER_PAY_PROPOSALS',
9924 'ATTRIBUTE16',
9926 p_new_ATTRIBUTE16,
9927 p_effective_date
9928 );
9929 --
9930 pay_continuous_calc.event_update(p_business_group_id,
9931 p_legislation_code,
9932 'PER_PAY_PROPOSALS',
9933 'ATTRIBUTE17',
9934 p_old_ATTRIBUTE17,
9935 p_new_ATTRIBUTE17,
9936 p_effective_date
9937 );
9938 --
9939 pay_continuous_calc.event_update(p_business_group_id,
9940 p_legislation_code,
9941 'PER_PAY_PROPOSALS',
9942 'ATTRIBUTE18',
9943 p_old_ATTRIBUTE18,
9944 p_new_ATTRIBUTE18,
9945 p_effective_date
9946 );
9947 --
9948 pay_continuous_calc.event_update(p_business_group_id,
9949 p_legislation_code,
9950 'PER_PAY_PROPOSALS',
9951 'ATTRIBUTE19',
9952 p_old_ATTRIBUTE19,
9953 p_new_ATTRIBUTE19,
9954 p_effective_date
9955 );
9956 --
9957 pay_continuous_calc.event_update(p_business_group_id,
9958 p_legislation_code,
9959 'PER_PAY_PROPOSALS',
9960 'ATTRIBUTE2',
9961 p_old_ATTRIBUTE2,
9962 p_new_ATTRIBUTE2,
9963 p_effective_date
9964 );
9965 --
9966 pay_continuous_calc.event_update(p_business_group_id,
9967 p_legislation_code,
9968 'PER_PAY_PROPOSALS',
9969 'ATTRIBUTE20',
9970 p_old_ATTRIBUTE20,
9971 p_new_ATTRIBUTE20,
9972 p_effective_date
9973 );
9974 --
9975 pay_continuous_calc.event_update(p_business_group_id,
9976 p_legislation_code,
9977 'PER_PAY_PROPOSALS',
9978 'ATTRIBUTE3',
9979 p_old_ATTRIBUTE3,
9980 p_new_ATTRIBUTE3,
9981 p_effective_date
9982 );
9983 --
9984 pay_continuous_calc.event_update(p_business_group_id,
9985 p_legislation_code,
9986 'PER_PAY_PROPOSALS',
9987 'ATTRIBUTE4',
9988 p_old_ATTRIBUTE4,
9989 p_new_ATTRIBUTE4,
9990 p_effective_date
9991 );
9992 --
9993 pay_continuous_calc.event_update(p_business_group_id,
9994 p_legislation_code,
9995 'PER_PAY_PROPOSALS',
9996 'ATTRIBUTE5',
9997 p_old_ATTRIBUTE5,
9998 p_new_ATTRIBUTE5,
9999 p_effective_date
10000 );
10001 --
10002 pay_continuous_calc.event_update(p_business_group_id,
10003 p_legislation_code,
10004 'PER_PAY_PROPOSALS',
10005 'ATTRIBUTE6',
10006 p_old_ATTRIBUTE6,
10007 p_new_ATTRIBUTE6,
10008 p_effective_date
10009 );
10010 --
10011 pay_continuous_calc.event_update(p_business_group_id,
10012 p_legislation_code,
10013 'PER_PAY_PROPOSALS',
10014 'ATTRIBUTE7',
10015 p_old_ATTRIBUTE7,
10016 p_new_ATTRIBUTE7,
10017 p_effective_date
10018 );
10019 --
10020 pay_continuous_calc.event_update(p_business_group_id,
10021 p_legislation_code,
10022 'PER_PAY_PROPOSALS',
10023 'ATTRIBUTE8',
10024 p_old_ATTRIBUTE8,
10025 p_new_ATTRIBUTE8,
10026 p_effective_date
10027 );
10028 --
10029 pay_continuous_calc.event_update(p_business_group_id,
10030 p_legislation_code,
10034 p_new_ATTRIBUTE9,
10031 'PER_PAY_PROPOSALS',
10032 'ATTRIBUTE9',
10033 p_old_ATTRIBUTE9,
10035 p_effective_date
10036 );
10037 --
10038 pay_continuous_calc.event_update(p_business_group_id,
10039 p_legislation_code,
10040 'PER_PAY_PROPOSALS',
10041 'ATTRIBUTE_CATEGORY',
10042 p_old_ATTRIBUTE_CATEGORY,
10043 p_new_ATTRIBUTE_CATEGORY,
10044 p_effective_date
10045 );
10046 --
10047 pay_continuous_calc.event_update(p_business_group_id,
10048 p_legislation_code,
10049 'PER_PAY_PROPOSALS',
10050 'BUSINESS_GROUP_ID',
10051 p_old_BUSINESS_GROUP_ID,
10052 p_new_BUSINESS_GROUP_ID,
10053 p_effective_date
10054 );
10055 --
10056 pay_continuous_calc.event_update(p_business_group_id,
10057 p_legislation_code,
10058 'PER_PAY_PROPOSALS',
10059 'CHANGE_DATE',
10060 p_old_CHANGE_DATE,
10061 p_new_CHANGE_DATE,
10062 p_effective_date
10063 );
10064 --
10065 pay_continuous_calc.event_update(p_business_group_id,
10066 p_legislation_code,
10067 'PER_PAY_PROPOSALS',
10068 'EVENT_ID',
10069 p_old_EVENT_ID,
10070 p_new_EVENT_ID,
10071 p_effective_date
10072 );
10073 --
10074 pay_continuous_calc.event_update(p_business_group_id,
10075 p_legislation_code,
10076 'PER_PAY_PROPOSALS',
10077 'FORCED_RANKING',
10078 p_old_FORCED_RANKING,
10079 p_new_FORCED_RANKING,
10080 p_effective_date
10081 );
10082 --
10083 pay_continuous_calc.event_update(p_business_group_id,
10084 p_legislation_code,
10085 'PER_PAY_PROPOSALS',
10086 'LAST_CHANGE_DATE',
10087 p_old_LAST_CHANGE_DATE,
10088 p_new_LAST_CHANGE_DATE,
10089 p_effective_date
10090 );
10091 --
10092 pay_continuous_calc.event_update(p_business_group_id,
10093 p_legislation_code,
10094 'PER_PAY_PROPOSALS',
10095 'MULTIPLE_COMPONENTS',
10096 p_old_MULTIPLE_COMPONENTS,
10097 p_new_MULTIPLE_COMPONENTS,
10098 p_effective_date
10099 );
10100 --
10101 pay_continuous_calc.event_update(p_business_group_id,
10102 p_legislation_code,
10103 'PER_PAY_PROPOSALS',
10104 'NEXT_PERF_REVIEW_DATE',
10105 p_old_NEXT_PERF_REVIEW_DATE,
10106 p_new_NEXT_PERF_REVIEW_DATE,
10107 p_effective_date
10108 );
10109 --
10110 pay_continuous_calc.event_update(p_business_group_id,
10111 p_legislation_code,
10112 'PER_PAY_PROPOSALS',
10113 'NEXT_SAL_REVIEW_DATE',
10114 p_old_NEXT_SAL_REVIEW_DATE,
10115 p_new_NEXT_SAL_REVIEW_DATE,
10116 p_effective_date
10117 );
10118 --
10119 pay_continuous_calc.event_update(p_business_group_id,
10120 p_legislation_code,
10121 'PER_PAY_PROPOSALS',
10122 'PAY_PROPOSAL_ID',
10123 p_old_PAY_PROPOSAL_ID,
10124 p_new_PAY_PROPOSAL_ID,
10125 p_effective_date
10126 );
10127 --
10128 pay_continuous_calc.event_update(p_business_group_id,
10129 p_legislation_code,
10130 'PER_PAY_PROPOSALS',
10131 'PERFORMANCE_RATING',
10132 p_old_PERFORMANCE_RATING,
10133 p_new_PERFORMANCE_RATING,
10134 p_effective_date
10138 p_legislation_code,
10135 );
10136 --
10137 pay_continuous_calc.event_update(p_business_group_id,
10139 'PER_PAY_PROPOSALS',
10140 'PERFORMANCE_REVIEW_ID',
10141 p_old_PERFORMANCE_REVIEW_ID,
10142 p_new_PERFORMANCE_REVIEW_ID,
10143 p_effective_date
10144 );
10145 --
10146 pay_continuous_calc.event_update(p_business_group_id,
10147 p_legislation_code,
10148 'PER_PAY_PROPOSALS',
10149 'PROPOSAL_REASON',
10150 p_old_PROPOSAL_REASON,
10151 p_new_PROPOSAL_REASON,
10152 p_effective_date
10153 );
10154 --
10155 pay_continuous_calc.event_update(p_business_group_id,
10156 p_legislation_code,
10157 'PER_PAY_PROPOSALS',
10158 'PROPOSED_SALARY',
10159 p_old_PROPOSED_SALARY,
10160 p_new_PROPOSED_SALARY,
10161 p_effective_date
10162 );
10163 --
10164 pay_continuous_calc.event_update(p_business_group_id,
10165 p_legislation_code,
10166 'PER_PAY_PROPOSALS',
10167 'PROPOSED_SALARY_N',
10168 p_old_PROPOSED_SALARY_N,
10169 p_new_PROPOSED_SALARY_N,
10170 p_effective_date
10171 );
10172 --
10173 pay_continuous_calc.event_update(p_business_group_id,
10174 p_legislation_code,
10175 'PER_PAY_PROPOSALS',
10176 'REVIEW_DATE',
10177 p_old_REVIEW_DATE,
10178 p_new_REVIEW_DATE,
10179 p_effective_date
10180 );
10181
10182 -- CORRECTION ONLY end if;
10183 --
10184 /* Now call the API for the affected assignments */
10185 hr_utility.set_location(l_proc,50);
10186 declare
10187 l_process_event_id number;
10188 l_object_version_number number;
10189 cnt number;
10190 begin
10191 if (pay_continuous_calc.g_event_list.sz <> 0) then
10192 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10193 pay_ppe_api.create_process_event(
10194 p_assignment_id => p_new_assignment_id,
10195 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
10196 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
10197 p_status => 'U',
10198 p_description => pay_continuous_calc.g_event_list.description(cnt),
10199 p_process_event_id => l_process_event_id,
10200 p_object_version_number => l_object_version_number,
10201 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
10202 p_business_group_id => p_business_group_id,
10203 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
10204 p_surrogate_key => p_new_pay_proposal_id
10205 );
10206 end loop;
10207 end if;
10208 pay_continuous_calc.g_event_list.sz := 0;
10209 end;
10210 --
10211 hr_utility.set_location(l_proc,900);
10212 end PER_PAY_PROPOSALS_aru;
10213
10214 /* PER_PAY_PROPOSALS */
10215 /* name : PER_PAY_PROPOSALS_ari
10216 purpose : This is procedure that records any insert
10217 on per_pay_proposals.
10218 */
10219 procedure per_pay_proposals_ari(
10220 p_business_group_id in number,
10221 p_legislation_code in varchar2,
10222 p_assignment_id in number,
10223 p_effective_start_date in date,
10224 p_pay_proposal_id in number
10225 )
10226 is
10227 l_process_event_id number;
10228 l_object_version_number number;
10229 l_proc varchar2(240) := g_package||'.per_pay_proposals_ari';
10230 begin
10231 hr_utility.set_location(l_proc, 10);
10232 /* If the continuous calc is overriden then do nothing */
10233 if (g_override_cc = TRUE) then
10234 return;
10235 end if;
10236 --
10237 -- Date column notional as this is a non-datetrack table
10238 -- See pycodtrg.ldt to see which value is used as 'effective_start_date'
10239 pay_continuous_calc.event_update(p_business_group_id,
10240 p_legislation_code,
10241 'PER_PAY_PROPOSALS',
10242 NULL,
10243 NULL,
10244 NULL,
10245 p_effective_start_date,
10249 /* Now call the API for the affected assignments */
10246 p_effective_start_date,
10247 'I'
10248 );
10250 declare
10251 cnt number;
10252 l_process_event_id number;
10253 l_object_version_number number;
10254 begin
10255 if (pay_continuous_calc.g_event_list.sz <> 0) then
10256 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10257 pay_ppe_api.create_process_event(
10258 p_assignment_id => p_assignment_id,
10259 p_effective_date => g_event_list.effective_date(cnt),
10260 p_change_type => g_event_list.change_type(cnt),
10261 p_status => 'U',
10262 p_description => g_event_list.description(cnt),
10263 p_process_event_id => l_process_event_id,
10264 p_object_version_number => l_object_version_number,
10265 p_event_update_id => g_event_list.event_update_id(cnt),
10266 p_surrogate_key => p_pay_proposal_id,
10267 p_calculation_date => g_event_list.calc_date(cnt),
10268 p_business_group_id => p_business_group_id
10269 );
10270 end loop;
10271 end if;
10272 pay_continuous_calc.g_event_list.sz := 0;
10273 end;
10274 hr_utility.set_location(l_proc, 900);
10275 end per_pay_proposals_ari;
10276 --
10277 /* name : per_pay_proposals_ard
10278 purpose : This is procedure that records any deletes
10279 on per_pay_proposals.
10280 */
10281 procedure per_pay_proposals_ard(
10282 p_business_group_id in number,
10283 p_legislation_code in varchar2,
10284 p_assignment_id in number,
10285 p_effective_start_date in date,
10286 p_pay_proposal_id in number
10287 )
10288 is
10289 l_process_event_id number;
10290 l_object_version_number number;
10291 l_proc varchar2(240) := g_package||'.per_pay_proposals_ard';
10292 begin
10293 hr_utility.set_location(l_proc, 10);
10294 /* If the continuous calc is overriden then do nothing */
10295 if (g_override_cc = TRUE) then
10296 return;
10297 end if;
10298 --
10299 -- Date column notional as this is a non-datetrack table
10300 -- See pycodtrg.ldt to see which value is used as 'effective_start_date'
10301 pay_continuous_calc.event_update(p_business_group_id,
10302 p_legislation_code,
10303 'PER_PAY_PROPOSALS',
10304 NULL,
10305 NULL,
10306 NULL,
10307 p_effective_start_date,
10308 p_effective_start_date,
10309 'D'
10310 );
10311 /* Now call the API for the affected assignments */
10312 declare
10313 cnt number;
10314 l_process_event_id number;
10315 l_object_version_number number;
10316 begin
10317 if (pay_continuous_calc.g_event_list.sz <> 0) then
10318 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10319 pay_ppe_api.create_process_event(
10320 p_assignment_id => p_assignment_id,
10321 p_effective_date => g_event_list.effective_date(cnt),
10322 p_change_type => g_event_list.change_type(cnt),
10323 p_status => 'U',
10324 p_description => g_event_list.description(cnt),
10325 p_process_event_id => l_process_event_id,
10326 p_object_version_number => l_object_version_number,
10327 p_event_update_id => g_event_list.event_update_id(cnt),
10328 p_surrogate_key => p_pay_proposal_id,
10329 p_calculation_date => g_event_list.calc_date(cnt),
10330 p_business_group_id => p_business_group_id
10331 );
10332 end loop;
10333 end if;
10334 pay_continuous_calc.g_event_list.sz := 0;
10335 end;
10336 hr_utility.set_location(l_proc, 900);
10337 END per_pay_proposals_ard;
10338 --
10339 --------------------------------------------
10340 -- PER_PERFORMANCE_REVIEWS
10341 --------------------------------------------
10342 /* Used generator to build this procedure, but removed the references to
10343 date columns as this is a non-datetrack table
10344 We are assuming always correction
10345 */
10346 /* PER_PERFORMANCE_REVIEWS */
10347 /* name : PER_PERFORMANCE_REVIEWS
10348 purpose : This is procedure that records any changes for updates
10349 on per_performance_reviews CORRECTION only.
10350 */
10351 procedure PER_PERFORMANCE_REVIEWS_aru(
10352 p_business_group_id in number,
10353 p_legislation_code in varchar2,
10354 p_effective_date in date ,
10355 p_old_ATTRIBUTE1 in VARCHAR2,
10356 p_new_ATTRIBUTE1 in VARCHAR2 ,
10357 p_old_ATTRIBUTE10 in VARCHAR2,
10358 p_new_ATTRIBUTE10 in VARCHAR2 ,
10362 p_new_ATTRIBUTE12 in VARCHAR2 ,
10359 p_old_ATTRIBUTE11 in VARCHAR2,
10360 p_new_ATTRIBUTE11 in VARCHAR2 ,
10361 p_old_ATTRIBUTE12 in VARCHAR2,
10363 p_old_ATTRIBUTE13 in VARCHAR2,
10364 p_new_ATTRIBUTE13 in VARCHAR2 ,
10365 p_old_ATTRIBUTE14 in VARCHAR2,
10366 p_new_ATTRIBUTE14 in VARCHAR2 ,
10367 p_old_ATTRIBUTE15 in VARCHAR2,
10368 p_new_ATTRIBUTE15 in VARCHAR2 ,
10369 p_old_ATTRIBUTE16 in VARCHAR2,
10370 p_new_ATTRIBUTE16 in VARCHAR2 ,
10371 p_old_ATTRIBUTE17 in VARCHAR2,
10372 p_new_ATTRIBUTE17 in VARCHAR2 ,
10373 p_old_ATTRIBUTE18 in VARCHAR2,
10374 p_new_ATTRIBUTE18 in VARCHAR2 ,
10375 p_old_ATTRIBUTE19 in VARCHAR2,
10376 p_new_ATTRIBUTE19 in VARCHAR2 ,
10377 p_old_ATTRIBUTE2 in VARCHAR2,
10378 p_new_ATTRIBUTE2 in VARCHAR2 ,
10379 p_old_ATTRIBUTE20 in VARCHAR2,
10380 p_new_ATTRIBUTE20 in VARCHAR2 ,
10381 p_old_ATTRIBUTE21 in VARCHAR2,
10382 p_new_ATTRIBUTE21 in VARCHAR2 ,
10383 p_old_ATTRIBUTE22 in VARCHAR2,
10384 p_new_ATTRIBUTE22 in VARCHAR2 ,
10385 p_old_ATTRIBUTE23 in VARCHAR2,
10386 p_new_ATTRIBUTE23 in VARCHAR2 ,
10387 p_old_ATTRIBUTE24 in VARCHAR2,
10388 p_new_ATTRIBUTE24 in VARCHAR2,
10389 p_old_ATTRIBUTE25 in VARCHAR2,
10390 p_new_ATTRIBUTE25 in VARCHAR2 ,
10391 p_old_ATTRIBUTE26 in VARCHAR2,
10392 p_new_ATTRIBUTE26 in VARCHAR2 ,
10393 p_old_ATTRIBUTE27 in VARCHAR2,
10394 p_new_ATTRIBUTE27 in VARCHAR2 ,
10395 p_old_ATTRIBUTE28 in VARCHAR2,
10396 p_new_ATTRIBUTE28 in VARCHAR2 ,
10397 p_old_ATTRIBUTE29 in VARCHAR2,
10398 p_new_ATTRIBUTE29 in VARCHAR2 ,
10399 p_old_ATTRIBUTE3 in VARCHAR2,
10400 p_new_ATTRIBUTE3 in VARCHAR2 ,
10401 p_old_ATTRIBUTE30 in VARCHAR2,
10402 p_new_ATTRIBUTE30 in VARCHAR2 ,
10403 p_old_ATTRIBUTE4 in VARCHAR2,
10404 p_new_ATTRIBUTE4 in VARCHAR2 ,
10405 p_old_ATTRIBUTE5 in VARCHAR2,
10406 p_new_ATTRIBUTE5 in VARCHAR2 ,
10407 p_old_ATTRIBUTE6 in VARCHAR2,
10408 p_new_ATTRIBUTE6 in VARCHAR2 ,
10409 p_old_ATTRIBUTE7 in VARCHAR2,
10410 p_new_ATTRIBUTE7 in VARCHAR2 ,
10411 p_old_ATTRIBUTE8 in VARCHAR2,
10412 p_new_ATTRIBUTE8 in VARCHAR2 ,
10413 p_old_ATTRIBUTE9 in VARCHAR2,
10414 p_new_ATTRIBUTE9 in VARCHAR2 ,
10415 p_old_ATTRIBUTE_CATEGORY in VARCHAR2,
10416 p_new_ATTRIBUTE_CATEGORY in VARCHAR2 ,
10417 p_old_EVENT_ID in NUMBER,
10418 p_new_EVENT_ID in NUMBER ,
10419 p_old_NEXT_PERF_REVIEW_DATE in DATE,
10420 p_new_NEXT_PERF_REVIEW_DATE in DATE ,
10421 p_old_PERFORMANCE_RATING in VARCHAR2,
10422 p_new_PERFORMANCE_RATING in VARCHAR2 ,
10423 p_old_PERFORMANCE_REVIEW_ID in NUMBER,
10424 p_new_PERFORMANCE_REVIEW_ID in NUMBER ,
10425 p_old_PERSON_ID in NUMBER,
10426 p_new_PERSON_ID in NUMBER ,
10427 p_old_REVIEW_DATE in DATE,
10428 p_new_REVIEW_DATE in DATE
10429 )
10430 is
10431 --
10432 cursor asgcur (p_person_id number) is
10433 select distinct assignment_id
10434 from per_assignments_f
10435 where person_id = p_person_id;
10436 l_proc varchar2(240) := g_package||'.per_performance_reviews_aru';
10437
10438 begin
10439 hr_utility.set_location(l_proc,10);
10440
10441 /* If the continuous calc is overriden then do nothing */
10442 if (pay_continuous_calc.g_override_cc = TRUE) then
10443 return;
10444 end if;
10445 --
10446 /* If the dates havent changed it must be a correction */
10447 -- We are assuming always a CORRECTION as non-datetracked table!
10448 --if (p_old_ = p_new_
10449 --and p_old_ = p_new_) then
10450 --
10451 pay_continuous_calc.event_update(p_business_group_id,
10452 p_legislation_code,
10453 'PER_PERFORMANCE_REVIEWS',
10454 'ATTRIBUTE1',
10455 p_old_ATTRIBUTE1,
10456 p_new_ATTRIBUTE1,
10457 p_effective_date
10458 );
10459 --
10460 pay_continuous_calc.event_update(p_business_group_id,
10461 p_legislation_code,
10462 'PER_PERFORMANCE_REVIEWS',
10463 'ATTRIBUTE10',
10464 p_old_ATTRIBUTE10,
10465 p_new_ATTRIBUTE10,
10466 p_effective_date
10467 );
10468 --
10469 pay_continuous_calc.event_update(p_business_group_id,
10470 p_legislation_code,
10471 'PER_PERFORMANCE_REVIEWS',
10472 'ATTRIBUTE11',
10473 p_old_ATTRIBUTE11,
10474 p_new_ATTRIBUTE11,
10475 p_effective_date
10476 );
10477 --
10478 pay_continuous_calc.event_update(p_business_group_id,
10479 p_legislation_code,
10480 'PER_PERFORMANCE_REVIEWS',
10481 'ATTRIBUTE12',
10482 p_old_ATTRIBUTE12,
10483 p_new_ATTRIBUTE12,
10484 p_effective_date
10485 );
10489 'PER_PERFORMANCE_REVIEWS',
10486 --
10487 pay_continuous_calc.event_update(p_business_group_id,
10488 p_legislation_code,
10490 'ATTRIBUTE13',
10491 p_old_ATTRIBUTE13,
10492 p_new_ATTRIBUTE13,
10493 p_effective_date
10494 );
10495 --
10496 pay_continuous_calc.event_update(p_business_group_id,
10497 p_legislation_code,
10498 'PER_PERFORMANCE_REVIEWS',
10499 'ATTRIBUTE14',
10500 p_old_ATTRIBUTE14,
10501 p_new_ATTRIBUTE14,
10502 p_effective_date
10503 );
10504 --
10505 pay_continuous_calc.event_update(p_business_group_id,
10506 p_legislation_code,
10507 'PER_PERFORMANCE_REVIEWS',
10508 'ATTRIBUTE15',
10509 p_old_ATTRIBUTE15,
10510 p_new_ATTRIBUTE15,
10511 p_effective_date
10512 );
10513 --
10514 pay_continuous_calc.event_update(p_business_group_id,
10515 p_legislation_code,
10516 'PER_PERFORMANCE_REVIEWS',
10517 'ATTRIBUTE16',
10518 p_old_ATTRIBUTE16,
10519 p_new_ATTRIBUTE16,
10520 p_effective_date
10521 );
10522 --
10523 pay_continuous_calc.event_update(p_business_group_id,
10524 p_legislation_code,
10525 'PER_PERFORMANCE_REVIEWS',
10526 'ATTRIBUTE17',
10527 p_old_ATTRIBUTE17,
10528 p_new_ATTRIBUTE17,
10529 p_effective_date
10530 );
10531 --
10532 pay_continuous_calc.event_update(p_business_group_id,
10533 p_legislation_code,
10534 'PER_PERFORMANCE_REVIEWS',
10535 'ATTRIBUTE18',
10536 p_old_ATTRIBUTE18,
10537 p_new_ATTRIBUTE18,
10538 p_effective_date
10539 );
10540 --
10541 pay_continuous_calc.event_update(p_business_group_id,
10542 p_legislation_code,
10543 'PER_PERFORMANCE_REVIEWS',
10544 'ATTRIBUTE19',
10545 p_old_ATTRIBUTE19,
10546 p_new_ATTRIBUTE19,
10547 p_effective_date
10548 );
10549 --
10550 pay_continuous_calc.event_update(p_business_group_id,
10551 p_legislation_code,
10552 'PER_PERFORMANCE_REVIEWS',
10553 'ATTRIBUTE2',
10554 p_old_ATTRIBUTE2,
10555 p_new_ATTRIBUTE2,
10556 p_effective_date
10557 );
10558 --
10559 pay_continuous_calc.event_update(p_business_group_id,
10560 p_legislation_code,
10561 'PER_PERFORMANCE_REVIEWS',
10562 'ATTRIBUTE20',
10563 p_old_ATTRIBUTE20,
10564 p_new_ATTRIBUTE20,
10565 p_effective_date
10566 );
10567 --
10568 pay_continuous_calc.event_update(p_business_group_id,
10569 p_legislation_code,
10570 'PER_PERFORMANCE_REVIEWS',
10571 'ATTRIBUTE21',
10572 p_old_ATTRIBUTE21,
10573 p_new_ATTRIBUTE21,
10574 p_effective_date
10575 );
10576 --
10577 pay_continuous_calc.event_update(p_business_group_id,
10578 p_legislation_code,
10579 'PER_PERFORMANCE_REVIEWS',
10580 'ATTRIBUTE22',
10581 p_old_ATTRIBUTE22,
10582 p_new_ATTRIBUTE22,
10583 p_effective_date
10584 );
10585 --
10586 pay_continuous_calc.event_update(p_business_group_id,
10587 p_legislation_code,
10588 'PER_PERFORMANCE_REVIEWS',
10589 'ATTRIBUTE23',
10590 p_old_ATTRIBUTE23,
10591 p_new_ATTRIBUTE23,
10595 pay_continuous_calc.event_update(p_business_group_id,
10592 p_effective_date
10593 );
10594 --
10596 p_legislation_code,
10597 'PER_PERFORMANCE_REVIEWS',
10598 'ATTRIBUTE24',
10599 p_old_ATTRIBUTE24,
10600 p_new_ATTRIBUTE24,
10601 p_effective_date
10602 );
10603 --
10604 pay_continuous_calc.event_update(p_business_group_id,
10605 p_legislation_code,
10606 'PER_PERFORMANCE_REVIEWS',
10607 'ATTRIBUTE25',
10608 p_old_ATTRIBUTE25,
10609 p_new_ATTRIBUTE25,
10610 p_effective_date
10611 );
10612 --
10613 pay_continuous_calc.event_update(p_business_group_id,
10614 p_legislation_code,
10615 'PER_PERFORMANCE_REVIEWS',
10616 'ATTRIBUTE26',
10617 p_old_ATTRIBUTE26,
10618 p_new_ATTRIBUTE26,
10619 p_effective_date
10620 );
10621 --
10622 pay_continuous_calc.event_update(p_business_group_id,
10623 p_legislation_code,
10624 'PER_PERFORMANCE_REVIEWS',
10625 'ATTRIBUTE27',
10626 p_old_ATTRIBUTE27,
10627 p_new_ATTRIBUTE27,
10628 p_effective_date
10629 );
10630 --
10631 pay_continuous_calc.event_update(p_business_group_id,
10632 p_legislation_code,
10633 'PER_PERFORMANCE_REVIEWS',
10634 'ATTRIBUTE28',
10635 p_old_ATTRIBUTE28,
10636 p_new_ATTRIBUTE28,
10637 p_effective_date
10638 );
10639
10640 --
10641 pay_continuous_calc.event_update(p_business_group_id,
10642 p_legislation_code,
10643 'PER_PERFORMANCE_REVIEWS',
10644 'ATTRIBUTE29',
10645 p_old_ATTRIBUTE29,
10646 p_new_ATTRIBUTE29,
10647 p_effective_date
10648 );
10649 --
10650 pay_continuous_calc.event_update(p_business_group_id,
10651 p_legislation_code,
10652 'PER_PERFORMANCE_REVIEWS',
10653 'ATTRIBUTE3',
10654 p_old_ATTRIBUTE3,
10655 p_new_ATTRIBUTE3,
10656 p_effective_date
10657 );
10658 --
10659 pay_continuous_calc.event_update(p_business_group_id,
10660 p_legislation_code,
10661 'PER_PERFORMANCE_REVIEWS',
10662 'ATTRIBUTE30',
10663 p_old_ATTRIBUTE30,
10664 p_new_ATTRIBUTE30,
10665 p_effective_date
10666 );
10667 --
10668 pay_continuous_calc.event_update(p_business_group_id,
10669 p_legislation_code,
10670 'PER_PERFORMANCE_REVIEWS',
10671 'ATTRIBUTE4',
10672 p_old_ATTRIBUTE4,
10673 p_new_ATTRIBUTE4,
10674 p_effective_date
10675 );
10676 --
10677 pay_continuous_calc.event_update(p_business_group_id,
10678 p_legislation_code,
10679 'PER_PERFORMANCE_REVIEWS',
10680 'ATTRIBUTE5',
10681 p_old_ATTRIBUTE5,
10682 p_new_ATTRIBUTE5,
10683 p_effective_date
10684 );
10685 --
10686 pay_continuous_calc.event_update(p_business_group_id,
10687 p_legislation_code,
10688 'PER_PERFORMANCE_REVIEWS',
10689 'ATTRIBUTE6',
10690 p_old_ATTRIBUTE6,
10691 p_new_ATTRIBUTE6,
10692 p_effective_date
10693 );
10694 --
10695 pay_continuous_calc.event_update(p_business_group_id,
10696 p_legislation_code,
10697 'PER_PERFORMANCE_REVIEWS',
10698 'ATTRIBUTE7',
10702 );
10699 p_old_ATTRIBUTE7,
10700 p_new_ATTRIBUTE7,
10701 p_effective_date
10703 --
10704 pay_continuous_calc.event_update(p_business_group_id,
10705 p_legislation_code,
10706 'PER_PERFORMANCE_REVIEWS',
10707 'ATTRIBUTE8',
10708 p_old_ATTRIBUTE8,
10709 p_new_ATTRIBUTE8,
10710 p_effective_date
10711 );
10712 --
10713 pay_continuous_calc.event_update(p_business_group_id,
10714 p_legislation_code,
10715 'PER_PERFORMANCE_REVIEWS',
10716 'ATTRIBUTE9',
10717 p_old_ATTRIBUTE9,
10718 p_new_ATTRIBUTE9,
10719 p_effective_date
10720 );
10721 --
10722 pay_continuous_calc.event_update(p_business_group_id,
10723 p_legislation_code,
10724 'PER_PERFORMANCE_REVIEWS',
10725 'ATTRIBUTE_CATEGORY',
10726 p_old_ATTRIBUTE_CATEGORY,
10727 p_new_ATTRIBUTE_CATEGORY,
10728 p_effective_date
10729 );
10730 --
10731 pay_continuous_calc.event_update(p_business_group_id,
10732 p_legislation_code,
10733 'PER_PERFORMANCE_REVIEWS',
10734 'EVENT_ID',
10735 p_old_EVENT_ID,
10736 p_new_EVENT_ID,
10737 p_effective_date
10738 );
10739 --
10740 pay_continuous_calc.event_update(p_business_group_id,
10741 p_legislation_code,
10742 'PER_PERFORMANCE_REVIEWS',
10743 'NEXT_PERF_REVIEW_DATE',
10744 p_old_NEXT_PERF_REVIEW_DATE,
10745 p_new_NEXT_PERF_REVIEW_DATE,
10746 p_effective_date
10747 );
10748 --
10749 pay_continuous_calc.event_update(p_business_group_id,
10750 p_legislation_code,
10751 'PER_PERFORMANCE_REVIEWS',
10752 'PERFORMANCE_RATING',
10753 p_old_PERFORMANCE_RATING,
10754 p_new_PERFORMANCE_RATING,
10755 p_effective_date
10756 );
10757 --
10758 pay_continuous_calc.event_update(p_business_group_id,
10759 p_legislation_code,
10760 'PER_PERFORMANCE_REVIEWS',
10761 'PERFORMANCE_REVIEW_ID',
10762 p_old_PERFORMANCE_REVIEW_ID,
10763 p_new_PERFORMANCE_REVIEW_ID,
10764 p_effective_date
10765 );
10766 --
10767 pay_continuous_calc.event_update(p_business_group_id,
10768 p_legislation_code,
10769 'PER_PERFORMANCE_REVIEWS',
10770 'PERSON_ID',
10771 p_old_PERSON_ID,
10772 p_new_PERSON_ID,
10773 p_effective_date
10774 );
10775 --
10776 pay_continuous_calc.event_update(p_business_group_id,
10777 p_legislation_code,
10778 'PER_PERFORMANCE_REVIEWS',
10779 'REVIEW_DATE',
10780 p_old_REVIEW_DATE,
10781 p_new_REVIEW_DATE,
10782 p_effective_date
10783 );
10784
10785 --end if;
10786 --
10787 /* Now call the API for the affected assignments */
10788 declare
10789 l_process_event_id number;
10790 l_object_version_number number;
10791 cnt number;
10792 begin
10793 if (pay_continuous_calc.g_event_list.sz <> 0) then
10794 for asgrec in asgcur (p_old_PERSON_ID) loop
10795 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10796 pay_ppe_api.create_process_event(
10797 p_assignment_id => asgrec.assignment_id,
10798 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
10799 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
10800 p_status => 'U',
10801 p_description => pay_continuous_calc.g_event_list.description(cnt),
10802 p_process_event_id => l_process_event_id,
10803 p_object_version_number => l_object_version_number,
10807 p_surrogate_key => p_new_performance_review_id
10804 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
10805 p_business_group_id => p_business_group_id,
10806 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
10808 );
10809 end loop;
10810 end loop;
10811 end if;
10812 pay_continuous_calc.g_event_list.sz := 0;
10813 end;
10814 --
10815 end PER_PERFORMANCE_REVIEWS_aru;
10816
10817 --
10818 procedure PAY_COST_ALLOCATIONS_F_aru(
10819 p_business_group_id in number,
10820 p_legislation_code in varchar2,
10821 p_effective_date in date,
10822 p_old_ASSIGNMENT_ID in NUMBER,
10823 p_new_ASSIGNMENT_ID in NUMBER,
10824 p_old_BUSINESS_GROUP_ID in NUMBER,
10825 p_new_BUSINESS_GROUP_ID in NUMBER,
10826 p_old_COST_ALLOCATION_ID in NUMBER,
10827 p_new_COST_ALLOCATION_ID in NUMBER,
10828 p_old_COST_ALLOCATION_KEYFLEX_ in NUMBER,
10829 p_new_COST_ALLOCATION_KEYFLEX_ in NUMBER,
10830 p_old_PROGRAM_APPLICATION_ID in NUMBER,
10831 p_new_PROGRAM_APPLICATION_ID in NUMBER,
10832 p_old_PROGRAM_ID in NUMBER,
10833 p_new_PROGRAM_ID in NUMBER,
10834 p_old_PROGRAM_UPDATE_DATE in DATE,
10835 p_new_PROGRAM_UPDATE_DATE in DATE,
10836 p_old_PROPORTION in NUMBER,
10837 p_new_PROPORTION in NUMBER,
10838 p_old_REQUEST_ID in NUMBER,
10839 p_new_REQUEST_ID in NUMBER,
10840 p_old_EFFECTIVE_END_DATE in DATE,
10841 p_new_EFFECTIVE_END_DATE in DATE,
10842 p_old_EFFECTIVE_START_DATE in DATE,
10843 p_new_EFFECTIVE_START_DATE in DATE
10844 )
10845 is
10846 --
10847 begin
10848 /* If the continuous calc is overriden then do nothing */
10849 if (pay_continuous_calc.g_override_cc = TRUE) then
10850 return;
10851 end if;
10852 --
10853 /* If the dates havent changed it must be a correction */
10854 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
10855 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
10856 --
10857 pay_continuous_calc.event_update(p_business_group_id,
10858 p_legislation_code,
10859 'PAY_COST_ALLOCATIONS_F',
10860 'ASSIGNMENT_ID',
10861 p_old_ASSIGNMENT_ID,
10862 p_new_ASSIGNMENT_ID,
10863 p_effective_date
10864 );
10865 --
10866 pay_continuous_calc.event_update(p_business_group_id,
10867 p_legislation_code,
10868 'PAY_COST_ALLOCATIONS_F',
10869 'BUSINESS_GROUP_ID',
10870 p_old_BUSINESS_GROUP_ID,
10871 p_new_BUSINESS_GROUP_ID,
10872 p_effective_date
10873 );
10874 --
10875 pay_continuous_calc.event_update(p_business_group_id,
10876 p_legislation_code,
10877 'PAY_COST_ALLOCATIONS_F',
10878 'COST_ALLOCATION_ID',
10879 p_old_COST_ALLOCATION_ID,
10880 p_new_COST_ALLOCATION_ID,
10881 p_effective_date
10882 );
10883 --
10884 pay_continuous_calc.event_update(p_business_group_id,
10885 p_legislation_code,
10886 'PAY_COST_ALLOCATIONS_F',
10887 'COST_ALLOCATION_KEYFLEX_ID',
10888 p_old_COST_ALLOCATION_KEYFLEX_,
10889 p_new_COST_ALLOCATION_KEYFLEX_,
10890 p_effective_date
10891 );
10892 --
10893 pay_continuous_calc.event_update(p_business_group_id,
10894 p_legislation_code,
10895 'PAY_COST_ALLOCATIONS_F',
10896 'PROGRAM_APPLICATION_ID',
10897 p_old_PROGRAM_APPLICATION_ID,
10898 p_new_PROGRAM_APPLICATION_ID,
10899 p_effective_date
10900 );
10901 --
10902 pay_continuous_calc.event_update(p_business_group_id,
10903 p_legislation_code,
10904 'PAY_COST_ALLOCATIONS_F',
10905 'PROGRAM_ID',
10906 p_old_PROGRAM_ID,
10907 p_new_PROGRAM_ID,
10908 p_effective_date
10909 );
10910 --
10911 pay_continuous_calc.event_update(p_business_group_id,
10912 p_legislation_code,
10913 'PAY_COST_ALLOCATIONS_F',
10914 'PROGRAM_UPDATE_DATE',
10915 p_old_PROGRAM_UPDATE_DATE,
10916 p_new_PROGRAM_UPDATE_DATE,
10917 p_effective_date
10918 );
10919 --
10923 'PROPORTION',
10920 pay_continuous_calc.event_update(p_business_group_id,
10921 p_legislation_code,
10922 'PAY_COST_ALLOCATIONS_F',
10924 p_old_PROPORTION,
10925 p_new_PROPORTION,
10926 p_effective_date
10927 );
10928 --
10929 pay_continuous_calc.event_update(p_business_group_id,
10930 p_legislation_code,
10931 'PAY_COST_ALLOCATIONS_F',
10932 'REQUEST_ID',
10933 p_old_REQUEST_ID,
10934 p_new_REQUEST_ID,
10935 p_effective_date
10936 );
10937 else
10938 /* OK it must be a date track change */
10939 --
10940 pay_continuous_calc.event_update(p_business_group_id,
10941 p_legislation_code,
10942 'PAY_COST_ALLOCATIONS_F',
10943 'EFFECTIVE_END_DATE',
10944 p_old_EFFECTIVE_END_DATE,
10945 p_new_EFFECTIVE_END_DATE,
10946 p_new_effective_end_date,
10947 least(p_old_effective_end_date,
10948 p_new_effective_end_date)
10949 );
10950 --
10951 pay_continuous_calc.event_update(p_business_group_id,
10952 p_legislation_code,
10953 'PAY_COST_ALLOCATIONS_F',
10954 'EFFECTIVE_START_DATE',
10955 p_old_EFFECTIVE_START_DATE,
10956 p_new_EFFECTIVE_START_DATE,
10957 p_new_effective_start_date,
10958 least(p_old_effective_start_date,
10959 p_new_effective_start_date)
10960 );
10961
10962 end if;
10963 --
10964 /* Now call the API for the affected assignments */
10965 declare
10966 l_process_event_id number;
10967 l_object_version_number number;
10968 cnt number;
10969 begin
10970 if (pay_continuous_calc.g_event_list.sz <> 0) then
10971 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
10972 pay_ppe_api.create_process_event(
10973 p_assignment_id => p_old_assignment_id,
10974 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
10975 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
10976 p_status => 'U',
10977 p_description => pay_continuous_calc.g_event_list.description(cnt),
10978 p_process_event_id => l_process_event_id,
10979 p_object_version_number => l_object_version_number,
10980 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
10981 p_business_group_id => p_business_group_id,
10982 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
10983 p_surrogate_key => p_new_cost_allocation_id
10984 );
10985 end loop;
10986 end if;
10987 pay_continuous_calc.g_event_list.sz := 0;
10988 end;
10989 --
10990 end PAY_COST_ALLOCATIONS_F_aru;
10991 --
10992 /* PAY_COST_ALLOCATIONS_F */
10993 /* name : PAY_COST_ALLOCATIONS_F_ari
10994 purpose : This is procedure that records any insert
10995 on PAY_COST_ALLOCATIONS_F.
10996 */
10997 procedure PAY_COST_ALLOCATIONS_F_ari(
10998 p_business_group_id in number,
10999 p_legislation_code in varchar2,
11000 p_assignment_id in number,
11001 p_effective_start_date in date,
11002 p_cost_allocation_id in number
11003 )
11004 is
11005 l_process_event_id number;
11006 l_object_version_number number;
11007 l_proc varchar2(240) := g_package||'.PAY_COST_ALLOCATIONS_F_ari';
11008 begin
11009 hr_utility.set_location(l_proc, 10);
11010 /* If the continuous calc is overriden then do nothing */
11011 if (g_override_cc = TRUE) then
11012 return;
11013 end if;
11014 --
11015 pay_continuous_calc.event_update(p_business_group_id,
11016 p_legislation_code,
11017 'PAY_COST_ALLOCATIONS_F',
11018 NULL,
11019 NULL,
11020 NULL,
11021 p_effective_start_date,
11022 p_effective_start_date,
11023 'I'
11024 );
11025 /* Now call the API for the affected assignments */
11026 declare
11027 cnt number;
11028 l_process_event_id number;
11029 l_object_version_number number;
11033 pay_ppe_api.create_process_event(
11030 begin
11031 if (pay_continuous_calc.g_event_list.sz <> 0) then
11032 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11034 p_assignment_id => p_assignment_id,
11035 p_effective_date => g_event_list.effective_date(cnt),
11036 p_change_type => g_event_list.change_type(cnt),
11037 p_status => 'U',
11038 p_description => g_event_list.description(cnt),
11039 p_process_event_id => l_process_event_id,
11040 p_object_version_number => l_object_version_number,
11041 p_event_update_id => g_event_list.event_update_id(cnt),
11042 p_surrogate_key => p_cost_allocation_id,
11043 p_calculation_date => g_event_list.calc_date(cnt),
11044 p_business_group_id => p_business_group_id
11045 );
11046 end loop;
11047 end if;
11048 pay_continuous_calc.g_event_list.sz := 0;
11049 end;
11050 hr_utility.set_location(l_proc, 900);
11051 end PAY_COST_ALLOCATIONS_F_ari;
11052 --
11053 /* name : PAY_COST_ALLOCATIONS_F_ard
11054 purpose : This is procedure that records any deletes
11055 on PAY_COST_ALLOCATIONS_F.
11056 */
11057 procedure PAY_COST_ALLOCATIONS_F_ard(
11058 p_business_group_id in number,
11059 p_legislation_code in varchar2,
11060 p_assignment_id in number,
11061 p_old_cost_allocation_ID in number,
11062 p_old_effective_start_date in date,
11063 p_new_effective_start_date in date,
11064 p_old_effective_end_date in date,
11065 p_new_effective_end_date in date
11066 )
11067 is
11068 l_process_event_id number;
11069 l_object_version_number number;
11070 l_effective_date date;
11071 l_mode pay_event_updates.event_type%type;
11072 l_column_name pay_event_updates.column_name%type;
11073 l_old_value date;
11074 l_new_value date;
11075 l_proc varchar2(240) := g_package||'.PAY_COST_ALLOCATIONS_F_ard';
11076 begin
11077 hr_utility.set_location(l_proc, 10);
11078 /* If the continuous calc is overriden then do nothing */
11079 if (g_override_cc = TRUE) then
11080 return;
11081 end if;
11082 --
11083 -- hr_utility.trace('> p_assignment_id: '||p_assignment_id);
11084 -- hr_utility.trace('> p_old_cost_allocation_ID: '||p_old_cost_allocation_ID);
11085 -- hr_utility.trace('> p_old_effective_start_date: '||p_old_effective_start_date);
11086 -- hr_utility.trace('> p_new_effective_start_date: '||p_new_effective_start_date);
11087 -- hr_utility.trace('> pay_dyn_triggers.g_dyt_mode: '||pay_dyn_triggers.g_dyt_mode);
11088 -- hr_utility.trace('> pay_dyn_triggers.g_dbms_dyt: '||pay_dyn_triggers.g_dbms_dyt);
11089
11090 --
11091 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
11092 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
11093 --
11094 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
11095 l_mode := 'D';
11096 else
11097 l_mode := pay_dyn_triggers.g_dyt_mode;
11098 end if;
11099 l_effective_date := p_old_effective_start_date;
11100 l_column_name := null;
11101 l_old_value := null;
11102 l_new_value := null;
11103 --
11104 else
11105 l_mode := pay_dyn_triggers.g_dyt_mode;
11106 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
11107 --
11108 l_effective_date := p_new_effective_end_date;
11109 l_column_name := 'EFFECTIVE_END_DATE';
11110 l_old_value := p_old_effective_end_date;
11111 l_new_value := p_new_effective_end_date;
11112 --
11113 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
11114 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
11115 --
11116 l_effective_date := p_old_effective_start_date;
11117 l_column_name := 'EFFECTIVE_END_DATE';
11118 l_old_value := p_old_effective_end_date;
11119 l_new_value := p_new_effective_end_date;
11120 --
11121 end if;
11122 end if;
11123 --
11124
11125 -- hr_utility.trace('> l_mode: '||l_mode);
11126
11127 pay_continuous_calc.event_update(p_business_group_id,
11128 p_legislation_code,
11129 'PAY_COST_ALLOCATIONS_F',
11130 l_column_name,
11131 l_old_value,
11132 l_new_value,
11133 l_effective_date,
11134 l_effective_date,
11135 l_mode
11136 );
11137 /* Now call the API for the affected assignments */
11138
11142 cnt number;
11139
11140 /* Now call the API for the affected assignments */
11141 declare
11143 l_process_event_id number;
11144 l_object_version_number number;
11145 begin
11146 if (pay_continuous_calc.g_event_list.sz <> 0) then
11147 hr_utility.trace('> With in Create Process Event: ');
11148 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11149 pay_ppe_api.create_process_event(
11150 p_assignment_id => p_assignment_id,
11151 p_effective_date => g_event_list.effective_date(cnt),
11152 p_change_type => g_event_list.change_type(cnt),
11153 p_status => 'U',
11154 p_description => g_event_list.description(cnt),
11155 p_process_event_id => l_process_event_id,
11156 p_object_version_number => l_object_version_number,
11157 p_event_update_id => g_event_list.event_update_id(cnt),
11158 p_surrogate_key => p_old_cost_allocation_id,
11159 p_calculation_date => g_event_list.calc_date(cnt),
11160 p_business_group_id => p_business_group_id
11161 );
11162
11163
11164 end loop;
11165 end if;
11166 pay_continuous_calc.g_event_list.sz := 0;
11167 end;
11168 hr_utility.set_location(l_proc, 900);
11169 END PAY_COST_ALLOCATIONS_F_ard;
11170 --
11171
11172 -- >>>
11173 -- >>> INSERT NEW DYT CODE ABOVE HERE
11174 -- >>>
11175 --
11176 /* OK Here are all the event procedures */
11177 --
11178 /* Name : ee_date_change
11179 Purpose : This procedure is used for an element entry date change check. It checks
11180 the screen entry values for changes.
11181 */
11182 procedure ee_date_change ( p_element_entry_id in number,
11183 p_assignment_action_id in number,
11184 p_surrogate_key in number,
11185 p_column_name in varchar2,
11186 p_old_value in varchar2,
11187 p_new_value in varchar2,
11188 p_output_result out nocopy varchar2,
11189 p_date in date default null
11190 )
11191 is
11192 screen_val pay_element_entry_values_f.screen_entry_value%type;
11193 input_val pay_element_entry_values_f.input_value_id%type;
11194 --
11195 cursor do_start_chk (sk in number,
11196 ed in varchar2)
11197 is
11198 select screen_entry_value,
11199 element_entry_value_id
11200 from pay_element_entry_values_f
11201 where element_entry_id = sk
11202 and ed = effective_start_date
11203 minus
11204 select screen_entry_value,
11205 element_entry_value_id
11206 from pay_element_entry_values_f
11207 where element_entry_id = sk
11208 and ed = to_char(effective_end_date - 1);
11209 --
11210 cursor do_end_chk (sk in number,
11211 ed in varchar2)
11212 is
11213 select screen_entry_value,
11214 element_entry_value_id
11215 from pay_element_entry_values_f
11216 where element_entry_id = sk
11217 and ed = effective_end_date
11218 minus
11219 select screen_entry_value,
11220 element_entry_value_id
11221 from pay_element_entry_values_f
11222 where element_entry_id = sk
11223 and ed = effective_start_date + 1;
11224 --
11225 begin
11226 p_output_result := 'FALSE';
11227 --
11228 if (p_column_name = 'EFFECTIVE_START_DATE') then
11229 --
11230 for chkrec in do_start_chk(p_surrogate_key, p_new_value) loop
11231 p_output_result := 'TRUE';
11232 end loop;
11233 --
11234 else
11235 --
11236 for chkrec in do_end_chk(p_surrogate_key, p_old_value) loop
11237 p_output_result := 'TRUE';
11238 end loop;
11239 --
11240 end if;
11241 --
11242 end ee_date_change;
11243 --
11244 /* Name : grade_rule_change
11245 Purpose : This procedure is used for a grade rule change
11246 to check that an assignment is on that grade.
11247 */
11248 procedure grade_rule_change ( p_element_entry_id in number,
11249 p_assignment_action_id in number,
11250 p_surrogate_key in number,
11251 p_column_name in varchar2,
11252 p_old_value in varchar2,
11253 p_new_value in varchar2,
11254 p_output_result out nocopy varchar2,
11255 p_date in date default null
11256 )
11257 is
11258 --
11259 cursor grade_chk is
11260 select '' chk
11261 from pay_grade_rules_f pgr,
11262 pay_assignment_actions paa,
11266 and p_date between pgr.effective_start_date
11263 per_assignments_f paf
11264 where paa.assignment_action_id = p_assignment_action_id
11265 and pgr.grade_rule_id = p_surrogate_key
11267 and pgr.effective_end_date
11268 and paf.assignment_id = paa.assignment_id
11269 -- and p_date between paf.effective_start_date -- Bug 6625680
11270 -- and paf.effective_end_date
11271 and paf.grade_id = pgr.grade_or_spinal_point_id
11272 union
11273 select '' chk
11274 from pay_grade_rules_f pgr,
11275 pay_assignment_actions paa,
11276 per_spinal_points psp,
11277 per_spinal_point_steps_f psps,
11278 per_spinal_point_placements_f pspp
11279 where paa.assignment_action_id = p_assignment_action_id
11280 and pgr.grade_rule_id = p_surrogate_key
11281 and p_date between pgr.effective_start_date
11282 and pgr.effective_end_date
11283 and pgr.rate_type = 'SP'
11284 and psp.spinal_point_id = pgr.grade_or_spinal_point_id
11285 and psp.spinal_point_id = psps.spinal_point_id
11286 and p_date between psps.effective_start_date
11287 and psps.effective_end_date
11288 and paa.assignment_id = pspp.assignment_id
11289 and pspp.step_id = psps.step_id;
11290 -- and p_date between pspp.effective_start_date -- Bug 6625680
11291 -- and pspp.effective_end_date;
11292 --
11293 begin
11294 --
11295 p_output_result := 'FALSE';
11296 --
11297 for chkrec in grade_chk loop
11298 p_output_result := 'TRUE';
11299 end loop;
11300 --
11301 end grade_rule_change;
11302 --
11303 /* Name : input_value_change
11304 Purpose : This procedure is used for a input value change
11305 to check that an assignment has an entry with that input value.
11306 */
11307 procedure input_value_change ( p_element_entry_id in number,
11308 p_assignment_action_id in number,
11309 p_surrogate_key in number,
11310 p_column_name in varchar2,
11311 p_old_value in varchar2,
11312 p_new_value in varchar2,
11313 p_output_result out nocopy varchar2,
11314 p_date in date default null
11315 )
11316 is
11317 cursor get_et_details is
11318 select piv.hot_default_flag,
11319 piv.default_value iv_default_value,
11320 pliv.default_value liv_default_value,
11321 peev.screen_entry_value
11322 from pay_element_entries_f pee,
11323 pay_element_entry_values_f peev,
11324 pay_element_links_f pel,
11325 pay_link_input_values_f pliv,
11326 pay_element_types_f pet,
11327 pay_input_values_f piv
11328 where pee.element_entry_id = p_element_entry_id
11329 and pee.element_entry_id = peev.element_entry_id
11330 and peev.input_value_id = p_surrogate_key
11331 and pee.element_link_id = pel.element_link_id
11332 and pliv.element_link_id = pel.element_link_id
11333 and pliv.input_value_id = p_surrogate_key
11334 and pet.element_type_id = pel.element_type_id
11335 and pet.element_type_id = piv.element_type_id
11336 and piv.input_value_id = p_surrogate_key
11337 and p_date between piv.effective_start_date
11338 and piv.effective_end_date
11339 and p_date between pet.effective_start_date
11340 and pet.effective_end_date
11341 and p_date between pliv.effective_start_date
11342 and pliv.effective_end_date
11343 and p_date between pel.effective_start_date
11344 and pel.effective_end_date
11345 and p_date between peev.effective_start_date
11346 and peev.effective_end_date
11347 and p_date between pee.effective_start_date
11348 and pee.effective_end_date;
11349
11350 begin
11351 --
11352 p_output_result:= 'FALSE';
11353 --
11354 for get_det in get_et_details loop
11355 --
11356 /* Check the hot default flag for input values */
11357 if (p_column_name = 'DEFAULT_VALUE') then
11358 --
11359 if (get_det.hot_default_flag = 'Y') then
11360 if (get_det.liv_default_value is null
11361 and get_det.screen_entry_value is null) then
11362 --
11363 p_output_result:= 'TRUE';
11364 end if;
11365 end if;
11366 --
11367 end if;
11368 --
11369 end loop;
11370 --
11371 end input_value_change;
11372 --
11373 /* Name : link_iv_change
11374 Purpose : This procedure is used for a link input value change
11375 to check that an assignment has an entry with that input value.
11376 */
11377 procedure link_iv_change ( p_element_entry_id in number,
11378 p_assignment_action_id in number,
11379 p_surrogate_key in number,
11380 p_column_name in varchar2,
11384 p_date in date default null
11381 p_old_value in varchar2,
11382 p_new_value in varchar2,
11383 p_output_result out nocopy varchar2,
11385 )
11386 is
11387 cursor get_et_details is
11388 select piv.hot_default_flag,
11389 piv.default_value iv_default_value,
11390 pliv.default_value liv_default_value,
11391 peev.screen_entry_value
11392 from pay_element_entries_f pee,
11393 pay_element_entry_values_f peev,
11394 pay_element_links_f pel,
11395 pay_link_input_values_f pliv,
11396 pay_element_types_f pet,
11397 pay_input_values_f piv
11398 where pee.element_entry_id = p_element_entry_id
11399 and pee.element_entry_id = peev.element_entry_id
11400 and peev.input_value_id = pliv.input_value_id
11401 and pee.element_link_id = pel.element_link_id
11402 and pliv.element_link_id = pel.element_link_id
11403 and pliv.link_input_value_id = p_surrogate_key
11404 and pet.element_type_id = pel.element_type_id
11405 and pet.element_type_id = piv.element_type_id
11406 and piv.input_value_id = pliv.input_value_id
11407 and p_date between piv.effective_start_date
11408 and piv.effective_end_date
11409 and p_date between pet.effective_start_date
11410 and pet.effective_end_date
11411 and p_date between pliv.effective_start_date
11412 and pliv.effective_end_date
11413 and p_date between pel.effective_start_date
11414 and pel.effective_end_date
11415 and p_date between peev.effective_start_date
11416 and peev.effective_end_date
11417 and p_date between pee.effective_start_date
11418 and pee.effective_end_date;
11419
11420 begin
11421 --
11422 p_output_result:= 'FALSE';
11423 --
11424 for get_det in get_et_details loop
11425 --
11426 -- Check the hot default flag for input values
11427 if (p_column_name = 'DEFAULT_VALUE') then
11428 --
11429 if (get_det.hot_default_flag = 'Y') then
11430 if (get_det.screen_entry_value is null) then
11431 --
11432 p_output_result:= 'TRUE';
11433 end if;
11434 end if;
11435 --
11436 end if;
11437 --
11438 end loop;
11439 --
11440 end link_iv_change;
11441 --
11442 /* PAY_USER_COLUMN_INSTANCES_F */
11443 /* name : PAY_USER_COLUMN_INSTANCES_F_ari
11444 purpose : This is procedure that records any insert
11445 on PAY_USER_COLUMN_INSTANCES_F.
11446 */
11447 procedure PAY_USER_COL_INSTANCES_F_ari(
11448 p_business_group_id in number,
11449 p_legislation_code in varchar2,
11450 p_effective_start_date in date,
11451 p_user_column_instance_id in number
11452 )
11453 is
11454 l_process_event_id number;
11455 l_object_version_number number;
11456 l_proc varchar2(240) := g_package||'.PAY_USER_COLUMN_INSTANCES_F_ari';
11457 begin
11458 hr_utility.set_location(l_proc, 10);
11459 /* If the continuous calc is overriden then do nothing */
11460 if (g_override_cc = TRUE) then
11461 return;
11462 end if;
11463 --
11464 pay_continuous_calc.event_update(p_business_group_id,
11465 p_legislation_code,
11466 'PAY_USER_COLUMN_INSTANCES_F',
11467 NULL,
11468 NULL,
11469 NULL,
11470 p_effective_start_date,
11471 p_effective_start_date,
11472 'I'
11473 );
11474 /* Now call the API for the affected assignments */
11475 declare
11476 cnt number;
11477 l_process_event_id number;
11478 l_object_version_number number;
11479 begin
11480 if (pay_continuous_calc.g_event_list.sz <> 0) then
11481 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11482 pay_ppe_api.create_process_event(
11483 p_assignment_id => NULL,
11484 p_effective_date => g_event_list.effective_date(cnt),
11485 p_change_type => g_event_list.change_type(cnt),
11486 p_status => 'U',
11487 p_description => g_event_list.description(cnt),
11488 p_process_event_id => l_process_event_id,
11489 p_object_version_number => l_object_version_number,
11490 p_event_update_id => g_event_list.event_update_id(cnt),
11491 p_surrogate_key => p_user_column_instance_id,
11492 p_calculation_date => g_event_list.calc_date(cnt),
11496 end if;
11493 p_business_group_id => p_business_group_id
11494 );
11495 end loop;
11497 pay_continuous_calc.g_event_list.sz := 0;
11498 end;
11499 hr_utility.set_location(l_proc, 900);
11500 end PAY_USER_COL_INSTANCES_F_ari;
11501
11502 --
11503 PROCEDURE PAY_USER_COL_INSTANCES_F_aru
11504 ( p_business_group_id IN NUMBER
11505 , p_legislation_code IN VARCHAR2
11506 , p_effective_date IN DATE
11507 , p_old_BUSINESS_GROUP_ID IN VARCHAR2
11508 , p_new_BUSINESS_GROUP_ID IN VARCHAR2
11509 , p_old_EFFECTIVE_END_DATE IN DATE
11510 , p_new_EFFECTIVE_END_DATE IN DATE
11511 , p_old_EFFECTIVE_START_DATE IN DATE
11512 , p_new_EFFECTIVE_START_DATE IN DATE
11513 , p_old_LEGISLATION_CODE IN VARCHAR2
11514 , p_new_LEGISLATION_CODE IN VARCHAR2
11515 , p_old_USER_COLUMN_ID IN NUMBER
11516 , p_new_USER_COLUMN_ID IN NUMBER
11517 , p_old_USER_COLUMN_INSTANCE_ID IN NUMBER
11518 , p_new_USER_COLUMN_INSTANCE_ID IN NUMBER
11519 , p_old_USER_ROW_ID IN NUMBER
11520 , p_new_USER_ROW_ID IN NUMBER
11521 , p_old_VALUE IN VARCHAR2
11522 , p_new_VALUE IN VARCHAR2
11523 )
11524 IS
11525 BEGIN
11526 /* If the continuous calc is overriden then do nothing */
11527 if (pay_continuous_calc.g_override_cc = TRUE) then
11528 return;
11529 end if;
11530 --
11531 /* If the dates havent changed it must be a correction */
11532 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
11533 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
11534 --
11535 pay_continuous_calc.event_update(p_business_group_id,
11536 p_legislation_code,
11537 'PAY_USER_COLUMN_INSTANCES_F',
11538 'BUSINESS_GROUP_ID',
11539 p_old_BUSINESS_GROUP_ID,
11540 p_new_BUSINESS_GROUP_ID,
11541 p_effective_date
11542 );
11543 --
11544 pay_continuous_calc.event_update(p_business_group_id,
11545 p_legislation_code,
11546 'PAY_USER_COLUMN_INSTANCES_F',
11547 'USER_COLUMN_INSTANCE_ID',
11548 p_old_USER_COLUMN_INSTANCE_ID,
11549 p_new_USER_COLUMN_INSTANCE_ID,
11550 p_effective_date
11551 );
11552 --
11553 pay_continuous_calc.event_update(p_business_group_id,
11554 p_legislation_code,
11555 'PAY_USER_COLUMN_INSTANCES_F',
11556 'USER_ROW_ID',
11557 p_old_USER_ROW_ID,
11558 p_new_USER_ROW_ID,
11559 p_effective_date
11560 );
11561 --
11562 pay_continuous_calc.event_update(p_business_group_id,
11563 p_legislation_code,
11564 'PAY_USER_COLUMN_INSTANCES_F',
11565 'USER_COLUMN_ID',
11566 p_old_USER_COLUMN_ID,
11567 p_new_USER_COLUMN_ID,
11568 p_effective_date
11569 );
11570 --
11571 pay_continuous_calc.event_update(p_business_group_id,
11572 p_legislation_code,
11573 'PAY_USER_COLUMN_INSTANCES_F',
11574 'VALUE',
11575 p_old_VALUE,
11576 p_new_VALUE,
11577 p_effective_date
11578 );
11579 else
11580 /* OK it must be a date track change */
11581 --
11582 pay_continuous_calc.event_update(p_business_group_id,
11583 p_legislation_code,
11584 'PAY_USER_COLUMN_INSTANCES_F',
11585 'EFFECTIVE_END_DATE',
11586 p_old_EFFECTIVE_END_DATE,
11587 p_new_EFFECTIVE_END_DATE,
11588 p_new_effective_end_date,
11589 least(p_old_effective_end_date,
11590 p_new_effective_end_date)
11591 );
11592 --
11593 pay_continuous_calc.event_update(p_business_group_id,
11594 p_legislation_code,
11598 p_new_EFFECTIVE_START_DATE,
11595 'PAY_USER_COLUMN_INSTANCES_F',
11596 'EFFECTIVE_START_DATE',
11597 p_old_EFFECTIVE_START_DATE,
11599 p_new_effective_start_date,
11600 least(p_old_effective_start_date,
11601 p_new_effective_start_date)
11602 );
11603
11604 end if;
11605 --
11606 /* Now call the API for the affected assignments */
11607 declare
11608 l_process_event_id number;
11609 l_object_version_number number;
11610 cnt number;
11611 begin
11612 if (pay_continuous_calc.g_event_list.sz <> 0) then
11613 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11614 pay_ppe_api.create_process_event(
11615 p_assignment_id => NULL,
11616 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
11617 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
11618 p_status => 'U',
11619 p_description => pay_continuous_calc.g_event_list.description(cnt),
11620 p_process_event_id => l_process_event_id,
11621 p_object_version_number => l_object_version_number,
11622 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
11623 p_business_group_id => p_business_group_id,
11624 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
11625 p_surrogate_key => p_new_user_column_instance_id
11626 );
11627 end loop;
11628 end if;
11629 pay_continuous_calc.g_event_list.sz := 0;
11630 end;
11631 --
11632
11633 END PAY_USER_COL_INSTANCES_F_aru;
11634
11635 --
11636 /* name : PAY_USER_COLUMN_INSTANCES_F_ard
11637 purpose : This is procedure that records any deletes
11638 on PAY_USER_COLUMN_INSTANCES_F.
11639 */
11640 procedure PAY_USER_COL_INSTANCES_F_ard(
11641 p_business_group_id in number,
11642 p_legislation_code in varchar2,
11643 p_old_user_column_instance_id in number,
11644 p_old_effective_start_date in date,
11645 p_new_effective_start_date in date,
11646 p_old_effective_end_date in date,
11647 p_new_effective_end_date in date
11648 )
11649 is
11650 l_process_event_id number;
11651 l_object_version_number number;
11652 l_effective_date date;
11653 l_mode pay_event_updates.event_type%type;
11654 l_column_name pay_event_updates.column_name%type;
11655 l_old_value date;
11656 l_new_value date;
11657 l_proc varchar2(240) := g_package||'.PAY_USER_COLUMN_INSTANCES_F_ard';
11658 begin
11659 hr_utility.set_location(l_proc, 10);
11660 /* If the continuous calc is overriden then do nothing */
11661 if (g_override_cc = TRUE) then
11662 return;
11663 end if;
11664 --
11665 -- hr_utility.trace('> p_assignment_id: '||p_assignment_id);
11666 -- hr_utility.trace('> p_old_cost_allocation_ID: '||p_old_user_col_instance_id);
11667 -- hr_utility.trace('> p_old_effective_start_date: '||p_old_effective_start_date);
11668 -- hr_utility.trace('> p_new_effective_start_date: '||p_new_effective_start_date);
11669 -- hr_utility.trace('> pay_dyn_triggers.g_dyt_mode: '||pay_dyn_triggers.g_dyt_mode);
11670 -- hr_utility.trace('> pay_dyn_triggers.g_dbms_dyt: '||pay_dyn_triggers.g_dbms_dyt);
11671
11672 --
11673 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
11674 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
11675 --
11676 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
11677 l_mode := 'D';
11678 else
11679 l_mode := pay_dyn_triggers.g_dyt_mode;
11680 end if;
11681 l_effective_date := p_old_effective_start_date;
11682 l_column_name := null;
11683 l_old_value := null;
11684 l_new_value := null;
11685 --
11686 else
11687 l_mode := pay_dyn_triggers.g_dyt_mode;
11688 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
11689 --
11690 l_effective_date := p_new_effective_end_date;
11691 l_column_name := 'EFFECTIVE_END_DATE';
11692 l_old_value := p_old_effective_end_date;
11693 l_new_value := p_new_effective_end_date;
11694 --
11695 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
11696 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
11697 --
11698 l_effective_date := p_old_effective_start_date;
11699 l_column_name := 'EFFECTIVE_END_DATE';
11700 l_old_value := p_old_effective_end_date;
11701 l_new_value := p_new_effective_end_date;
11702 --
11703 end if;
11704 end if;
11705 --
11706
11707 -- hr_utility.trace('> l_mode: '||l_mode);
11708
11709 pay_continuous_calc.event_update(p_business_group_id,
11710 p_legislation_code,
11711 'PAY_USER_COLUMN_INSTANCES_F',
11712 l_column_name,
11716 l_effective_date,
11713 l_old_value,
11714 l_new_value,
11715 l_effective_date,
11717 l_mode
11718 );
11719 /* Now call the API for the affected assignments */
11720
11721
11722 /* Now call the API for the affected assignments */
11723 declare
11724 cnt number;
11725 l_process_event_id number;
11726 l_object_version_number number;
11727 begin
11728 if (pay_continuous_calc.g_event_list.sz <> 0) then
11729 hr_utility.trace('> With in Create Process Event: ');
11730 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11731 pay_ppe_api.create_process_event(
11732 p_assignment_id => NULL,
11733 p_effective_date => g_event_list.effective_date(cnt),
11734 p_change_type => g_event_list.change_type(cnt),
11735 p_status => 'U',
11736 p_description => g_event_list.description(cnt),
11737 p_process_event_id => l_process_event_id,
11738 p_object_version_number => l_object_version_number,
11739 p_event_update_id => g_event_list.event_update_id(cnt),
11740 p_surrogate_key => p_old_user_column_instance_id,
11741 p_calculation_date => g_event_list.calc_date(cnt),
11742 p_business_group_id => p_business_group_id
11743 );
11744
11745
11746 end loop;
11747 end if;
11748 pay_continuous_calc.g_event_list.sz := 0;
11749 end;
11750 hr_utility.set_location(l_proc, 900);
11751 END PAY_USER_COL_INSTANCES_F_ard;
11752
11753 --
11754 /* FF_GLOBALS_F */
11755 /* name : FF_GLOBALS_F_ari
11756 purpose : This is procedure that records any insert
11757 on FF_GLOBALS_F.
11758 */
11759 procedure FF_GLOBALS_F_ari(
11760 p_business_group_id in number,
11761 p_legislation_code in varchar2,
11762 p_effective_start_date in date,
11763 p_global_id in number
11764 )
11765 is
11766 l_process_event_id number;
11767 l_object_version_number number;
11768 l_proc varchar2(240) := g_package||'.FF_GLOBALS_F_ari';
11769 begin
11770 hr_utility.set_location(l_proc, 10);
11771 /* If the continuous calc is overriden then do nothing */
11772 if (g_override_cc = TRUE) then
11773 return;
11774 end if;
11775 --
11776 pay_continuous_calc.event_update(p_business_group_id,
11777 p_legislation_code,
11778 'FF_GLOBALS_F',
11779 NULL,
11780 NULL,
11781 NULL,
11782 p_effective_start_date,
11783 p_effective_start_date,
11784 'I'
11785 );
11786 /* Now call the API for the affected assignments */
11787 declare
11788 cnt number;
11789 l_process_event_id number;
11790 l_object_version_number number;
11791 begin
11792 if (pay_continuous_calc.g_event_list.sz <> 0) then
11793 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11794 pay_ppe_api.create_process_event(
11795 p_assignment_id => NULL,
11796 p_effective_date => g_event_list.effective_date(cnt),
11797 p_change_type => g_event_list.change_type(cnt),
11798 p_status => 'U',
11799 p_description => g_event_list.description(cnt),
11800 p_process_event_id => l_process_event_id,
11801 p_object_version_number => l_object_version_number,
11802 p_event_update_id => g_event_list.event_update_id(cnt),
11803 p_surrogate_key => p_global_id,
11804 p_calculation_date => g_event_list.calc_date(cnt),
11805 p_business_group_id => p_business_group_id
11806 );
11807 end loop;
11808 end if;
11809 pay_continuous_calc.g_event_list.sz := 0;
11810 end;
11811 hr_utility.set_location(l_proc, 900);
11812 end FF_GLOBALS_F_ari;
11813
11814 --
11815 PROCEDURE FF_GLOBALS_F_aru
11816 ( p_business_group_id IN NUMBER
11817 , p_legislation_code IN VARCHAR2
11818 , p_effective_date IN DATE
11819 , p_old_BUSINESS_GROUP_ID IN VARCHAR2
11823 , p_old_EFFECTIVE_START_DATE IN DATE
11820 , p_new_BUSINESS_GROUP_ID IN VARCHAR2
11821 , p_old_EFFECTIVE_END_DATE IN DATE
11822 , p_new_EFFECTIVE_END_DATE IN DATE
11824 , p_new_EFFECTIVE_START_DATE IN DATE
11825 , p_old_LEGISLATION_CODE IN VARCHAR2
11826 , p_new_LEGISLATION_CODE IN VARCHAR2
11827 , p_old_global_ID IN NUMBER
11828 , p_new_global_ID IN NUMBER
11829 , p_old_global_VALUE IN VARCHAR2
11830 , p_new_global_VALUE IN VARCHAR2
11831 , p_old_global_description IN VARCHAR2
11832 , p_new_global_description IN VARCHAR2
11833 )
11834 IS
11835 BEGIN
11836 /* If the continuous calc is overriden then do nothing */
11837 if (pay_continuous_calc.g_override_cc = TRUE) then
11838 return;
11839 end if;
11840 --
11841 /* If the dates havent changed it must be a correction */
11842 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
11843 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
11844 --
11845 pay_continuous_calc.event_update(p_business_group_id,
11846 p_legislation_code,
11847 'FF_GLOBALS_F',
11848 'BUSINESS_GROUP_ID',
11849 p_old_BUSINESS_GROUP_ID,
11850 p_new_BUSINESS_GROUP_ID,
11851 p_effective_date
11852 );
11853 --
11854 pay_continuous_calc.event_update(p_business_group_id,
11855 p_legislation_code,
11856 'FF_GLOBALS_F',
11857 'GLOBAL_ID',
11858 p_old_global_ID,
11859 p_new_global_ID,
11860 p_effective_date
11861 );
11862 --
11863 pay_continuous_calc.event_update(p_business_group_id,
11864 p_legislation_code,
11865 'FF_GLOBALS_F',
11866 'GLOBAL_VALUE',
11867 p_old_global_VALUE,
11868 p_new_global_VALUE,
11869 p_effective_date
11870 );
11871
11872 pay_continuous_calc.event_update(p_business_group_id,
11873 p_legislation_code,
11874 'FF_GLOBALS_F',
11875 'GLOBAL_DESCRIPTION',
11876 p_old_global_description,
11877 p_new_global_description,
11878 p_effective_date
11879 );
11880
11881 else
11882 /* OK it must be a date track change */
11883 --
11884 pay_continuous_calc.event_update(p_business_group_id,
11885 p_legislation_code,
11886 'FF_GLOBALS_F',
11887 'EFFECTIVE_END_DATE',
11888 p_old_EFFECTIVE_END_DATE,
11889 p_new_EFFECTIVE_END_DATE,
11890 p_new_effective_end_date,
11891 least(p_old_effective_end_date,
11892 p_new_effective_end_date)
11893 );
11894 --
11895 pay_continuous_calc.event_update(p_business_group_id,
11896 p_legislation_code,
11897 'FF_GLOBALS_F',
11898 'EFFECTIVE_START_DATE',
11899 p_old_EFFECTIVE_START_DATE,
11900 p_new_EFFECTIVE_START_DATE,
11901 p_new_effective_start_date,
11902 least(p_old_effective_start_date,
11903 p_new_effective_start_date)
11904 );
11905
11906 end if;
11907 --
11908 /* Now call the API for the affected assignments */
11909 declare
11910 l_process_event_id number;
11911 l_object_version_number number;
11912 cnt number;
11913 begin
11914 if (pay_continuous_calc.g_event_list.sz <> 0) then
11915 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
11916 pay_ppe_api.create_process_event(
11917 p_assignment_id => NULL,
11918 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
11919 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
11920 p_status => 'U',
11921 p_description => pay_continuous_calc.g_event_list.description(cnt),
11922 p_process_event_id => l_process_event_id,
11926 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
11923 p_object_version_number => l_object_version_number,
11924 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
11925 p_business_group_id => p_business_group_id,
11927 p_surrogate_key => p_new_global_id
11928 );
11929 end loop;
11930 end if;
11931 pay_continuous_calc.g_event_list.sz := 0;
11932 end;
11933 --
11934
11935 END FF_GLOBALS_F_aru;
11936
11937 --
11938 /* name : FF_GLOBALS_F_ard
11939 purpose : This is procedure that records any deletes
11940 on FF_GLOBALS_F.
11941 */
11942 procedure FF_GLOBALS_F_ard(
11943 p_business_group_id in number,
11944 p_legislation_code in varchar2,
11945 p_old_global_id in number,
11946 p_old_effective_start_date in date,
11947 p_new_effective_start_date in date,
11948 p_old_effective_end_date in date,
11949 p_new_effective_end_date in date
11950 )
11951 is
11952 l_process_event_id number;
11953 l_object_version_number number;
11954 l_effective_date date;
11955 l_mode pay_event_updates.event_type%type;
11956 l_column_name pay_event_updates.column_name%type;
11957 l_old_value date;
11958 l_new_value date;
11959 l_proc varchar2(240) := g_package||'.FF_GLOBALS_F_ard';
11960 begin
11961 hr_utility.set_location(l_proc, 10);
11962 /* If the continuous calc is overriden then do nothing */
11963 if (g_override_cc = TRUE) then
11964 return;
11965 end if;
11966 --
11967 -- hr_utility.trace('> p_assignment_id: '||p_assignment_id);
11968 -- hr_utility.trace('> p_old_cost_allocation_ID: '||p_old_user_col_instance_id);
11969 -- hr_utility.trace('> p_old_effective_start_date: '||p_old_effective_start_date);
11970 -- hr_utility.trace('> p_new_effective_start_date: '||p_new_effective_start_date);
11971 -- hr_utility.trace('> pay_dyn_triggers.g_dyt_mode: '||pay_dyn_triggers.g_dyt_mode);
11972 -- hr_utility.trace('> pay_dyn_triggers.g_dbms_dyt: '||pay_dyn_triggers.g_dbms_dyt);
11973
11974 --
11975 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
11976 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
11977 --
11978 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
11979 l_mode := 'D';
11980 else
11981 l_mode := pay_dyn_triggers.g_dyt_mode;
11982 end if;
11983 l_effective_date := p_old_effective_start_date;
11984 l_column_name := null;
11985 l_old_value := null;
11986 l_new_value := null;
11987 --
11988 else
11989 l_mode := pay_dyn_triggers.g_dyt_mode;
11990 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
11991 --
11992 l_effective_date := p_new_effective_end_date;
11993 l_column_name := 'EFFECTIVE_END_DATE';
11994 l_old_value := p_old_effective_end_date;
11995 l_new_value := p_new_effective_end_date;
11996 --
11997 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
11998 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
11999 --
12000 l_effective_date := p_old_effective_start_date;
12001 l_column_name := 'EFFECTIVE_END_DATE';
12002 l_old_value := p_old_effective_end_date;
12003 l_new_value := p_new_effective_end_date;
12004 --
12005 end if;
12006 end if;
12007 --
12008
12009 -- hr_utility.trace('> l_mode: '||l_mode);
12010
12011 pay_continuous_calc.event_update(p_business_group_id,
12012 p_legislation_code,
12013 'FF_GLOBALS_F',
12014 l_column_name,
12015 l_old_value,
12016 l_new_value,
12017 l_effective_date,
12018 l_effective_date,
12019 l_mode
12020 );
12021
12022 /* Now call the API for the affected assignments */
12023 declare
12024 cnt number;
12025 l_process_event_id number;
12026 l_object_version_number number;
12027 begin
12028 if (pay_continuous_calc.g_event_list.sz <> 0) then
12029 hr_utility.trace('> With in Create Process Event: ');
12030 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
12031 pay_ppe_api.create_process_event(
12032 p_assignment_id => NULL,
12033 p_effective_date => g_event_list.effective_date(cnt),
12034 p_change_type => g_event_list.change_type(cnt),
12035 p_status => 'U',
12036 p_description => g_event_list.description(cnt),
12037 p_process_event_id => l_process_event_id,
12041 p_calculation_date => g_event_list.calc_date(cnt),
12038 p_object_version_number => l_object_version_number,
12039 p_event_update_id => g_event_list.event_update_id(cnt),
12040 p_surrogate_key => p_old_global_id,
12042 p_business_group_id => p_business_group_id
12043 );
12044
12045
12046 end loop;
12047 end if;
12048 pay_continuous_calc.g_event_list.sz := 0;
12049 end;
12050 hr_utility.set_location(l_proc, 900);
12051 END FF_GLOBALS_F_ard;
12052
12053 PROCEDURE PQH_RATE_MATRIX_RATES_F_ari( p_business_group_id IN NUMBER
12054 , p_legislation_code IN VARCHAR2
12055 , p_effective_start_date IN DATE
12056 , p_rate_matrix_rate_id IN NUMBER
12057 )
12058 IS
12059 l_process_event_id number;
12060 l_object_version_number number;
12061 l_proc varchar2(240) := g_package||'.PQH_RATE_MATRIX_RATES_F_ari';
12062 BEGIN
12063 hr_utility.set_location(l_proc, 10);
12064 /* If the continuous calc is overriden then do nothing */
12065 if (g_override_cc = TRUE) then
12066 return;
12067 end if;
12068 --
12069 pay_continuous_calc.event_update(p_business_group_id,
12070 p_legislation_code,
12071 'PQH_RATE_MATRIX_RATES_F',
12072 NULL,
12073 NULL,
12074 NULL,
12075 p_effective_start_date,
12076 p_effective_start_date,
12077 'I'
12078 );
12079 /* Now call the API for the affected assignments */
12080 declare
12081 cnt number;
12082 l_process_event_id number;
12083 l_object_version_number number;
12084 begin
12085 if (pay_continuous_calc.g_event_list.sz <> 0) then
12086 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
12087 pay_ppe_api.create_process_event(
12088 p_assignment_id => NULL,
12089 p_effective_date => g_event_list.effective_date(cnt),
12090 p_change_type => g_event_list.change_type(cnt),
12091 p_status => 'U',
12092 p_description => g_event_list.description(cnt),
12093 p_process_event_id => l_process_event_id,
12094 p_object_version_number => l_object_version_number,
12095 p_event_update_id => g_event_list.event_update_id(cnt),
12096 p_surrogate_key => p_rate_matrix_rate_id,
12097 p_calculation_date => g_event_list.calc_date(cnt),
12098 p_business_group_id => p_business_group_id
12099 );
12100 end loop;
12101 end if;
12102 pay_continuous_calc.g_event_list.sz := 0;
12103 end;
12104 hr_utility.set_location(l_proc, 900);
12105
12106 END PQH_RATE_MATRIX_RATES_F_ari;
12107
12108
12109 PROCEDURE PQH_RATE_MATRIX_RATES_F_aru ( p_business_group_id IN NUMBER
12110 , p_legislation_code IN VARCHAR2
12111 , p_effective_date IN DATE
12112 , p_old_EFFECTIVE_END_DATE IN DATE
12113 , p_new_EFFECTIVE_END_DATE IN DATE
12114 , p_old_EFFECTIVE_START_DATE IN DATE
12115 , p_new_EFFECTIVE_START_DATE IN DATE
12116 , p_old_rate_matrix_rate_id IN NUMBER
12117 , p_new_rate_matrix_rate_id IN NUMBER
12118 , p_old_rate_VALUE IN VARCHAR2
12119 , p_new_rate_VALUE IN VARCHAR2
12120 , p_old_min_rate_VALUE IN VARCHAR2
12121 , p_new_min_rate_VALUE IN VARCHAR2
12122 , p_old_max_rate_VALUE IN VARCHAR2
12123 , p_new_max_rate_VALUE IN VARCHAR2
12124 , p_old_mid_rate_VALUE IN VARCHAR2
12125 , p_new_mid_rate_VALUE IN VARCHAR2
12126 )
12127 IS
12128 BEGIN
12129 /* If the continuous calc is overriden then do nothing */
12130 if (pay_continuous_calc.g_override_cc = TRUE) then
12131 return;
12132 end if;
12133 --
12134 /* If the dates havent changed it must be a correction */
12135 if (p_old_EFFECTIVE_END_DATE = p_new_EFFECTIVE_END_DATE
12136 and p_old_EFFECTIVE_START_DATE = p_new_EFFECTIVE_START_DATE) then
12137 --
12138 pay_continuous_calc.event_update(p_business_group_id,
12139 p_legislation_code,
12143 p_new_rate_matrix_rate_id,
12140 'PQH_RATE_MATRIX_RATES_F',
12141 'RATE_MATRIX_RATE_ID',
12142 p_old_rate_matrix_rate_id,
12144 p_effective_date
12145 );
12146 --
12147 pay_continuous_calc.event_update(p_business_group_id,
12148 p_legislation_code,
12149 'PQH_RATE_MATRIX_RATES_F',
12150 'RATE_VALUE',
12151 p_old_RATE_VALUE,
12152 p_new_RATE_VALUE,
12153 p_effective_date
12154 );
12155 --
12156 pay_continuous_calc.event_update(p_business_group_id,
12157 p_legislation_code,
12158 'PQH_RATE_MATRIX_RATES_F',
12159 'MIN_RATE_VALUE',
12160 p_old_MIN_RATE_VALUE,
12161 p_new_MIN_RATE_VALUE,
12162 p_effective_date
12163 );
12164 --
12165 pay_continuous_calc.event_update(p_business_group_id,
12166 p_legislation_code,
12167 'PQH_RATE_MATRIX_RATES_F',
12168 'MAX_RATE_VALUE',
12169 p_old_MAX_RATE_VALUE,
12170 p_new_MAX_RATE_VALUE,
12171 p_effective_date
12172 );
12173 --
12174 pay_continuous_calc.event_update(p_business_group_id,
12175 p_legislation_code,
12176 'PQH_RATE_MATRIX_RATES_F',
12177 'MID_RATE_VALUE',
12178 p_old_MID_RATE_VALUE,
12179 p_new_MID_RATE_VALUE,
12180 p_effective_date
12181 );
12182 --
12183 else
12184 /* OK it must be a date track change */
12185 --
12186 pay_continuous_calc.event_update(p_business_group_id,
12187 p_legislation_code,
12188 'PQH_RATE_MATRIX_RATES_F',
12189 'EFFECTIVE_END_DATE',
12190 p_old_EFFECTIVE_END_DATE,
12191 p_new_EFFECTIVE_END_DATE,
12192 p_new_effective_end_date,
12193 least(p_old_effective_end_date,
12194 p_new_effective_end_date)
12195 );
12196 --
12197 pay_continuous_calc.event_update(p_business_group_id,
12198 p_legislation_code,
12199 'PQH_RATE_MATRIX_RATES_F',
12200 'EFFECTIVE_START_DATE',
12201 p_old_EFFECTIVE_START_DATE,
12202 p_new_EFFECTIVE_START_DATE,
12203 p_new_effective_start_date,
12204 least(p_old_effective_start_date,
12205 p_new_effective_start_date)
12206 );
12207
12208 end if;
12209 --
12210 /* Now call the API for the affected assignments */
12211 declare
12212 l_process_event_id number;
12213 l_object_version_number number;
12214 cnt number;
12215 begin
12216 if (pay_continuous_calc.g_event_list.sz <> 0) then
12217 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
12218 pay_ppe_api.create_process_event(
12219 p_assignment_id => NULL,
12220 p_effective_date => pay_continuous_calc.g_event_list.effective_date(cnt),
12221 p_change_type => pay_continuous_calc.g_event_list.change_type(cnt),
12222 p_status => 'U',
12223 p_description => pay_continuous_calc.g_event_list.description(cnt),
12224 p_process_event_id => l_process_event_id,
12225 p_object_version_number => l_object_version_number,
12226 p_event_update_id => pay_continuous_calc.g_event_list.event_update_id(cnt),
12227 p_business_group_id => p_business_group_id,
12228 p_calculation_date => pay_continuous_calc.g_event_list.calc_date(cnt),
12229 p_surrogate_key => p_new_rate_matrix_rate_id
12230 );
12231 end loop;
12232 end if;
12233 pay_continuous_calc.g_event_list.sz := 0;
12234 end;
12235 END PQH_RATE_MATRIX_RATES_F_aru;
12236
12237 PROCEDURE PQH_RATE_MATRIX_RATES_F_ard ( p_business_group_id in number,
12238 p_legislation_code in varchar2,
12239 p_old_rate_matrix_rate_id in number,
12240 p_old_effective_start_date in date,
12241 p_new_effective_start_date in date,
12242 p_old_effective_end_date in date,
12243 p_new_effective_end_date in date
12244 )
12245 IS
12249 l_mode pay_event_updates.event_type%type;
12246 l_process_event_id number;
12247 l_object_version_number number;
12248 l_effective_date date;
12250 l_column_name pay_event_updates.column_name%type;
12251 l_old_value date;
12252 l_new_value date;
12253 l_proc varchar2(240) := g_package||'.PQH_RATE_MATRIX_RATES_F_ard';
12254 BEGIN
12255 hr_utility.set_location(l_proc, 10);
12256 /* If the continuous calc is overriden then do nothing */
12257 if (g_override_cc = TRUE) then
12258 return;
12259 end if;
12260 --
12261 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt
12262 or pay_dyn_triggers.g_dyt_mode = 'ZAP') then
12263 --
12264 if ( pay_dyn_triggers.g_dyt_mode = pay_dyn_triggers.g_dbms_dyt) then
12265 l_mode := 'D';
12266 else
12267 l_mode := pay_dyn_triggers.g_dyt_mode;
12268 end if;
12269 l_effective_date := p_old_effective_start_date;
12270 l_column_name := null;
12271 l_old_value := null;
12272 l_new_value := null;
12273 --
12274 else
12275 l_mode := pay_dyn_triggers.g_dyt_mode;
12276 if (pay_dyn_triggers.g_dyt_mode = 'DELETE') then
12277 --
12278 l_effective_date := p_new_effective_end_date;
12279 l_column_name := 'EFFECTIVE_END_DATE';
12280 l_old_value := p_old_effective_end_date;
12281 l_new_value := p_new_effective_end_date;
12282 --
12283 elsif (pay_dyn_triggers.g_dyt_mode = 'FUTURE_CHANGE'
12284 or pay_dyn_triggers.g_dyt_mode = 'DELETE_NEXT_CHANGE') then
12285 --
12286 l_effective_date := p_old_effective_start_date;
12287 l_column_name := 'EFFECTIVE_END_DATE';
12288 l_old_value := p_old_effective_end_date;
12289 l_new_value := p_new_effective_end_date;
12290 --
12291 end if;
12292 end if;
12293 --
12294 hr_utility.trace('> l_mode: '||l_mode);
12295
12296 pay_continuous_calc.event_update(p_business_group_id,
12297 p_legislation_code,
12298 'PQH_RATE_MATRIX_RATES_F',
12299 l_column_name,
12300 l_old_value,
12301 l_new_value,
12302 l_effective_date,
12303 l_effective_date,
12304 l_mode
12305 );
12306
12307 /* Now call the API for the affected assignments */
12308 declare
12309 cnt number;
12310 l_process_event_id number;
12311 l_object_version_number number;
12312 begin
12313 if (pay_continuous_calc.g_event_list.sz <> 0) then
12314 hr_utility.trace('> With in Create Process Event: ');
12315 for cnt in 1..pay_continuous_calc.g_event_list.sz loop
12316 pay_ppe_api.create_process_event(
12317 p_assignment_id => NULL,
12318 p_effective_date => g_event_list.effective_date(cnt),
12319 p_change_type => g_event_list.change_type(cnt),
12320 p_status => 'U',
12321 p_description => g_event_list.description(cnt),
12322 p_process_event_id => l_process_event_id,
12323 p_object_version_number => l_object_version_number,
12324 p_event_update_id => g_event_list.event_update_id(cnt),
12325 p_surrogate_key => p_old_rate_matrix_rate_id,
12326 p_calculation_date => g_event_list.calc_date(cnt),
12327 p_business_group_id => p_business_group_id
12328 );
12329
12330
12331 end loop;
12332 end if;
12333 pay_continuous_calc.g_event_list.sz := 0;
12334 end;
12335 hr_utility.set_location(l_proc, 900);
12336
12337 END PQH_RATE_MATRIX_RATES_F_ard;
12338
12339 begin
12340 g_event_cache.sz := 0;
12341 g_event_list.sz := 0;
12342 g_override_cc := FALSE;
12343 END PAY_CONTINUOUS_CALC;