1789: OPEN c_asg;
1790: FETCH c_asg INTO l_asg;
1791: IF c_asg%NOTFOUND THEN
1792: CLOSE c_asg;
1793: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
1794: fnd_message.set_token('PROC', l_proc);
1795: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
1796: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
1797: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
1790: FETCH c_asg INTO l_asg;
1791: IF c_asg%NOTFOUND THEN
1792: CLOSE c_asg;
1793: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
1794: fnd_message.set_token('PROC', l_proc);
1795: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
1796: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
1797: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
1798: RAISE ben_manage_life_events.g_record_error;
1791: IF c_asg%NOTFOUND THEN
1792: CLOSE c_asg;
1793: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
1794: fnd_message.set_token('PROC', l_proc);
1795: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
1796: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
1797: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
1798: RAISE ben_manage_life_events.g_record_error;
1799: END IF;
1792: CLOSE c_asg;
1793: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
1794: fnd_message.set_token('PROC', l_proc);
1795: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
1796: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
1797: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
1798: RAISE ben_manage_life_events.g_record_error;
1799: END IF;
1800: CLOSE c_asg;
1793: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
1794: fnd_message.set_token('PROC', l_proc);
1795: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
1796: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
1797: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
1798: RAISE ben_manage_life_events.g_record_error;
1799: END IF;
1800: CLOSE c_asg;
1801: if g_debug then
3633: -- iRec - Added mode 'I'
3634: --
3635: IF p_run_mode NOT IN ('L', 'C', 'U','W','V', 'M','G', 'I','D') THEN
3636: --
3637: fnd_message.set_name('BEN', 'BEN_91458_DENRR_MODE_INVALID');
3638: fnd_message.set_token('PROC', l_proc);
3639: fnd_message.set_token('MODE', p_run_mode);
3640: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3641: RAISE ben_manage_life_events.g_record_error;
3634: --
3635: IF p_run_mode NOT IN ('L', 'C', 'U','W','V', 'M','G', 'I','D') THEN
3636: --
3637: fnd_message.set_name('BEN', 'BEN_91458_DENRR_MODE_INVALID');
3638: fnd_message.set_token('PROC', l_proc);
3639: fnd_message.set_token('MODE', p_run_mode);
3640: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3641: RAISE ben_manage_life_events.g_record_error;
3642: --
3635: IF p_run_mode NOT IN ('L', 'C', 'U','W','V', 'M','G', 'I','D') THEN
3636: --
3637: fnd_message.set_name('BEN', 'BEN_91458_DENRR_MODE_INVALID');
3638: fnd_message.set_token('PROC', l_proc);
3639: fnd_message.set_token('MODE', p_run_mode);
3640: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3641: RAISE ben_manage_life_events.g_record_error;
3642: --
3643: END IF;
3636: --
3637: fnd_message.set_name('BEN', 'BEN_91458_DENRR_MODE_INVALID');
3638: fnd_message.set_token('PROC', l_proc);
3639: fnd_message.set_token('MODE', p_run_mode);
3640: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3641: RAISE ben_manage_life_events.g_record_error;
3642: --
3643: END IF;
3644: --
3729: --
3730: if g_debug then
3731: hr_utility.set_location('error', 19);
3732: end if;
3733: fnd_message.set_name('BEN', 'BEN_91737_ENRT_REQ_MISS_PARM');
3734: fnd_message.set_token('PROC', l_proc);
3735: fnd_message.set_token('MODE', p_run_mode);
3736: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
3737: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3730: if g_debug then
3731: hr_utility.set_location('error', 19);
3732: end if;
3733: fnd_message.set_name('BEN', 'BEN_91737_ENRT_REQ_MISS_PARM');
3734: fnd_message.set_token('PROC', l_proc);
3735: fnd_message.set_token('MODE', p_run_mode);
3736: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
3737: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3738: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
3731: hr_utility.set_location('error', 19);
3732: end if;
3733: fnd_message.set_name('BEN', 'BEN_91737_ENRT_REQ_MISS_PARM');
3734: fnd_message.set_token('PROC', l_proc);
3735: fnd_message.set_token('MODE', p_run_mode);
3736: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
3737: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3738: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
3739: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3732: end if;
3733: fnd_message.set_name('BEN', 'BEN_91737_ENRT_REQ_MISS_PARM');
3734: fnd_message.set_token('PROC', l_proc);
3735: fnd_message.set_token('MODE', p_run_mode);
3736: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
3737: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3738: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
3739: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3740: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
3733: fnd_message.set_name('BEN', 'BEN_91737_ENRT_REQ_MISS_PARM');
3734: fnd_message.set_token('PROC', l_proc);
3735: fnd_message.set_token('MODE', p_run_mode);
3736: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
3737: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3738: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
3739: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3740: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
3741: RAISE ben_manage_life_events.g_record_error;
3734: fnd_message.set_token('PROC', l_proc);
3735: fnd_message.set_token('MODE', p_run_mode);
3736: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
3737: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3738: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
3739: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3740: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
3741: RAISE ben_manage_life_events.g_record_error;
3742: --
3735: fnd_message.set_token('MODE', p_run_mode);
3736: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
3737: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3738: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
3739: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3740: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
3741: RAISE ben_manage_life_events.g_record_error;
3742: --
3743: END IF;
3736: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
3737: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3738: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
3739: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3740: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
3741: RAISE ben_manage_life_events.g_record_error;
3742: --
3743: END IF;
3744: --
3765: FETCH c_asg INTO l_rec_assignment_id, l_rec_organization_id;
3766: IF c_asg%NOTFOUND THEN
3767: CLOSE c_asg;
3768: hr_utility.set_location('error', 20);
3769: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
3770: fnd_message.set_token('PROC', l_proc);
3771: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3772: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
3773: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3766: IF c_asg%NOTFOUND THEN
3767: CLOSE c_asg;
3768: hr_utility.set_location('error', 20);
3769: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
3770: fnd_message.set_token('PROC', l_proc);
3771: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3772: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
3773: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3774: RAISE ben_manage_life_events.g_record_error;
3767: CLOSE c_asg;
3768: hr_utility.set_location('error', 20);
3769: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
3770: fnd_message.set_token('PROC', l_proc);
3771: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3772: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
3773: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3774: RAISE ben_manage_life_events.g_record_error;
3775: END IF;
3768: hr_utility.set_location('error', 20);
3769: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
3770: fnd_message.set_token('PROC', l_proc);
3771: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3772: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
3773: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3774: RAISE ben_manage_life_events.g_record_error;
3775: END IF;
3776: CLOSE c_asg;
3769: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
3770: fnd_message.set_token('PROC', l_proc);
3771: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
3772: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
3773: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
3774: RAISE ben_manage_life_events.g_record_error;
3775: END IF;
3776: CLOSE c_asg;
3777: hr_utility.set_location('close c_asg: ' || l_proc, 10);
4121: l_plip_eed,
4122: l_plip_ordr_num;
4123: IF c_plip_info%NOTFOUND THEN
4124: --
4125: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
4126: fnd_message.set_token('PROC', l_proc);
4127: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4128: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
4129: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4122: l_plip_ordr_num;
4123: IF c_plip_info%NOTFOUND THEN
4124: --
4125: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
4126: fnd_message.set_token('PROC', l_proc);
4127: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4128: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
4129: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4130: RAISE ben_manage_life_events.g_record_error;
4123: IF c_plip_info%NOTFOUND THEN
4124: --
4125: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
4126: fnd_message.set_token('PROC', l_proc);
4127: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4128: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
4129: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4130: RAISE ben_manage_life_events.g_record_error;
4131: --
4124: --
4125: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
4126: fnd_message.set_token('PROC', l_proc);
4127: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4128: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
4129: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4130: RAISE ben_manage_life_events.g_record_error;
4131: --
4132: END IF;
4125: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
4126: fnd_message.set_token('PROC', l_proc);
4127: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4128: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
4129: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4130: RAISE ben_manage_life_events.g_record_error;
4131: --
4132: END IF;
4133: --
4150: l_ptip_ordr_num;
4151: --
4152: IF c_ptip_info%NOTFOUND THEN
4153: --
4154: fnd_message.set_name('BEN', 'BEN_91462_PTIP_MISSING');
4155: fnd_message.set_token('PROC', l_proc);
4156: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4157: fnd_message.set_token('PL_TYP_ID', TO_CHAR(l_pl_typ_id));
4158: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4151: --
4152: IF c_ptip_info%NOTFOUND THEN
4153: --
4154: fnd_message.set_name('BEN', 'BEN_91462_PTIP_MISSING');
4155: fnd_message.set_token('PROC', l_proc);
4156: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4157: fnd_message.set_token('PL_TYP_ID', TO_CHAR(l_pl_typ_id));
4158: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4159: RAISE ben_manage_life_events.g_record_error;
4152: IF c_ptip_info%NOTFOUND THEN
4153: --
4154: fnd_message.set_name('BEN', 'BEN_91462_PTIP_MISSING');
4155: fnd_message.set_token('PROC', l_proc);
4156: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4157: fnd_message.set_token('PL_TYP_ID', TO_CHAR(l_pl_typ_id));
4158: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4159: RAISE ben_manage_life_events.g_record_error;
4160: --
4153: --
4154: fnd_message.set_name('BEN', 'BEN_91462_PTIP_MISSING');
4155: fnd_message.set_token('PROC', l_proc);
4156: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4157: fnd_message.set_token('PL_TYP_ID', TO_CHAR(l_pl_typ_id));
4158: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4159: RAISE ben_manage_life_events.g_record_error;
4160: --
4161: END IF;
4154: fnd_message.set_name('BEN', 'BEN_91462_PTIP_MISSING');
4155: fnd_message.set_token('PROC', l_proc);
4156: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
4157: fnd_message.set_token('PL_TYP_ID', TO_CHAR(l_pl_typ_id));
4158: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4159: RAISE ben_manage_life_events.g_record_error;
4160: --
4161: END IF;
4162: --
4226: l_ler_eed;
4227: --
4228: IF c_ovrd_per_in_ler_info%NOTFOUND THEN
4229: --
4230: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4231: fnd_message.set_token('PROC', l_proc);
4232: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4233: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4234: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4227: --
4228: IF c_ovrd_per_in_ler_info%NOTFOUND THEN
4229: --
4230: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4231: fnd_message.set_token('PROC', l_proc);
4232: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4233: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4234: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4235: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4228: IF c_ovrd_per_in_ler_info%NOTFOUND THEN
4229: --
4230: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4231: fnd_message.set_token('PROC', l_proc);
4232: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4233: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4234: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4235: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4236: RAISE ben_manage_life_events.g_record_error;
4229: --
4230: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4231: fnd_message.set_token('PROC', l_proc);
4232: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4233: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4234: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4235: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4236: RAISE ben_manage_life_events.g_record_error;
4237: --
4230: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4231: fnd_message.set_token('PROC', l_proc);
4232: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4233: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4234: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4235: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4236: RAISE ben_manage_life_events.g_record_error;
4237: --
4238: END IF;
4231: fnd_message.set_token('PROC', l_proc);
4232: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4233: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4234: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4235: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4236: RAISE ben_manage_life_events.g_record_error;
4237: --
4238: END IF;
4239: --
4254: l_ler_eed;
4255: --
4256: IF c_per_in_ler_info%NOTFOUND THEN
4257: --
4258: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4259: fnd_message.set_token('PROC', l_proc);
4260: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4261: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4262: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4255: --
4256: IF c_per_in_ler_info%NOTFOUND THEN
4257: --
4258: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4259: fnd_message.set_token('PROC', l_proc);
4260: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4261: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4262: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4263: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4256: IF c_per_in_ler_info%NOTFOUND THEN
4257: --
4258: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4259: fnd_message.set_token('PROC', l_proc);
4260: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4261: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4262: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4263: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4264: RAISE ben_manage_life_events.g_record_error;
4257: --
4258: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4259: fnd_message.set_token('PROC', l_proc);
4260: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4261: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4262: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4263: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4264: RAISE ben_manage_life_events.g_record_error;
4265: --
4258: fnd_message.set_name('BEN', 'BEN_91272_PER_IN_LER_MISSING');
4259: fnd_message.set_token('PROC', l_proc);
4260: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4261: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4262: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4263: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4264: RAISE ben_manage_life_events.g_record_error;
4265: --
4266: END IF;
4259: fnd_message.set_token('PROC', l_proc);
4260: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
4261: fnd_message.set_token('LER_ID', TO_CHAR(p_ler_id));
4262: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
4263: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
4264: RAISE ben_manage_life_events.g_record_error;
4265: --
4266: END IF;
4267: --
4281: l_popl_yr_perd_ordr_num;
4282: --
4283: IF ((c_pl_popl_yr_period_current%NOTFOUND) and (p_run_mode not in ('G','D'))) THEN
4284: --
4285: fnd_message.set_name('BEN', 'BEN_91334_PLAN_YR_PERD');
4286: fnd_message.set_token('PROC', l_proc);
4287: RAISE ben_manage_life_events.g_record_error;
4288: --
4289: END IF;
4282: --
4283: IF ((c_pl_popl_yr_period_current%NOTFOUND) and (p_run_mode not in ('G','D'))) THEN
4284: --
4285: fnd_message.set_name('BEN', 'BEN_91334_PLAN_YR_PERD');
4286: fnd_message.set_token('PROC', l_proc);
4287: RAISE ben_manage_life_events.g_record_error;
4288: --
4289: END IF;
4290: --
4305: --
4306: IF l_currepe_dets.elig_per_elctbl_chc_id is not null and
4307: p_run_mode not in ('U','R','D') THEN
4308: --
4309: fnd_message.set_name('BEN', 'BEN_91463_ELCTBL_CHC_EXISTS');
4310: fnd_message.set_token('PROC', l_proc);
4311: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
4312: if g_debug then
4313: hr_utility.set_location('Leaving: ' || l_proc, 20);
4306: IF l_currepe_dets.elig_per_elctbl_chc_id is not null and
4307: p_run_mode not in ('U','R','D') THEN
4308: --
4309: fnd_message.set_name('BEN', 'BEN_91463_ELCTBL_CHC_EXISTS');
4310: fnd_message.set_token('PROC', l_proc);
4311: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
4312: if g_debug then
4313: hr_utility.set_location('Leaving: ' || l_proc, 20);
4314: end if;
4307: p_run_mode not in ('U','R','D') THEN
4308: --
4309: fnd_message.set_name('BEN', 'BEN_91463_ELCTBL_CHC_EXISTS');
4310: fnd_message.set_token('PROC', l_proc);
4311: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
4312: if g_debug then
4313: hr_utility.set_location('Leaving: ' || l_proc, 20);
4314: end if;
4315: p_electable_flag := 'N';
4834: l_cnt := l_cnt + 1;
4835: end loop;
4836: close c_opt_level;
4837: if not l_found then
4838: fnd_message.set_name('BEN','BEN_92699_SEQ_NUM_NOT_EXST');
4839: fnd_message.raise_error;
4840: end if;
4841: end if;
4842: --
4835: end loop;
4836: close c_opt_level;
4837: if not l_found then
4838: fnd_message.set_name('BEN','BEN_92699_SEQ_NUM_NOT_EXST');
4839: fnd_message.raise_error;
4840: end if;
4841: end if;
4842: --
4843: l_cnt := 1;
4860: l_cnt := l_cnt + 1;
4861: end loop;
4862: close c_opt_level;
4863: if not l_found then
4864: fnd_message.set_name('BEN','BEN_92699_SEQ_NUM_NOT_EXST');
4865: fnd_message.raise_error;
4866: end if;
4867: end if;
4868: -- End of Logical Ordr Num
4861: end loop;
4862: close c_opt_level;
4863: if not l_found then
4864: fnd_message.set_name('BEN','BEN_92699_SEQ_NUM_NOT_EXST');
4865: fnd_message.raise_error;
4866: end if;
4867: end if;
4868: -- End of Logical Ordr Num
4869:
5298: ELSE
5299: if g_debug then
5300: hr_utility.set_location('Did not find enrt_perd, raise error', 982);
5301: end if;
5302: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5303: fnd_message.set_token('PROC', l_proc);
5304: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5305: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5306: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5299: if g_debug then
5300: hr_utility.set_location('Did not find enrt_perd, raise error', 982);
5301: end if;
5302: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5303: fnd_message.set_token('PROC', l_proc);
5304: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5305: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5306: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5307: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5300: hr_utility.set_location('Did not find enrt_perd, raise error', 982);
5301: end if;
5302: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5303: fnd_message.set_token('PROC', l_proc);
5304: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5305: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5306: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5307: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5308: RAISE ben_manage_life_events.g_record_error;
5301: end if;
5302: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5303: fnd_message.set_token('PROC', l_proc);
5304: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5305: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5306: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5307: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5308: RAISE ben_manage_life_events.g_record_error;
5309: END IF;
5302: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5303: fnd_message.set_token('PROC', l_proc);
5304: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5305: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5306: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5307: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5308: RAISE ben_manage_life_events.g_record_error;
5309: END IF;
5310: --
5303: fnd_message.set_token('PROC', l_proc);
5304: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5305: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5306: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5307: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5308: RAISE ben_manage_life_events.g_record_error;
5309: END IF;
5310: --
5311: END IF; -- no enrt_perd info found.
5414: l_rec_enrt_typ_cycl_cd := l_pgme_enrt_typ_cycl_cd;
5415: -- Bug 2200139 Override Enrollment
5416: ELSIF l_unrestricted_enrt_flag = 'N' and nvl(p_run_mode,'X') <> 'V' THEN
5417: -- If nothing found report an error.
5418: fnd_message.set_name('BEN', 'BEN_91464_ENRT_TYP_CYCL_CD');
5419: fnd_message.set_token('PROC', l_proc);
5420: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5421: fnd_message.set_token('PGM_ENRT_TYP_CYCL_CD', l_pgme_enrt_typ_cycl_cd);
5422: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5415: -- Bug 2200139 Override Enrollment
5416: ELSIF l_unrestricted_enrt_flag = 'N' and nvl(p_run_mode,'X') <> 'V' THEN
5417: -- If nothing found report an error.
5418: fnd_message.set_name('BEN', 'BEN_91464_ENRT_TYP_CYCL_CD');
5419: fnd_message.set_token('PROC', l_proc);
5420: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5421: fnd_message.set_token('PGM_ENRT_TYP_CYCL_CD', l_pgme_enrt_typ_cycl_cd);
5422: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5423: fnd_message.set_token('PL_ENRT_TYP_CYCL_CD', l_ple_enrt_typ_cycl_cd);
5416: ELSIF l_unrestricted_enrt_flag = 'N' and nvl(p_run_mode,'X') <> 'V' THEN
5417: -- If nothing found report an error.
5418: fnd_message.set_name('BEN', 'BEN_91464_ENRT_TYP_CYCL_CD');
5419: fnd_message.set_token('PROC', l_proc);
5420: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5421: fnd_message.set_token('PGM_ENRT_TYP_CYCL_CD', l_pgme_enrt_typ_cycl_cd);
5422: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5423: fnd_message.set_token('PL_ENRT_TYP_CYCL_CD', l_ple_enrt_typ_cycl_cd);
5424: RAISE ben_manage_life_events.g_record_error;
5417: -- If nothing found report an error.
5418: fnd_message.set_name('BEN', 'BEN_91464_ENRT_TYP_CYCL_CD');
5419: fnd_message.set_token('PROC', l_proc);
5420: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5421: fnd_message.set_token('PGM_ENRT_TYP_CYCL_CD', l_pgme_enrt_typ_cycl_cd);
5422: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5423: fnd_message.set_token('PL_ENRT_TYP_CYCL_CD', l_ple_enrt_typ_cycl_cd);
5424: RAISE ben_manage_life_events.g_record_error;
5425: --
5418: fnd_message.set_name('BEN', 'BEN_91464_ENRT_TYP_CYCL_CD');
5419: fnd_message.set_token('PROC', l_proc);
5420: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5421: fnd_message.set_token('PGM_ENRT_TYP_CYCL_CD', l_pgme_enrt_typ_cycl_cd);
5422: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5423: fnd_message.set_token('PL_ENRT_TYP_CYCL_CD', l_ple_enrt_typ_cycl_cd);
5424: RAISE ben_manage_life_events.g_record_error;
5425: --
5426: END IF;
5419: fnd_message.set_token('PROC', l_proc);
5420: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5421: fnd_message.set_token('PGM_ENRT_TYP_CYCL_CD', l_pgme_enrt_typ_cycl_cd);
5422: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5423: fnd_message.set_token('PL_ENRT_TYP_CYCL_CD', l_ple_enrt_typ_cycl_cd);
5424: RAISE ben_manage_life_events.g_record_error;
5425: --
5426: END IF;
5427: --
5858: hr_utility.set_location(' Dn PFPF=Y ' || l_proc, 10);
5859: end if;
5860: ELSE
5861: --
5862: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5863: fnd_message.set_token('PROC', l_proc);
5864: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5865: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5866: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5859: end if;
5860: ELSE
5861: --
5862: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5863: fnd_message.set_token('PROC', l_proc);
5864: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5865: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5866: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5867: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5860: ELSE
5861: --
5862: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5863: fnd_message.set_token('PROC', l_proc);
5864: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5865: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5866: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5867: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5868: RAISE ben_manage_life_events.g_record_error;
5861: --
5862: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5863: fnd_message.set_token('PROC', l_proc);
5864: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5865: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5866: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5867: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5868: RAISE ben_manage_life_events.g_record_error;
5869: --
5862: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
5863: fnd_message.set_token('PROC', l_proc);
5864: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5865: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5866: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5867: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5868: RAISE ben_manage_life_events.g_record_error;
5869: --
5870: END IF; -- perd found and strt_dt_cd not null
5863: fnd_message.set_token('PROC', l_proc);
5864: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
5865: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
5866: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
5867: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
5868: RAISE ben_manage_life_events.g_record_error;
5869: --
5870: END IF; -- perd found and strt_dt_cd not null
5871: --
6039: l_rec_enrt_perd_id := l_pgme_enrt_perd_id;
6040: --
6041: ELSE
6042: --
6043: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6044: fnd_message.set_token('PROC', l_proc);
6045: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6046: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6047: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6040: --
6041: ELSE
6042: --
6043: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6044: fnd_message.set_token('PROC', l_proc);
6045: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6046: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6047: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6048: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6041: ELSE
6042: --
6043: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6044: fnd_message.set_token('PROC', l_proc);
6045: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6046: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6047: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6048: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6049: RAISE ben_manage_life_events.g_record_error;
6042: --
6043: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6044: fnd_message.set_token('PROC', l_proc);
6045: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6046: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6047: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6048: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6049: RAISE ben_manage_life_events.g_record_error;
6050: --
6043: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6044: fnd_message.set_token('PROC', l_proc);
6045: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6046: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6047: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6048: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6049: RAISE ben_manage_life_events.g_record_error;
6050: --
6051: END IF; -- perd found and strt_dt_cd not null
6044: fnd_message.set_token('PROC', l_proc);
6045: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6046: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6047: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6048: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6049: RAISE ben_manage_life_events.g_record_error;
6050: --
6051: END IF; -- perd found and strt_dt_cd not null
6052: ELSIF (p_run_mode = 'M' AND l_unrestricted_enrt_flag = 'N') THEN -- ABS processing
6116: hr_utility.set_location(' Dn RM L UEF N ' || l_proc, 20);
6117: end if;
6118: ELSE
6119: --
6120: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6121: fnd_message.set_token('PROC', l_proc);
6122: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6123: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6124: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6117: end if;
6118: ELSE
6119: --
6120: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6121: fnd_message.set_token('PROC', l_proc);
6122: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6123: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6124: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6125: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6118: ELSE
6119: --
6120: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6121: fnd_message.set_token('PROC', l_proc);
6122: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6123: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6124: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6125: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6126: RAISE ben_manage_life_events.g_record_error;
6119: --
6120: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6121: fnd_message.set_token('PROC', l_proc);
6122: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6123: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6124: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6125: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6126: RAISE ben_manage_life_events.g_record_error;
6127: --
6120: fnd_message.set_name('BEN', 'BEN_91335_PLAN_YR_ENRT_PERD');
6121: fnd_message.set_token('PROC', l_proc);
6122: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6123: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6124: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6125: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6126: RAISE ben_manage_life_events.g_record_error;
6127: --
6128: END IF; -- perd found and strt_dt_cd not null
6121: fnd_message.set_token('PROC', l_proc);
6122: fnd_message.set_token('PGM_ID', TO_CHAR(p_pgm_id));
6123: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
6124: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
6125: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
6126: RAISE ben_manage_life_events.g_record_error;
6127: --
6128: END IF; -- perd found and strt_dt_cd not null
6129: --
6135: end if;
6136: -- Check to see if the start date is before the end date
6137: IF l_rec_enrt_perd_strt_dt > l_rec_enrt_perd_end_dt THEN
6138: --
6139: fnd_message.set_name('BEN', 'BEN_91735_END_BEFORE_STRT_DT');
6140: fnd_message.set_token('PROC', l_proc);
6141: fnd_message.set_token(
6142: 'ENRT_PERD_STRT_DT',
6143: TO_CHAR(l_rec_enrt_perd_strt_dt));
6136: -- Check to see if the start date is before the end date
6137: IF l_rec_enrt_perd_strt_dt > l_rec_enrt_perd_end_dt THEN
6138: --
6139: fnd_message.set_name('BEN', 'BEN_91735_END_BEFORE_STRT_DT');
6140: fnd_message.set_token('PROC', l_proc);
6141: fnd_message.set_token(
6142: 'ENRT_PERD_STRT_DT',
6143: TO_CHAR(l_rec_enrt_perd_strt_dt));
6144: fnd_message.set_token(
6137: IF l_rec_enrt_perd_strt_dt > l_rec_enrt_perd_end_dt THEN
6138: --
6139: fnd_message.set_name('BEN', 'BEN_91735_END_BEFORE_STRT_DT');
6140: fnd_message.set_token('PROC', l_proc);
6141: fnd_message.set_token(
6142: 'ENRT_PERD_STRT_DT',
6143: TO_CHAR(l_rec_enrt_perd_strt_dt));
6144: fnd_message.set_token(
6145: 'ENRT_PERD_END_DT',
6140: fnd_message.set_token('PROC', l_proc);
6141: fnd_message.set_token(
6142: 'ENRT_PERD_STRT_DT',
6143: TO_CHAR(l_rec_enrt_perd_strt_dt));
6144: fnd_message.set_token(
6145: 'ENRT_PERD_END_DT',
6146: TO_CHAR(l_rec_enrt_perd_end_dt));
6147: RAISE ben_manage_life_events.g_record_error;
6148: --
6450: hr_utility.set_location(
6451: 'Program not date effective on period start',
6452: 10);
6453: end if;
6454: fnd_message.set_name('BEN', 'BEN_92214_PGM_NOT_EFF_ON_STRT');
6455: fnd_message.set_token('PROC', l_proc);
6456: fnd_message.set_token(
6457: 'ENRT_PERD_STRT_DT',
6458: TO_CHAR(l_rec_enrt_perd_strt_dt));
6451: 'Program not date effective on period start',
6452: 10);
6453: end if;
6454: fnd_message.set_name('BEN', 'BEN_92214_PGM_NOT_EFF_ON_STRT');
6455: fnd_message.set_token('PROC', l_proc);
6456: fnd_message.set_token(
6457: 'ENRT_PERD_STRT_DT',
6458: TO_CHAR(l_rec_enrt_perd_strt_dt));
6459: fnd_message.set_token(
6452: 10);
6453: end if;
6454: fnd_message.set_name('BEN', 'BEN_92214_PGM_NOT_EFF_ON_STRT');
6455: fnd_message.set_token('PROC', l_proc);
6456: fnd_message.set_token(
6457: 'ENRT_PERD_STRT_DT',
6458: TO_CHAR(l_rec_enrt_perd_strt_dt));
6459: fnd_message.set_token(
6460: 'PGM_STRT_DT',
6455: fnd_message.set_token('PROC', l_proc);
6456: fnd_message.set_token(
6457: 'ENRT_PERD_STRT_DT',
6458: TO_CHAR(l_rec_enrt_perd_strt_dt));
6459: fnd_message.set_token(
6460: 'PGM_STRT_DT',
6461: TO_CHAR(l_pgm_rec.effective_start_date));
6462: fnd_message.set_token(
6463: 'PGM_END_DT',
6458: TO_CHAR(l_rec_enrt_perd_strt_dt));
6459: fnd_message.set_token(
6460: 'PGM_STRT_DT',
6461: TO_CHAR(l_pgm_rec.effective_start_date));
6462: fnd_message.set_token(
6463: 'PGM_END_DT',
6464: TO_CHAR(l_pgm_rec.effective_end_date));
6465: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6466: p_electable_flag := 'N';
6461: TO_CHAR(l_pgm_rec.effective_start_date));
6462: fnd_message.set_token(
6463: 'PGM_END_DT',
6464: TO_CHAR(l_pgm_rec.effective_end_date));
6465: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6466: p_electable_flag := 'N';
6467: RETURN;
6468: end if;
6469: close c_pgm_requery;
6477: if c_plip_requery%notfound then
6478: if g_debug then
6479: hr_utility.set_location('Plip not date effective on period start', 10);
6480: end if;
6481: fnd_message.set_name('BEN', 'BEN_92208_PLIP_NOT_EFF_ON_STRT');
6482: fnd_message.set_token('PROC', l_proc);
6483: fnd_message.set_token(
6484: 'ENRT_PERD_STRT_DT',
6485: TO_CHAR(l_rec_enrt_perd_strt_dt));
6478: if g_debug then
6479: hr_utility.set_location('Plip not date effective on period start', 10);
6480: end if;
6481: fnd_message.set_name('BEN', 'BEN_92208_PLIP_NOT_EFF_ON_STRT');
6482: fnd_message.set_token('PROC', l_proc);
6483: fnd_message.set_token(
6484: 'ENRT_PERD_STRT_DT',
6485: TO_CHAR(l_rec_enrt_perd_strt_dt));
6486: fnd_message.set_token('PLIP_STRT_DT', TO_CHAR(l_plip_esd));
6479: hr_utility.set_location('Plip not date effective on period start', 10);
6480: end if;
6481: fnd_message.set_name('BEN', 'BEN_92208_PLIP_NOT_EFF_ON_STRT');
6482: fnd_message.set_token('PROC', l_proc);
6483: fnd_message.set_token(
6484: 'ENRT_PERD_STRT_DT',
6485: TO_CHAR(l_rec_enrt_perd_strt_dt));
6486: fnd_message.set_token('PLIP_STRT_DT', TO_CHAR(l_plip_esd));
6487: fnd_message.set_token('PLIP_END_DT', TO_CHAR(l_plip_eed));
6482: fnd_message.set_token('PROC', l_proc);
6483: fnd_message.set_token(
6484: 'ENRT_PERD_STRT_DT',
6485: TO_CHAR(l_rec_enrt_perd_strt_dt));
6486: fnd_message.set_token('PLIP_STRT_DT', TO_CHAR(l_plip_esd));
6487: fnd_message.set_token('PLIP_END_DT', TO_CHAR(l_plip_eed));
6488: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6489: p_electable_flag := 'N';
6490: RETURN;
6483: fnd_message.set_token(
6484: 'ENRT_PERD_STRT_DT',
6485: TO_CHAR(l_rec_enrt_perd_strt_dt));
6486: fnd_message.set_token('PLIP_STRT_DT', TO_CHAR(l_plip_esd));
6487: fnd_message.set_token('PLIP_END_DT', TO_CHAR(l_plip_eed));
6488: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6489: p_electable_flag := 'N';
6490: RETURN;
6491: end if;
6484: 'ENRT_PERD_STRT_DT',
6485: TO_CHAR(l_rec_enrt_perd_strt_dt));
6486: fnd_message.set_token('PLIP_STRT_DT', TO_CHAR(l_plip_esd));
6487: fnd_message.set_token('PLIP_END_DT', TO_CHAR(l_plip_eed));
6488: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6489: p_electable_flag := 'N';
6490: RETURN;
6491: end if;
6492: close c_plip_requery;
6511: if c_ptip_requery%notfound then
6512: if g_debug then
6513: hr_utility.set_location('Ptip not date effective on period start', 10);
6514: end if;
6515: fnd_message.set_name('BEN', 'BEN_92213_PTIP_NOT_EFF_ON_STRT');
6516: fnd_message.set_token('PROC', l_proc);
6517: fnd_message.set_token(
6518: 'ENRT_PERD_STRT_DT',
6519: TO_CHAR(l_rec_enrt_perd_strt_dt));
6512: if g_debug then
6513: hr_utility.set_location('Ptip not date effective on period start', 10);
6514: end if;
6515: fnd_message.set_name('BEN', 'BEN_92213_PTIP_NOT_EFF_ON_STRT');
6516: fnd_message.set_token('PROC', l_proc);
6517: fnd_message.set_token(
6518: 'ENRT_PERD_STRT_DT',
6519: TO_CHAR(l_rec_enrt_perd_strt_dt));
6520: fnd_message.set_token('PTIP_STRT_DT', TO_CHAR(l_ptip_esd));
6513: hr_utility.set_location('Ptip not date effective on period start', 10);
6514: end if;
6515: fnd_message.set_name('BEN', 'BEN_92213_PTIP_NOT_EFF_ON_STRT');
6516: fnd_message.set_token('PROC', l_proc);
6517: fnd_message.set_token(
6518: 'ENRT_PERD_STRT_DT',
6519: TO_CHAR(l_rec_enrt_perd_strt_dt));
6520: fnd_message.set_token('PTIP_STRT_DT', TO_CHAR(l_ptip_esd));
6521: fnd_message.set_token('PTIP_END_DT', TO_CHAR(l_ptip_eed));
6516: fnd_message.set_token('PROC', l_proc);
6517: fnd_message.set_token(
6518: 'ENRT_PERD_STRT_DT',
6519: TO_CHAR(l_rec_enrt_perd_strt_dt));
6520: fnd_message.set_token('PTIP_STRT_DT', TO_CHAR(l_ptip_esd));
6521: fnd_message.set_token('PTIP_END_DT', TO_CHAR(l_ptip_eed));
6522: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6523: p_electable_flag := 'N';
6524: -- Bug fix 2008871 -- hnarayan
6517: fnd_message.set_token(
6518: 'ENRT_PERD_STRT_DT',
6519: TO_CHAR(l_rec_enrt_perd_strt_dt));
6520: fnd_message.set_token('PTIP_STRT_DT', TO_CHAR(l_ptip_esd));
6521: fnd_message.set_token('PTIP_END_DT', TO_CHAR(l_ptip_eed));
6522: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6523: p_electable_flag := 'N';
6524: -- Bug fix 2008871 -- hnarayan
6525: close c_ptip_requery;
6518: 'ENRT_PERD_STRT_DT',
6519: TO_CHAR(l_rec_enrt_perd_strt_dt));
6520: fnd_message.set_token('PTIP_STRT_DT', TO_CHAR(l_ptip_esd));
6521: fnd_message.set_token('PTIP_END_DT', TO_CHAR(l_ptip_eed));
6522: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6523: p_electable_flag := 'N';
6524: -- Bug fix 2008871 -- hnarayan
6525: close c_ptip_requery;
6526: RETURN;
6556: if c_oipl_requery%notfound then
6557: if g_debug then
6558: hr_utility.set_location('Oipl not date effective on period start', 10);
6559: end if;
6560: fnd_message.set_name('BEN', 'BEN_92207_OIPL_NOT_EFF_ON_STRT');
6561: fnd_message.set_token('PROC', l_proc);
6562: fnd_message.set_token(
6563: 'ENRT_PERD_STRT_DT',
6564: TO_CHAR(l_rec_enrt_perd_strt_dt));
6557: if g_debug then
6558: hr_utility.set_location('Oipl not date effective on period start', 10);
6559: end if;
6560: fnd_message.set_name('BEN', 'BEN_92207_OIPL_NOT_EFF_ON_STRT');
6561: fnd_message.set_token('PROC', l_proc);
6562: fnd_message.set_token(
6563: 'ENRT_PERD_STRT_DT',
6564: TO_CHAR(l_rec_enrt_perd_strt_dt));
6565: fnd_message.set_token(
6558: hr_utility.set_location('Oipl not date effective on period start', 10);
6559: end if;
6560: fnd_message.set_name('BEN', 'BEN_92207_OIPL_NOT_EFF_ON_STRT');
6561: fnd_message.set_token('PROC', l_proc);
6562: fnd_message.set_token(
6563: 'ENRT_PERD_STRT_DT',
6564: TO_CHAR(l_rec_enrt_perd_strt_dt));
6565: fnd_message.set_token(
6566: 'OIPL_STRT_DT',
6561: fnd_message.set_token('PROC', l_proc);
6562: fnd_message.set_token(
6563: 'ENRT_PERD_STRT_DT',
6564: TO_CHAR(l_rec_enrt_perd_strt_dt));
6565: fnd_message.set_token(
6566: 'OIPL_STRT_DT',
6567: TO_CHAR(l_oipl_rec.effective_start_date));
6568: fnd_message.set_token(
6569: 'OIPL_END_DT',
6564: TO_CHAR(l_rec_enrt_perd_strt_dt));
6565: fnd_message.set_token(
6566: 'OIPL_STRT_DT',
6567: TO_CHAR(l_oipl_rec.effective_start_date));
6568: fnd_message.set_token(
6569: 'OIPL_END_DT',
6570: TO_CHAR(l_oipl_rec.effective_end_date));
6571: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6572: p_electable_flag := 'N';
6567: TO_CHAR(l_oipl_rec.effective_start_date));
6568: fnd_message.set_token(
6569: 'OIPL_END_DT',
6570: TO_CHAR(l_oipl_rec.effective_end_date));
6571: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6572: p_electable_flag := 'N';
6573: RETURN;
6574: end if;
6575: close c_oipl_requery;
6587: hr_utility.set_location(
6588: 'Option not date effective on period start',
6589: 10);
6590: end if;
6591: fnd_message.set_name('BEN', 'BEN_92212_OPT_NOT_EFF_ON_STRT');
6592: fnd_message.set_token('PROC', l_proc);
6593: fnd_message.set_token(
6594: 'ENRT_PERD_STRT_DT',
6595: TO_CHAR(l_rec_enrt_perd_strt_dt));
6588: 'Option not date effective on period start',
6589: 10);
6590: end if;
6591: fnd_message.set_name('BEN', 'BEN_92212_OPT_NOT_EFF_ON_STRT');
6592: fnd_message.set_token('PROC', l_proc);
6593: fnd_message.set_token(
6594: 'ENRT_PERD_STRT_DT',
6595: TO_CHAR(l_rec_enrt_perd_strt_dt));
6596: fnd_message.set_token(
6589: 10);
6590: end if;
6591: fnd_message.set_name('BEN', 'BEN_92212_OPT_NOT_EFF_ON_STRT');
6592: fnd_message.set_token('PROC', l_proc);
6593: fnd_message.set_token(
6594: 'ENRT_PERD_STRT_DT',
6595: TO_CHAR(l_rec_enrt_perd_strt_dt));
6596: fnd_message.set_token(
6597: 'OPT_STRT_DT',
6592: fnd_message.set_token('PROC', l_proc);
6593: fnd_message.set_token(
6594: 'ENRT_PERD_STRT_DT',
6595: TO_CHAR(l_rec_enrt_perd_strt_dt));
6596: fnd_message.set_token(
6597: 'OPT_STRT_DT',
6598: TO_CHAR(ben_cobj_cache.g_opt_currow.effective_start_date));
6599: fnd_message.set_token(
6600: 'OPT_END_DT',
6595: TO_CHAR(l_rec_enrt_perd_strt_dt));
6596: fnd_message.set_token(
6597: 'OPT_STRT_DT',
6598: TO_CHAR(ben_cobj_cache.g_opt_currow.effective_start_date));
6599: fnd_message.set_token(
6600: 'OPT_END_DT',
6601: TO_CHAR(ben_cobj_cache.g_opt_currow.effective_end_date));
6602: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6603: p_electable_flag := 'N';
6598: TO_CHAR(ben_cobj_cache.g_opt_currow.effective_start_date));
6599: fnd_message.set_token(
6600: 'OPT_END_DT',
6601: TO_CHAR(ben_cobj_cache.g_opt_currow.effective_end_date));
6602: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6603: p_electable_flag := 'N';
6604: RETURN;
6605: end if;
6606: close c_opt_requery;
6620: hr_utility.set_location('perd_strt_dt=' || l_rec_enrt_perd_strt_dt, 1);
6621: hr_utility.set_location('strt_dt=' || l_plan_rec.effective_start_date, 1);
6622: hr_utility.set_location('end_dt=' || l_plan_rec.effective_end_date, 1);
6623: end if;
6624: fnd_message.set_name('BEN', 'BEN_92211_PLAN_NOT_EFF_ON_STRT');
6625: fnd_message.set_token('PROC', l_proc);
6626: fnd_message.set_token(
6627: 'ENRT_PERD_STRT_DT',
6628: TO_CHAR(l_rec_enrt_perd_strt_dt));
6621: hr_utility.set_location('strt_dt=' || l_plan_rec.effective_start_date, 1);
6622: hr_utility.set_location('end_dt=' || l_plan_rec.effective_end_date, 1);
6623: end if;
6624: fnd_message.set_name('BEN', 'BEN_92211_PLAN_NOT_EFF_ON_STRT');
6625: fnd_message.set_token('PROC', l_proc);
6626: fnd_message.set_token(
6627: 'ENRT_PERD_STRT_DT',
6628: TO_CHAR(l_rec_enrt_perd_strt_dt));
6629: fnd_message.set_token(
6622: hr_utility.set_location('end_dt=' || l_plan_rec.effective_end_date, 1);
6623: end if;
6624: fnd_message.set_name('BEN', 'BEN_92211_PLAN_NOT_EFF_ON_STRT');
6625: fnd_message.set_token('PROC', l_proc);
6626: fnd_message.set_token(
6627: 'ENRT_PERD_STRT_DT',
6628: TO_CHAR(l_rec_enrt_perd_strt_dt));
6629: fnd_message.set_token(
6630: 'PL_STRT_DT',
6625: fnd_message.set_token('PROC', l_proc);
6626: fnd_message.set_token(
6627: 'ENRT_PERD_STRT_DT',
6628: TO_CHAR(l_rec_enrt_perd_strt_dt));
6629: fnd_message.set_token(
6630: 'PL_STRT_DT',
6631: TO_CHAR(l_plan_rec.effective_start_date));
6632: fnd_message.set_token(
6633: 'PL_END_DT',
6628: TO_CHAR(l_rec_enrt_perd_strt_dt));
6629: fnd_message.set_token(
6630: 'PL_STRT_DT',
6631: TO_CHAR(l_plan_rec.effective_start_date));
6632: fnd_message.set_token(
6633: 'PL_END_DT',
6634: TO_CHAR(l_plan_rec.effective_end_date));
6635: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6636: p_electable_flag := 'N';
6631: TO_CHAR(l_plan_rec.effective_start_date));
6632: fnd_message.set_token(
6633: 'PL_END_DT',
6634: TO_CHAR(l_plan_rec.effective_end_date));
6635: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6636: p_electable_flag := 'N';
6637: RETURN;
6638: end if;
6639: close c_plan_requery;
6653: if c_pl_typ_requery%notfound then
6654: if g_debug then
6655: hr_utility.set_location('Pl_typ not date effective on period start', 10);
6656: end if;
6657: fnd_message.set_name('BEN', 'BEN_92206_PL_TYP_NOT_EFF_ON_ST');
6658: fnd_message.set_token('PROC', l_proc);
6659: fnd_message.set_token(
6660: 'ENRT_PERD_STRT_DT',
6661: TO_CHAR(l_rec_enrt_perd_strt_dt));
6654: if g_debug then
6655: hr_utility.set_location('Pl_typ not date effective on period start', 10);
6656: end if;
6657: fnd_message.set_name('BEN', 'BEN_92206_PL_TYP_NOT_EFF_ON_ST');
6658: fnd_message.set_token('PROC', l_proc);
6659: fnd_message.set_token(
6660: 'ENRT_PERD_STRT_DT',
6661: TO_CHAR(l_rec_enrt_perd_strt_dt));
6662: fnd_message.set_token('PL_TYP_STRT_DT', TO_CHAR(l_pl_typ_esd));
6655: hr_utility.set_location('Pl_typ not date effective on period start', 10);
6656: end if;
6657: fnd_message.set_name('BEN', 'BEN_92206_PL_TYP_NOT_EFF_ON_ST');
6658: fnd_message.set_token('PROC', l_proc);
6659: fnd_message.set_token(
6660: 'ENRT_PERD_STRT_DT',
6661: TO_CHAR(l_rec_enrt_perd_strt_dt));
6662: fnd_message.set_token('PL_TYP_STRT_DT', TO_CHAR(l_pl_typ_esd));
6663: fnd_message.set_token('PL_TYP_END_DT', TO_CHAR(l_pl_typ_eed));
6658: fnd_message.set_token('PROC', l_proc);
6659: fnd_message.set_token(
6660: 'ENRT_PERD_STRT_DT',
6661: TO_CHAR(l_rec_enrt_perd_strt_dt));
6662: fnd_message.set_token('PL_TYP_STRT_DT', TO_CHAR(l_pl_typ_esd));
6663: fnd_message.set_token('PL_TYP_END_DT', TO_CHAR(l_pl_typ_eed));
6664: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6665: p_electable_flag := 'N';
6666: RETURN;
6659: fnd_message.set_token(
6660: 'ENRT_PERD_STRT_DT',
6661: TO_CHAR(l_rec_enrt_perd_strt_dt));
6662: fnd_message.set_token('PL_TYP_STRT_DT', TO_CHAR(l_pl_typ_esd));
6663: fnd_message.set_token('PL_TYP_END_DT', TO_CHAR(l_pl_typ_eed));
6664: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6665: p_electable_flag := 'N';
6666: RETURN;
6667: end if;
6660: 'ENRT_PERD_STRT_DT',
6661: TO_CHAR(l_rec_enrt_perd_strt_dt));
6662: fnd_message.set_token('PL_TYP_STRT_DT', TO_CHAR(l_pl_typ_esd));
6663: fnd_message.set_token('PL_TYP_END_DT', TO_CHAR(l_pl_typ_eed));
6664: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6665: p_electable_flag := 'N';
6666: RETURN;
6667: end if;
6668: close c_pl_typ_requery;
6680: hr_utility.set_location(
6681: 'Lee_rsn not date effective on period start',
6682: 10);
6683: end if;
6684: fnd_message.set_name('BEN', 'BEN_92210_LEE_RSN_NOT_EFF_ON_S');
6685: fnd_message.set_token('PROC', l_proc);
6686: fnd_message.set_token(
6687: 'ENRT_PERD_STRT_DT',
6688: TO_CHAR(l_rec_enrt_perd_strt_dt));
6681: 'Lee_rsn not date effective on period start',
6682: 10);
6683: end if;
6684: fnd_message.set_name('BEN', 'BEN_92210_LEE_RSN_NOT_EFF_ON_S');
6685: fnd_message.set_token('PROC', l_proc);
6686: fnd_message.set_token(
6687: 'ENRT_PERD_STRT_DT',
6688: TO_CHAR(l_rec_enrt_perd_strt_dt));
6689: fnd_message.set_token('LEE_RSN_STRT_DT', TO_CHAR(l_rec_lee_rsn_esd));
6682: 10);
6683: end if;
6684: fnd_message.set_name('BEN', 'BEN_92210_LEE_RSN_NOT_EFF_ON_S');
6685: fnd_message.set_token('PROC', l_proc);
6686: fnd_message.set_token(
6687: 'ENRT_PERD_STRT_DT',
6688: TO_CHAR(l_rec_enrt_perd_strt_dt));
6689: fnd_message.set_token('LEE_RSN_STRT_DT', TO_CHAR(l_rec_lee_rsn_esd));
6690: fnd_message.set_token('LEE_RSN_END_DT', TO_CHAR(l_rec_lee_rsn_eed));
6685: fnd_message.set_token('PROC', l_proc);
6686: fnd_message.set_token(
6687: 'ENRT_PERD_STRT_DT',
6688: TO_CHAR(l_rec_enrt_perd_strt_dt));
6689: fnd_message.set_token('LEE_RSN_STRT_DT', TO_CHAR(l_rec_lee_rsn_esd));
6690: fnd_message.set_token('LEE_RSN_END_DT', TO_CHAR(l_rec_lee_rsn_eed));
6691: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6692: p_electable_flag := 'N';
6693: RETURN;
6686: fnd_message.set_token(
6687: 'ENRT_PERD_STRT_DT',
6688: TO_CHAR(l_rec_enrt_perd_strt_dt));
6689: fnd_message.set_token('LEE_RSN_STRT_DT', TO_CHAR(l_rec_lee_rsn_esd));
6690: fnd_message.set_token('LEE_RSN_END_DT', TO_CHAR(l_rec_lee_rsn_eed));
6691: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6692: p_electable_flag := 'N';
6693: RETURN;
6694: end if;
6687: 'ENRT_PERD_STRT_DT',
6688: TO_CHAR(l_rec_enrt_perd_strt_dt));
6689: fnd_message.set_token('LEE_RSN_STRT_DT', TO_CHAR(l_rec_lee_rsn_esd));
6690: fnd_message.set_token('LEE_RSN_END_DT', TO_CHAR(l_rec_lee_rsn_eed));
6691: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6692: p_electable_flag := 'N';
6693: RETURN;
6694: end if;
6695: close c_lee_rsn_requery;
6703: if c_ler_requery%notfound then
6704: if g_debug then
6705: hr_utility.set_location('Ler not date effective on period start', 10);
6706: end if;
6707: fnd_message.set_name('BEN', 'BEN_92209_LER_NOT_EFF_ON_STRT');
6708: fnd_message.set_token('PROC', l_proc);
6709: fnd_message.set_token(
6710: 'ENRT_PERD_STRT_DT',
6711: TO_CHAR(l_rec_enrt_perd_strt_dt));
6704: if g_debug then
6705: hr_utility.set_location('Ler not date effective on period start', 10);
6706: end if;
6707: fnd_message.set_name('BEN', 'BEN_92209_LER_NOT_EFF_ON_STRT');
6708: fnd_message.set_token('PROC', l_proc);
6709: fnd_message.set_token(
6710: 'ENRT_PERD_STRT_DT',
6711: TO_CHAR(l_rec_enrt_perd_strt_dt));
6712: fnd_message.set_token('LER_STRT_DT', TO_CHAR(l_ler_esd));
6705: hr_utility.set_location('Ler not date effective on period start', 10);
6706: end if;
6707: fnd_message.set_name('BEN', 'BEN_92209_LER_NOT_EFF_ON_STRT');
6708: fnd_message.set_token('PROC', l_proc);
6709: fnd_message.set_token(
6710: 'ENRT_PERD_STRT_DT',
6711: TO_CHAR(l_rec_enrt_perd_strt_dt));
6712: fnd_message.set_token('LER_STRT_DT', TO_CHAR(l_ler_esd));
6713: fnd_message.set_token('LER_END_DT', TO_CHAR(l_ler_eed));
6708: fnd_message.set_token('PROC', l_proc);
6709: fnd_message.set_token(
6710: 'ENRT_PERD_STRT_DT',
6711: TO_CHAR(l_rec_enrt_perd_strt_dt));
6712: fnd_message.set_token('LER_STRT_DT', TO_CHAR(l_ler_esd));
6713: fnd_message.set_token('LER_END_DT', TO_CHAR(l_ler_eed));
6714: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6715: p_electable_flag := 'N';
6716: RETURN;
6709: fnd_message.set_token(
6710: 'ENRT_PERD_STRT_DT',
6711: TO_CHAR(l_rec_enrt_perd_strt_dt));
6712: fnd_message.set_token('LER_STRT_DT', TO_CHAR(l_ler_esd));
6713: fnd_message.set_token('LER_END_DT', TO_CHAR(l_ler_eed));
6714: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6715: p_electable_flag := 'N';
6716: RETURN;
6717: end if;
6710: 'ENRT_PERD_STRT_DT',
6711: TO_CHAR(l_rec_enrt_perd_strt_dt));
6712: fnd_message.set_token('LER_STRT_DT', TO_CHAR(l_ler_esd));
6713: fnd_message.set_token('LER_END_DT', TO_CHAR(l_ler_eed));
6714: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
6715: p_electable_flag := 'N';
6716: RETURN;
6717: end if;
6718: close c_ler_requery;
6775: IF l_rec_cls_enrt_dt_to_use_cd IS NULL THEN
6776: --
6777: -- hr_utility.set_location('Invalid cls_enrt_dt_cd', 10);
6778: --
6779: fnd_message.set_name('BEN', 'BEN_91905_INVLD_CLS_ENRT_DT_CD');
6780: fnd_message.set_token('PROC', l_proc);
6781: fnd_message.set_token(
6782: 'CLS_ENRT_DT_TO_USE_CD',
6783: l_rec_cls_enrt_dt_to_use_cd);
6776: --
6777: -- hr_utility.set_location('Invalid cls_enrt_dt_cd', 10);
6778: --
6779: fnd_message.set_name('BEN', 'BEN_91905_INVLD_CLS_ENRT_DT_CD');
6780: fnd_message.set_token('PROC', l_proc);
6781: fnd_message.set_token(
6782: 'CLS_ENRT_DT_TO_USE_CD',
6783: l_rec_cls_enrt_dt_to_use_cd);
6784: RAISE ben_manage_life_events.g_record_error;
6777: -- hr_utility.set_location('Invalid cls_enrt_dt_cd', 10);
6778: --
6779: fnd_message.set_name('BEN', 'BEN_91905_INVLD_CLS_ENRT_DT_CD');
6780: fnd_message.set_token('PROC', l_proc);
6781: fnd_message.set_token(
6782: 'CLS_ENRT_DT_TO_USE_CD',
6783: l_rec_cls_enrt_dt_to_use_cd);
6784: RAISE ben_manage_life_events.g_record_error;
6785: --
7046: if g_debug then
7047: hr_utility.set_location('FND mess: ' || l_proc, 10);
7048: end if;
7049: --
7050: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7051: fnd_message.set_token('PERSON_ID', p_person_id);
7052: fnd_message.set_token('LER_NAME', l_ler_name);
7053: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7054: fnd_message.set_token('PLAN_NAME', l_pl_name);
7047: hr_utility.set_location('FND mess: ' || l_proc, 10);
7048: end if;
7049: --
7050: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7051: fnd_message.set_token('PERSON_ID', p_person_id);
7052: fnd_message.set_token('LER_NAME', l_ler_name);
7053: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7054: fnd_message.set_token('PLAN_NAME', l_pl_name);
7055: fnd_message.set_token('OIPL_NAME', l_oipl_name);
7048: end if;
7049: --
7050: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7051: fnd_message.set_token('PERSON_ID', p_person_id);
7052: fnd_message.set_token('LER_NAME', l_ler_name);
7053: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7054: fnd_message.set_token('PLAN_NAME', l_pl_name);
7055: fnd_message.set_token('OIPL_NAME', l_oipl_name);
7056: --
7049: --
7050: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7051: fnd_message.set_token('PERSON_ID', p_person_id);
7052: fnd_message.set_token('LER_NAME', l_ler_name);
7053: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7054: fnd_message.set_token('PLAN_NAME', l_pl_name);
7055: fnd_message.set_token('OIPL_NAME', l_oipl_name);
7056: --
7057: if g_debug then
7050: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7051: fnd_message.set_token('PERSON_ID', p_person_id);
7052: fnd_message.set_token('LER_NAME', l_ler_name);
7053: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7054: fnd_message.set_token('PLAN_NAME', l_pl_name);
7055: fnd_message.set_token('OIPL_NAME', l_oipl_name);
7056: --
7057: if g_debug then
7058: hr_utility.set_location('Dn FND mess: ' || l_proc, 10);
7051: fnd_message.set_token('PERSON_ID', p_person_id);
7052: fnd_message.set_token('LER_NAME', l_ler_name);
7053: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7054: fnd_message.set_token('PLAN_NAME', l_pl_name);
7055: fnd_message.set_token('OIPL_NAME', l_oipl_name);
7056: --
7057: if g_debug then
7058: hr_utility.set_location('Dn FND mess: ' || l_proc, 10);
7059: end if;
7056: --
7057: if g_debug then
7058: hr_utility.set_location('Dn FND mess: ' || l_proc, 10);
7059: end if;
7060: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
7061: --
7062: -- if choice is created for an oipl create one for plan it belongs to
7063: -- first find out if it already exists.
7064: --
7275: --
7276: if g_debug then
7277: hr_utility.set_location('FND Mess: ' || l_proc, 10);
7278: end if;
7279: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7280: fnd_message.set_token('PERSON_ID', p_person_id);
7281: fnd_message.set_token('LER_NAME', l_ler_name);
7282: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7283: fnd_message.set_token('PLAN_NAME', l_pl_name);
7276: if g_debug then
7277: hr_utility.set_location('FND Mess: ' || l_proc, 10);
7278: end if;
7279: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7280: fnd_message.set_token('PERSON_ID', p_person_id);
7281: fnd_message.set_token('LER_NAME', l_ler_name);
7282: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7283: fnd_message.set_token('PLAN_NAME', l_pl_name);
7284: fnd_message.set_token('OIPL_NAME', ' ');
7277: hr_utility.set_location('FND Mess: ' || l_proc, 10);
7278: end if;
7279: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7280: fnd_message.set_token('PERSON_ID', p_person_id);
7281: fnd_message.set_token('LER_NAME', l_ler_name);
7282: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7283: fnd_message.set_token('PLAN_NAME', l_pl_name);
7284: fnd_message.set_token('OIPL_NAME', ' ');
7285: if g_debug then
7278: end if;
7279: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7280: fnd_message.set_token('PERSON_ID', p_person_id);
7281: fnd_message.set_token('LER_NAME', l_ler_name);
7282: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7283: fnd_message.set_token('PLAN_NAME', l_pl_name);
7284: fnd_message.set_token('OIPL_NAME', ' ');
7285: if g_debug then
7286: hr_utility.set_location('Dn FND Mess: ' || l_proc, 10);
7279: fnd_message.set_name('BEN', 'BEN_91736_EPE_CHC_CREATED');
7280: fnd_message.set_token('PERSON_ID', p_person_id);
7281: fnd_message.set_token('LER_NAME', l_ler_name);
7282: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7283: fnd_message.set_token('PLAN_NAME', l_pl_name);
7284: fnd_message.set_token('OIPL_NAME', ' ');
7285: if g_debug then
7286: hr_utility.set_location('Dn FND Mess: ' || l_proc, 10);
7287: end if;
7280: fnd_message.set_token('PERSON_ID', p_person_id);
7281: fnd_message.set_token('LER_NAME', l_ler_name);
7282: fnd_message.set_token('COMP_LVL_CD', l_comp_lvl_cd);
7283: fnd_message.set_token('PLAN_NAME', l_pl_name);
7284: fnd_message.set_token('OIPL_NAME', ' ');
7285: if g_debug then
7286: hr_utility.set_location('Dn FND Mess: ' || l_proc, 10);
7287: end if;
7288: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
7284: fnd_message.set_token('OIPL_NAME', ' ');
7285: if g_debug then
7286: hr_utility.set_location('Dn FND Mess: ' || l_proc, 10);
7287: end if;
7288: benutils.write(p_text => SUBSTR(fnd_message.get, 1, 128));
7289: if g_debug then
7290: hr_utility.set_location('Dn FND GetMess: ' || l_proc, 10);
7291: end if;
7292: --
8114: OPEN c_asg;
8115: FETCH c_asg INTO l_asg;
8116: IF c_asg%NOTFOUND THEN
8117: CLOSE c_asg;
8118: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
8119: fnd_message.set_token('PROC', l_proc);
8120: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
8121: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
8122: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
8115: FETCH c_asg INTO l_asg;
8116: IF c_asg%NOTFOUND THEN
8117: CLOSE c_asg;
8118: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
8119: fnd_message.set_token('PROC', l_proc);
8120: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
8121: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
8122: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
8123: RAISE ben_manage_life_events.g_record_error;
8116: IF c_asg%NOTFOUND THEN
8117: CLOSE c_asg;
8118: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
8119: fnd_message.set_token('PROC', l_proc);
8120: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
8121: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
8122: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
8123: RAISE ben_manage_life_events.g_record_error;
8124: END IF;
8117: CLOSE c_asg;
8118: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
8119: fnd_message.set_token('PROC', l_proc);
8120: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
8121: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
8122: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
8123: RAISE ben_manage_life_events.g_record_error;
8124: END IF;
8125: CLOSE c_asg;
8118: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
8119: fnd_message.set_token('PROC', l_proc);
8120: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
8121: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
8122: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
8123: RAISE ben_manage_life_events.g_record_error;
8124: END IF;
8125: CLOSE c_asg;
8126: IF (p_oipl_id IS NULL) THEN
10030: --
10031: FETCH c_plip_info INTO l_use_dflt_flag;
10032: IF c_plip_info%NOTFOUND THEN
10033: --
10034: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
10035: fnd_message.set_token('PROC', l_proc);
10036: fnd_message.set_token('PGM_ID', TO_CHAR(l_pgm_id));
10037: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
10038: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
10031: FETCH c_plip_info INTO l_use_dflt_flag;
10032: IF c_plip_info%NOTFOUND THEN
10033: --
10034: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
10035: fnd_message.set_token('PROC', l_proc);
10036: fnd_message.set_token('PGM_ID', TO_CHAR(l_pgm_id));
10037: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
10038: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
10039: RAISE ben_manage_life_events.g_record_error;
10032: IF c_plip_info%NOTFOUND THEN
10033: --
10034: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
10035: fnd_message.set_token('PROC', l_proc);
10036: fnd_message.set_token('PGM_ID', TO_CHAR(l_pgm_id));
10037: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
10038: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
10039: RAISE ben_manage_life_events.g_record_error;
10040: --
10033: --
10034: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
10035: fnd_message.set_token('PROC', l_proc);
10036: fnd_message.set_token('PGM_ID', TO_CHAR(l_pgm_id));
10037: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
10038: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
10039: RAISE ben_manage_life_events.g_record_error;
10040: --
10041: END IF;
10034: fnd_message.set_name('BEN', 'BEN_91461_PLIP_MISSING');
10035: fnd_message.set_token('PROC', l_proc);
10036: fnd_message.set_token('PGM_ID', TO_CHAR(l_pgm_id));
10037: fnd_message.set_token('PL_ID', TO_CHAR(l_pl_id));
10038: fnd_message.set_token('BG_ID', TO_CHAR(p_business_group_id));
10039: RAISE ben_manage_life_events.g_record_error;
10040: --
10041: END IF;
10042: --
10057: CLOSE c_asg;
10058: if g_debug then
10059: hr_utility.set_location('error', 20);
10060: end if;
10061: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
10062: fnd_message.set_token('PROC', l_proc);
10063: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
10064: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
10065: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
10058: if g_debug then
10059: hr_utility.set_location('error', 20);
10060: end if;
10061: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
10062: fnd_message.set_token('PROC', l_proc);
10063: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
10064: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
10065: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
10066: RAISE ben_manage_life_events.g_record_error;
10059: hr_utility.set_location('error', 20);
10060: end if;
10061: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
10062: fnd_message.set_token('PROC', l_proc);
10063: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
10064: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
10065: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
10066: RAISE ben_manage_life_events.g_record_error;
10067: END IF;
10060: end if;
10061: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
10062: fnd_message.set_token('PROC', l_proc);
10063: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
10064: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
10065: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
10066: RAISE ben_manage_life_events.g_record_error;
10067: END IF;
10068: CLOSE c_asg;
10061: fnd_message.set_name('BEN', 'BEN_92106_PRTT_NO_ASGN');
10062: fnd_message.set_token('PROC', l_proc);
10063: fnd_message.set_token('PERSON_ID', TO_CHAR(p_person_id));
10064: fnd_message.set_token('LF_EVT_OCRD_DT', TO_CHAR(p_lf_evt_ocrd_dt));
10065: fnd_message.set_token('EFFECTIVE_DATE', TO_CHAR(p_effective_date));
10066: RAISE ben_manage_life_events.g_record_error;
10067: END IF;
10068: CLOSE c_asg;
10069: --hr_utility.set_location('Before call to l_use_dflt_flag ',5550);