749: fetch c_plan into l_plan;
750: if c_plan%notfound then
751: --
752: close c_plan;
753: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
754: fnd_message.set_token('PROC',l_proc);
755: fnd_message.set_token('PL_ID',to_char(p_pl_id));
756: fnd_message.raise_error;
757: --
750: if c_plan%notfound then
751: --
752: close c_plan;
753: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
754: fnd_message.set_token('PROC',l_proc);
755: fnd_message.set_token('PL_ID',to_char(p_pl_id));
756: fnd_message.raise_error;
757: --
758: end if;
751: --
752: close c_plan;
753: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
754: fnd_message.set_token('PROC',l_proc);
755: fnd_message.set_token('PL_ID',to_char(p_pl_id));
756: fnd_message.raise_error;
757: --
758: end if;
759: --
752: close c_plan;
753: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
754: fnd_message.set_token('PROC',l_proc);
755: fnd_message.set_token('PL_ID',to_char(p_pl_id));
756: fnd_message.raise_error;
757: --
758: end if;
759: --
760: close c_plan;
774: --
775: if c_pgm%notfound then
776: --
777: close c_pgm;
778: fnd_message.set_name('BEN','BEN_91470_PGM_NOT_FOUND');
779: fnd_message.set_token('PROC',l_proc);
780: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
781: fnd_message.raise_error;
782: --
775: if c_pgm%notfound then
776: --
777: close c_pgm;
778: fnd_message.set_name('BEN','BEN_91470_PGM_NOT_FOUND');
779: fnd_message.set_token('PROC',l_proc);
780: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
781: fnd_message.raise_error;
782: --
783: end if;
776: --
777: close c_pgm;
778: fnd_message.set_name('BEN','BEN_91470_PGM_NOT_FOUND');
779: fnd_message.set_token('PROC',l_proc);
780: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
781: fnd_message.raise_error;
782: --
783: end if;
784: --
777: close c_pgm;
778: fnd_message.set_name('BEN','BEN_91470_PGM_NOT_FOUND');
779: fnd_message.set_token('PROC',l_proc);
780: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
781: fnd_message.raise_error;
782: --
783: end if;
784: --
785: close c_pgm;
822: --
823: if c_ptip%notfound then
824: --
825: close c_ptip;
826: fnd_message.set_name('BEN','BEN_91471_MISSING_PLAN_TYPE');
827: fnd_message.set_token('PROC',l_proc);
828: fnd_message.set_token('PTIP_ID',to_char(p_ptip_id));
829: fnd_message.raise_error;
830: --
823: if c_ptip%notfound then
824: --
825: close c_ptip;
826: fnd_message.set_name('BEN','BEN_91471_MISSING_PLAN_TYPE');
827: fnd_message.set_token('PROC',l_proc);
828: fnd_message.set_token('PTIP_ID',to_char(p_ptip_id));
829: fnd_message.raise_error;
830: --
831: end if;
824: --
825: close c_ptip;
826: fnd_message.set_name('BEN','BEN_91471_MISSING_PLAN_TYPE');
827: fnd_message.set_token('PROC',l_proc);
828: fnd_message.set_token('PTIP_ID',to_char(p_ptip_id));
829: fnd_message.raise_error;
830: --
831: end if;
832: --
825: close c_ptip;
826: fnd_message.set_name('BEN','BEN_91471_MISSING_PLAN_TYPE');
827: fnd_message.set_token('PROC',l_proc);
828: fnd_message.set_token('PTIP_ID',to_char(p_ptip_id));
829: fnd_message.raise_error;
830: --
831: end if;
832: --
833: close c_ptip;
840: fetch c_plan into l_plan;
841: if c_plan%notfound then
842: --
843: close c_plan;
844: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
845: fnd_message.set_token('PROC',l_proc);
846: fnd_message.set_token('PL_ID',to_char(p_pl_id));
847: fnd_message.raise_error;
848: --
841: if c_plan%notfound then
842: --
843: close c_plan;
844: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
845: fnd_message.set_token('PROC',l_proc);
846: fnd_message.set_token('PL_ID',to_char(p_pl_id));
847: fnd_message.raise_error;
848: --
849: end if;
842: --
843: close c_plan;
844: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
845: fnd_message.set_token('PROC',l_proc);
846: fnd_message.set_token('PL_ID',to_char(p_pl_id));
847: fnd_message.raise_error;
848: --
849: end if;
850: --
843: close c_plan;
844: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
845: fnd_message.set_token('PROC',l_proc);
846: fnd_message.set_token('PL_ID',to_char(p_pl_id));
847: fnd_message.raise_error;
848: --
849: end if;
850: --
851: close c_plan;
893: --
894: if c_per_in_ler%notfound then
895: --
896: close c_per_in_ler;
897: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
898: fnd_message.set_token('PROC',l_proc);
899: /* fnd_message.set_token('PER_IN_LER_ID',
900: to_char(l_elctbl_chc.per_in_ler_id)); */
901: fnd_message.raise_error;
894: if c_per_in_ler%notfound then
895: --
896: close c_per_in_ler;
897: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
898: fnd_message.set_token('PROC',l_proc);
899: /* fnd_message.set_token('PER_IN_LER_ID',
900: to_char(l_elctbl_chc.per_in_ler_id)); */
901: fnd_message.raise_error;
902: --
895: --
896: close c_per_in_ler;
897: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
898: fnd_message.set_token('PROC',l_proc);
899: /* fnd_message.set_token('PER_IN_LER_ID',
900: to_char(l_elctbl_chc.per_in_ler_id)); */
901: fnd_message.raise_error;
902: --
903: end if;
897: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
898: fnd_message.set_token('PROC',l_proc);
899: /* fnd_message.set_token('PER_IN_LER_ID',
900: to_char(l_elctbl_chc.per_in_ler_id)); */
901: fnd_message.raise_error;
902: --
903: end if;
904: --
905: close c_per_in_ler;
1098: end if;
1099: --
1100: if l_cvg_strt_cd is null then
1101: --
1102: fnd_message.set_name('BEN','BEN_91475_DEPT_ST_DT_NULL');
1103: fnd_message.set_token('PROC',l_proc);
1104: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1105: fnd_message.raise_error;
1106: --
1099: --
1100: if l_cvg_strt_cd is null then
1101: --
1102: fnd_message.set_name('BEN','BEN_91475_DEPT_ST_DT_NULL');
1103: fnd_message.set_token('PROC',l_proc);
1104: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1105: fnd_message.raise_error;
1106: --
1107: else
1100: if l_cvg_strt_cd is null then
1101: --
1102: fnd_message.set_name('BEN','BEN_91475_DEPT_ST_DT_NULL');
1103: fnd_message.set_token('PROC',l_proc);
1104: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1105: fnd_message.raise_error;
1106: --
1107: else
1108: --
1101: --
1102: fnd_message.set_name('BEN','BEN_91475_DEPT_ST_DT_NULL');
1103: fnd_message.set_token('PROC',l_proc);
1104: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1105: fnd_message.raise_error;
1106: --
1107: else
1108: --
1109: IF l_cvg_strt_cd <> 'RL' THEN
1444: -- Get coverage end date
1445: --
1446: if l_cvg_end_cd is null then
1447: --
1448: fnd_message.set_name('BEN','BEN_91478_INVALID_DEP_ENDDT');
1449: fnd_message.set_token('PROC',l_proc);
1450: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1451: fnd_message.raise_error;
1452: --
1445: --
1446: if l_cvg_end_cd is null then
1447: --
1448: fnd_message.set_name('BEN','BEN_91478_INVALID_DEP_ENDDT');
1449: fnd_message.set_token('PROC',l_proc);
1450: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1451: fnd_message.raise_error;
1452: --
1453: else
1446: if l_cvg_end_cd is null then
1447: --
1448: fnd_message.set_name('BEN','BEN_91478_INVALID_DEP_ENDDT');
1449: fnd_message.set_token('PROC',l_proc);
1450: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1451: fnd_message.raise_error;
1452: --
1453: else
1454: --
1447: --
1448: fnd_message.set_name('BEN','BEN_91478_INVALID_DEP_ENDDT');
1449: fnd_message.set_token('PROC',l_proc);
1450: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1451: fnd_message.raise_error;
1452: --
1453: else
1454: --
1455: hr_utility.set_location('l_cvg_end_cd'||l_cvg_end_Cd,10);
1746: --
1747: if c_per_in_ler%notfound then
1748: --
1749: close c_per_in_ler;
1750: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
1751: fnd_message.set_token('PROC',l_proc);
1752: fnd_message.set_token('PER_IN_LER_ID',
1753: to_char(l_elctbl_chc.per_in_ler_id));
1754: fnd_message.raise_error;
1747: if c_per_in_ler%notfound then
1748: --
1749: close c_per_in_ler;
1750: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
1751: fnd_message.set_token('PROC',l_proc);
1752: fnd_message.set_token('PER_IN_LER_ID',
1753: to_char(l_elctbl_chc.per_in_ler_id));
1754: fnd_message.raise_error;
1755: --
1748: --
1749: close c_per_in_ler;
1750: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
1751: fnd_message.set_token('PROC',l_proc);
1752: fnd_message.set_token('PER_IN_LER_ID',
1753: to_char(l_elctbl_chc.per_in_ler_id));
1754: fnd_message.raise_error;
1755: --
1756: end if;
1750: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
1751: fnd_message.set_token('PROC',l_proc);
1752: fnd_message.set_token('PER_IN_LER_ID',
1753: to_char(l_elctbl_chc.per_in_ler_id));
1754: fnd_message.raise_error;
1755: --
1756: end if;
1757: --
1758: close c_per_in_ler;