1 package body PAY_DYT_COST_ALLOCATIONS_PKG
2 IS
3
4 --
5 /*
6 ==================================================
7 This is a dynamically generated database package
8 containing code to support the use of dynamic
9 triggers.
10
11 Preference of package Vs dbms triggers supporting
12 dyn' triggers is made via the dated table form.
13 .
14 This code will be called implicitly by table rhi
15 and
16 explictly from non-API packages that maintain
17 data on the relevant table.
18 ==================================================
19 ** DO NOT CHANGE MANUALLY **
20
21 --------------------------------------------------
22 Package Name: PAY_DYT_COST_ALLOCATIONS_PKG
23 Base Table: PAY_COST_ALLOCATIONS_F
24 Date: 03/01/2007 23:13
25 ==================================================
26 */
27
28 --
29
30 /*
31 ================================================
32 THIS IS A DYNAMICALLY GENERATED PACKAGE PROCEDURE
33 WITH CODE REPRESENTING A DYNAMIC TRIGGER
34 ================================================
35 ** DO NOT CHANGE MANUALLY **
36
37 ------------------------------------------------
38 NAME: PAY_COST_ALLOCATIONS_F_ARD_ARD
39 TABLE: PAY_COST_ALLOCATIONS_F
40 ACTION: DELETE
41 GENERATED DATE: 03/01/2007 23:13
42 DESCRIPTION: CONTINUOUS CALCULATION TRIGGER ON DELETION
43 OF PAY_COST_ALLOCATIONS_F
44 FULL TRIGGER NAME: PAY_COST_ALLOCATIONS_F_ARD
45 ================================================
46 */
47 --
48 PROCEDURE PAY_COST_ALLOCATIONS_F_ARD_ARD
49 (
50 P_NEW_COST_ALLOCATION_ID IN NUMBER
51
52 ,P_NEW_DATETRACK_MODE IN VARCHAR2
53 ,P_NEW_EFFECTIVE_DATE IN DATE
54 ,P_NEW_EFFECTIVE_END_DATE IN DATE
55 ,P_NEW_EFFECTIVE_START_DATE IN DATE
56 ,P_NEW_VALIDATION_END_DATE
57 IN DATE
58 ,P_NEW_VALIDATION_START_DATE IN DATE
59 ,P_OLD_ASSIGNMENT_ID IN NUMBER
60 ,P_OLD_BUSINESS_GROUP_ID IN NUMBER
61 ,P_OLD_COST_ALLOCATION_KEYFLEX_ IN NUMBER
62
63 ,P_OLD_EFFECTIVE_END_DATE IN DATE
64 ,P_OLD_EFFECTIVE_START_DATE IN DATE
65 ,P_OLD_OBJECT_VERSION_NUMBER IN NUMBER
66 ,P_OLD_PROGRAM_APPLICATION_ID IN NUMBER
67 ,P_OLD_PROGRAM_ID
68 IN NUMBER
69 ,P_OLD_PROGRAM_UPDATE_DATE IN DATE
70 ,P_OLD_PROPORTION IN NUMBER
71 ,P_OLD_REQUEST_ID IN NUMBER
72 ) IS
73
74 --
75 /* LOCAL VARIABLE DECLARATIONS */
76 L_BUSINESS_GROUP_ID
77 NUMBER;
78 L_LEGISLATION_CODE VARCHAR2(30);
79 BEGIN
80 HR_UTILITY.TRACE(' >DYT: EXECUTE PROCEDURE VERSION OF DYNAMIC TRIGGER: PAY_COST_ALLOCATIONS_F_ARD');
81 IF NOT (HR_GENERAL.G_DATA_MIGRATOR_MODE <> 'Y') THEN
82 RETURN;
83 END IF;
84 /*
85 INITIALISING LOCAL VARIABLES */
86 L_BUSINESS_GROUP_ID := PAY_CORE_UTILS.GET_BUSINESS_GROUP(
87 P_STATEMENT => 'SELECT PAF.BUSINESS_GROUP_ID FROM PER_ASSIGNMENTS_F PAF WHERE ASSIGNMENT_ID = '||P_OLD_ASSIGNMENT_ID||' AND
88 TO_DATE('''||TO_CHAR(P_OLD_EFFECTIVE_START_DATE, 'DD-MON-YYYY')||''',''DD-MON-YYYY'') BETWEEN PAF.EFFECTIVE_START_DATE AND PAF.EFFECTIVE_END_DATE'
89 );
90 --
91 L_LEGISLATION_CODE := PAY_CORE_UTILS.GET_LEGISLATION_CODE(
92 P_BG_ID
93 => L_BUSINESS_GROUP_ID
94 );
95 --
96 /* IS THE TRIGGER IN AN ENABLED FUNCTIONAL AREA */
97 IF PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
98 P_EVENT_ID => 1130,
99 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
100 P_BUSINESS_GROUP_ID =>
101 L_BUSINESS_GROUP_ID,
102 P_PAYROLL_ID => NULL
103 ) THEN
104 RETURN;
105 END IF;
106 --
107 /* GLOBAL COMPONENT CALLS */
108 PAY_CONTINUOUS_CALC.PAY_COST_ALLOCATIONS_F_ARD(
109 P_ASSIGNMENT_ID => P_OLD_ASSIGNMENT_ID,
110 P_BUSINESS_GROUP_ID
111 => L_BUSINESS_GROUP_ID,
112 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
113 P_NEW_EFFECTIVE_END_DATE => P_NEW_EFFECTIVE_END_DATE,
114 P_NEW_EFFECTIVE_START_DATE => P_NEW_EFFECTIVE_START_DATE,
115 P_OLD_COST_ALLOCATION_ID
116 => P_NEW_COST_ALLOCATION_ID,
117 P_OLD_EFFECTIVE_END_DATE => P_OLD_EFFECTIVE_END_DATE,
118 P_OLD_EFFECTIVE_START_DATE => P_OLD_EFFECTIVE_START_DATE
119 );
120 --
121 /* LEGISLATION SPECIFIC COMPONENT CALLS */
122 --
123 /* BUSINESS GROUP SPECIFIC
124 COMPONENT CALLS */
125 --
126 /* PAYROLL SPECIFIC COMPONENT CALLS */
127 --
128 EXCEPTION
129 WHEN OTHERS THEN
130 HR_UTILITY.SET_LOCATION('PAY_COST_ALLOCATIONS_F_ARD_ARD',ABS(SQLCODE));
131 RAISE;
132 --
133 END PAY_COST_ALLOCATIONS_F_ARD_ARD;
134
135 --
136
137 /*
138 ================================================
139 THIS IS A DYNAMICALLY GENERATED PACKAGE PROCEDURE
140 WITH CODE REPRESENTING A DYNAMIC TRIGGER
141 ================================================
142 ** DO NOT CHANGE MANUALLY **
143
144 ------------------------------------------------
145 NAME: PAY_COST_ALLOCATIONS_F_ARI_ARI
146 TABLE: PAY_COST_ALLOCATIONS_F
147 ACTION: INSERT
148 GENERATED DATE: 03/01/2007 23:13
149 DESCRIPTION: CONTINUOUS CALCULATION TRIGGER ON INSERT OF
150 PAY_COST_ALLOCATIONS_F
151 FULL TRIGGER NAME: PAY_COST_ALLOCATIONS_F_ARI
152 ================================================
153 */
154 --
155 PROCEDURE PAY_COST_ALLOCATIONS_F_ARI_ARI
156 (
157 P_NEW_ASSIGNMENT_ID IN NUMBER
158
159 ,P_NEW_BUSINESS_GROUP_ID IN NUMBER
160 ,P_NEW_COST_ALLOCATION_ID IN NUMBER
161 ,P_NEW_COST_ALLOCATION_KEYFLEX_ IN NUMBER
162 ,P_NEW_EFFECTIVE_DATE IN DATE
163 ,P_NEW_EFFECTIVE_END_DATE
164 IN DATE
165 ,P_NEW_EFFECTIVE_START_DATE IN DATE
166 ,P_NEW_OBJECT_VERSION_NUMBER IN NUMBER
167 ,P_NEW_PROGRAM_APPLICATION_ID IN NUMBER
168 ,P_NEW_PROGRAM_ID IN NUMBER
169
170 ,P_NEW_PROGRAM_UPDATE_DATE IN DATE
171 ,P_NEW_PROPORTION IN NUMBER
172 ,P_NEW_REQUEST_ID IN NUMBER
173 ,P_NEW_VALIDATION_END_DATE IN DATE
174 ,P_NEW_VALIDATION_START_DATE
175 IN DATE
176 ) IS
177
178 --
179 /* LOCAL VARIABLE DECLARATIONS */
180 L_BUSINESS_GROUP_ID NUMBER;
181 L_LEGISLATION_CODE VARCHAR2(30);
182 BEGIN
183 HR_UTILITY.TRACE(' >DYT: EXECUTE PROCEDURE VERSION OF DYNAMIC TRIGGER:
184 PAY_COST_ALLOCATIONS_F_ARI');
185 IF NOT (HR_GENERAL.G_DATA_MIGRATOR_MODE <> 'Y') THEN
186 RETURN;
187 END IF;
188 /* INITIALISING LOCAL VARIABLES */
189 L_BUSINESS_GROUP_ID := PAY_CORE_UTILS.GET_BUSINESS_GROUP(
190 P_STATEMENT => 'SELECT
191 PAF.BUSINESS_GROUP_ID FROM PER_ASSIGNMENTS_F PAF WHERE ASSIGNMENT_ID = '||P_NEW_ASSIGNMENT_ID||' AND TO_DATE('''||TO_CHAR(P_NEW_EFFECTIVE_START_DATE, 'DD-MON-YYYY')||''',''DD-MON-YYYY'') BETWEEN PAF.EFFECTIVE_START_DATE AND PAF.EFFECTIVE_END_DATE'
192 );
193
194 --
195 L_LEGISLATION_CODE := PAY_CORE_UTILS.GET_LEGISLATION_CODE(
196 P_BG_ID => L_BUSINESS_GROUP_ID
197 );
198 --
199 /* IS THE TRIGGER IN AN ENABLED FUNCTIONAL AREA */
200 IF PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
201 P_EVENT_ID
202 => 1132,
203 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
204 P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
205 P_PAYROLL_ID => NULL
206 ) THEN
207 RETURN;
208 END IF;
209 --
210 /* GLOBAL COMPONENT CALLS */
211 PAY_CONTINUOUS_CALC.PAY_COST_ALLOCATIONS_F_ARI(
212
213 P_ASSIGNMENT_ID => P_NEW_ASSIGNMENT_ID,
214 P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
215 P_COST_ALLOCATION_ID => P_NEW_COST_ALLOCATION_ID,
216 P_EFFECTIVE_START_DATE => P_NEW_EFFECTIVE_START_DATE,
217
218 P_LEGISLATION_CODE => L_LEGISLATION_CODE
219 );
220 --
221 /* LEGISLATION SPECIFIC COMPONENT CALLS */
222 --
223 /* BUSINESS GROUP SPECIFIC COMPONENT CALLS */
224 --
225 /* PAYROLL SPECIFIC COMPONENT CALLS */
226 --
227 EXCEPTION
228 WHEN OTHERS THEN
229
230 HR_UTILITY.SET_LOCATION('PAY_COST_ALLOCATIONS_F_ARI_ARI',ABS(SQLCODE));
231 RAISE;
232 --
233 END PAY_COST_ALLOCATIONS_F_ARI_ARI;
234
235 --
236
237 /*
238 ================================================
239 THIS IS A DYNAMICALLY GENERATED PACKAGE PROCEDURE
240 WITH CODE REPRESENTING A DYNAMIC TRIGGER
241 ================================================
242 ** DO NOT CHANGE MANUALLY **
243
244 ------------------------------------------------
245 NAME: PAY_COST_ALLOCATIONS_F_ARU_ARU
246 TABLE: PAY_COST_ALLOCATIONS_F
247 ACTION: UPDATE
248 GENERATED DATE: 03/01/2007 23:13
249 DESCRIPTION: CONTINUOUS CALCUATION TRIGGER ON UPDATE OF
250 PAY_COST_ALLOCATIONS_F
251 FULL TRIGGER NAME: PAY_COST_ALLOCATIONS_F_ARU
252 ================================================
253 */
254 --
255 PROCEDURE PAY_COST_ALLOCATIONS_F_ARU_ARU
256 (
257 P_NEW_ASSIGNMENT_ID IN NUMBER
258
259 ,P_NEW_BUSINESS_GROUP_ID IN NUMBER
260 ,P_NEW_COST_ALLOCATION_ID IN NUMBER
261 ,P_NEW_COST_ALLOCATION_KEYFLEX_ IN NUMBER
262 ,P_NEW_DATETRACK_MODE IN VARCHAR2
263 ,P_NEW_EFFECTIVE_DATE
264 IN DATE
265 ,P_NEW_EFFECTIVE_END_DATE IN DATE
266 ,P_NEW_EFFECTIVE_START_DATE IN DATE
267 ,P_NEW_OBJECT_VERSION_NUMBER IN NUMBER
268 ,P_NEW_PROGRAM_APPLICATION_ID IN NUMBER
269 ,P_NEW_PROGRAM_ID
270 IN NUMBER
271 ,P_NEW_PROGRAM_UPDATE_DATE IN DATE
272 ,P_NEW_PROPORTION IN NUMBER
273 ,P_NEW_REQUEST_ID IN NUMBER
274 ,P_NEW_VALIDATION_END_DATE IN DATE
275
276 ,P_NEW_VALIDATION_START_DATE IN DATE
277 ,P_OLD_ASSIGNMENT_ID IN NUMBER
278 ,P_OLD_BUSINESS_GROUP_ID IN NUMBER
279 ,P_OLD_COST_ALLOCATION_KEYFLEX_ IN NUMBER
280 ,P_OLD_EFFECTIVE_END_DATE
281 IN DATE
282 ,P_OLD_EFFECTIVE_START_DATE IN DATE
283 ,P_OLD_OBJECT_VERSION_NUMBER IN NUMBER
284 ,P_OLD_PROGRAM_APPLICATION_ID IN NUMBER
285 ,P_OLD_PROGRAM_ID IN NUMBER
286
287 ,P_OLD_PROGRAM_UPDATE_DATE IN DATE
288 ,P_OLD_PROPORTION IN NUMBER
289 ,P_OLD_REQUEST_ID IN NUMBER
290 ) IS
291
292 --
293 /* LOCAL VARIABLE DECLARATIONS */
294 L_BUSINESS_GROUP_ID NUMBER;
295
296 L_LEGISLATION_CODE VARCHAR2(10);
297 BEGIN
298 HR_UTILITY.TRACE(' >DYT: EXECUTE PROCEDURE VERSION OF DYNAMIC TRIGGER: PAY_COST_ALLOCATIONS_F_ARU');
299 IF NOT (HR_GENERAL.G_DATA_MIGRATOR_MODE <> 'Y') THEN
300 RETURN;
301 END IF;
302 /* INITIALISING LOCAL
303 VARIABLES */
304 L_BUSINESS_GROUP_ID := PAY_CORE_UTILS.GET_BUSINESS_GROUP(
305 P_STATEMENT => 'SELECT PAF.BUSINESS_GROUP_ID FROM PER_ASSIGNMENTS_F PAF '||' WHERE ASSIGNMENT_ID = '||P_OLD_ASSIGNMENT_ID||' AND
306 TO_DATE('''||TO_CHAR(P_OLD_EFFECTIVE_START_DATE, 'DD-MON-YYYY')||''',''DD-MON-YYYY'') BETWEEN PAF.EFFECTIVE_START_DATE AND PAF.EFFECTIVE_END_DATE'
307 );
308 --
309 L_LEGISLATION_CODE := PAY_CORE_UTILS.GET_LEGISLATION_CODE(
310 P_BG_ID
311 => L_BUSINESS_GROUP_ID
312 );
313 --
314 /* IS THE TRIGGER IN AN ENABLED FUNCTIONAL AREA */
315 IF PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
316 P_EVENT_ID => 1135,
317 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
318 P_BUSINESS_GROUP_ID =>
319 L_BUSINESS_GROUP_ID,
320 P_PAYROLL_ID => NULL
321 ) THEN
322 RETURN;
323 END IF;
324 --
325 /* GLOBAL COMPONENT CALLS */
326 PAY_CONTINUOUS_CALC.PAY_COST_ALLOCATIONS_F_ARU(
327 P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
328 P_EFFECTIVE_DATE
329 => P_NEW_EFFECTIVE_START_DATE,
330 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
331 P_NEW_ASSIGNMENT_ID => P_NEW_ASSIGNMENT_ID,
332 P_NEW_BUSINESS_GROUP_ID => P_NEW_BUSINESS_GROUP_ID,
333 P_NEW_COST_ALLOCATION_ID
334 => P_NEW_COST_ALLOCATION_ID,
335 P_NEW_COST_ALLOCATION_KEYFLEX_ => P_NEW_COST_ALLOCATION_KEYFLEX_,
336 P_NEW_EFFECTIVE_END_DATE => P_NEW_EFFECTIVE_END_DATE,
337 P_NEW_EFFECTIVE_START_DATE => P_NEW_EFFECTIVE_START_DATE,
338
339 P_NEW_PROGRAM_APPLICATION_ID => P_NEW_PROGRAM_APPLICATION_ID,
340 P_NEW_PROGRAM_ID => P_NEW_PROGRAM_ID,
341 P_NEW_PROGRAM_UPDATE_DATE => P_NEW_PROGRAM_UPDATE_DATE,
342 P_NEW_PROPORTION => P_NEW_PROPORTION,
343
344 P_NEW_REQUEST_ID => P_NEW_REQUEST_ID,
345 P_OLD_ASSIGNMENT_ID => P_OLD_ASSIGNMENT_ID,
346 P_OLD_BUSINESS_GROUP_ID => P_OLD_BUSINESS_GROUP_ID,
347 P_OLD_COST_ALLOCATION_ID => P_NEW_COST_ALLOCATION_ID,
348
349 P_OLD_COST_ALLOCATION_KEYFLEX_ => P_OLD_COST_ALLOCATION_KEYFLEX_,
350 P_OLD_EFFECTIVE_END_DATE => P_OLD_EFFECTIVE_END_DATE,
351 P_OLD_EFFECTIVE_START_DATE => P_OLD_EFFECTIVE_START_DATE,
352 P_OLD_PROGRAM_APPLICATION_ID =>
353 P_OLD_PROGRAM_APPLICATION_ID,
354 P_OLD_PROGRAM_ID => P_OLD_PROGRAM_ID,
355 P_OLD_PROGRAM_UPDATE_DATE => P_OLD_PROGRAM_UPDATE_DATE,
356 P_OLD_PROPORTION => P_OLD_PROPORTION,
357 P_OLD_REQUEST_ID =>
358 P_OLD_REQUEST_ID
359 );
360 --
361 /* LEGISLATION SPECIFIC COMPONENT CALLS */
362 --
363 /* BUSINESS GROUP SPECIFIC COMPONENT CALLS */
364 --
365 /* PAYROLL SPECIFIC COMPONENT CALLS */
366 --
367 EXCEPTION
368 WHEN OTHERS THEN
369
370 HR_UTILITY.SET_LOCATION('PAY_COST_ALLOCATIONS_F_ARU_ARU',ABS(SQLCODE));
371 RAISE;
372 --
373 END PAY_COST_ALLOCATIONS_F_ARU_ARU;
374
375 --
376
377 /*
378 ================================================
379 This is a dynamically generated procedure.
380 Will be called by API.
381 ================================================
382 ** DO NOT CHANGE MANUALLY **
383
384 ------------------------------------------------
385 Name: AFTER_INSERT
386 Table: PAY_COST_ALLOCATIONS_F
387 Action: INSERT
388 Generated Date: 03/01/2007 23:13
389 Description: Called as part of INSERT process
390
391 ================================================
392 */
393
394 --
395 PROCEDURE AFTER_INSERT
396 (
397 P_EFFECTIVE_DATE in DATE
398 ,P_VALIDATION_START_DATE in DATE
399 ,P_VALIDATION_END_DATE in DATE
400
401 ,P_COST_ALLOCATION_ID in NUMBER
402 ,P_EFFECTIVE_START_DATE in DATE
403 ,P_EFFECTIVE_END_DATE in DATE
404 ,P_BUSINESS_GROUP_ID in NUMBER
405 ,P_COST_ALLOCATION_KEYFLEX_ID
406 in NUMBER
407 ,P_ASSIGNMENT_ID in NUMBER
408 ,P_PROPORTION in NUMBER
409 ,P_REQUEST_ID in NUMBER
410 ,P_PROGRAM_APPLICATION_ID in NUMBER
411 ,P_PROGRAM_ID
412 in NUMBER
413 ,P_PROGRAM_UPDATE_DATE in DATE
414 ,P_OBJECT_VERSION_NUMBER in NUMBER
415 ) IS
416 l_mode varchar2(80);
417
418 --
419 BEGIN
420
421 --
422 hr_utility.trace(' >DYT: Main entry point from row handler,
423 AFTER_INSERT');
424 /* Mechanism for event capture to know whats occurred */
425 l_mode := pay_dyn_triggers.g_dyt_mode;
426 pay_dyn_triggers.g_dyt_mode := hr_api.g_insert;
427
428 --
429
430 if (paywsdyg_pkg.trigger_enabled('PAY_COST_ALLOCATIONS_F_ARI')) then
431 PAY_COST_ALLOCATIONS_F_ARI_ARI(
432 p_new_ASSIGNMENT_ID => P_ASSIGNMENT_ID
433 ,p_new_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
434
435 ,p_new_COST_ALLOCATION_ID => P_COST_ALLOCATION_ID
436 ,p_new_COST_ALLOCATION_KEYFLEX_ => P_COST_ALLOCATION_KEYFLEX_ID
437 ,p_new_EFFECTIVE_DATE => P_EFFECTIVE_DATE
438 ,p_new_EFFECTIVE_END_DATE
439 => P_EFFECTIVE_END_DATE
440 ,p_new_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE
441 ,p_new_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER
442 ,p_new_PROGRAM_APPLICATION_ID => P_PROGRAM_APPLICATION_ID
443
444 ,p_new_PROGRAM_ID => P_PROGRAM_ID
445 ,p_new_PROGRAM_UPDATE_DATE => P_PROGRAM_UPDATE_DATE
446 ,p_new_PROPORTION => P_PROPORTION
447 ,p_new_REQUEST_ID =>
448 P_REQUEST_ID
449 ,p_new_VALIDATION_END_DATE => P_VALIDATION_END_DATE
450 ,p_new_VALIDATION_START_DATE => P_VALIDATION_START_DATE
451 );
452 end if;
453
454 --
455 pay_dyn_triggers.g_dyt_mode := l_mode;
456
457 --
458 EXCEPTION
459 WHEN OTHERS THEN
460
461 hr_utility.set_location('AFTER_INSERT',ABS(SQLCODE));
462 pay_dyn_triggers.g_dyt_mode := l_mode;
463 RAISE;
464 --
465 END AFTER_INSERT;
466
467 --
468
469 /*
470 ================================================
471 This is a dynamically generated procedure.
472 Will be called by API.
473 ================================================
474 ** DO NOT CHANGE MANUALLY **
475
476 ------------------------------------------------
477 Name: AFTER_UPDATE
478 Table: PAY_COST_ALLOCATIONS_F
479 Action: UPDATE
480 Generated Date: 03/01/2007 23:13
481 Description: Called as part of UPDATE process
482
483 ================================================
484 */
485
486 --
487 PROCEDURE AFTER_UPDATE
488 (
489 P_EFFECTIVE_DATE in DATE
490 ,P_DATETRACK_MODE in VARCHAR2
491 ,P_VALIDATION_START_DATE in DATE
492
493 ,P_VALIDATION_END_DATE in DATE
494 ,P_COST_ALLOCATION_ID in NUMBER
495 ,P_EFFECTIVE_START_DATE in DATE
496 ,P_EFFECTIVE_END_DATE in DATE
497 ,P_BUSINESS_GROUP_ID
498 in NUMBER
499 ,P_COST_ALLOCATION_KEYFLEX_ID in NUMBER
500 ,P_ASSIGNMENT_ID in NUMBER
501 ,P_PROPORTION in NUMBER
502 ,P_REQUEST_ID in NUMBER
503
504 ,P_PROGRAM_APPLICATION_ID in NUMBER
505 ,P_PROGRAM_ID in NUMBER
506 ,P_PROGRAM_UPDATE_DATE in DATE
507 ,P_OBJECT_VERSION_NUMBER in NUMBER
508 ,P_EFFECTIVE_START_DATE_O
509 in DATE
510 ,P_EFFECTIVE_END_DATE_O in DATE
511 ,P_BUSINESS_GROUP_ID_O in NUMBER
512 ,P_COST_ALLOCATION_KEYFLEX_ID_O in NUMBER
513 ,P_ASSIGNMENT_ID_O in NUMBER
514 ,P_PROPORTION_O
515 in NUMBER
516 ,P_REQUEST_ID_O in NUMBER
517 ,P_PROGRAM_APPLICATION_ID_O in NUMBER
518 ,P_PROGRAM_ID_O in NUMBER
519 ,P_PROGRAM_UPDATE_DATE_O in DATE
520
521 ,P_OBJECT_VERSION_NUMBER_O in NUMBER
522 ) IS
523 l_mode varchar2(80);
524
525 --
526 BEGIN
527
528 --
529 hr_utility.trace(' >DYT: Main entry point from row handler, AFTER_UPDATE');
530 /* Mechanism for event capture to know whats occurred */
531 l_mode :=
532 pay_dyn_triggers.g_dyt_mode;
533 pay_dyn_triggers.g_dyt_mode := p_datetrack_mode;
534
535 --
536
537 if (paywsdyg_pkg.trigger_enabled('PAY_COST_ALLOCATIONS_F_ARU')) then
538 PAY_COST_ALLOCATIONS_F_ARU_ARU(
539 p_new_ASSIGNMENT_ID => P_ASSIGNMENT_ID
540 ,p_new_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
541
542 ,p_new_COST_ALLOCATION_ID => P_COST_ALLOCATION_ID
543 ,p_new_COST_ALLOCATION_KEYFLEX_ => P_COST_ALLOCATION_KEYFLEX_ID
544 ,p_new_DATETRACK_MODE => P_DATETRACK_MODE
545 ,p_new_EFFECTIVE_DATE
546 => P_EFFECTIVE_DATE
547 ,p_new_EFFECTIVE_END_DATE => P_EFFECTIVE_END_DATE
548 ,p_new_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE
549 ,p_new_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER
550
551 ,p_new_PROGRAM_APPLICATION_ID => P_PROGRAM_APPLICATION_ID
552 ,p_new_PROGRAM_ID => P_PROGRAM_ID
553 ,p_new_PROGRAM_UPDATE_DATE => P_PROGRAM_UPDATE_DATE
554 ,p_new_PROPORTION =>
555 P_PROPORTION
556 ,p_new_REQUEST_ID => P_REQUEST_ID
557 ,p_new_VALIDATION_END_DATE => P_VALIDATION_END_DATE
558 ,p_new_VALIDATION_START_DATE => P_VALIDATION_START_DATE
559 ,p_old_ASSIGNMENT_ID
560 => P_ASSIGNMENT_ID_O
561 ,p_old_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID_O
562 ,p_old_COST_ALLOCATION_KEYFLEX_ => P_COST_ALLOCATION_KEYFLEX_ID_O
563 ,p_old_EFFECTIVE_END_DATE =>
564 P_EFFECTIVE_END_DATE_O
565 ,p_old_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE_O
566 ,p_old_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER_O
567 ,p_old_PROGRAM_APPLICATION_ID => P_PROGRAM_APPLICATION_ID_O
568
569 ,p_old_PROGRAM_ID => P_PROGRAM_ID_O
570 ,p_old_PROGRAM_UPDATE_DATE => P_PROGRAM_UPDATE_DATE_O
571 ,p_old_PROPORTION => P_PROPORTION_O
572 ,p_old_REQUEST_ID =>
573 P_REQUEST_ID_O
574 );
575 end if;
576
577 --
578 pay_dyn_triggers.g_dyt_mode := l_mode;
579
580 --
581 EXCEPTION
582 WHEN OTHERS THEN
583 hr_utility.set_location('AFTER_UPDATE',ABS(SQLCODE));
584 pay_dyn_triggers.g_dyt_mode := l_mode;
585 RAISE;
586 --
587 END AFTER_UPDATE;
588
589 --
590
591 /*
592 ================================================
593 This is a dynamically generated procedure.
594 Will be called by API.
595 ================================================
596 ** DO NOT CHANGE MANUALLY **
597
598 ------------------------------------------------
599 Name: AFTER_DELETE
600 Table: PAY_COST_ALLOCATIONS_F
601 Action: DELETE
602 Generated Date: 03/01/2007 23:13
603 Description: Called as part of DELETE process
604
605 ================================================
606 */
607
608 --
609 PROCEDURE AFTER_DELETE
610 (
611 P_EFFECTIVE_DATE in DATE
612 ,P_DATETRACK_MODE in VARCHAR2
613 ,P_VALIDATION_START_DATE in DATE
614
615 ,P_VALIDATION_END_DATE in DATE
616 ,P_COST_ALLOCATION_ID in NUMBER
617 ,P_EFFECTIVE_START_DATE in DATE
618 ,P_EFFECTIVE_END_DATE in DATE
619 ,P_EFFECTIVE_START_DATE_O
620 in DATE
621 ,P_EFFECTIVE_END_DATE_O in DATE
622 ,P_BUSINESS_GROUP_ID_O in NUMBER
623 ,P_COST_ALLOCATION_KEYFLEX_ID_O in NUMBER
624 ,P_ASSIGNMENT_ID_O in NUMBER
625 ,P_PROPORTION_O
626 in NUMBER
627 ,P_REQUEST_ID_O in NUMBER
628 ,P_PROGRAM_APPLICATION_ID_O in NUMBER
629 ,P_PROGRAM_ID_O in NUMBER
630 ,P_PROGRAM_UPDATE_DATE_O in DATE
631
632 ,P_OBJECT_VERSION_NUMBER_O in NUMBER
633 ) IS
634 l_mode varchar2(80);
635
636 --
637 BEGIN
638
639 --
640 hr_utility.trace(' >DYT: Main entry point from row handler, AFTER_DELETE');
641 /* Mechanism for event capture to know whats occurred */
642 l_mode :=
643 pay_dyn_triggers.g_dyt_mode;
644 pay_dyn_triggers.g_dyt_mode := p_datetrack_mode;
645
646 --
647
648 if (paywsdyg_pkg.trigger_enabled('PAY_COST_ALLOCATIONS_F_ARD')) then
649 PAY_COST_ALLOCATIONS_F_ARD_ARD(
650 p_new_COST_ALLOCATION_ID => P_COST_ALLOCATION_ID
651 ,p_new_DATETRACK_MODE => P_DATETRACK_MODE
652
653 ,p_new_EFFECTIVE_DATE => P_EFFECTIVE_DATE
654 ,p_new_EFFECTIVE_END_DATE => P_EFFECTIVE_END_DATE
655 ,p_new_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE
656 ,p_new_VALIDATION_END_DATE
657 => P_VALIDATION_END_DATE
658 ,p_new_VALIDATION_START_DATE => P_VALIDATION_START_DATE
659 ,p_old_ASSIGNMENT_ID => P_ASSIGNMENT_ID_O
660 ,p_old_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID_O
661
662 ,p_old_COST_ALLOCATION_KEYFLEX_ => P_COST_ALLOCATION_KEYFLEX_ID_O
663 ,p_old_EFFECTIVE_END_DATE => P_EFFECTIVE_END_DATE_O
664 ,p_old_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE_O
665
666 ,p_old_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER_O
667 ,p_old_PROGRAM_APPLICATION_ID => P_PROGRAM_APPLICATION_ID_O
668 ,p_old_PROGRAM_ID => P_PROGRAM_ID_O
669 ,p_old_PROGRAM_UPDATE_DATE
670 => P_PROGRAM_UPDATE_DATE_O
671 ,p_old_PROPORTION => P_PROPORTION_O
672 ,p_old_REQUEST_ID => P_REQUEST_ID_O
673 );
674 end if;
675
676 --
677 pay_dyn_triggers.g_dyt_mode := l_mode;
678
679 --
680 EXCEPTION
681 WHEN OTHERS
682 THEN
683 hr_utility.set_location('AFTER_DELETE',ABS(SQLCODE));
684 pay_dyn_triggers.g_dyt_mode := l_mode;
685 RAISE;
686 --
687 END AFTER_DELETE;
688
689 --
690
691 /* END_PACKAGE */
692 END PAY_DYT_COST_ALLOCATIONS_PKG;
693