1: package body ben_evaluate_ptnl_lf_evt as
2: /* $Header: benptnle.pkb 120.25.12020000.3 2012/10/17 13:52:04 amnaraya ship $ */
3: --
4: -- Package Variables
5: --
2: /* $Header: benptnle.pkb 120.25.12020000.3 2012/10/17 13:52:04 amnaraya ship $ */
3: --
4: -- Package Variables
5: --
6: g_package varchar2(33) := ' ben_evaluate_ptnl_lf_evt.';
7: g_rec benutils.g_batch_ler_rec;
8:
9: -- ----------------------------------------------------------------------------
10: -- |------------------------< update_ptnl_per_for_ler >-----------------------|
306: p_business_group_id => p_business_group_id,
307: p_effective_date => p_effective_date);
308: --
309: --Start 6086392
310: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
311: l_bckdt_pil_count := l_bckdt_pil_count +1;
312: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_pil_rec.per_in_ler_id;
313: --End 6086392
314:
308: --
309: --Start 6086392
310: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
311: l_bckdt_pil_count := l_bckdt_pil_count +1;
312: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_pil_rec.per_in_ler_id;
313: --End 6086392
314:
315:
316: end loop;
454: p_effective_date => p_effective_date);
455: --
456:
457: --Start 6086392
458: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
459: l_bckdt_pil_count := l_bckdt_pil_count +1;
460: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_pil_rec.per_in_ler_id;
461: --End 6086392
462:
456:
457: --Start 6086392
458: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
459: l_bckdt_pil_count := l_bckdt_pil_count +1;
460: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_pil_rec.per_in_ler_id;
461: --End 6086392
462:
463:
464: end loop;
497: p_business_group_id => p_business_group_id,
498: p_effective_date => p_effective_date);
499: --
500: --Start 6086392
501: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
502: l_bckdt_pil_count := l_bckdt_pil_count +1;
503: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_future_pil_rec.per_in_ler_id;
504: --End 6086392
505:
499: --
500: --Start 6086392
501: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
502: l_bckdt_pil_count := l_bckdt_pil_count +1;
503: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_future_pil_rec.per_in_ler_id;
504: --End 6086392
505:
506: end loop;
507: --
591: end if;
592:
593:
594: --Start 6086392
595: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.first;
596:
597: if(l_bckdt_pil_indx is not null) then
598:
599: loop
598:
599: loop
600: -- bug 5987235
601:
602: OPEN c_pil_ovn(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_indx));
603: FETCH c_pil_ovn INTO pil_ovn_rec;
604: CLOSE c_pil_ovn;
605:
606: ben_Person_Life_Event_api.update_person_life_event
603: FETCH c_pil_ovn INTO pil_ovn_rec;
604: CLOSE c_pil_ovn;
605:
606: ben_Person_Life_Event_api.update_person_life_event
607: (p_per_in_ler_id => ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_indx)
608: ,p_bckt_per_in_ler_id => l_curr_per_in_ler_id
609: -- ,p_object_version_number => l_object_version_number
610: ,p_object_version_number => pil_ovn_rec.object_version_number
611: ,p_effective_date => p_effective_date
612: ,P_PROCD_DT => l_date -- outputs
613: ,P_STRTD_DT => l_date
614: ,P_VOIDD_DT => l_date );
615:
616: exit when l_bckdt_pil_indx = ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.last;
617:
618: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.next(l_bckdt_pil_indx);
619:
620: end loop;
614: ,P_VOIDD_DT => l_date );
615:
616: exit when l_bckdt_pil_indx = ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.last;
617:
618: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.next(l_bckdt_pil_indx);
619:
620: end loop;
621:
622: end if;
620: end loop;
621:
622: end if;
623:
624: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
625:
626: --End 6086392
627:
628: hr_utility.set_location('Leaving:'|| l_proc, 10);
630: -- bug 5987235
631: Exception
632: when ben_manage_life_events.g_life_event_after then
633: hr_utility.set_location('PTNLE Absence eval Exception g_life_event_after', 121);
634: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
635: raise ben_manage_life_events.g_life_event_after;
636: when others then
637: hr_utility.set_location('PTNLE Absence eval Exception ', 121);
638: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
634: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
635: raise ben_manage_life_events.g_life_event_after;
636: when others then
637: hr_utility.set_location('PTNLE Absence eval Exception ', 121);
638: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
639: fnd_message.raise_error;
640: -- end bug 5987235
641: end absences_eval_ptnl_per_for_ler;
642: --
2825: p_effective_date => p_effective_date);
2826: --
2827:
2828: --Start 6086392
2829: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
2830: l_bckdt_pil_count := l_bckdt_pil_count +1;
2831: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_pil_rec.per_in_ler_id;
2832: --End 6086392
2833:
2827:
2828: --Start 6086392
2829: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
2830: l_bckdt_pil_count := l_bckdt_pil_count +1;
2831: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_pil_rec.per_in_ler_id;
2832: --End 6086392
2833:
2834: end loop;
2835: --
3061: --
3062: hr_utility.set_location('Entering:'|| l_proc, 10);
3063:
3064: --Start 6086392
3065: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
3066: --End 6086392
3067:
3068: --
3069: -- Operation Steps
3516: --
3517:
3518: --Start 6086392
3519:
3520: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.first;
3521:
3522:
3523: if(l_bckdt_pil_indx is not null) then
3524:
3523: if(l_bckdt_pil_indx is not null) then
3524:
3525: loop
3526:
3527: OPEN c_pil_ovn(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_indx));
3528: FETCH c_pil_ovn INTO pil_ovn_rec;
3529: CLOSE c_pil_ovn;
3530:
3531: ben_Person_Life_Event_api.update_person_life_event
3528: FETCH c_pil_ovn INTO pil_ovn_rec;
3529: CLOSE c_pil_ovn;
3530:
3531: ben_Person_Life_Event_api.update_person_life_event
3532: (p_per_in_ler_id => ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_indx)
3533: ,p_bckt_per_in_ler_id => l_curr_per_in_ler_id
3534: ,p_object_version_number => pil_ovn_rec.object_version_number
3535: ,p_effective_date => p_effective_date
3536: ,P_PROCD_DT => l_date -- outputs
3536: ,P_PROCD_DT => l_date -- outputs
3537: ,P_STRTD_DT => l_date
3538: ,P_VOIDD_DT => l_date );
3539:
3540: exit when l_bckdt_pil_indx = ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.last;
3541:
3542: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.next(l_bckdt_pil_indx);
3543: end loop;
3544:
3538: ,P_VOIDD_DT => l_date );
3539:
3540: exit when l_bckdt_pil_indx = ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.last;
3541:
3542: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.next(l_bckdt_pil_indx);
3543: end loop;
3544:
3545: end if;
3546:
3543: end loop;
3544:
3545: end if;
3546:
3547: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
3548:
3549:
3550: --End 6086392
3551:
3840:
3841: end irec_eval_ptnl_per_for_ler;
3842: -- end iRec
3843:
3844: end ben_evaluate_ptnl_lf_evt;