[Home] [Help]
395: cursor c_get_elctbl_chc is
396: select min(ecr.rt_strt_dt) rt_strt_dt
397: ,epe.ptip_id
398: from ben_elig_per_elctbl_chc epe
399: ,ben_enrt_rt ecr
400: ,ben_enrt_bnft enb
401: where epe.per_in_ler_id = p_per_in_ler_id
402: and epe.business_group_id = p_business_group_id
403: and decode(ecr.enrt_bnft_id, null, ecr.elig_per_elctbl_chc_id,
836: if c_epe%notfound then
837: exit;
838: end if;
839: --
840: update ben_enrt_rt set prtt_rt_val_id = null
841: where elig_per_elctbl_chc_id = l_elig_per_elctbl_chc_id;
842: end loop;
843: close c_epe;
844: