745: fetch c_plan into l_plan;
746: if c_plan%notfound then
747: --
748: close c_plan;
749: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
750: fnd_message.set_token('PROC',l_proc);
751: fnd_message.set_token('PL_ID',to_char(p_pl_id));
752: fnd_message.raise_error;
753: --
746: if c_plan%notfound then
747: --
748: close c_plan;
749: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
750: fnd_message.set_token('PROC',l_proc);
751: fnd_message.set_token('PL_ID',to_char(p_pl_id));
752: fnd_message.raise_error;
753: --
754: end if;
747: --
748: close c_plan;
749: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
750: fnd_message.set_token('PROC',l_proc);
751: fnd_message.set_token('PL_ID',to_char(p_pl_id));
752: fnd_message.raise_error;
753: --
754: end if;
755: --
748: close c_plan;
749: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
750: fnd_message.set_token('PROC',l_proc);
751: fnd_message.set_token('PL_ID',to_char(p_pl_id));
752: fnd_message.raise_error;
753: --
754: end if;
755: --
756: close c_plan;
770: --
771: if c_pgm%notfound then
772: --
773: close c_pgm;
774: fnd_message.set_name('BEN','BEN_91470_PGM_NOT_FOUND');
775: fnd_message.set_token('PROC',l_proc);
776: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
777: fnd_message.raise_error;
778: --
771: if c_pgm%notfound then
772: --
773: close c_pgm;
774: fnd_message.set_name('BEN','BEN_91470_PGM_NOT_FOUND');
775: fnd_message.set_token('PROC',l_proc);
776: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
777: fnd_message.raise_error;
778: --
779: end if;
772: --
773: close c_pgm;
774: fnd_message.set_name('BEN','BEN_91470_PGM_NOT_FOUND');
775: fnd_message.set_token('PROC',l_proc);
776: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
777: fnd_message.raise_error;
778: --
779: end if;
780: --
773: close c_pgm;
774: fnd_message.set_name('BEN','BEN_91470_PGM_NOT_FOUND');
775: fnd_message.set_token('PROC',l_proc);
776: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
777: fnd_message.raise_error;
778: --
779: end if;
780: --
781: close c_pgm;
818: --
819: if c_ptip%notfound then
820: --
821: close c_ptip;
822: fnd_message.set_name('BEN','BEN_91471_MISSING_PLAN_TYPE');
823: fnd_message.set_token('PROC',l_proc);
824: fnd_message.set_token('PTIP_ID',to_char(p_ptip_id));
825: fnd_message.raise_error;
826: --
819: if c_ptip%notfound then
820: --
821: close c_ptip;
822: fnd_message.set_name('BEN','BEN_91471_MISSING_PLAN_TYPE');
823: fnd_message.set_token('PROC',l_proc);
824: fnd_message.set_token('PTIP_ID',to_char(p_ptip_id));
825: fnd_message.raise_error;
826: --
827: end if;
820: --
821: close c_ptip;
822: fnd_message.set_name('BEN','BEN_91471_MISSING_PLAN_TYPE');
823: fnd_message.set_token('PROC',l_proc);
824: fnd_message.set_token('PTIP_ID',to_char(p_ptip_id));
825: fnd_message.raise_error;
826: --
827: end if;
828: --
821: close c_ptip;
822: fnd_message.set_name('BEN','BEN_91471_MISSING_PLAN_TYPE');
823: fnd_message.set_token('PROC',l_proc);
824: fnd_message.set_token('PTIP_ID',to_char(p_ptip_id));
825: fnd_message.raise_error;
826: --
827: end if;
828: --
829: close c_ptip;
836: fetch c_plan into l_plan;
837: if c_plan%notfound then
838: --
839: close c_plan;
840: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
841: fnd_message.set_token('PROC',l_proc);
842: fnd_message.set_token('PL_ID',to_char(p_pl_id));
843: fnd_message.raise_error;
844: --
837: if c_plan%notfound then
838: --
839: close c_plan;
840: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
841: fnd_message.set_token('PROC',l_proc);
842: fnd_message.set_token('PL_ID',to_char(p_pl_id));
843: fnd_message.raise_error;
844: --
845: end if;
838: --
839: close c_plan;
840: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
841: fnd_message.set_token('PROC',l_proc);
842: fnd_message.set_token('PL_ID',to_char(p_pl_id));
843: fnd_message.raise_error;
844: --
845: end if;
846: --
839: close c_plan;
840: fnd_message.set_name('BEN','BEN_91472_PLAN_NOT_FOUND');
841: fnd_message.set_token('PROC',l_proc);
842: fnd_message.set_token('PL_ID',to_char(p_pl_id));
843: fnd_message.raise_error;
844: --
845: end if;
846: --
847: close c_plan;
889: --
890: if c_per_in_ler%notfound then
891: --
892: close c_per_in_ler;
893: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
894: fnd_message.set_token('PROC',l_proc);
895: /* fnd_message.set_token('PER_IN_LER_ID',
896: to_char(l_elctbl_chc.per_in_ler_id)); */
897: fnd_message.raise_error;
890: if c_per_in_ler%notfound then
891: --
892: close c_per_in_ler;
893: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
894: fnd_message.set_token('PROC',l_proc);
895: /* fnd_message.set_token('PER_IN_LER_ID',
896: to_char(l_elctbl_chc.per_in_ler_id)); */
897: fnd_message.raise_error;
898: --
891: --
892: close c_per_in_ler;
893: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
894: fnd_message.set_token('PROC',l_proc);
895: /* fnd_message.set_token('PER_IN_LER_ID',
896: to_char(l_elctbl_chc.per_in_ler_id)); */
897: fnd_message.raise_error;
898: --
899: end if;
893: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
894: fnd_message.set_token('PROC',l_proc);
895: /* fnd_message.set_token('PER_IN_LER_ID',
896: to_char(l_elctbl_chc.per_in_ler_id)); */
897: fnd_message.raise_error;
898: --
899: end if;
900: --
901: close c_per_in_ler;
1094: end if;
1095: --
1096: if l_cvg_strt_cd is null then
1097: --
1098: fnd_message.set_name('BEN','BEN_91475_DEPT_ST_DT_NULL');
1099: fnd_message.set_token('PROC',l_proc);
1100: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1101: fnd_message.raise_error;
1102: --
1095: --
1096: if l_cvg_strt_cd is null then
1097: --
1098: fnd_message.set_name('BEN','BEN_91475_DEPT_ST_DT_NULL');
1099: fnd_message.set_token('PROC',l_proc);
1100: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1101: fnd_message.raise_error;
1102: --
1103: else
1096: if l_cvg_strt_cd is null then
1097: --
1098: fnd_message.set_name('BEN','BEN_91475_DEPT_ST_DT_NULL');
1099: fnd_message.set_token('PROC',l_proc);
1100: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1101: fnd_message.raise_error;
1102: --
1103: else
1104: --
1097: --
1098: fnd_message.set_name('BEN','BEN_91475_DEPT_ST_DT_NULL');
1099: fnd_message.set_token('PROC',l_proc);
1100: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1101: fnd_message.raise_error;
1102: --
1103: else
1104: --
1105: IF l_cvg_strt_cd <> 'RL' THEN
1428: -- Get coverage end date
1429: --
1430: if l_cvg_end_cd is null then
1431: --
1432: fnd_message.set_name('BEN','BEN_91478_INVALID_DEP_ENDDT');
1433: fnd_message.set_token('PROC',l_proc);
1434: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1435: fnd_message.raise_error;
1436: --
1429: --
1430: if l_cvg_end_cd is null then
1431: --
1432: fnd_message.set_name('BEN','BEN_91478_INVALID_DEP_ENDDT');
1433: fnd_message.set_token('PROC',l_proc);
1434: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1435: fnd_message.raise_error;
1436: --
1437: else
1430: if l_cvg_end_cd is null then
1431: --
1432: fnd_message.set_name('BEN','BEN_91478_INVALID_DEP_ENDDT');
1433: fnd_message.set_token('PROC',l_proc);
1434: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1435: fnd_message.raise_error;
1436: --
1437: else
1438: --
1431: --
1432: fnd_message.set_name('BEN','BEN_91478_INVALID_DEP_ENDDT');
1433: fnd_message.set_token('PROC',l_proc);
1434: fnd_message.set_token('LER_ID',to_char(l_per_in_ler.ler_id));
1435: fnd_message.raise_error;
1436: --
1437: else
1438: --
1439: hr_utility.set_location('l_cvg_end_cd'||l_cvg_end_Cd,10);
1730: --
1731: if c_per_in_ler%notfound then
1732: --
1733: close c_per_in_ler;
1734: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
1735: fnd_message.set_token('PROC',l_proc);
1736: fnd_message.set_token('PER_IN_LER_ID',
1737: to_char(l_elctbl_chc.per_in_ler_id));
1738: fnd_message.raise_error;
1731: if c_per_in_ler%notfound then
1732: --
1733: close c_per_in_ler;
1734: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
1735: fnd_message.set_token('PROC',l_proc);
1736: fnd_message.set_token('PER_IN_LER_ID',
1737: to_char(l_elctbl_chc.per_in_ler_id));
1738: fnd_message.raise_error;
1739: --
1732: --
1733: close c_per_in_ler;
1734: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
1735: fnd_message.set_token('PROC',l_proc);
1736: fnd_message.set_token('PER_IN_LER_ID',
1737: to_char(l_elctbl_chc.per_in_ler_id));
1738: fnd_message.raise_error;
1739: --
1740: end if;
1734: fnd_message.set_name('BEN','BEN_91473_PER_NOT_FOUND');
1735: fnd_message.set_token('PROC',l_proc);
1736: fnd_message.set_token('PER_IN_LER_ID',
1737: to_char(l_elctbl_chc.per_in_ler_id));
1738: fnd_message.raise_error;
1739: --
1740: end if;
1741: --
1742: close c_per_in_ler;