[Home] [Help]
37: 23 Jun 98 jcarpent 115.5 Check status code for per_in_ler.
38: 08 Jul 98 Jmohapat 115.6 added batch who columns to api
39: calls(ben_prtt_enrt_result_api.
40: create/update_enrollment,
41: ben_enrt_bnft_api. updateenrt_bnft
42: 24 Jul 98 jcarpent 115.7 Fixed message removed fnd_message.get
43: 28 Jul 98 jcarpent 115.8 Added flex fields.
44: 22 SEP 98 GPERRY 115.9 Corrected error messages
45: 25 SEP 98 bbulusu 115.10 Added out nocopy parameters (warnings) at
1075: eb.cvg_mlt_cd,
1076: abr.rate_periodization_rl, --GEVITY
1077: nvl(eb.mx_wo_ctfn_flag,'N') interim_flag --BUG 5502202
1078: from ben_enrt_rt er,
1079: ben_enrt_bnft eb,
1080: ben_acty_base_rt_f abr
1081: where er.enrt_rt_id=p_enrt_rt_id
1082: and eb.enrt_bnft_id(+)=er.enrt_bnft_id
1083: and er.acty_base_rt_id=abr.acty_base_rt_id
1350: SELECT abr.entr_val_at_enrt_flag, er.rt_mlt_cd,
1351: NVL (eb.entr_val_at_enrt_flag, 'N') entr_bnft_val_flag,
1352: eb.cvg_mlt_cd
1353: FROM ben_enrt_rt er,
1354: ben_enrt_bnft eb,
1355: ben_acty_base_rt_f abr,
1356: ben_prtt_enrt_rslt_f pen
1357: WHERE eb.prtt_enrt_rslt_id = pen.prtt_enrt_rslt_id
1358: AND pen.rplcs_sspndd_rslt_id = p_prtt_enrt_rslt_id
1400: select min(ecr.rt_strt_dt) rt_strt_dt
1401: ,epe.ptip_id
1402: from ben_elig_per_elctbl_chc epe
1403: ,ben_enrt_rt ecr
1404: ,ben_enrt_bnft enb
1405: where epe.per_in_ler_id = p_per_in_ler_id
1406: and epe.business_group_id = p_business_group_id
1407: and decode(ecr.enrt_bnft_id, null, ecr.elig_per_elctbl_chc_id,
1408: enb.elig_per_elctbl_chc_id) = epe.elig_per_elctbl_chc_id
4391: enb.elig_per_elctbl_chc_id,
4392: ert.entr_ann_val_flag
4393: from ben_enrt_rt ert,
4394: ben_acty_base_rt_f abr,
4395: ben_enrt_bnft enb
4396: where enb.enrt_bnft_id = p_enrt_bnft_id
4397: and ert.enrt_bnft_id = enb.enrt_bnft_id
4398: and nvl(abr.PARNT_CHLD_CD,'PARNT') = 'PARNT'
4399: and abr.acty_base_rt_id = ert.acty_base_rt_id
4414: where epe.elig_per_elctbl_chc_id = p_elig_per_elctbl_chc_id ;
4415: --
4416: cursor c_enb_pen is
4417: select enb.prtt_enrt_rslt_id
4418: from ben_enrt_bnft enb,
4419: ben_prtt_enrt_rslt_f pen
4420: where enb.enrt_bnft_id = p_enrt_bnft_id
4421: and enb.prtt_enrt_rslt_id = pen.prtt_enrt_rslt_id
4422: and pen.effective_end_date = hr_api.g_eot
4555: ecr.rt_strt_dt_cd,
4556: ecr.rt_strt_dt_rl,
4557: nvl(ecr.elig_per_elctbl_chc_id,enb.elig_per_elctbl_chc_id) elig_per_elctbl_chc_id
4558: from ben_enrt_rt ecr,
4559: ben_enrt_bnft enb
4560: where ecr.prtt_rt_val_id = p_prtt_rt_val_id
4561: and ecr.enrt_bnft_id = enb.enrt_bnft_id (+) ;
4562: --
4563: l_ecr c_ecr%rowtype;
6963: l_proc varchar2(72) ;
6964: cursor c1 is
6965: select ebr.enrt_bnft_id,
6966: ebr.object_version_number
6967: from ben_enrt_bnft ebr,
6968: ben_elig_per_elctbl_chc epe,
6969: ben_per_in_ler pil
6970: where ebr.prtt_enrt_rslt_id = p_prtt_enrt_rslt_id and
6971: ( p_enrt_bnft_id is null OR
6995: hr_utility.set_location(l_proc, 10);
6996: end if;
6997: -- Update any enrollment benefit records that may have had the result id
6998: -- on them from previous enrollments. Set rslt id = null.
6999: ben_enrt_bnft_api.update_enrt_bnft
7000: (p_enrt_bnft_id => rec.enrt_bnft_id
7001: ,p_effective_date => p_effective_date
7002: ,p_object_version_number => rec.object_version_number
7003: ,p_business_group_id => p_business_group_id
7020: if (p_enrt_bnft_id is not NULL) then
7021: if g_debug then
7022: hr_utility.set_location(l_proc, 30);
7023: end if;
7024: ben_enrt_bnft_api.update_enrt_bnft
7025: (p_enrt_bnft_id => p_enrt_bnft_id
7026: ,p_effective_date => p_effective_date
7027: ,p_object_version_number => p_object_version_number
7028: ,p_business_group_id => p_business_group_id
7273: select enb.val val,-- nvl(enb.val, enb.dflt_val) val, Bug 4216475
7274: enb.mn_val,
7275: enb.mx_val,
7276: enb.incrmt_val
7277: from ben_enrt_bnft enb
7278: where enb.enrt_bnft_id = p_enrt_bnft_id;
7279: --
7280: -- open c_pl_opt_name cursor only if error needs to be displayed.
7281: --