105: create_rollover_enrollment.
106: Pass the bnft_id and bnft_val, if
107: benefit record exists for rollover plan.
108: 17-Oct-00 stee 115.46 Change c_prv2 to get acty_typ_cd from
109: ben_prtt_rt_val. Fix total_credits in
110: recompute_flex_credits to check for null
111: forfeited amount.
112: 18-Oct-00 stee 115.47 Added total pool restriction edit for rollover
113: amount at the plan level.
1422: (c_prtt_rt_val_id in number
1423: )
1424: is
1425: select rt_val
1426: from ben_prtt_rt_val
1427: where prtt_rt_val_id=p_enrt_rt_rec.prtt_rt_val_id;
1428:
1429: begin
1430:
1652: and effective_end_date;
1653: --
1654: cursor c_acty_base_rt is
1655: select distinct acty_base_rt_id
1656: from ben_prtt_rt_val
1657: where prtt_enrt_rslt_id = p_prtt_enrt_rslt_id;
1658: --
1659: ---------------Bug 8504085
1660: ----------Get the flex credit epe ID against the comp object
2290: )
2291: is
2292: l_proc varchar2(72) := g_package||'.create_flex_credit_enrolment';
2293: l_acty_typ_cd ben_acty_base_rt_f.acty_typ_cd%type;
2294: l_prnt_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
2295: l_prnt_enrt_rt_id ben_enrt_rt.enrt_rt_id%type;
2296: l_prnt_acty_base_rt_id ben_acty_base_rt_f.acty_base_rt_id%type;
2297: l_child_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
2298: l_child_enrt_rt_id ben_enrt_rt.enrt_rt_id%type;
2293: l_acty_typ_cd ben_acty_base_rt_f.acty_typ_cd%type;
2294: l_prnt_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
2295: l_prnt_enrt_rt_id ben_enrt_rt.enrt_rt_id%type;
2296: l_prnt_acty_base_rt_id ben_acty_base_rt_f.acty_base_rt_id%type;
2297: l_child_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
2298: l_child_enrt_rt_id ben_enrt_rt.enrt_rt_id%type;
2299: l_child_acty_base_rt_id ben_acty_base_rt_f.acty_base_rt_id%type;
2300: l_prnt_rt_val number := 0;
2301: l_child_rt_val number := 0;
3528: ben_bnft_pool_rlovr_rqmt_f prr,
3529: ben_per_in_ler pil,
3530: ben_elig_per_elctbl_chc epe,
3531: ben_enrt_rt ecr,
3532: ben_prtt_rt_val prv,
3533: ben_prtt_enrt_rslt_f rslt,
3534: per_all_assignments_f asg,
3535: hr_locations_all loc,
3536: ben_oipl_f oipl
3605: ben_per_in_ler pil,
3606: ben_elig_per_elctbl_chc epe,
3607: ben_enrt_bnft enb,
3608: ben_enrt_rt ecr,
3609: ben_prtt_rt_val prv,
3610: ben_prtt_enrt_rslt_f rslt,
3611: per_all_assignments_f asg,
3612: hr_locations_all loc,
3613: ben_oipl_f oipl
4261: cursor c_old_prtt_rt_val(v_enrt_rt_id number) is
4262: select
4263: prv.rt_val,
4264: prv.prtt_rt_val_id
4265: from ben_prtt_rt_val prv,
4266: ben_enrt_rt ecr
4267: where ecr.enrt_rt_id = v_enrt_rt_id and
4268: prv.prtt_rt_val_id=ecr.prtt_rt_val_id and
4269: prv.prtt_rt_val_stat_cd is null and
4613: ecr.acty_base_rt_id,
4614: prv.rt_strt_dt,
4615: prv.rt_val,
4616: abr.element_type_id
4617: from ben_prtt_rt_val prv,
4618: ben_enrt_rt ecr,
4619: ben_acty_base_rt_f abr,
4620: ben_prtt_enrt_rslt_f res
4621: where prv.prtt_rt_val_id=p_prtt_rt_val_id and
5190: p_business_group_id in number) is
5191: --
5192: cursor c_prv is
5193: select prv.*
5194: from ben_prtt_rt_val prv
5195: where prv.prtt_rt_val_id = p_prtt_rt_val_id
5196: and prv.prtt_rt_val_stat_cd is null;
5197: --
5198: l_prv_rec c_prv%rowtype;
5358: hr_utility.set_location(l_proc,15);
5359: --
5360: if l_prv_rec.rt_strt_dt >= l_rt_strt_dt then
5361: --
5362: ben_prtt_rt_val_api.delete_prtt_rt_val(
5363: p_prtt_rt_val_id => p_prtt_rt_val_id
5364: ,p_enrt_rt_id => l_enrt_rt_id
5365: ,p_person_id => l_pen_rec.person_id
5366: ,p_business_group_id => p_business_group_id
5369: );
5370: --
5371: else
5372: --
5373: ben_prtt_rt_val_api.update_prtt_rt_val(
5374: p_prtt_rt_val_id => p_prtt_rt_val_id
5375: ,p_rt_end_dt => l_rt_end_dt
5376: ,p_ended_per_in_ler_id => p_ended_per_in_ler_id
5377: ,p_acty_base_rt_id => l_prv_rec.acty_base_rt_id
5388: --
5389: -- Bug#2441871
5390: if l_enrt_rt_id is not null then
5391: --
5392: ben_prtt_rt_val_api.create_prtt_rt_val(
5393: p_prtt_rt_val_id => p_prtt_rt_val_id
5394: ,p_enrt_rt_id => l_enrt_rt_id
5395: ,p_per_in_ler_id => p_ended_per_in_ler_id
5396: ,p_rt_typ_cd => l_prv_rec.rt_typ_cd
5473: abr.entr_val_at_enrt_flag,
5474: prv.prtt_rt_val_id,
5475: prv.rt_val
5476: from ben_prtt_enrt_rslt_f pen,
5477: ben_prtt_rt_val prv,
5478: ben_acty_base_rt_f abr
5479: where prv.acty_base_rt_id = v_acty_base_rt_id
5480: and prv.business_group_id = p_business_group_id
5481: and prv.prtt_rt_val_stat_cd is null
5664: rslt.ler_id,
5665: rslt.pl_typ_id
5666: from
5667: ben_bnft_pool_rlovr_rqmt_f prr,
5668: ben_prtt_rt_val prv,
5669: ben_prtt_enrt_rslt_f rslt,
5670: per_all_assignments_f asg,
5671: hr_locations_all loc,
5672: ben_oipl_f oipl
5753: cursor c_prv (c_per_in_ler_id number) is -- 5257226: added parameter
5754: select prv.prtt_rt_val_id,
5755: prv.rt_val,
5756: prv.rt_strt_dt
5757: from ben_prtt_rt_val prv -- ,ben_prtt_enrt_rslt_f pen
5758: where prv.prtt_enrt_rslt_id = l_prtt_enrt_rslt_id
5759: and prv.acty_base_rt_id = l_acty_base_rt_id
5760: and prv.prtt_rt_val_stat_cd is null
5761: and prv.business_group_id = p_business_group_id
6364: select prv.prtt_rt_val_id,
6365: prv.rt_val,
6366: prv.rt_strt_dt,
6367: prv.acty_base_rt_id
6368: from ben_prtt_rt_val prv
6369: ,ben_acty_base_rt_f abr
6370: where prv.prtt_enrt_rslt_id = p_flex_rslt_id
6371: and prv.business_group_id = p_business_group_id
6372: and prv.prtt_rt_val_stat_cd is null
6412: --
6413: cursor c_get_acty_ref_perd_cd is
6414: select acty_ref_perd_cd
6415: ,cmcd_ref_perd_cd
6416: from ben_prtt_rt_val prv
6417: where prv.prtt_enrt_rslt_id = p_flex_rslt_id
6418: and prv.prtt_rt_val_stat_cd is null
6419: and prv.business_group_id = p_business_group_id;
6420: --
6451: AND petc.effective_end_date;
6452: --
6453: l_lee_rsn_id number := null ;
6454: --
6455: l_child_rt_val ben_prtt_rt_val.rt_val%type;
6456: l_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
6457: l_object_version_number ben_prtt_rt_val.object_version_number%type;
6458: l_cmcd_ref_perd_cd ben_prtt_rt_val.cmcd_ref_perd_cd%type;
6459: l_acty_ref_perd_cd ben_prtt_rt_val.acty_ref_perd_cd%type;
6452: --
6453: l_lee_rsn_id number := null ;
6454: --
6455: l_child_rt_val ben_prtt_rt_val.rt_val%type;
6456: l_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
6457: l_object_version_number ben_prtt_rt_val.object_version_number%type;
6458: l_cmcd_ref_perd_cd ben_prtt_rt_val.cmcd_ref_perd_cd%type;
6459: l_acty_ref_perd_cd ben_prtt_rt_val.acty_ref_perd_cd%type;
6460: l_dummy_num number;
6453: l_lee_rsn_id number := null ;
6454: --
6455: l_child_rt_val ben_prtt_rt_val.rt_val%type;
6456: l_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
6457: l_object_version_number ben_prtt_rt_val.object_version_number%type;
6458: l_cmcd_ref_perd_cd ben_prtt_rt_val.cmcd_ref_perd_cd%type;
6459: l_acty_ref_perd_cd ben_prtt_rt_val.acty_ref_perd_cd%type;
6460: l_dummy_num number;
6461: l_dummy_varchar2 varchar2(80);
6454: --
6455: l_child_rt_val ben_prtt_rt_val.rt_val%type;
6456: l_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
6457: l_object_version_number ben_prtt_rt_val.object_version_number%type;
6458: l_cmcd_ref_perd_cd ben_prtt_rt_val.cmcd_ref_perd_cd%type;
6459: l_acty_ref_perd_cd ben_prtt_rt_val.acty_ref_perd_cd%type;
6460: l_dummy_num number;
6461: l_dummy_varchar2 varchar2(80);
6462: l_dummy_date date;
6455: l_child_rt_val ben_prtt_rt_val.rt_val%type;
6456: l_prtt_rt_val_id ben_prtt_rt_val.prtt_rt_val_id%type;
6457: l_object_version_number ben_prtt_rt_val.object_version_number%type;
6458: l_cmcd_ref_perd_cd ben_prtt_rt_val.cmcd_ref_perd_cd%type;
6459: l_acty_ref_perd_cd ben_prtt_rt_val.acty_ref_perd_cd%type;
6460: l_dummy_num number;
6461: l_dummy_varchar2 varchar2(80);
6462: l_dummy_date date;
6463: l_enrt_cvg_strt_dt date;
6618: fetch c_get_acty_ref_perd_cd into l_acty_ref_perd_cd
6619: ,l_cmcd_ref_perd_cd;
6620: close c_get_acty_ref_perd_cd;
6621:
6622: ben_prtt_rt_val_api.create_prtt_rt_val
6623: (p_prtt_rt_val_id => l_prtt_rt_val_id
6624: ,p_per_in_ler_id => p_per_in_ler_id
6625: ,p_rt_typ_cd => l_abr_rec.rt_typ_cd
6626: ,p_tx_typ_cd => l_abr_rec.tx_typ_cd
6709: ,p_ordr_num => l_dummy_num
6710: ,p_iss_val => l_dummy_num
6711: );
6712: --
6713: ben_prtt_rt_val_api.create_prtt_rt_val
6714: (p_prtt_rt_val_id => l_prtt_rt_val_id
6715: ,p_per_in_ler_id => p_per_in_ler_id
6716: ,p_rt_typ_cd => l_abr_rec.rt_typ_cd
6717: ,p_tx_typ_cd => l_abr_rec.tx_typ_cd
6797: bpl.effective_start_date,
6798: bpl.bnft_prvdr_pool_id,
6799: bpl.prtt_enrt_rslt_id
6800: from ben_prtt_enrt_rslt_f enrt_pen,
6801: ben_prtt_rt_val enrt_prv,
6802: ben_bnft_prvdd_ldgr_f bpl,
6803: ben_per_in_ler pil,
6804: ben_prtt_enrt_rslt_f flex_pen
6805: where enrt_pen.prtt_enrt_rslt_id = p_prtt_enrt_rslt_id
6885: cursor c_prv is
6886: select prv.prtt_rt_val_id,
6887: prv.rt_val,
6888: prv.rt_strt_dt
6889: from ben_prtt_rt_val prv
6890: ,ben_acty_base_rt_f abr
6891: where prv.prtt_enrt_rslt_id = l_flex_rslt_id
6892: and prv.business_group_id = p_business_group_id
6893: and prv.prtt_rt_val_stat_cd is null
6906: prv.rt_val,
6907: prv.rt_strt_dt,
6908: prv.acty_typ_cd,
6909: prv.acty_base_rt_id
6910: from ben_prtt_rt_val prv
6911: where prv.prtt_enrt_rslt_id = l_flex_rslt_id
6912: and prv.business_group_id = p_business_group_id
6913: and prv.prtt_rt_val_stat_cd is null
6914: and prv.acty_typ_cd in ('NCRDSTR','NCRUDED')