1: package body ben_evaluate_ptnl_lf_evt as
2: /* $Header: benptnle.pkb 120.21.12010000.3 2008/08/05 14:51:01 ubhat ship $ */
3: --
4: -- Package Variables
5: --
2: /* $Header: benptnle.pkb 120.21.12010000.3 2008/08/05 14:51:01 ubhat 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: --
2695: p_effective_date => p_effective_date);
2696: --
2697:
2698: --Start 6086392
2699: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
2700: l_bckdt_pil_count := l_bckdt_pil_count +1;
2701: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_pil_rec.per_in_ler_id;
2702: --End 6086392
2703:
2697:
2698: --Start 6086392
2699: l_bckdt_pil_count := nvl(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.count(),0);
2700: l_bckdt_pil_count := l_bckdt_pil_count +1;
2701: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_count) := l_pil_rec.per_in_ler_id;
2702: --End 6086392
2703:
2704: end loop;
2705: --
2931: --
2932: hr_utility.set_location('Entering:'|| l_proc, 10);
2933:
2934: --Start 6086392
2935: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
2936: --End 6086392
2937:
2938: --
2939: -- Operation Steps
3386: --
3387:
3388: --Start 6086392
3389:
3390: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.first;
3391:
3392:
3393: if(l_bckdt_pil_indx is not null) then
3394:
3393: if(l_bckdt_pil_indx is not null) then
3394:
3395: loop
3396:
3397: OPEN c_pil_ovn(ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_indx));
3398: FETCH c_pil_ovn INTO pil_ovn_rec;
3399: CLOSE c_pil_ovn;
3400:
3401: ben_Person_Life_Event_api.update_person_life_event
3398: FETCH c_pil_ovn INTO pil_ovn_rec;
3399: CLOSE c_pil_ovn;
3400:
3401: ben_Person_Life_Event_api.update_person_life_event
3402: (p_per_in_ler_id => ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl(l_bckdt_pil_indx)
3403: ,p_bckt_per_in_ler_id => l_curr_per_in_ler_id
3404: ,p_object_version_number => pil_ovn_rec.object_version_number
3405: ,p_effective_date => p_effective_date
3406: ,P_PROCD_DT => l_date -- outputs
3406: ,P_PROCD_DT => l_date -- outputs
3407: ,P_STRTD_DT => l_date
3408: ,P_VOIDD_DT => l_date );
3409:
3410: exit when l_bckdt_pil_indx = ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.last;
3411:
3412: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.next(l_bckdt_pil_indx);
3413: end loop;
3414:
3408: ,P_VOIDD_DT => l_date );
3409:
3410: exit when l_bckdt_pil_indx = ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.last;
3411:
3412: l_bckdt_pil_indx := ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.next(l_bckdt_pil_indx);
3413: end loop;
3414:
3415: end if;
3416:
3413: end loop;
3414:
3415: end if;
3416:
3417: ben_evaluate_ptnl_lf_evt.g_bckdt_pil_tbl.delete;
3418:
3419:
3420: --End 6086392
3421:
3710:
3711: end irec_eval_ptnl_per_for_ler;
3712: -- end iRec
3713:
3714: end ben_evaluate_ptnl_lf_evt;