[Home] [Help]
2947: ,abr.element_type_id
2948: ,prv.element_entry_value_id
2949: ,pev.effective_end_date
2950: ,pee.element_link_id
2951: from ben_prtt_rt_val prv,
2952: ben_acty_base_rt_f abr,
2953: pay_element_entry_values_f pev,
2954: pay_element_entries_f pee
2955: where prv.prtt_enrt_rslt_id = c_prtt_enrt_rslt_id
3044: prv.rt_end_dt,
3045: prv.rt_val,
3046: prv.ann_rt_val,
3047: prv.acty_ref_perd_cd
3048: from ben_prtt_rt_val prv
3049: where prv.prtt_rt_val_stat_cd is null
3050: and prv.prtt_enrt_rslt_id = p_pen_id
3051: and prv.per_in_ler_id = cp_per_in_ler_id
3052: and prv.rt_strt_dt = -- for Unrestricted
3050: and prv.prtt_enrt_rslt_id = p_pen_id
3051: and prv.per_in_ler_id = cp_per_in_ler_id
3052: and prv.rt_strt_dt = -- for Unrestricted
3053: (select max(prv1.rt_strt_dt)
3054: from ben_prtt_rt_val prv1
3055: where prv1.prtt_enrt_rslt_id = prv.prtt_enrt_rslt_id
3056: and prv1.per_in_ler_id = prv.per_in_ler_id
3057: and prv1.prtt_rt_val_stat_cd is null
3058: and prv1.acty_base_rt_id = prv.acty_base_rt_id);
3059: l_prv_sspndd c_prv_sspndd%rowtype;
3060:
3061: cursor c_prv_rowid (p_rowid rowid) is
3062: select object_version_number
3063: from ben_prtt_rt_val
3064: where rowid = p_rowid;
3065:
3066: cursor c_prv (p_prtt_enrt_rslt_id number,
3067: p_per_in_ler_id number) is
3071: prv.rt_strt_dt,
3072: prv.per_in_ler_id,
3073: prv.prtt_enrt_rslt_id,
3074: pil.person_id
3075: from ben_prtt_rt_val prv,
3076: ben_per_in_ler pil
3077: where prv.per_in_ler_id = p_per_in_ler_id
3078: and prv.per_in_ler_id = pil.per_in_ler_id
3079: and prv.prtt_rt_val_stat_cd is null
3079: and prv.prtt_rt_val_stat_cd is null
3080: and prv.prtt_enrt_rslt_id = p_prtt_enrt_rslt_id
3081: and prv.rt_end_dt <> hr_api.g_eot
3082: and prv.rt_strt_dt = (select max(rt_strt_dt)
3083: from ben_prtt_rt_val
3084: where prtt_enrt_rslt_id = p_prtt_enrt_rslt_id
3085: and rt_end_dt <> hr_api.g_eot
3086: and prtt_rt_val_stat_cd is null)
3087: ;
3337: open c_prv_rowid(l_prv_sspndd.rowid);
3338: fetch c_prv_rowid into l_prv_sspndd.object_version_number;
3339: close c_prv_rowid;
3340:
3341: ben_prtt_rt_val_api.update_prtt_rt_val
3342: (p_validate => false
3343: ,p_business_group_id => p_business_group_id
3344: ,p_prtt_rt_val_id => l_prv_sspndd.prtt_rt_val_id
3345: ,p_element_entry_value_id => null
3426: fetch c_prv into l_prv;
3427: if c_prv%notfound then
3428: exit;
3429: end if;
3430: ben_prtt_rt_val_api.update_prtt_rt_val
3431: (p_validate => FALSE
3432: ,p_prtt_rt_val_id => l_prv.prtt_rt_val_id
3433: ,p_object_version_number => l_prv.object_version_number
3434: ,p_rt_end_dt => hr_api.g_eot
3652: cursor c_prv (c_prtt_enrt_rslt_id number) is
3653: select prv.*
3654: ,abr.input_value_id
3655: ,abr.element_type_id
3656: from ben_prtt_rt_val prv,
3657: ben_acty_base_rt_f abr
3658: where prv.prtt_enrt_rslt_id = c_prtt_enrt_rslt_id
3659: and prv.per_in_ler_id = l_per_in_ler_id
3660: and prv.rt_strt_dt <= prv.rt_end_dt
4080: -- We need to end the rates one day before the new Coverage start as per
4081: -- Unsuspend Code which is l_cvg_thru_dt
4082: For l_prv in c_prv (l_interim.prtt_enrt_rslt_id) loop
4083: l_last_place := 'Calling update_prtt_rt_val';
4084: ben_prtt_rt_val_api.update_prtt_rt_val
4085: (P_VALIDATE => FALSE
4086: ,P_PRTT_RT_VAL_ID => l_prv.prtt_rt_val_id
4087: ,p_person_id => l_interim.person_id
4088: ,P_RT_END_DT => l_cvg_thru_dt -- 999 l_rec_rt_end_dt
4300: -- has started on a date earlier than effective_date / date of un-suspension.
4301: -- if (l_rec_rt_strt_dt<>l_prv.rt_strt_dt) and
4302: if (l_rec_rt_strt_dt > l_prv.rt_strt_dt) and
4303: l_update_dates then
4304: ben_prtt_rt_val_api.update_prtt_rt_val
4305: (P_VALIDATE => FALSE
4306: ,P_PRTT_RT_VAL_ID => l_prv.prtt_rt_val_id
4307: ,p_person_id => l_pen.person_id
4308: ,P_RT_STRT_DT => l_rec_rt_strt_dt