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
1375: elsif (l_dt_correction) then
1376: p_datetrack_allow := hr_api.g_correction;
1377: else
1378: rpt_error(p_proc => l_proc, p_step => l_step);
1379: fnd_message.set_name('BEN', 'BEN_91700_DATETRACK_NOT_ALWD');
1380: fnd_message.set_token('MODE',p_desired_datetrack_mode);
1381: fnd_message.raise_error;
1382: end if;
1383: --
1376: p_datetrack_allow := hr_api.g_correction;
1377: else
1378: rpt_error(p_proc => l_proc, p_step => l_step);
1379: fnd_message.set_name('BEN', 'BEN_91700_DATETRACK_NOT_ALWD');
1380: fnd_message.set_token('MODE',p_desired_datetrack_mode);
1381: fnd_message.raise_error;
1382: end if;
1383: --
1384: if g_debug then
1377: else
1378: rpt_error(p_proc => l_proc, p_step => l_step);
1379: fnd_message.set_name('BEN', 'BEN_91700_DATETRACK_NOT_ALWD');
1380: fnd_message.set_token('MODE',p_desired_datetrack_mode);
1381: fnd_message.raise_error;
1382: end if;
1383: --
1384: if g_debug then
1385: hr_utility.set_location(' P_datetrack_allow '||P_datetrack_allow ,1234);
1810: open c_check_cvrd_in_plan;
1811: fetch c_check_cvrd_in_plan into l_exists;
1812: if c_check_cvrd_in_plan%found then
1813: close c_check_cvrd_in_plan;
1814: fnd_message.set_name('BEN','BEN_92243_CVRD_IN_PLAN');
1815: fnd_message.raise_error;
1816: end if;
1817: close c_check_cvrd_in_plan;
1818: end if;
1811: fetch c_check_cvrd_in_plan into l_exists;
1812: if c_check_cvrd_in_plan%found then
1813: close c_check_cvrd_in_plan;
1814: fnd_message.set_name('BEN','BEN_92243_CVRD_IN_PLAN');
1815: fnd_message.raise_error;
1816: end if;
1817: close c_check_cvrd_in_plan;
1818: end if;
1819: --
1844: if c_pen%notfound then
1845: l_step := 90;
1846: close c_pen;
1847: rpt_error(p_proc => l_proc, p_step => l_step);
1848: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1849: fnd_message.set_token('PROC',l_proc);
1850: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1851: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1852: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1845: l_step := 90;
1846: close c_pen;
1847: rpt_error(p_proc => l_proc, p_step => l_step);
1848: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1849: fnd_message.set_token('PROC',l_proc);
1850: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1851: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1852: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1853: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1846: close c_pen;
1847: rpt_error(p_proc => l_proc, p_step => l_step);
1848: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1849: fnd_message.set_token('PROC',l_proc);
1850: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1851: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1852: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1853: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1854: fnd_message.raise_error;
1847: rpt_error(p_proc => l_proc, p_step => l_step);
1848: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1849: fnd_message.set_token('PROC',l_proc);
1850: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1851: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1852: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1853: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1854: fnd_message.raise_error;
1855: else
1848: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
1849: fnd_message.set_token('PROC',l_proc);
1850: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1851: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1852: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1853: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1854: fnd_message.raise_error;
1855: else
1856: close c_pen;
1849: fnd_message.set_token('PROC',l_proc);
1850: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1851: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1852: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1853: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1854: fnd_message.raise_error;
1855: else
1856: close c_pen;
1857: if (p_datetrack_mode = hr_api.g_correction) then
1850: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id_o));
1851: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
1852: fnd_message.set_token('LER_ID', to_char(p_ler_id));
1853: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
1854: fnd_message.raise_error;
1855: else
1856: close c_pen;
1857: if (p_datetrack_mode = hr_api.g_correction) then
1858: l_effective_date := l_pen_o.effective_start_date;
5571: if g_debug then
5572: hr_utility.set_location('BEN_91457_ELCTBL_CHC_NOT_FOUND id:'||
5573: to_char(p_elig_per_elctbl_chc_id), 15);
5574: end if;
5575: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
5576: fnd_message.set_token('ID', to_char(p_elig_per_elctbl_chc_id) );
5577: fnd_message.set_token('PROC','2:'||l_proc );
5578: fnd_message.raise_error;
5579: end if;
5572: hr_utility.set_location('BEN_91457_ELCTBL_CHC_NOT_FOUND id:'||
5573: to_char(p_elig_per_elctbl_chc_id), 15);
5574: end if;
5575: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
5576: fnd_message.set_token('ID', to_char(p_elig_per_elctbl_chc_id) );
5577: fnd_message.set_token('PROC','2:'||l_proc );
5578: fnd_message.raise_error;
5579: end if;
5580: close c_epe;
5573: to_char(p_elig_per_elctbl_chc_id), 15);
5574: end if;
5575: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
5576: fnd_message.set_token('ID', to_char(p_elig_per_elctbl_chc_id) );
5577: fnd_message.set_token('PROC','2:'||l_proc );
5578: fnd_message.raise_error;
5579: end if;
5580: close c_epe;
5581: else
5574: end if;
5575: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
5576: fnd_message.set_token('ID', to_char(p_elig_per_elctbl_chc_id) );
5577: fnd_message.set_token('PROC','2:'||l_proc );
5578: fnd_message.raise_error;
5579: end if;
5580: close c_epe;
5581: else
5582: l_epe.elig_per_elctbl_chc_id := NULL;
5616: l_level := 'PL';
5617: end if;
5618: if l_level not in ('PL', 'PGM', 'PTIP') then
5619: rpt_error(p_proc => l_proc, p_step => l_step);
5620: fnd_message.set_name('BEN', 'BEN_91712_INVALID_DP_DSGN_LVL');
5621: fnd_message.set_token('LVL', l_level);
5622: end if;
5623: else
5624: l_level := 'PL';
5617: end if;
5618: if l_level not in ('PL', 'PGM', 'PTIP') then
5619: rpt_error(p_proc => l_proc, p_step => l_step);
5620: fnd_message.set_name('BEN', 'BEN_91712_INVALID_DP_DSGN_LVL');
5621: fnd_message.set_token('LVL', l_level);
5622: end if;
5623: else
5624: l_level := 'PL';
5625: end if;
5986: fetch c_pen into l_pen;
5987: if c_pen%notfound then
5988: close c_pen;
5989: rpt_error(p_proc => l_proc, p_step => l_step);
5990: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5991: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5992: fnd_message.set_token('PROC',l_proc);
5993: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5994: fnd_message.set_token('LER_ID', null);
5987: if c_pen%notfound then
5988: close c_pen;
5989: rpt_error(p_proc => l_proc, p_step => l_step);
5990: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5991: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5992: fnd_message.set_token('PROC',l_proc);
5993: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5994: fnd_message.set_token('LER_ID', null);
5995: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5988: close c_pen;
5989: rpt_error(p_proc => l_proc, p_step => l_step);
5990: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5991: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5992: fnd_message.set_token('PROC',l_proc);
5993: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5994: fnd_message.set_token('LER_ID', null);
5995: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5996: fnd_message.raise_error;
5989: rpt_error(p_proc => l_proc, p_step => l_step);
5990: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5991: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5992: fnd_message.set_token('PROC',l_proc);
5993: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5994: fnd_message.set_token('LER_ID', null);
5995: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5996: fnd_message.raise_error;
5997: else
5990: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
5991: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5992: fnd_message.set_token('PROC',l_proc);
5993: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5994: fnd_message.set_token('LER_ID', null);
5995: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5996: fnd_message.raise_error;
5997: else
5998: --
5991: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
5992: fnd_message.set_token('PROC',l_proc);
5993: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5994: fnd_message.set_token('LER_ID', null);
5995: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5996: fnd_message.raise_error;
5997: else
5998: --
5999: open c_epe;
5992: fnd_message.set_token('PROC',l_proc);
5993: fnd_message.set_token('PERSON_ID', to_char(p_person_id));
5994: fnd_message.set_token('LER_ID', null);
5995: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
5996: fnd_message.raise_error;
5997: else
5998: --
5999: open c_epe;
6000: fetch c_epe into l_pen.elig_per_elctbl_chc_id,
6275: -- A validation or unexpected error has occured
6276: --
6277: ROLLBACK TO void_enrollment;
6278: rpt_error(p_proc => l_proc, p_step => l_step);
6279: fnd_message.raise_error;
6280: --
6281: end void_enrollment;
6282: --
6283: -- ----------------------------------------------------------------------------
6301: ,p_enrt_cvg_thru_dt in date default null
6302: ,p_mode in varchar2 default null)
6303: is
6304: --
6305: l_fnd_message_exception exception;
6306: -- Get result and choice information for row we are trying to end.
6307: --
6308: cursor c_pen is
6309: select pen.pl_id
7541: fetch c_pen into l_pen;
7542: if c_pen%notfound then
7543: close c_pen;
7544: rpt_error(p_proc => l_proc, p_step => l_step);
7545: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
7546: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
7547: fnd_message.set_token('PROC',l_proc);
7548: fnd_message.set_token('PERSON_ID', null);
7549: fnd_message.set_token('LER_ID', null);
7542: if c_pen%notfound then
7543: close c_pen;
7544: rpt_error(p_proc => l_proc, p_step => l_step);
7545: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
7546: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
7547: fnd_message.set_token('PROC',l_proc);
7548: fnd_message.set_token('PERSON_ID', null);
7549: fnd_message.set_token('LER_ID', null);
7550: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
7543: close c_pen;
7544: rpt_error(p_proc => l_proc, p_step => l_step);
7545: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
7546: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
7547: fnd_message.set_token('PROC',l_proc);
7548: fnd_message.set_token('PERSON_ID', null);
7549: fnd_message.set_token('LER_ID', null);
7550: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
7551: -- fnd_message.raise_error;
7544: rpt_error(p_proc => l_proc, p_step => l_step);
7545: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
7546: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
7547: fnd_message.set_token('PROC',l_proc);
7548: fnd_message.set_token('PERSON_ID', null);
7549: fnd_message.set_token('LER_ID', null);
7550: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
7551: -- fnd_message.raise_error;
7552: raise l_fnd_message_exception;
7545: fnd_message.set_name('BEN','BEN_91711_ENRT_RSLT_NOT_FND');
7546: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
7547: fnd_message.set_token('PROC',l_proc);
7548: fnd_message.set_token('PERSON_ID', null);
7549: fnd_message.set_token('LER_ID', null);
7550: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
7551: -- fnd_message.raise_error;
7552: raise l_fnd_message_exception;
7553:
7546: fnd_message.set_token('ID', to_char(p_prtt_enrt_rslt_id));
7547: fnd_message.set_token('PROC',l_proc);
7548: fnd_message.set_token('PERSON_ID', null);
7549: fnd_message.set_token('LER_ID', null);
7550: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
7551: -- fnd_message.raise_error;
7552: raise l_fnd_message_exception;
7553:
7554: end if;
7547: fnd_message.set_token('PROC',l_proc);
7548: fnd_message.set_token('PERSON_ID', null);
7549: fnd_message.set_token('LER_ID', null);
7550: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
7551: -- fnd_message.raise_error;
7552: raise l_fnd_message_exception;
7553:
7554: end if;
7555: close c_pen;
7548: fnd_message.set_token('PERSON_ID', null);
7549: fnd_message.set_token('LER_ID', null);
7550: fnd_message.set_token('EFFECTIVE_DATE',to_char(p_effective_date));
7551: -- fnd_message.raise_error;
7552: raise l_fnd_message_exception;
7553:
7554: end if;
7555: close c_pen;
7556: --
7567: close c_crntly_enrd_flag;
7568:
7569: --Bug#5018328
7570: if l_crntly_enrd_flag = 'Y' and l_ler_type_cd <> 'SCHEDDU' then
7571: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7572: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7573: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt,calendar_aware=>2));
7574: -- fnd_message.raise_error;
7575: raise l_fnd_message_exception;
7568:
7569: --Bug#5018328
7570: if l_crntly_enrd_flag = 'Y' and l_ler_type_cd <> 'SCHEDDU' then
7571: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7572: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7573: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt,calendar_aware=>2));
7574: -- fnd_message.raise_error;
7575: raise l_fnd_message_exception;
7576: end if;
7569: --Bug#5018328
7570: if l_crntly_enrd_flag = 'Y' and l_ler_type_cd <> 'SCHEDDU' then
7571: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7572: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7573: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt,calendar_aware=>2));
7574: -- fnd_message.raise_error;
7575: raise l_fnd_message_exception;
7576: end if;
7577:
7570: if l_crntly_enrd_flag = 'Y' and l_ler_type_cd <> 'SCHEDDU' then
7571: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7572: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7573: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt,calendar_aware=>2));
7574: -- fnd_message.raise_error;
7575: raise l_fnd_message_exception;
7576: end if;
7577:
7578: open c_crntly_enrd_flag_unres(l_pen.elig_per_elctbl_chc_id);
7571: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7572: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7573: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt,calendar_aware=>2));
7574: -- fnd_message.raise_error;
7575: raise l_fnd_message_exception;
7576: end if;
7577:
7578: open c_crntly_enrd_flag_unres(l_pen.elig_per_elctbl_chc_id);
7579: fetch c_crntly_enrd_flag_unres into l_typ_cd;
7579: fetch c_crntly_enrd_flag_unres into l_typ_cd;
7580: close c_crntly_enrd_flag_unres;
7581:
7582: if l_typ_cd='SCHEDDU' then
7583: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7584: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7585: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7586: -- fnd_message.raise_error;
7587: raise l_fnd_message_exception;
7580: close c_crntly_enrd_flag_unres;
7581:
7582: if l_typ_cd='SCHEDDU' then
7583: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7584: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7585: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7586: -- fnd_message.raise_error;
7587: raise l_fnd_message_exception;
7588: end if; */
7581:
7582: if l_typ_cd='SCHEDDU' then
7583: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7584: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7585: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7586: -- fnd_message.raise_error;
7587: raise l_fnd_message_exception;
7588: end if; */
7589: ---Bug 7458990
7582: if l_typ_cd='SCHEDDU' then
7583: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7584: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7585: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7586: -- fnd_message.raise_error;
7587: raise l_fnd_message_exception;
7588: end if; */
7589: ---Bug 7458990
7590:
7583: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7584: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7585: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7586: -- fnd_message.raise_error;
7587: raise l_fnd_message_exception;
7588: end if; */
7589: ---Bug 7458990
7590:
7591:
7604: --
7605: --Bug 5567840 added check for imputed income plan
7606: if l_pen.auto_enrt_flag = 'Y' and l_pen.elctbl_flag = 'N' and l_pen.imptd_incm_calc_cd is null then
7607: --
7608: fnd_message.set_name('BEN','BEN_94596_DEENROL_NOT_ALL');
7609: fnd_message.set_token('PLANNAME', l_pen.pl_name);
7610: -- fnd_message.raise_error;
7611: raise l_fnd_message_exception;
7612:
7605: --Bug 5567840 added check for imputed income plan
7606: if l_pen.auto_enrt_flag = 'Y' and l_pen.elctbl_flag = 'N' and l_pen.imptd_incm_calc_cd is null then
7607: --
7608: fnd_message.set_name('BEN','BEN_94596_DEENROL_NOT_ALL');
7609: fnd_message.set_token('PLANNAME', l_pen.pl_name);
7610: -- fnd_message.raise_error;
7611: raise l_fnd_message_exception;
7612:
7613: --
7606: if l_pen.auto_enrt_flag = 'Y' and l_pen.elctbl_flag = 'N' and l_pen.imptd_incm_calc_cd is null then
7607: --
7608: fnd_message.set_name('BEN','BEN_94596_DEENROL_NOT_ALL');
7609: fnd_message.set_token('PLANNAME', l_pen.pl_name);
7610: -- fnd_message.raise_error;
7611: raise l_fnd_message_exception;
7612:
7613: --
7614: end if;
7607: --
7608: fnd_message.set_name('BEN','BEN_94596_DEENROL_NOT_ALL');
7609: fnd_message.set_token('PLANNAME', l_pen.pl_name);
7610: -- fnd_message.raise_error;
7611: raise l_fnd_message_exception;
7612:
7613: --
7614: end if;
7615: --
7840:
7841: --Removed because the below condition is satisfied always.Bug : 6683229
7842:
7843: /* if l_other_pen_rec.prtt_enrt_rslt_id is null then
7844: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7845: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7846: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7847: -- fnd_message.raise_error;
7848: raise l_fnd_message_exception;
7841: --Removed because the below condition is satisfied always.Bug : 6683229
7842:
7843: /* if l_other_pen_rec.prtt_enrt_rslt_id is null then
7844: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7845: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7846: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7847: -- fnd_message.raise_error;
7848: raise l_fnd_message_exception;
7849: End if;
7842:
7843: /* if l_other_pen_rec.prtt_enrt_rslt_id is null then
7844: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7845: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7846: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7847: -- fnd_message.raise_error;
7848: raise l_fnd_message_exception;
7849: End if;
7850: */
7843: /* if l_other_pen_rec.prtt_enrt_rslt_id is null then
7844: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7845: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7846: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7847: -- fnd_message.raise_error;
7848: raise l_fnd_message_exception;
7849: End if;
7850: */
7851: --- Bug : 6683229
7844: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7845: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7846: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7847: -- fnd_message.raise_error;
7848: raise l_fnd_message_exception;
7849: End if;
7850: */
7851: --- Bug : 6683229
7852:
7941: hr_utility.set_location('result ' || l_other_pen_rec.prtt_enrt_rslt_id ,161);
7942: end if;
7943: if l_other_pen_rec.prtt_enrt_rslt_id is null/* or l_crntly_enrd_flag='Y'*/ then -------7458990
7944: hr_utility.set_location('entering',9999);
7945: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7946: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7947: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7948: -- fnd_message.raise_error;
7949: raise l_fnd_message_exception;
7942: end if;
7943: if l_other_pen_rec.prtt_enrt_rslt_id is null/* or l_crntly_enrd_flag='Y'*/ then -------7458990
7944: hr_utility.set_location('entering',9999);
7945: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7946: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7947: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7948: -- fnd_message.raise_error;
7949: raise l_fnd_message_exception;
7950:
7943: if l_other_pen_rec.prtt_enrt_rslt_id is null/* or l_crntly_enrd_flag='Y'*/ then -------7458990
7944: hr_utility.set_location('entering',9999);
7945: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7946: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7947: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7948: -- fnd_message.raise_error;
7949: raise l_fnd_message_exception;
7950:
7951: End if;
7944: hr_utility.set_location('entering',9999);
7945: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7946: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7947: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7948: -- fnd_message.raise_error;
7949: raise l_fnd_message_exception;
7950:
7951: End if;
7952: end if ;
7945: fnd_message.set_name('BEN','BEN_91902_ENRT_NOT_ALWD_DELETE');
7946: fnd_message.set_token('PLANNAMEANDOPTIONNAME',l_pen.pl_name || ' '||l_pen.opt_name );
7947: fnd_message.set_token('EARLIESTDEENROLLMENTDATE',fnd_date.date_to_chardate(l_pen.erlst_deenrt_dt));
7948: -- fnd_message.raise_error;
7949: raise l_fnd_message_exception;
7950:
7951: End if;
7952: end if ;
7953: --
8508: End if;
8509: --
8510: If l_enrt_cvg_end_dt is NULL then
8511: rpt_error(p_proc => l_proc, p_step => l_step);
8512: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
8513: -- fnd_message.raise_error;
8514: raise l_fnd_message_exception;
8515:
8516: End if;
8509: --
8510: If l_enrt_cvg_end_dt is NULL then
8511: rpt_error(p_proc => l_proc, p_step => l_step);
8512: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
8513: -- fnd_message.raise_error;
8514: raise l_fnd_message_exception;
8515:
8516: End if;
8517: --
8510: If l_enrt_cvg_end_dt is NULL then
8511: rpt_error(p_proc => l_proc, p_step => l_step);
8512: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
8513: -- fnd_message.raise_error;
8514: raise l_fnd_message_exception;
8515:
8516: End if;
8517: --
8518: If l_rt_end_dt is NULL then
8516: End if;
8517: --
8518: If l_rt_end_dt is NULL then
8519: rpt_error(p_proc => l_proc, p_step => l_step);
8520: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
8521: -- fnd_message.raise_error;
8522: raise l_fnd_message_exception;
8523: end if;
8524: --
8517: --
8518: If l_rt_end_dt is NULL then
8519: rpt_error(p_proc => l_proc, p_step => l_step);
8520: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
8521: -- fnd_message.raise_error;
8522: raise l_fnd_message_exception;
8523: end if;
8524: --
8525: -- when the result is voided the participant rate rows also should be voided as sometimes
8518: If l_rt_end_dt is NULL then
8519: rpt_error(p_proc => l_proc, p_step => l_step);
8520: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
8521: -- fnd_message.raise_error;
8522: raise l_fnd_message_exception;
8523: end if;
8524: --
8525: -- when the result is voided the participant rate rows also should be voided as sometimes
8526: -- the rate end date comes greater or equal to rate start date which is not voiding the rate rows
9459: End if;
9460: --
9461: If l_enrt_cvg_end_dt is NULL then
9462: rpt_error(p_proc => l_proc, p_step => l_step);
9463: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
9464: -- fnd_message.raise_error;
9465: raise l_fnd_message_exception;
9466: End if;
9467: --
9460: --
9461: If l_enrt_cvg_end_dt is NULL then
9462: rpt_error(p_proc => l_proc, p_step => l_step);
9463: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
9464: -- fnd_message.raise_error;
9465: raise l_fnd_message_exception;
9466: End if;
9467: --
9468: If l_rt_end_dt is NULL then
9461: If l_enrt_cvg_end_dt is NULL then
9462: rpt_error(p_proc => l_proc, p_step => l_step);
9463: fnd_message.set_name('BEN','BEN_91702_NOT_DET_CVG_END_DT');
9464: -- fnd_message.raise_error;
9465: raise l_fnd_message_exception;
9466: End if;
9467: --
9468: If l_rt_end_dt is NULL then
9469: rpt_error(p_proc => l_proc, p_step => l_step);
9466: End if;
9467: --
9468: If l_rt_end_dt is NULL then
9469: rpt_error(p_proc => l_proc, p_step => l_step);
9470: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
9471: -- fnd_message.raise_error;
9472: raise l_fnd_message_exception;
9473: end if;
9474: --
9467: --
9468: If l_rt_end_dt is NULL then
9469: rpt_error(p_proc => l_proc, p_step => l_step);
9470: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
9471: -- fnd_message.raise_error;
9472: raise l_fnd_message_exception;
9473: end if;
9474: --
9475: -- Update rt_end_dt in prtt_rate_val table
9468: If l_rt_end_dt is NULL then
9469: rpt_error(p_proc => l_proc, p_step => l_step);
9470: fnd_message.set_name('BEN','BEN_91703_NOT_DET_RATE_END_DT');
9471: -- fnd_message.raise_error;
9472: raise l_fnd_message_exception;
9473: end if;
9474: --
9475: -- Update rt_end_dt in prtt_rate_val table
9476: --
10701: if g_debug then
10702: hr_utility.set_location(' Leaving:'||l_proc, 80);
10703: end if;
10704: --
10705: when l_fnd_message_exception then
10706: ROLLBACK TO delete_enrollment;
10707: rpt_error(p_proc => l_proc, p_step => l_step);
10708: p_effective_start_date := null; --nocopy change
10709: p_effective_end_date := null; --nocopy change
10706: ROLLBACK TO delete_enrollment;
10707: rpt_error(p_proc => l_proc, p_step => l_step);
10708: p_effective_start_date := null; --nocopy change
10709: p_effective_end_date := null; --nocopy change
10710: fnd_message.raise_error;
10711: --
10712: --Bug 5664907
10713: when app_exception.application_exception then
10714: ROLLBACK TO delete_enrollment;
10714: ROLLBACK TO delete_enrollment;
10715: rpt_error(p_proc => l_proc, p_step => l_step);
10716: p_effective_start_date := null; --nocopy change
10717: p_effective_end_date := null; --nocopy change
10718: fnd_message.raise_error;
10719: --
10720: --Bug 5664907
10721: when others then
10722: --
10726: ROLLBACK TO delete_enrollment;
10727: rpt_error(p_proc => l_proc, p_step => l_step);
10728: p_effective_start_date := null; --nocopy change
10729: p_effective_end_date := null; --nocopy change
10730: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
10731: fnd_message.set_token('2',substr(sqlerrm,1,500)); -- 4695708
10732: fnd_message.raise_error;
10733: --
10734: end delete_enrollment;
10727: rpt_error(p_proc => l_proc, p_step => l_step);
10728: p_effective_start_date := null; --nocopy change
10729: p_effective_end_date := null; --nocopy change
10730: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
10731: fnd_message.set_token('2',substr(sqlerrm,1,500)); -- 4695708
10732: fnd_message.raise_error;
10733: --
10734: end delete_enrollment;
10735: --
10728: p_effective_start_date := null; --nocopy change
10729: p_effective_end_date := null; --nocopy change
10730: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
10731: fnd_message.set_token('2',substr(sqlerrm,1,500)); -- 4695708
10732: fnd_message.raise_error;
10733: --
10734: end delete_enrollment;
10735: --
10736: -- --------------------------------------------------------------------------
10872: l_step := 20;
10873: --
10874: If p_dsgn_thru_dt is null then
10875: rpt_error(p_proc => l_proc, p_step => l_step);
10876: fnd_message.set_name('BEN','BEN_91704_NOT_DET_DP_CVG_E_DT');
10877: fnd_message.raise_error;
10878: End if;
10879: --
10880: if l_per_in_ler_id is null then
10873: --
10874: If p_dsgn_thru_dt is null then
10875: rpt_error(p_proc => l_proc, p_step => l_step);
10876: fnd_message.set_name('BEN','BEN_91704_NOT_DET_DP_CVG_E_DT');
10877: fnd_message.raise_error;
10878: End if;
10879: --
10880: if l_per_in_ler_id is null then
10881: l_per_in_ler_id := orec.per_in_ler_id;
10959: exception
10960: --
10961: when others then
10962: rpt_error(p_proc => l_proc, p_step => l_step);
10963: fnd_message.raise_error;
10964: End unhook_bnf;
10965: --
10966:
10967:
11154: l_step := 20;
11155: --
11156: If p_cvg_thru_dt is null then
11157: rpt_error(p_proc => l_proc, p_step => l_step);
11158: fnd_message.set_name('BEN','BEN_91704_NOT_DET_DP_CVG_E_DT');
11159: fnd_message.raise_error;
11160: End if;
11161: --
11162: if l_per_in_ler_id is null then
11155: --
11156: If p_cvg_thru_dt is null then
11157: rpt_error(p_proc => l_proc, p_step => l_step);
11158: fnd_message.set_name('BEN','BEN_91704_NOT_DET_DP_CVG_E_DT');
11159: fnd_message.raise_error;
11160: End if;
11161: --
11162: if l_per_in_ler_id is null then
11163: l_per_in_ler_id := orec.per_in_ler_id;
11290: exception
11291: --
11292: when others then
11293: rpt_error(p_proc => l_proc, p_step => l_step);
11294: fnd_message.raise_error;
11295: End unhook_dpnt;
11296: --
11297: -- ----------------------------------------------------------------------------
11298: -- |-------------------------------< lck >------------------------------------|
11483: if l_acrs_ptip.mn_cvg_alwd_amt is not null and
11484: nvl(l_total_amt,0) < l_acrs_ptip.mn_cvg_alwd_amt and p_minimum_check_flag ='Y' then
11485:
11486: --
11487: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
11488: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11489: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
11490: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11491: fnd_message.raise_error;
11484: nvl(l_total_amt,0) < l_acrs_ptip.mn_cvg_alwd_amt and p_minimum_check_flag ='Y' then
11485:
11486: --
11487: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
11488: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11489: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
11490: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11491: fnd_message.raise_error;
11492: --
11485:
11486: --
11487: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
11488: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11489: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
11490: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11491: fnd_message.raise_error;
11492: --
11493: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
11486: --
11487: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
11488: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11489: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
11490: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11491: fnd_message.raise_error;
11492: --
11493: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
11494: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
11487: fnd_message.set_name('BEN','BEN_92179_BELOW_MIN_AMOUNT');
11488: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11489: fnd_message.set_token('MIN_AMT',l_acrs_ptip.mn_cvg_alwd_amt);
11490: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11491: fnd_message.raise_error;
11492: --
11493: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
11494: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
11495: --
11492: --
11493: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
11494: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
11495: --
11496: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11497: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11498: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11499: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11500: fnd_message.raise_error;
11493: elsif l_acrs_ptip.mx_cvg_alwd_amt is not null and
11494: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
11495: --
11496: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11497: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11498: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11499: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11500: fnd_message.raise_error;
11501: --
11494: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
11495: --
11496: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11497: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11498: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11499: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11500: fnd_message.raise_error;
11501: --
11502: end if;
11495: --
11496: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11497: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11498: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11499: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11500: fnd_message.raise_error;
11501: --
11502: end if;
11503: --
11496: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11497: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11498: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11499: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11500: fnd_message.raise_error;
11501: --
11502: end if;
11503: --
11504: --Bug 3695005 Coverage Across Plan type considering
11513: --
11514: if l_acrs_ptip.mx_cvg_alwd_amt is not null and
11515: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
11516: --
11517: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11518: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11519: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11520: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11521: fnd_message.raise_error;
11514: if l_acrs_ptip.mx_cvg_alwd_amt is not null and
11515: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
11516: --
11517: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11518: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11519: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11520: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11521: fnd_message.raise_error;
11522: --
11515: l_total_amt > l_acrs_ptip.mx_cvg_alwd_amt then
11516: --
11517: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11518: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11519: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11520: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11521: fnd_message.raise_error;
11522: --
11523: end if;
11516: --
11517: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11518: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11519: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11520: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11521: fnd_message.raise_error;
11522: --
11523: end if;
11524: --
11517: fnd_message.set_name('BEN','BEN_92180_ABOVE_MAX_AMOUNT');
11518: fnd_message.set_token('TOT_AMT',nvl(l_total_amt,0));
11519: fnd_message.set_token('MX_AMT',l_acrs_ptip.mx_cvg_alwd_amt);
11520: fnd_message.set_token('PL_TYP_NAMES',l_output_names); -- bug 3123698
11521: fnd_message.raise_error;
11522: --
11523: end if;
11524: --
11525: if g_debug then
12411: hr_utility.set_location('Exception:'||l_proc, 100);
12412: end if;
12413: hr_utility.set_location ('Other Error in delete_enrollment_w : '|| sqlerrm , 89);
12414: --Bug 4387247
12415: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
12416: fnd_message.set_token('2',substr(sqlerrm,1,200));
12417: fnd_msg_pub.add;
12418: --
12419: end delete_enrollment_w;
12412: end if;
12413: hr_utility.set_location ('Other Error in delete_enrollment_w : '|| sqlerrm , 89);
12414: --Bug 4387247
12415: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
12416: fnd_message.set_token('2',substr(sqlerrm,1,200));
12417: fnd_msg_pub.add;
12418: --
12419: end delete_enrollment_w;
12420: --