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: 27/11/2012 04:01
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: 27/11/2012 04:01
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 '||P_OLD_BUSINESS_GROUP_ID||' FROM SYS.DUAL'
88 );
89 --
90 L_LEGISLATION_CODE := PAY_CORE_UTILS.GET_LEGISLATION_CODE(
91
92 P_BG_ID => L_BUSINESS_GROUP_ID
93 );
94 --
95 /* IS THE TRIGGER IN AN ENABLED FUNCTIONAL AREA */
96 IF PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
97 P_EVENT_ID => 1130,
98 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
99
100 P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
101 P_PAYROLL_ID => NULL
102 ) THEN
103 RETURN;
104 END IF;
105 --
106 /* GLOBAL COMPONENT CALLS */
107 PAY_CONTINUOUS_CALC.PAY_COST_ALLOCATIONS_F_ARD(
108 P_ASSIGNMENT_ID => P_OLD_ASSIGNMENT_ID,
109
110 P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
111 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
112 P_NEW_EFFECTIVE_END_DATE => P_NEW_EFFECTIVE_END_DATE,
113 P_NEW_EFFECTIVE_START_DATE => P_NEW_EFFECTIVE_START_DATE,
114
115 P_OLD_COST_ALLOCATION_ID => P_NEW_COST_ALLOCATION_ID,
116 P_OLD_EFFECTIVE_END_DATE => P_OLD_EFFECTIVE_END_DATE,
117 P_OLD_EFFECTIVE_START_DATE => P_OLD_EFFECTIVE_START_DATE
118 );
119 --
120 /* LEGISLATION SPECIFIC COMPONENT CALLS */
121 --
122 /*
123 BUSINESS GROUP SPECIFIC COMPONENT CALLS */
124 --
125 /* PAYROLL SPECIFIC COMPONENT CALLS */
126 --
127 EXCEPTION
128 WHEN OTHERS THEN
129 HR_UTILITY.SET_LOCATION('PAY_COST_ALLOCATIONS_F_ARD_ARD',ABS(SQLCODE));
130 RAISE;
131 --
132 END PAY_COST_ALLOCATIONS_F_ARD_ARD;
133
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: 27/11/2012 04:01
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 '||P_NEW_BUSINESS_GROUP_ID||' FROM SYS.DUAL'
192 );
193 --
194 L_LEGISLATION_CODE := PAY_CORE_UTILS.GET_LEGISLATION_CODE(
195 P_BG_ID => L_BUSINESS_GROUP_ID
196 );
197 --
198 /* IS THE TRIGGER IN AN ENABLED FUNCTIONAL AREA */
199 IF
200 PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
201 P_EVENT_ID => 1132,
202 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
203 P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
204 P_PAYROLL_ID => NULL
205 ) THEN
206 RETURN;
207 END IF;
208 --
209 /* GLOBAL COMPONENT
210 CALLS */
211 PAY_CONTINUOUS_CALC.PAY_COST_ALLOCATIONS_F_ARI(
212 P_ASSIGNMENT_ID => P_NEW_ASSIGNMENT_ID,
213 P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
214 P_COST_ALLOCATION_ID => P_NEW_COST_ALLOCATION_ID,
215
216 P_EFFECTIVE_START_DATE => P_NEW_EFFECTIVE_START_DATE,
217 P_LEGISLATION_CODE => L_LEGISLATION_CODE
218 );
219 --
220 /* LEGISLATION SPECIFIC COMPONENT CALLS */
221 --
222 /* BUSINESS GROUP SPECIFIC COMPONENT CALLS */
223 --
224 /* PAYROLL SPECIFIC
225 COMPONENT CALLS */
226 --
227 EXCEPTION
228 WHEN OTHERS THEN
229 HR_UTILITY.SET_LOCATION('PAY_COST_ALLOCATIONS_F_ARI_ARI',ABS(SQLCODE));
230 RAISE;
231 --
232 END PAY_COST_ALLOCATIONS_F_ARI_ARI;
233
234 --
235
236 /*
237 ================================================
238 THIS IS A DYNAMICALLY GENERATED PACKAGE PROCEDURE
239 WITH CODE REPRESENTING A DYNAMIC TRIGGER
240 ================================================
241 ** DO NOT CHANGE MANUALLY **
242
243 ------------------------------------------------
244 NAME: PAY_COST_ALLOCATIONS_F_ARU_ARU
245 TABLE: PAY_COST_ALLOCATIONS_F
246 ACTION: UPDATE
247 GENERATED DATE: 27/11/2012 04:01
248 DESCRIPTION: CONTINUOUS CALCUATION TRIGGER ON UPDATE OF
249 PAY_COST_ALLOCATIONS_F
250 FULL TRIGGER NAME: PAY_COST_ALLOCATIONS_F_ARU
251 ================================================
252 */
253 --
254 PROCEDURE PAY_COST_ALLOCATIONS_F_ARU_ARU
255 (
256 P_NEW_ASSIGNMENT_ID IN NUMBER
257
258 ,P_NEW_BUSINESS_GROUP_ID IN NUMBER
259 ,P_NEW_COST_ALLOCATION_ID IN NUMBER
260 ,P_NEW_COST_ALLOCATION_KEYFLEX_ IN NUMBER
261 ,P_NEW_DATETRACK_MODE IN VARCHAR2
262 ,P_NEW_EFFECTIVE_DATE
263 IN DATE
264 ,P_NEW_EFFECTIVE_END_DATE IN DATE
265 ,P_NEW_EFFECTIVE_START_DATE IN DATE
266 ,P_NEW_OBJECT_VERSION_NUMBER IN NUMBER
267 ,P_NEW_PROGRAM_APPLICATION_ID IN NUMBER
268 ,P_NEW_PROGRAM_ID
269 IN NUMBER
270 ,P_NEW_PROGRAM_UPDATE_DATE IN DATE
271 ,P_NEW_PROPORTION IN NUMBER
272 ,P_NEW_REQUEST_ID IN NUMBER
273 ,P_NEW_VALIDATION_END_DATE IN DATE
274
275 ,P_NEW_VALIDATION_START_DATE IN DATE
276 ,P_OLD_ASSIGNMENT_ID IN NUMBER
277 ,P_OLD_BUSINESS_GROUP_ID IN NUMBER
278 ,P_OLD_COST_ALLOCATION_KEYFLEX_ IN NUMBER
279 ,P_OLD_EFFECTIVE_END_DATE
280 IN DATE
281 ,P_OLD_EFFECTIVE_START_DATE IN DATE
282 ,P_OLD_OBJECT_VERSION_NUMBER IN NUMBER
283 ,P_OLD_PROGRAM_APPLICATION_ID IN NUMBER
284 ,P_OLD_PROGRAM_ID IN NUMBER
285
286 ,P_OLD_PROGRAM_UPDATE_DATE IN DATE
287 ,P_OLD_PROPORTION IN NUMBER
288 ,P_OLD_REQUEST_ID IN NUMBER
289 ) IS
290
291 --
292 /* LOCAL VARIABLE DECLARATIONS */
293 L_BUSINESS_GROUP_ID NUMBER;
294
295 L_LEGISLATION_CODE VARCHAR2(10);
296 BEGIN
297 HR_UTILITY.TRACE(' >DYT: EXECUTE PROCEDURE VERSION OF DYNAMIC TRIGGER: PAY_COST_ALLOCATIONS_F_ARU');
298 IF NOT (HR_GENERAL.G_DATA_MIGRATOR_MODE <> 'Y') THEN
299 RETURN;
300 END IF;
301 /* INITIALISING LOCAL
302 VARIABLES */
303 L_BUSINESS_GROUP_ID := PAY_CORE_UTILS.GET_BUSINESS_GROUP(
304 P_STATEMENT => 'SELECT '||P_OLD_BUSINESS_GROUP_ID||' FROM SYS.DUAL'
305 );
306 --
307 L_LEGISLATION_CODE := PAY_CORE_UTILS.GET_LEGISLATION_CODE(
308 P_BG_ID
309 => L_BUSINESS_GROUP_ID
310 );
311 --
312 /* IS THE TRIGGER IN AN ENABLED FUNCTIONAL AREA */
313 IF PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
314 P_EVENT_ID => 1135,
315 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
316 P_BUSINESS_GROUP_ID =>
317 L_BUSINESS_GROUP_ID,
318 P_PAYROLL_ID => NULL
319 ) THEN
320 RETURN;
321 END IF;
322 --
323 /* GLOBAL COMPONENT CALLS */
324 PAY_CONTINUOUS_CALC.PAY_COST_ALLOCATIONS_F_ARU(
325 P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
326 P_EFFECTIVE_DATE
327 => P_NEW_EFFECTIVE_START_DATE,
328 P_LEGISLATION_CODE => L_LEGISLATION_CODE,
329 P_NEW_ASSIGNMENT_ID => P_NEW_ASSIGNMENT_ID,
330 P_NEW_BUSINESS_GROUP_ID => P_NEW_BUSINESS_GROUP_ID,
331 P_NEW_COST_ALLOCATION_ID
332 => P_NEW_COST_ALLOCATION_ID,
333 P_NEW_COST_ALLOCATION_KEYFLEX_ => P_NEW_COST_ALLOCATION_KEYFLEX_,
334 P_NEW_EFFECTIVE_END_DATE => P_NEW_EFFECTIVE_END_DATE,
335 P_NEW_EFFECTIVE_START_DATE => P_NEW_EFFECTIVE_START_DATE,
336
337 P_NEW_PROGRAM_APPLICATION_ID => P_NEW_PROGRAM_APPLICATION_ID,
338 P_NEW_PROGRAM_ID => P_NEW_PROGRAM_ID,
339 P_NEW_PROGRAM_UPDATE_DATE => P_NEW_PROGRAM_UPDATE_DATE,
340 P_NEW_PROPORTION => P_NEW_PROPORTION,
341
342 P_NEW_REQUEST_ID => P_NEW_REQUEST_ID,
343 P_OLD_ASSIGNMENT_ID => P_OLD_ASSIGNMENT_ID,
344 P_OLD_BUSINESS_GROUP_ID => P_OLD_BUSINESS_GROUP_ID,
345 P_OLD_COST_ALLOCATION_ID => P_NEW_COST_ALLOCATION_ID,
346
347 P_OLD_COST_ALLOCATION_KEYFLEX_ => P_OLD_COST_ALLOCATION_KEYFLEX_,
348 P_OLD_EFFECTIVE_END_DATE => P_OLD_EFFECTIVE_END_DATE,
349 P_OLD_EFFECTIVE_START_DATE => P_OLD_EFFECTIVE_START_DATE,
350 P_OLD_PROGRAM_APPLICATION_ID =>
351 P_OLD_PROGRAM_APPLICATION_ID,
352 P_OLD_PROGRAM_ID => P_OLD_PROGRAM_ID,
353 P_OLD_PROGRAM_UPDATE_DATE => P_OLD_PROGRAM_UPDATE_DATE,
354 P_OLD_PROPORTION => P_OLD_PROPORTION,
355 P_OLD_REQUEST_ID =>
356 P_OLD_REQUEST_ID
357 );
358 --
359 /* LEGISLATION SPECIFIC COMPONENT CALLS */
360 --
361 /* BUSINESS GROUP SPECIFIC COMPONENT CALLS */
362 --
363 /* PAYROLL SPECIFIC COMPONENT CALLS */
364 --
365 EXCEPTION
366 WHEN OTHERS THEN
367
368 HR_UTILITY.SET_LOCATION('PAY_COST_ALLOCATIONS_F_ARU_ARU',ABS(SQLCODE));
369 RAISE;
370 --
371 END PAY_COST_ALLOCATIONS_F_ARU_ARU;
372
373 --
374
375 /*
376 ================================================
377 This is a dynamically generated procedure.
378 Will be called by API.
379 ================================================
380 ** DO NOT CHANGE MANUALLY **
381
382 ------------------------------------------------
383 Name: AFTER_INSERT
384 Table: PAY_COST_ALLOCATIONS_F
385 Action: INSERT
386 Generated Date: 27/11/2012 04:01
387 Description: Called as part of INSERT process
388
389 ================================================
390 */
391
392 --
393 PROCEDURE AFTER_INSERT
394 (
395 P_EFFECTIVE_DATE in DATE
396 ,P_VALIDATION_START_DATE in DATE
397 ,P_VALIDATION_END_DATE in DATE
398
399 ,P_COST_ALLOCATION_ID in NUMBER
400 ,P_EFFECTIVE_START_DATE in DATE
401 ,P_EFFECTIVE_END_DATE in DATE
402 ,P_BUSINESS_GROUP_ID in NUMBER
403 ,P_COST_ALLOCATION_KEYFLEX_ID
404 in NUMBER
405 ,P_ASSIGNMENT_ID in NUMBER
406 ,P_PROPORTION in NUMBER
407 ,P_REQUEST_ID in NUMBER
408 ,P_PROGRAM_APPLICATION_ID in NUMBER
409 ,P_PROGRAM_ID
410 in NUMBER
411 ,P_PROGRAM_UPDATE_DATE in DATE
412 ,P_OBJECT_VERSION_NUMBER in NUMBER
413 ) IS
414 l_mode varchar2(80);
415
416 --
417 BEGIN
418
419 --
420 hr_utility.trace(' >DYT: Main entry point from row handler,
421 AFTER_INSERT');
422 /* Mechanism for event capture to know whats occurred */
423 l_mode := pay_dyn_triggers.g_dyt_mode;
424 pay_dyn_triggers.g_dyt_mode := hr_api.g_insert;
425
426 --
427
428 if (paywsdyg_pkg.trigger_enabled('PAY_COST_ALLOCATIONS_F_ARI')) then
429 PAY_COST_ALLOCATIONS_F_ARI_ARI(
430 p_new_ASSIGNMENT_ID => P_ASSIGNMENT_ID
431 ,p_new_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
432
433 ,p_new_COST_ALLOCATION_ID => P_COST_ALLOCATION_ID
434 ,p_new_COST_ALLOCATION_KEYFLEX_ => P_COST_ALLOCATION_KEYFLEX_ID
435 ,p_new_EFFECTIVE_DATE => P_EFFECTIVE_DATE
436 ,p_new_EFFECTIVE_END_DATE
437 => P_EFFECTIVE_END_DATE
438 ,p_new_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE
439 ,p_new_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER
440 ,p_new_PROGRAM_APPLICATION_ID => P_PROGRAM_APPLICATION_ID
441
442 ,p_new_PROGRAM_ID => P_PROGRAM_ID
443 ,p_new_PROGRAM_UPDATE_DATE => P_PROGRAM_UPDATE_DATE
444 ,p_new_PROPORTION => P_PROPORTION
445 ,p_new_REQUEST_ID =>
446 P_REQUEST_ID
447 ,p_new_VALIDATION_END_DATE => P_VALIDATION_END_DATE
448 ,p_new_VALIDATION_START_DATE => P_VALIDATION_START_DATE
449 );
450 end if;
451
452 --
453 pay_dyn_triggers.g_dyt_mode := l_mode;
454
455 --
456 EXCEPTION
457 WHEN OTHERS THEN
458
459 hr_utility.set_location('AFTER_INSERT',ABS(SQLCODE));
460 pay_dyn_triggers.g_dyt_mode := l_mode;
461 RAISE;
462 --
463 END AFTER_INSERT;
464
465 --
466
467 /*
468 ================================================
469 This is a dynamically generated procedure.
470 Will be called by API.
471 ================================================
472 ** DO NOT CHANGE MANUALLY **
473
474 ------------------------------------------------
475 Name: AFTER_UPDATE
476 Table: PAY_COST_ALLOCATIONS_F
477 Action: UPDATE
478 Generated Date: 27/11/2012 04:01
479 Description: Called as part of UPDATE process
480
481 ================================================
482 */
483
484 --
485 PROCEDURE AFTER_UPDATE
486 (
487 P_EFFECTIVE_DATE in DATE
488 ,P_DATETRACK_MODE in VARCHAR2
489 ,P_VALIDATION_START_DATE in DATE
490
491 ,P_VALIDATION_END_DATE in DATE
492 ,P_COST_ALLOCATION_ID in NUMBER
493 ,P_EFFECTIVE_START_DATE in DATE
494 ,P_EFFECTIVE_END_DATE in DATE
495 ,P_BUSINESS_GROUP_ID
496 in NUMBER
497 ,P_COST_ALLOCATION_KEYFLEX_ID in NUMBER
498 ,P_ASSIGNMENT_ID in NUMBER
499 ,P_PROPORTION in NUMBER
500 ,P_REQUEST_ID in NUMBER
501
502 ,P_PROGRAM_APPLICATION_ID in NUMBER
503 ,P_PROGRAM_ID in NUMBER
504 ,P_PROGRAM_UPDATE_DATE in DATE
505 ,P_OBJECT_VERSION_NUMBER in NUMBER
506 ,P_EFFECTIVE_START_DATE_O
507 in DATE
508 ,P_EFFECTIVE_END_DATE_O in DATE
509 ,P_BUSINESS_GROUP_ID_O in NUMBER
510 ,P_COST_ALLOCATION_KEYFLEX_ID_O in NUMBER
511 ,P_ASSIGNMENT_ID_O in NUMBER
512 ,P_PROPORTION_O
513 in NUMBER
514 ,P_REQUEST_ID_O in NUMBER
515 ,P_PROGRAM_APPLICATION_ID_O in NUMBER
516 ,P_PROGRAM_ID_O in NUMBER
517 ,P_PROGRAM_UPDATE_DATE_O in DATE
518
519 ,P_OBJECT_VERSION_NUMBER_O in NUMBER
520 ) IS
521 l_mode varchar2(80);
522
523 --
524 BEGIN
525
526 --
527 hr_utility.trace(' >DYT: Main entry point from row handler, AFTER_UPDATE');
528 /* Mechanism for event capture to know whats occurred */
529 l_mode :=
530 pay_dyn_triggers.g_dyt_mode;
531 pay_dyn_triggers.g_dyt_mode := p_datetrack_mode;
532
533 --
534
535 if (paywsdyg_pkg.trigger_enabled('PAY_COST_ALLOCATIONS_F_ARU')) then
536 PAY_COST_ALLOCATIONS_F_ARU_ARU(
537 p_new_ASSIGNMENT_ID => P_ASSIGNMENT_ID
538 ,p_new_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
539
540 ,p_new_COST_ALLOCATION_ID => P_COST_ALLOCATION_ID
541 ,p_new_COST_ALLOCATION_KEYFLEX_ => P_COST_ALLOCATION_KEYFLEX_ID
542 ,p_new_DATETRACK_MODE => P_DATETRACK_MODE
543 ,p_new_EFFECTIVE_DATE
544 => P_EFFECTIVE_DATE
545 ,p_new_EFFECTIVE_END_DATE => P_EFFECTIVE_END_DATE
546 ,p_new_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE
547 ,p_new_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER
548
549 ,p_new_PROGRAM_APPLICATION_ID => P_PROGRAM_APPLICATION_ID
550 ,p_new_PROGRAM_ID => P_PROGRAM_ID
551 ,p_new_PROGRAM_UPDATE_DATE => P_PROGRAM_UPDATE_DATE
552 ,p_new_PROPORTION =>
553 P_PROPORTION
554 ,p_new_REQUEST_ID => P_REQUEST_ID
555 ,p_new_VALIDATION_END_DATE => P_VALIDATION_END_DATE
556 ,p_new_VALIDATION_START_DATE => P_VALIDATION_START_DATE
557 ,p_old_ASSIGNMENT_ID
558 => P_ASSIGNMENT_ID_O
559 ,p_old_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID_O
560 ,p_old_COST_ALLOCATION_KEYFLEX_ => P_COST_ALLOCATION_KEYFLEX_ID_O
561 ,p_old_EFFECTIVE_END_DATE =>
562 P_EFFECTIVE_END_DATE_O
563 ,p_old_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE_O
564 ,p_old_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER_O
565 ,p_old_PROGRAM_APPLICATION_ID => P_PROGRAM_APPLICATION_ID_O
566
567 ,p_old_PROGRAM_ID => P_PROGRAM_ID_O
568 ,p_old_PROGRAM_UPDATE_DATE => P_PROGRAM_UPDATE_DATE_O
569 ,p_old_PROPORTION => P_PROPORTION_O
570 ,p_old_REQUEST_ID =>
571 P_REQUEST_ID_O
572 );
573 end if;
574
575 --
576 pay_dyn_triggers.g_dyt_mode := l_mode;
577
578 --
579 EXCEPTION
580 WHEN OTHERS THEN
581 hr_utility.set_location('AFTER_UPDATE',ABS(SQLCODE));
582 pay_dyn_triggers.g_dyt_mode := l_mode;
583 RAISE;
584 --
585 END AFTER_UPDATE;
586
587 --
588
589 /*
590 ================================================
591 This is a dynamically generated procedure.
592 Will be called by API.
593 ================================================
594 ** DO NOT CHANGE MANUALLY **
595
596 ------------------------------------------------
597 Name: AFTER_DELETE
598 Table: PAY_COST_ALLOCATIONS_F
599 Action: DELETE
600 Generated Date: 27/11/2012 04:01
601 Description: Called as part of DELETE process
602
603 ================================================
604 */
605
606 --
607 PROCEDURE AFTER_DELETE
608 (
609 P_EFFECTIVE_DATE in DATE
610 ,P_DATETRACK_MODE in VARCHAR2
611 ,P_VALIDATION_START_DATE in DATE
612
613 ,P_VALIDATION_END_DATE in DATE
614 ,P_COST_ALLOCATION_ID in NUMBER
615 ,P_EFFECTIVE_START_DATE in DATE
616 ,P_EFFECTIVE_END_DATE in DATE
617 ,P_EFFECTIVE_START_DATE_O
618 in DATE
619 ,P_EFFECTIVE_END_DATE_O in DATE
620 ,P_BUSINESS_GROUP_ID_O in NUMBER
621 ,P_COST_ALLOCATION_KEYFLEX_ID_O in NUMBER
622 ,P_ASSIGNMENT_ID_O in NUMBER
623 ,P_PROPORTION_O
624 in NUMBER
625 ,P_REQUEST_ID_O in NUMBER
626 ,P_PROGRAM_APPLICATION_ID_O in NUMBER
627 ,P_PROGRAM_ID_O in NUMBER
628 ,P_PROGRAM_UPDATE_DATE_O in DATE
629
630 ,P_OBJECT_VERSION_NUMBER_O in NUMBER
631 ) IS
632 l_mode varchar2(80);
633
634 --
635 BEGIN
636
637 --
638 hr_utility.trace(' >DYT: Main entry point from row handler, AFTER_DELETE');
639 /* Mechanism for event capture to know whats occurred */
640 l_mode :=
641 pay_dyn_triggers.g_dyt_mode;
642 pay_dyn_triggers.g_dyt_mode := p_datetrack_mode;
643
644 --
645
646 if (paywsdyg_pkg.trigger_enabled('PAY_COST_ALLOCATIONS_F_ARD')) then
647 PAY_COST_ALLOCATIONS_F_ARD_ARD(
648 p_new_COST_ALLOCATION_ID => P_COST_ALLOCATION_ID
649 ,p_new_DATETRACK_MODE => P_DATETRACK_MODE
650
651 ,p_new_EFFECTIVE_DATE => P_EFFECTIVE_DATE
652 ,p_new_EFFECTIVE_END_DATE => P_EFFECTIVE_END_DATE
653 ,p_new_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE
654 ,p_new_VALIDATION_END_DATE
655 => P_VALIDATION_END_DATE
656 ,p_new_VALIDATION_START_DATE => P_VALIDATION_START_DATE
657 ,p_old_ASSIGNMENT_ID => P_ASSIGNMENT_ID_O
658 ,p_old_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID_O
659
660 ,p_old_COST_ALLOCATION_KEYFLEX_ => P_COST_ALLOCATION_KEYFLEX_ID_O
661 ,p_old_EFFECTIVE_END_DATE => P_EFFECTIVE_END_DATE_O
662 ,p_old_EFFECTIVE_START_DATE => P_EFFECTIVE_START_DATE_O
663
664 ,p_old_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER_O
665 ,p_old_PROGRAM_APPLICATION_ID => P_PROGRAM_APPLICATION_ID_O
666 ,p_old_PROGRAM_ID => P_PROGRAM_ID_O
667 ,p_old_PROGRAM_UPDATE_DATE
668 => P_PROGRAM_UPDATE_DATE_O
669 ,p_old_PROPORTION => P_PROPORTION_O
670 ,p_old_REQUEST_ID => P_REQUEST_ID_O
671 );
672 end if;
673
674 --
675 pay_dyn_triggers.g_dyt_mode := l_mode;
676
677 --
678 EXCEPTION
679 WHEN OTHERS
680 THEN
681 hr_utility.set_location('AFTER_DELETE',ABS(SQLCODE));
682 pay_dyn_triggers.g_dyt_mode := l_mode;
683 RAISE;
684 --
685 END AFTER_DELETE;
686
687 --
688
689 /* END_PACKAGE */
690 END PAY_DYT_COST_ALLOCATIONS_PKG;
691