618: 115.281 03-Mar-06 kmahendr Added check for automatic enrollment in
619: delete_enrollment - enh
620: 115.282 13-Mar-06 kmahendr Bug#5082245 - savings plan is determined by flag
621: than opt type code
622: 115.283 16_mar-06 rtagarra Bug 5018328 :Added a check for exception l_fnd_message_exception
623: in exception block for delete_enrollment procedure.
624: 115.285 10-Apr-06 kmahendr Bug#5126242 - added a parameter to delete_prmry_care
625: 115.286 19Apr-06 rtagarra Added cursor c_crntly_enrd_flag and c_crntly_enrd_flag_unres for Bug#5018328 which checks
626: whether the deenrollment should be allowed in subsequesnt LE depending on earliest deenrollment date
1302: elsif (l_dt_correction) then
1303: p_datetrack_allow := hr_api.g_correction;
1304: else
1305: rpt_error(p_proc => l_proc, p_step => l_step);
1306: fnd_message.set_name('BEN', 'BEN_91700_DATETRACK_NOT_ALWD');
1307: fnd_message.set_token('MODE',p_desired_datetrack_mode);
1308: fnd_message.raise_error;
1309: end if;
1310: --
1303: p_datetrack_allow := hr_api.g_correction;
1304: else
1305: rpt_error(p_proc => l_proc, p_step => l_step);
1306: fnd_message.set_name('BEN', 'BEN_91700_DATETRACK_NOT_ALWD');
1307: fnd_message.set_token('MODE',p_desired_datetrack_mode);
1308: fnd_message.raise_error;
1309: end if;
1310: --
1311: if g_debug then
1304: else
1305: rpt_error(p_proc => l_proc, p_step => l_step);
1306: fnd_message.set_name('BEN', 'BEN_91700_DATETRACK_NOT_ALWD');
1307: fnd_message.set_token('MODE',p_desired_datetrack_mode);
1308: fnd_message.raise_error;
1309: end if;
1310: --
1311: if g_debug then
1312: hr_utility.set_location(' P_datetrack_allow '||P_datetrack_allow ,1234);
1737: open c_check_cvrd_in_plan;
1738: fetch c_check_cvrd_in_plan into l_exists;
1739: if c_check_cvrd_in_plan%found then
1740: close c_check_cvrd_in_plan;
1741: fnd_message.set_name('BEN','BEN_92243_CVRD_IN_PLAN');
1742: fnd_message.raise_error;
1743: end if;
1744: close c_check_cvrd_in_plan;
1745: end if;
1738: fetch c_check_cvrd_in_plan into l_exists;
1739: if c_check_cvrd_in_plan%found then
1740: close c_check_cvrd_in_plan;
1741: fnd_message.set_name('BEN','BEN_92243_CVRD_IN_PLAN');
1742: fnd_message.raise_error;
1743: end if;
1744: close c_check_cvrd_in_plan;
1745: end if;
1746: --
1771: if c_pen%notfound then
1772: l_step := 90;
1773: close c_pen;
1774: rpt_error(p_proc => l_proc, p_step => l_step);
1775: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1776: fnd_message.set_token('PROC',l_proc);
1777: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1778: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1779: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1772: l_step := 90;
1773: close c_pen;
1774: rpt_error(p_proc => l_proc, p_step => l_step);
1775: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1776: fnd_message.set_token('PROC',l_proc);
1777: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1778: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1779: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1780: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1773: close c_pen;
1774: rpt_error(p_proc => l_proc, p_step => l_step);
1775: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1776: fnd_message.set_token('PROC',l_proc);
1777: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1778: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1779: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1780: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1781: fnd_message.raise_error;
1774: rpt_error(p_proc => l_proc, p_step => l_step);
1775: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1776: fnd_message.set_token('PROC',l_proc);
1777: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1778: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1779: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1780: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1781: fnd_message.raise_error;
1782: else
1775: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1776: fnd_message.set_token('PROC',l_proc);
1777: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1778: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1779: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1780: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1781: fnd_message.raise_error;
1782: else
1783: close c_pen;
1776: fnd_message.set_token('PROC',l_proc);
1777: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1778: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1779: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1780: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1781: fnd_message.raise_error;
1782: else
1783: close c_pen;
1784: if (p_datetrack_mode = hr_api.g_correction) then
1777: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1778: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1779: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1780: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1781: fnd_message.raise_error;
1782: else
1783: close c_pen;
1784: if (p_datetrack_mode = hr_api.g_correction) then
1785: l_effective_date := l_pen_o.effective_start_date;
5282: if g_debug then
5283: hr_utility.set_location('BEN_91457_ELCTBL_CHC_NOT_FOUND id:'||
5284: to_char(p_elig_per_elctbl_chc_id), 15);
5285: end if;
5286: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
5287: fnd_message.set_token('ID', to_char(p_elig_per_elctbl_chc_id) );
5288: fnd_message.set_token('PROC','2:'||l_proc );
5289: fnd_message.raise_error;
5290: end if;
5283: hr_utility.set_location('BEN_91457_ELCTBL_CHC_NOT_FOUND id:'||
5284: to_char(p_elig_per_elctbl_chc_id), 15);
5285: end if;
5286: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
5287: fnd_message.set_token('ID', to_char(p_elig_per_elctbl_chc_id) );
5288: fnd_message.set_token('PROC','2:'||l_proc );
5289: fnd_message.raise_error;
5290: end if;
5291: close c_epe;
5284: to_char(p_elig_per_elctbl_chc_id), 15);
5285: end if;
5286: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
5287: fnd_message.set_token('ID', to_char(p_elig_per_elctbl_chc_id) );
5288: fnd_message.set_token('PROC','2:'||l_proc );
5289: fnd_message.raise_error;
5290: end if;
5291: close c_epe;
5292: else
5285: end if;
5286: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
5287: fnd_message.set_token('ID', to_char(p_elig_per_elctbl_chc_id) );
5288: fnd_message.set_token('PROC','2:'||l_proc );
5289: fnd_message.raise_error;
5290: end if;
5291: close c_epe;
5292: else
5293: l_epe.elig_per_elctbl_chc_id := NULL;
5327: l_level := 'PL';
5328: end if;
5329: if l_level not in ('PL', 'PGM', 'PTIP') then
5330: rpt_error(p_proc => l_proc, p_step => l_step);
5331: fnd_message.set_name('BEN', 'BEN_91712_INVALID_DP_DSGN_LVL');
5332: fnd_message.set_token('LVL', l_level);
5333: end if;
5334: else
5335: l_level := 'PL';
5328: end if;
5329: if l_level not in ('PL', 'PGM', 'PTIP') then
5330: rpt_error(p_proc => l_proc, p_step => l_step);
5331: fnd_message.set_name('BEN', 'BEN_91712_INVALID_DP_DSGN_LVL');
5332: fnd_message.set_token('LVL', l_level);
5333: end if;
5334: else
5335: l_level := 'PL';
5336: end if;
5697: fetch c_pen into l_pen;
5698: if c_pen%notfound then
5699: close c_pen;
5700: rpt_error(p_proc => l_proc, p_step => l_step);
5701: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5702: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5703: fnd_message.set_token('PROC',l_proc);
5704: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5705: fnd_message.set_token('LER_ID', null);
5698: if c_pen%notfound then
5699: close c_pen;
5700: rpt_error(p_proc => l_proc, p_step => l_step);
5701: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5702: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5703: fnd_message.set_token('PROC',l_proc);
5704: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5705: fnd_message.set_token('LER_ID', null);
5706: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5699: close c_pen;
5700: rpt_error(p_proc => l_proc, p_step => l_step);
5701: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5702: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5703: fnd_message.set_token('PROC',l_proc);
5704: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5705: fnd_message.set_token('LER_ID', null);
5706: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5707: fnd_message.raise_error;
5700: rpt_error(p_proc => l_proc, p_step => l_step);
5701: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5702: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5703: fnd_message.set_token('PROC',l_proc);
5704: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5705: fnd_message.set_token('LER_ID', null);
5706: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5707: fnd_message.raise_error;
5708: else
5701: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5702: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5703: fnd_message.set_token('PROC',l_proc);
5704: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5705: fnd_message.set_token('LER_ID', null);
5706: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5707: fnd_message.raise_error;
5708: else
5709: --
5702: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5703: fnd_message.set_token('PROC',l_proc);
5704: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5705: fnd_message.set_token('LER_ID', null);
5706: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5707: fnd_message.raise_error;
5708: else
5709: --
5710: open c_epe;
5703: fnd_message.set_token('PROC',l_proc);
5704: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5705: fnd_message.set_token('LER_ID', null);
5706: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5707: fnd_message.raise_error;
5708: else
5709: --
5710: open c_epe;
5711: fetch c_epe into l_pen.elig_per_elctbl_chc_id,
5986: -- A validation or unexpected error has occured
5987: --
5988: ROLLBACK TO void_enrollment;
5989: rpt_error(p_proc => l_proc, p_step => l_step);
5990: fnd_message.raise_error;
5991: --
5992: end void_enrollment;
5993: --
5994: -- ----------------------------------------------------------------------------
6012: ,p_enrt_cvg_thru_dt in date default null
6013: ,p_mode in varchar2 default null)
6014: is
6015: --
6016: l_fnd_message_exception exception;
6017: -- Get result and choice information for row we are trying to end.
6018: --
6019: cursor c_pen is
6020: select pen.pl_id
6898: fetch c_pen into l_pen;
6899: if c_pen%notfound then
6900: close c_pen;
6901: rpt_error(p_proc => l_proc, p_step => l_step);
6902: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
6903: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
6904: fnd_message.set_token('PROC',l_proc);
6905: fnd_message.set_token('PERSON_ID', null);
6906: fnd_message.set_token('LER_ID', null);
6899: if c_pen%notfound then
6900: close c_pen;
6901: rpt_error(p_proc => l_proc, p_step => l_step);
6902: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
6903: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
6904: fnd_message.set_token('PROC',l_proc);
6905: fnd_message.set_token('PERSON_ID', null);
6906: fnd_message.set_token('LER_ID', null);
6907: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
6900: close c_pen;
6901: rpt_error(p_proc => l_proc, p_step => l_step);
6902: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
6903: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
6904: fnd_message.set_token('PROC',l_proc);
6905: fnd_message.set_token('PERSON_ID', null);
6906: fnd_message.set_token('LER_ID', null);
6907: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
6908: -- fnd_message.raise_error;
6901: rpt_error(p_proc => l_proc, p_step => l_step);
6902: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
6903: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
6904: fnd_message.set_token('PROC',l_proc);
6905: fnd_message.set_token('PERSON_ID', null);
6906: fnd_message.set_token('LER_ID', null);
6907: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
6908: -- fnd_message.raise_error;
6909: raise l_fnd_message_exception;
6902: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
6903: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
6904: fnd_message.set_token('PROC',l_proc);
6905: fnd_message.set_token('PERSON_ID', null);
6906: fnd_message.set_token('LER_ID', null);
6907: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
6908: -- fnd_message.raise_error;
6909: raise l_fnd_message_exception;
6910:
6903: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
6904: fnd_message.set_token('PROC',l_proc);
6905: fnd_message.set_token('PERSON_ID', null);
6906: fnd_message.set_token('LER_ID', null);
6907: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
6908: -- fnd_message.raise_error;
6909: raise l_fnd_message_exception;
6910:
6911: end if;
6904: fnd_message.set_token('PROC',l_proc);
6905: fnd_message.set_token('PERSON_ID', null);
6906: fnd_message.set_token('LER_ID', null);
6907: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
6908: -- fnd_message.raise_error;
6909: raise l_fnd_message_exception;
6910:
6911: end if;
6912: close c_pen;
6905: fnd_message.set_token('PERSON_ID', null);
6906: fnd_message.set_token('LER_ID', null);
6907: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
6908: -- fnd_message.raise_error;
6909: raise l_fnd_message_exception;
6910:
6911: end if;
6912: close c_pen;
6913: --
6924: close c_crntly_enrd_flag;
6925:
6926: --Bug#5018328
6927: if l_crntly_enrd_flag = 'Y' and l_ler_type_cd <> 'SCHEDDU' then
6928: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6929: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6930: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6931: -- fnd_message.raise_error;
6932: raise l_fnd_message_exception;
6925:
6926: --Bug#5018328
6927: if l_crntly_enrd_flag = 'Y' and l_ler_type_cd <> 'SCHEDDU' then
6928: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6929: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6930: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6931: -- fnd_message.raise_error;
6932: raise l_fnd_message_exception;
6933: end if;
6926: --Bug#5018328
6927: if l_crntly_enrd_flag = 'Y' and l_ler_type_cd <> 'SCHEDDU' then
6928: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6929: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6930: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6931: -- fnd_message.raise_error;
6932: raise l_fnd_message_exception;
6933: end if;
6934:
6927: if l_crntly_enrd_flag = 'Y' and l_ler_type_cd <> 'SCHEDDU' then
6928: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6929: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6930: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6931: -- fnd_message.raise_error;
6932: raise l_fnd_message_exception;
6933: end if;
6934:
6935: open c_crntly_enrd_flag_unres(l_pen.elig_per_elctbl_chc_id);
6928: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6929: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6930: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6931: -- fnd_message.raise_error;
6932: raise l_fnd_message_exception;
6933: end if;
6934:
6935: open c_crntly_enrd_flag_unres(l_pen.elig_per_elctbl_chc_id);
6936: fetch c_crntly_enrd_flag_unres into l_typ_cd;
6936: fetch c_crntly_enrd_flag_unres into l_typ_cd;
6937: close c_crntly_enrd_flag_unres;
6938:
6939: if l_typ_cd='SCHEDDU' then
6940: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6941: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6942: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6943: -- fnd_message.raise_error;
6944: raise l_fnd_message_exception;
6937: close c_crntly_enrd_flag_unres;
6938:
6939: if l_typ_cd='SCHEDDU' then
6940: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6941: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6942: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6943: -- fnd_message.raise_error;
6944: raise l_fnd_message_exception;
6945: end if; */
6938:
6939: if l_typ_cd='SCHEDDU' then
6940: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6941: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6942: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6943: -- fnd_message.raise_error;
6944: raise l_fnd_message_exception;
6945: end if; */
6946: ---Bug 7458990
6939: if l_typ_cd='SCHEDDU' then
6940: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6941: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6942: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6943: -- fnd_message.raise_error;
6944: raise l_fnd_message_exception;
6945: end if; */
6946: ---Bug 7458990
6947:
6940: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
6941: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
6942: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
6943: -- fnd_message.raise_error;
6944: raise l_fnd_message_exception;
6945: end if; */
6946: ---Bug 7458990
6947:
6948:
6961: --
6962: --Bug 5567840 added check for imputed income plan
6963: if l_pen.auto_enrt_flag = 'Y' and l_pen.elctbl_flag = 'N' and l_pen.imptd_incm_calc_cd is null then
6964: --
6965: fnd_message.set_name('BEN','BEN_94596_DEENROL_NOT_ALL');
6966: fnd_message.set_token('PLANNAME', l_pen.pl_name);
6967: -- fnd_message.raise_error;
6968: raise l_fnd_message_exception;
6969:
6962: --Bug 5567840 added check for imputed income plan
6963: if l_pen.auto_enrt_flag = 'Y' and l_pen.elctbl_flag = 'N' and l_pen.imptd_incm_calc_cd is null then
6964: --
6965: fnd_message.set_name('BEN','BEN_94596_DEENROL_NOT_ALL');
6966: fnd_message.set_token('PLANNAME', l_pen.pl_name);
6967: -- fnd_message.raise_error;
6968: raise l_fnd_message_exception;
6969:
6970: --
6963: if l_pen.auto_enrt_flag = 'Y' and l_pen.elctbl_flag = 'N' and l_pen.imptd_incm_calc_cd is null then
6964: --
6965: fnd_message.set_name('BEN','BEN_94596_DEENROL_NOT_ALL');
6966: fnd_message.set_token('PLANNAME', l_pen.pl_name);
6967: -- fnd_message.raise_error;
6968: raise l_fnd_message_exception;
6969:
6970: --
6971: end if;
6964: --
6965: fnd_message.set_name('BEN','BEN_94596_DEENROL_NOT_ALL');
6966: fnd_message.set_token('PLANNAME', l_pen.pl_name);
6967: -- fnd_message.raise_error;
6968: raise l_fnd_message_exception;
6969:
6970: --
6971: end if;
6972: --
7195:
7196: --Removed because the below condition is satisfied always.Bug : 6683229
7197:
7198: /* if l_other_pen_rec.prtt_enrt_rslt_id is null then
7199: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7200: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7201: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7202: -- fnd_message.raise_error;
7203: raise l_fnd_message_exception;
7196: --Removed because the below condition is satisfied always.Bug : 6683229
7197:
7198: /* if l_other_pen_rec.prtt_enrt_rslt_id is null then
7199: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7200: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7201: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7202: -- fnd_message.raise_error;
7203: raise l_fnd_message_exception;
7204: End if;
7197:
7198: /* if l_other_pen_rec.prtt_enrt_rslt_id is null then
7199: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7200: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7201: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7202: -- fnd_message.raise_error;
7203: raise l_fnd_message_exception;
7204: End if;
7205: */
7198: /* if l_other_pen_rec.prtt_enrt_rslt_id is null then
7199: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7200: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7201: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7202: -- fnd_message.raise_error;
7203: raise l_fnd_message_exception;
7204: End if;
7205: */
7206: --- Bug : 6683229
7199: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7200: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7201: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7202: -- fnd_message.raise_error;
7203: raise l_fnd_message_exception;
7204: End if;
7205: */
7206: --- Bug : 6683229
7207:
7296: hr_utility.set_location('result ' || l_other_pen_rec.prtt_enrt_rslt_id ,161);
7297: end if;
7298: if l_other_pen_rec.prtt_enrt_rslt_id is null/* or l_crntly_enrd_flag='Y'*/ then -------7458990
7299: hr_utility.set_location('entering',9999);
7300: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7301: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7302: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7303: -- fnd_message.raise_error;
7304: raise l_fnd_message_exception;
7297: end if;
7298: if l_other_pen_rec.prtt_enrt_rslt_id is null/* or l_crntly_enrd_flag='Y'*/ then -------7458990
7299: hr_utility.set_location('entering',9999);
7300: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7301: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7302: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7303: -- fnd_message.raise_error;
7304: raise l_fnd_message_exception;
7305:
7298: if l_other_pen_rec.prtt_enrt_rslt_id is null/* or l_crntly_enrd_flag='Y'*/ then -------7458990
7299: hr_utility.set_location('entering',9999);
7300: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7301: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7302: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7303: -- fnd_message.raise_error;
7304: raise l_fnd_message_exception;
7305:
7306: End if;
7299: hr_utility.set_location('entering',9999);
7300: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7301: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7302: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7303: -- fnd_message.raise_error;
7304: raise l_fnd_message_exception;
7305:
7306: End if;
7307: end if ;
7300: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7301: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7302: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7303: -- fnd_message.raise_error;
7304: raise l_fnd_message_exception;
7305:
7306: End if;
7307: end if ;
7308: --
7615: End if;
7616: --
7617: If l_enrt_cvg_end_dt is NULL then
7618: rpt_error(p_proc => l_proc, p_step => l_step);
7619: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
7620: -- fnd_message.raise_error;
7621: raise l_fnd_message_exception;
7622:
7623: End if;
7616: --
7617: If l_enrt_cvg_end_dt is NULL then
7618: rpt_error(p_proc => l_proc, p_step => l_step);
7619: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
7620: -- fnd_message.raise_error;
7621: raise l_fnd_message_exception;
7622:
7623: End if;
7624: --
7617: If l_enrt_cvg_end_dt is NULL then
7618: rpt_error(p_proc => l_proc, p_step => l_step);
7619: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
7620: -- fnd_message.raise_error;
7621: raise l_fnd_message_exception;
7622:
7623: End if;
7624: --
7625: If l_rt_end_dt is NULL then
7623: End if;
7624: --
7625: If l_rt_end_dt is NULL then
7626: rpt_error(p_proc => l_proc, p_step => l_step);
7627: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
7628: -- fnd_message.raise_error;
7629: raise l_fnd_message_exception;
7630: end if;
7631: --
7624: --
7625: If l_rt_end_dt is NULL then
7626: rpt_error(p_proc => l_proc, p_step => l_step);
7627: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
7628: -- fnd_message.raise_error;
7629: raise l_fnd_message_exception;
7630: end if;
7631: --
7632: -- when the result is voided the participant rate rows also should be voided as sometimes
7625: If l_rt_end_dt is NULL then
7626: rpt_error(p_proc => l_proc, p_step => l_step);
7627: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
7628: -- fnd_message.raise_error;
7629: raise l_fnd_message_exception;
7630: end if;
7631: --
7632: -- when the result is voided the participant rate rows also should be voided as sometimes
7633: -- the rate end date comes greater or equal to rate start date which is not voiding the rate rows
8228: End if;
8229: --
8230: If l_enrt_cvg_end_dt is NULL then
8231: rpt_error(p_proc => l_proc, p_step => l_step);
8232: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
8233: -- fnd_message.raise_error;
8234: raise l_fnd_message_exception;
8235: End if;
8236: --
8229: --
8230: If l_enrt_cvg_end_dt is NULL then
8231: rpt_error(p_proc => l_proc, p_step => l_step);
8232: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
8233: -- fnd_message.raise_error;
8234: raise l_fnd_message_exception;
8235: End if;
8236: --
8237: If l_rt_end_dt is NULL then
8230: If l_enrt_cvg_end_dt is NULL then
8231: rpt_error(p_proc => l_proc, p_step => l_step);
8232: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
8233: -- fnd_message.raise_error;
8234: raise l_fnd_message_exception;
8235: End if;
8236: --
8237: If l_rt_end_dt is NULL then
8238: rpt_error(p_proc => l_proc, p_step => l_step);
8235: End if;
8236: --
8237: If l_rt_end_dt is NULL then
8238: rpt_error(p_proc => l_proc, p_step => l_step);
8239: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
8240: -- fnd_message.raise_error;
8241: raise l_fnd_message_exception;
8242: end if;
8243: --
8236: --
8237: If l_rt_end_dt is NULL then
8238: rpt_error(p_proc => l_proc, p_step => l_step);
8239: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
8240: -- fnd_message.raise_error;
8241: raise l_fnd_message_exception;
8242: end if;
8243: --
8244: -- Update rt_end_dt in prtt_rate_val table
8237: If l_rt_end_dt is NULL then
8238: rpt_error(p_proc => l_proc, p_step => l_step);
8239: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
8240: -- fnd_message.raise_error;
8241: raise l_fnd_message_exception;
8242: end if;
8243: --
8244: -- Update rt_end_dt in prtt_rate_val table
8245: --
9107: if g_debug then
9108: hr_utility.set_location(' Leaving:'||l_proc, 80);
9109: end if;
9110: --
9111: when l_fnd_message_exception then
9112: ROLLBACK TO delete_enrollment;
9113: rpt_error(p_proc => l_proc, p_step => l_step);
9114: p_effective_start_date := null; --nocopy change
9115: p_effective_end_date := null; --nocopy change
9112: ROLLBACK TO delete_enrollment;
9113: rpt_error(p_proc => l_proc, p_step => l_step);
9114: p_effective_start_date := null; --nocopy change
9115: p_effective_end_date := null; --nocopy change
9116: fnd_message.raise_error;
9117: --
9118: --Bug 5664907
9119: when app_exception.application_exception then
9120: ROLLBACK TO delete_enrollment;
9120: ROLLBACK TO delete_enrollment;
9121: rpt_error(p_proc => l_proc, p_step => l_step);
9122: p_effective_start_date := null; --nocopy change
9123: p_effective_end_date := null; --nocopy change
9124: fnd_message.raise_error;
9125: --
9126: --Bug 5664907
9127: when others then
9128: --
9132: ROLLBACK TO delete_enrollment;
9133: rpt_error(p_proc => l_proc, p_step => l_step);
9134: p_effective_start_date := null; --nocopy change
9135: p_effective_end_date := null; --nocopy change
9136: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
9137: fnd_message.set_token('2',substr(sqlerrm,1,500)); -- 4695708
9138: fnd_message.raise_error;
9139: --
9140: end delete_enrollment;
9133: rpt_error(p_proc => l_proc, p_step => l_step);
9134: p_effective_start_date := null; --nocopy change
9135: p_effective_end_date := null; --nocopy change
9136: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
9137: fnd_message.set_token('2',substr(sqlerrm,1,500)); -- 4695708
9138: fnd_message.raise_error;
9139: --
9140: end delete_enrollment;
9141: --
9134: p_effective_start_date := null; --nocopy change
9135: p_effective_end_date := null; --nocopy change
9136: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
9137: fnd_message.set_token('2',substr(sqlerrm,1,500)); -- 4695708
9138: fnd_message.raise_error;
9139: --
9140: end delete_enrollment;
9141: --
9142: -- --------------------------------------------------------------------------
9278: l_step := 20;
9279: --
9280: If p_dsgn_thru_dt is null then
9281: rpt_error(p_proc => l_proc, p_step => l_step);
9282: fnd_message.set_name('BEN','BEN_91704_NOT_DET_DP_CVG_E_DT');
9283: fnd_message.raise_error;
9284: End if;
9285: --
9286: if l_per_in_ler_id is null then
9279: --
9280: If p_dsgn_thru_dt is null then
9281: rpt_error(p_proc => l_proc, p_step => l_step);
9282: fnd_message.set_name('BEN','BEN_91704_NOT_DET_DP_CVG_E_DT');
9283: fnd_message.raise_error;
9284: End if;
9285: --
9286: if l_per_in_ler_id is null then
9287: l_per_in_ler_id := orec.per_in_ler_id;
9365: exception
9366: --
9367: when others then
9368: rpt_error(p_proc => l_proc, p_step => l_step);
9369: fnd_message.raise_error;
9370: End unhook_bnf;
9371: --
9372:
9373:
9556: l_step := 20;
9557: --
9558: If p_cvg_thru_dt is null then
9559: rpt_error(p_proc => l_proc, p_step => l_step);
9560: fnd_message.set_name('BEN','BEN_91704_NOT_DET_DP_CVG_E_DT');
9561: fnd_message.raise_error;
9562: End if;
9563: --
9564: if l_per_in_ler_id is null then
9557: --
9558: If p_cvg_thru_dt is null then
9559: rpt_error(p_proc => l_proc, p_step => l_step);
9560: fnd_message.set_name('BEN','BEN_91704_NOT_DET_DP_CVG_E_DT');
9561: fnd_message.raise_error;
9562: End if;
9563: --
9564: if l_per_in_ler_id is null then
9565: l_per_in_ler_id := orec.per_in_ler_id;
9692: exception
9693: --
9694: when others then
9695: rpt_error(p_proc => l_proc, p_step => l_step);
9696: fnd_message.raise_error;
9697: End unhook_dpnt;
9698: --
9699: -- ----------------------------------------------------------------------------
9700: -- |-------------------------------< lck >------------------------------------|
9885: if l_acrs_ptip.mn_cvg_alwd_amt is not null and
9886: nvl(l_total_amt,0) < l_acrs_ptip.mn_cvg_alwd_amt and p_minimum_check_flag ='Y' then
9887:
9888: --
9889: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
9890: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9891: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
9892: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9893: fnd_message.raise_error;
9886: nvl(l_total_amt,0) < l_acrs_ptip.mn_cvg_alwd_amt and p_minimum_check_flag ='Y' then
9887:
9888: --
9889: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
9890: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9891: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
9892: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9893: fnd_message.raise_error;
9894: --
9887:
9888: --
9889: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
9890: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9891: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
9892: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9893: fnd_message.raise_error;
9894: --
9895: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
9888: --
9889: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
9890: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9891: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
9892: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9893: fnd_message.raise_error;
9894: --
9895: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
9896: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
9889: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
9890: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9891: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
9892: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9893: fnd_message.raise_error;
9894: --
9895: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
9896: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
9897: --
9894: --
9895: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
9896: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
9897: --
9898: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9899: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9900: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9901: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9902: fnd_message.raise_error;
9895: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
9896: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
9897: --
9898: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9899: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9900: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9901: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9902: fnd_message.raise_error;
9903: --
9896: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
9897: --
9898: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9899: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9900: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9901: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9902: fnd_message.raise_error;
9903: --
9904: end if;
9897: --
9898: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9899: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9900: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9901: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9902: fnd_message.raise_error;
9903: --
9904: end if;
9905: --
9898: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9899: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9900: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9901: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9902: fnd_message.raise_error;
9903: --
9904: end if;
9905: --
9906: --Bug 3695005 Coverage Across Plan type considering
9915: --
9916: if l_acrs_ptip.mx_cvg_alwd_amt is not null and
9917: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
9918: --
9919: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9920: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9921: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9922: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9923: fnd_message.raise_error;
9916: if l_acrs_ptip.mx_cvg_alwd_amt is not null and
9917: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
9918: --
9919: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9920: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9921: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9922: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9923: fnd_message.raise_error;
9924: --
9917: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
9918: --
9919: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9920: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9921: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9922: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9923: fnd_message.raise_error;
9924: --
9925: end if;
9918: --
9919: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9920: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9921: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9922: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9923: fnd_message.raise_error;
9924: --
9925: end if;
9926: --
9919: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
9920: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
9921: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
9922: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
9923: fnd_message.raise_error;
9924: --
9925: end if;
9926: --
9927: if g_debug then
10812: hr_utility.set_location('Exception:'||l_proc, 100);
10813: end if;
10814: hr_utility.set_location ('Other Error in delete_enrollment_w : '|| sqlerrm , 89);
10815: --Bug 4387247
10816: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
10817: fnd_message.set_token('2',substr(sqlerrm,1,200));
10818: fnd_msg_pub.add;
10819: --
10820: end delete_enrollment_w;
10813: end if;
10814: hr_utility.set_location ('Other Error in delete_enrollment_w : '|| sqlerrm , 89);
10815: --Bug 4387247
10816: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
10817: fnd_message.set_token('2',substr(sqlerrm,1,200));
10818: fnd_msg_pub.add;
10819: --
10820: end delete_enrollment_w;
10821: --