[Home] [Help]
24: l_ok boolean := false;
25: l_rows_found boolean := false;
26: l_seg_ok boolean := true;
27: --
28: l_const varchar2(50) := hr_api.g_varchar2;
29: --
30: cursor c_ppl_grp is
31: select ppg.people_group_id , ppg.segment1 ,ppg.segment2 ,ppg.segment3 ,ppg.segment4 ,
32: ppg.segment5 , ppg.segment6 ,ppg.segment7 ,ppg.segment8 ,ppg.segment9 , ppg.segment10 ,
3075: --
3076: --RCHASE - v115.57 wrap l_prtn_ovridn_flag with NVL,
3077: -- possible NULL return instead of expected TRUE or FALSE
3078: if not (nvl(l_prtn_ovridn_flag,'N') = 'Y' and
3079: nvl(l_prtn_ovridn_thru_dt,hr_api.g_eot) > p_effective_date)
3080: then
3081: --
3082: ben_derive_factors.determine_age
3083: (p_person_id => p_person_id
3495: -- if the variable rate is overriden then don't call determine_los
3496: --RCHASE - v115.57 wrap l_prtn_ovridn_flag with NVL,
3497: -- possible NULL return instead of expected TRUE or FALSE
3498: if not (nvl(l_prtn_ovridn_flag,'N') = 'Y' and
3499: nvl(l_prtn_ovridn_thru_dt,hr_api.g_eot) > p_effective_date)
3500: then
3501: --
3502: ben_derive_factors.determine_los
3503: (p_person_id => p_person_id
3709: -- if the variable rate is overriden then don't call determine_los
3710: --RCHASE - v115.57 wrap l_prtn_ovridn_flag with NVL,
3711: -- possible NULL return instead of expected TRUE or FALSE
3712: if not (nvl(l_prtn_ovridn_flag,'N') = 'Y' and
3713: nvl(l_prtn_ovridn_thru_dt,hr_api.g_eot) > p_effective_date)
3714: then
3715: --BBULUSU - changed determine_los to determine_comb_age_los below
3716: ben_derive_factors.determine_comb_age_los
3717: (p_person_id => p_person_id
3936: ,p_max => l_mn_poe_num
3937: ,p_value => null
3938: )) + 1;
3939: else
3940: l_strt_dt := hr_api.g_sot;
3941: end if;
3942: --
3943: hr_utility.set_location ('l_strt_dt '||l_strt_dt, 199);
3944: -- Calculate the end date.
3951: ,p_max => l_inst_set(i).mx_poe_num
3952: ,p_value => null
3953: );
3954: else
3955: l_end_dt := hr_api.g_eot;
3956: end if;
3957: --
3958: hr_utility.set_location ('l_end_dt '||l_end_dt , 199);
3959: --
3989: ,p_value => null
3990: ));
3991: hr_utility.set_location ('l_strt_dt '||l_strt_dt, 200);
3992: else
3993: l_strt_dt := hr_api.g_sot;
3994: end if;
3995: --
3996: -- Calculate the end date.
3997: --
4003: ,p_max => l_inst_set(i).mx_poe_num
4004: ,p_value => null
4005: );
4006: else
4007: l_end_dt := hr_api.g_eot;
4008: end if;
4009: --
4010: -- Disability rates applies if:
4011: -- 1) if the last qualifying event that the person experienced
4486: and pen.prtt_enrt_rslt_stat_cd is null
4487: and l_date_to_use
4488: between pdp.cvg_strt_dt
4489: and pdp.cvg_thru_dt
4490: and pdp.effective_end_date = hr_api.g_eot;
4491:
4492: begin
4493: --
4494: hr_utility.set_location('Entering : '||l_proc,10);
4601: and pdp.business_group_id = pen.business_group_id
4602: and l_date_to_use
4603: between pdp.cvg_strt_dt
4604: and pdp.cvg_thru_dt
4605: and pdp.effective_end_date = hr_api.g_eot;
4606: begin
4607: --
4608: hr_utility.set_location('Entering : '||l_proc,10);
4609: --
4710: and pdp.business_group_id = pen.business_group_id
4711: and l_date_to_use
4712: between pdp.cvg_strt_dt
4713: and pdp.cvg_thru_dt
4714: and pdp.effective_end_date = hr_api.g_eot;
4715: --
4716: cursor c2(p_pl_id in number) is
4717: select null
4718: from ben_pl_regn_f prg
4848: and pen.prtt_enrt_rslt_stat_cd is null
4849: and l_date_to_use
4850: between pdp.cvg_strt_dt
4851: and pdp.cvg_thru_dt
4852: and pdp.effective_end_date = hr_api.g_eot;
4853:
4854:
4855: begin
4856: --