[Home] [Help]
123: open c1;
124: fetch c1 into l_dummy;
125: if c1%found then
126: close c1;
127: fnd_message.set_name('BEN','BEN_91009_NAME_NOT_UNIQUE');
128: fnd_message.raise_error;
129: end if;
130: --
131: hr_utility.set_location('Leaving:'||l_proc, 15);
124: fetch c1 into l_dummy;
125: if c1%found then
126: close c1;
127: fnd_message.set_name('BEN','BEN_91009_NAME_NOT_UNIQUE');
128: fnd_message.raise_error;
129: end if;
130: --
131: hr_utility.set_location('Leaving:'||l_proc, 15);
132: End chk_name_unique;
280: if l_opt_typ_cd = 'ICM' then
281: --
282: if l_dup then --Trying to define Duplicate rate for the comp obj
283: --
284: fnd_message.set_name('BEN','BEN_94663_DUPLICATE_RATE');
285: fnd_message.raise_error;
286: --
287: end if;
288: --
281: --
282: if l_dup then --Trying to define Duplicate rate for the comp obj
283: --
284: fnd_message.set_name('BEN','BEN_94663_DUPLICATE_RATE');
285: fnd_message.raise_error;
286: --
287: end if;
288: --
289: open c1;
290: fetch c1 into l_element_check;
291: if c1%found then
292: --
293: close c1;
294: fnd_message.set_name('BEN','BEN_94662_DUPLICATE_ELEMENT');
295: fnd_message.raise_error;
296: --
297: end if;
298: close c1;
291: if c1%found then
292: --
293: close c1;
294: fnd_message.set_name('BEN','BEN_94662_DUPLICATE_ELEMENT');
295: fnd_message.raise_error;
296: --
297: end if;
298: close c1;
299: --
299: --
300: --For checking proper rt_mlt_cd for ICM Plans
301: if p_rt_mlt_cd in ('CL','CLANDCVG','CVG','PRNT','PRNTANDCVG','AP','APANDCVG','SAREC') then
302: --
303: fnd_message.set_name('BEN','BEN_94664_INVALID_CALC_METHOD');
304: fnd_message.raise_error;
305: --
306: end if;
307: --
300: --For checking proper rt_mlt_cd for ICM Plans
301: if p_rt_mlt_cd in ('CL','CLANDCVG','CVG','PRNT','PRNTANDCVG','AP','APANDCVG','SAREC') then
302: --
303: fnd_message.set_name('BEN','BEN_94664_INVALID_CALC_METHOD');
304: fnd_message.raise_error;
305: --
306: end if;
307: --
308: end if;
422: p_effective_date => p_effective_date) then
423: --
424: -- raise error as does not exist as lookup
425: --
426: fnd_message.set_name('BEN','BEN_91438_LOOKUP_VALUE_INVALID');
427: fnd_message.set_token('FIELD',to_char(p_ordr_num));
428: fnd_message.set_token('TYPE','BEN_RT_ORDR_NUM');
429: fnd_message.raise_error;
430: --
423: --
424: -- raise error as does not exist as lookup
425: --
426: fnd_message.set_name('BEN','BEN_91438_LOOKUP_VALUE_INVALID');
427: fnd_message.set_token('FIELD',to_char(p_ordr_num));
428: fnd_message.set_token('TYPE','BEN_RT_ORDR_NUM');
429: fnd_message.raise_error;
430: --
431: end if;
424: -- raise error as does not exist as lookup
425: --
426: fnd_message.set_name('BEN','BEN_91438_LOOKUP_VALUE_INVALID');
427: fnd_message.set_token('FIELD',to_char(p_ordr_num));
428: fnd_message.set_token('TYPE','BEN_RT_ORDR_NUM');
429: fnd_message.raise_error;
430: --
431: end if;
432: --
425: --
426: fnd_message.set_name('BEN','BEN_91438_LOOKUP_VALUE_INVALID');
427: fnd_message.set_token('FIELD',to_char(p_ordr_num));
428: fnd_message.set_token('TYPE','BEN_RT_ORDR_NUM');
429: fnd_message.raise_error;
430: --
431: end if;
432: --
433: if l_pl_id = -1 and p_plip_id is null then
453: fetch c_abr into l_dummy;
454: close c_abr;
455: --
456: if l_dummy = 1 then
457: fnd_message.set_name('BEN','BEN_91001_SEQ_NOT_UNIQUE');
458: fnd_message.raise_error;
459: end if;
460: --
461: end if;
454: close c_abr;
455: --
456: if l_dummy = 1 then
457: fnd_message.set_name('BEN','BEN_91001_SEQ_NOT_UNIQUE');
458: fnd_message.raise_error;
459: end if;
460: --
461: end if;
462: --
518: open c1;
519: fetch c1 into l_dummy;
520: if c1%found then
521: close c1;
522: fnd_message.set_name('BEN','BEN_93185_INP_VAL_EXISTS');
523: fnd_message.raise_error;
524: end if;
525: end if;
526: --
519: fetch c1 into l_dummy;
520: if c1%found then
521: close c1;
522: fnd_message.set_name('BEN','BEN_93185_INP_VAL_EXISTS');
523: fnd_message.raise_error;
524: end if;
525: end if;
526: --
527: hr_utility.set_location('Leaving:'||l_proc, 15);
563: --- when the rate is imputing chek the plan in imputing
564: open c_is_pl_imputed;
565: fetch c_is_pl_imputed into l_dummy;
566: if c_is_pl_imputed%found and p_rt_usg_cd <> 'IMPTDINC' then
567: fnd_message.set_name('BEN','BEN_92556_IMPTD_NO_STD_RATE');
568: fnd_message.raise_error;
569: end if;
570: close c_is_pl_imputed;
571: If p_rt_usg_cd = 'IMPTDINC' then
564: open c_is_pl_imputed;
565: fetch c_is_pl_imputed into l_dummy;
566: if c_is_pl_imputed%found and p_rt_usg_cd <> 'IMPTDINC' then
567: fnd_message.set_name('BEN','BEN_92556_IMPTD_NO_STD_RATE');
568: fnd_message.raise_error;
569: end if;
570: close c_is_pl_imputed;
571: If p_rt_usg_cd = 'IMPTDINC' then
572: --- chek the multiple rate
573: open c1;
574: fetch c1 into l_name;
575: if c1%found then
576: close c1;
577: fnd_message.set_name('BEN', 'BEN_92555_IMPTD_RATE_EXISTS');
578: fnd_message.set_token('RATE', l_name);
579: fnd_message.raise_error;
580: end if;
581: End if;
574: fetch c1 into l_name;
575: if c1%found then
576: close c1;
577: fnd_message.set_name('BEN', 'BEN_92555_IMPTD_RATE_EXISTS');
578: fnd_message.set_token('RATE', l_name);
579: fnd_message.raise_error;
580: end if;
581: End if;
582: --
575: if c1%found then
576: close c1;
577: fnd_message.set_name('BEN', 'BEN_92555_IMPTD_RATE_EXISTS');
578: fnd_message.set_token('RATE', l_name);
579: fnd_message.raise_error;
580: end if;
581: End if;
582: --
583: hr_utility.set_location('Leaving:'||l_proc, 15);
703: else
704: l_pl_id := p_pl_id ;
705: end if ;
706: if chk_pl_cvg (p_pl_id => l_pl_id , p_effective_date => p_effective_date ) ='Y' then
707: fnd_message.set_name('BEN','BEN_92653_ENTR_VAL_RATE_CVG');
708: fnd_message.raise_error;
709: end if ;
710:
711: elsif p_oipl_id is not null or p_oiplip_id is not null then
704: l_pl_id := p_pl_id ;
705: end if ;
706: if chk_pl_cvg (p_pl_id => l_pl_id , p_effective_date => p_effective_date ) ='Y' then
707: fnd_message.set_name('BEN','BEN_92653_ENTR_VAL_RATE_CVG');
708: fnd_message.raise_error;
709: end if ;
710:
711: elsif p_oipl_id is not null or p_oiplip_id is not null then
712: -- plan in option levele
721: else
722: l_oipl_id := p_oipl_id ;
723: end if ;
724: if chk_oipl_with_cvg(l_oipl_id,p_effective_Date) = 'Y' then
725: fnd_message.set_name('BEN','BEN_92653_ENTR_VAL_RATE_CVG');
726: fnd_message.raise_error;
727: end if ;
728: else
729: --if any other level added
722: l_oipl_id := p_oipl_id ;
723: end if ;
724: if chk_oipl_with_cvg(l_oipl_id,p_effective_Date) = 'Y' then
725: fnd_message.set_name('BEN','BEN_92653_ENTR_VAL_RATE_CVG');
726: fnd_message.raise_error;
727: end if ;
728: else
729: --if any other level added
730: null;
818: --
819: -- Raise error as Element Type Id and Input Value Id need a
820: -- Value unless the Status = 'P' for pending.
821: --
822: fnd_message.set_name('BEN','BEN_91933_CHK_STAT_FOR_RQD');
823: fnd_message.raise_error;
824: --
825: end if;
826: --
819: -- Raise error as Element Type Id and Input Value Id need a
820: -- Value unless the Status = 'P' for pending.
821: --
822: fnd_message.set_name('BEN','BEN_91933_CHK_STAT_FOR_RQD');
823: fnd_message.raise_error;
824: --
825: end if;
826: --
827: end if;
834: begin
835: --
836: if p_prtl_mo_det_mthd_cd in ('NONE','PRTVAL','WASHRULE','RL') then
837: if p_ele_entry_val_cd in ('DFND','CMCD','PYR') then
838: fnd_message.set_name('BEN','BEN_93060_NO_PRTN_DFND');
839: fnd_message.raise_error;
840: end if;
841: end if;
842: end chk_prtl_mo_det_mthd_cd;
835: --
836: if p_prtl_mo_det_mthd_cd in ('NONE','PRTVAL','WASHRULE','RL') then
837: if p_ele_entry_val_cd in ('DFND','CMCD','PYR') then
838: fnd_message.set_name('BEN','BEN_93060_NO_PRTN_DFND');
839: fnd_message.raise_error;
840: end if;
841: end if;
842: end chk_prtl_mo_det_mthd_cd;
843: -- ---------------------------------------------------------------------
882: if p_entr_ann_val_flag = 'Y' then
883: --
884: if (p_ann_mn_elcn_val is null OR p_ann_mx_elcn_val is null) then
885: --
886: fnd_message.set_name('BEN','BEN_92442_ANN_FLAG_ON');
887: fnd_message.raise_error;
888: --
889: end if;
890:
883: --
884: if (p_ann_mn_elcn_val is null OR p_ann_mx_elcn_val is null) then
885: --
886: fnd_message.set_name('BEN','BEN_92442_ANN_FLAG_ON');
887: fnd_message.raise_error;
888: --
889: end if;
890:
891: if (p_mn_elcn_val is not null OR p_mx_elcn_val is not null) then
889: end if;
890:
891: if (p_mn_elcn_val is not null OR p_mx_elcn_val is not null) then
892: --
893: fnd_message.set_name('BEN','BEN_92443_ANN_VALS_ONLY');
894: fnd_message.raise_error;
895: --
896: end if;
897: --
890:
891: if (p_mn_elcn_val is not null OR p_mx_elcn_val is not null) then
892: --
893: fnd_message.set_name('BEN','BEN_92443_ANN_VALS_ONLY');
894: fnd_message.raise_error;
895: --
896: end if;
897: --
898: -- Bug : 3197632
899: -- Raise error if Enter Annual Value is checked and Expected Contributions is not selected.
900: /* As per bug update 3197632, error is no longer needed.
901: if p_det_pl_ytd_cntrs_cd is null then
902: --
903: fnd_message.set_name('BEN','BEN_93993_ANN_EXP_CONTRB_MDTRY');
904: fnd_message.raise_error;
905: --
906: end if;
907: */
900: /* As per bug update 3197632, error is no longer needed.
901: if p_det_pl_ytd_cntrs_cd is null then
902: --
903: fnd_message.set_name('BEN','BEN_93993_ANN_EXP_CONTRB_MDTRY');
904: fnd_message.raise_error;
905: --
906: end if;
907: */
908: --
1014: end if ;
1015: */
1016: ---
1017: if not (p_tx_typ_cd = 'AFTERTAX' and substr(p_acty_typ_cd,1,2) = 'EE') then
1018: fnd_message.set_name('BEN','BEN_93397_SUBJ_IMPTD_INCOM_FLG');
1019: fnd_message.raise_error;
1020: --
1021: end if ;
1022:
1015: */
1016: ---
1017: if not (p_tx_typ_cd = 'AFTERTAX' and substr(p_acty_typ_cd,1,2) = 'EE') then
1018: fnd_message.set_name('BEN','BEN_93397_SUBJ_IMPTD_INCOM_FLG');
1019: fnd_message.raise_error;
1020: --
1021: end if ;
1022:
1023: end if ;
1126: close c1;
1127: --
1128: -- raise error
1129: --
1130: fnd_message.set_name('BEN','BEN_91172_PRTL_MO_DET_MTHD_RL');
1131: fnd_message.raise_error;
1132: --
1133: end if;
1134: --
1127: --
1128: -- raise error
1129: --
1130: fnd_message.set_name('BEN','BEN_91172_PRTL_MO_DET_MTHD_RL');
1131: fnd_message.raise_error;
1132: --
1133: end if;
1134: --
1135: close c1;
1139: -- Partial Month Determination Method rule must be blank.
1140: if nvl(p_prtl_mo_det_mthd_cd,hr_api.g_varchar2) <> 'RL'
1141: and p_prtl_mo_det_mthd_rl is not null then
1142: --
1143: fnd_message.set_name('BEN', 'BEN_91432_PMD_RL_NOT_NULL');
1144: fnd_message.raise_error;
1145: --
1146: elsif nvl(p_prtl_mo_det_mthd_cd,hr_api.g_varchar2) = 'RL'
1147: and p_prtl_mo_det_mthd_rl is null then
1140: if nvl(p_prtl_mo_det_mthd_cd,hr_api.g_varchar2) <> 'RL'
1141: and p_prtl_mo_det_mthd_rl is not null then
1142: --
1143: fnd_message.set_name('BEN', 'BEN_91432_PMD_RL_NOT_NULL');
1144: fnd_message.raise_error;
1145: --
1146: elsif nvl(p_prtl_mo_det_mthd_cd,hr_api.g_varchar2) = 'RL'
1147: and p_prtl_mo_det_mthd_rl is null then
1148: --
1145: --
1146: elsif nvl(p_prtl_mo_det_mthd_cd,hr_api.g_varchar2) = 'RL'
1147: and p_prtl_mo_det_mthd_rl is null then
1148: --
1149: fnd_message.set_name('BEN', 'BEN_91434_PMD_RL_NULL');
1150: fnd_message.raise_error;
1151: --
1152: end if;
1153: --
1146: elsif nvl(p_prtl_mo_det_mthd_cd,hr_api.g_varchar2) = 'RL'
1147: and p_prtl_mo_det_mthd_rl is null then
1148: --
1149: fnd_message.set_name('BEN', 'BEN_91434_PMD_RL_NULL');
1150: fnd_message.raise_error;
1151: --
1152: end if;
1153: --
1154: end if;
1172: close c1;
1173: --
1174: -- raise error
1175: --
1176: fnd_message.set_name('BEN','BEN_91173_PRL_MO_EFF_DT_DET_RL');
1177: fnd_message.raise_error;
1178: --
1179: end if;
1180: --
1173: --
1174: -- raise error
1175: --
1176: fnd_message.set_name('BEN','BEN_91173_PRL_MO_EFF_DT_DET_RL');
1177: fnd_message.raise_error;
1178: --
1179: end if;
1180: --
1181: close c1;
1185: -- Partial Month Effective Date Determination rule must be blank.
1186: if nvl(p_prtl_mo_eff_dt_det_cd,hr_api.g_varchar2) <> 'RL'
1187: and p_prtl_mo_eff_dt_det_rl is not null then
1188: --
1189: fnd_message.set_name('BEN', 'BEN_91433_PMEDD_RL_NOT_NULL');
1190: fnd_message.raise_error;
1191: --
1192: elsif nvl(p_prtl_mo_eff_dt_det_cd,hr_api.g_varchar2) = 'RL'
1193: and p_prtl_mo_eff_dt_det_rl is null then
1186: if nvl(p_prtl_mo_eff_dt_det_cd,hr_api.g_varchar2) <> 'RL'
1187: and p_prtl_mo_eff_dt_det_rl is not null then
1188: --
1189: fnd_message.set_name('BEN', 'BEN_91433_PMEDD_RL_NOT_NULL');
1190: fnd_message.raise_error;
1191: --
1192: elsif nvl(p_prtl_mo_eff_dt_det_cd,hr_api.g_varchar2) = 'RL'
1193: and p_prtl_mo_eff_dt_det_rl is null then
1194: --
1191: --
1192: elsif nvl(p_prtl_mo_eff_dt_det_cd,hr_api.g_varchar2) = 'RL'
1193: and p_prtl_mo_eff_dt_det_rl is null then
1194: --
1195: fnd_message.set_name('BEN', 'BEN_91435_PMEDD_RL_NULL');
1196: fnd_message.raise_error;
1197: --
1198: end if;
1199: --
1192: elsif nvl(p_prtl_mo_eff_dt_det_cd,hr_api.g_varchar2) = 'RL'
1193: and p_prtl_mo_eff_dt_det_rl is null then
1194: --
1195: fnd_message.set_name('BEN', 'BEN_91435_PMEDD_RL_NULL');
1196: fnd_message.raise_error;
1197: --
1198: end if;
1199: --
1200: end if;
1218: close c1;
1219: --
1220: -- raise error
1221: --
1222: fnd_message.set_name('BEN','BEN_91042_INVALID_RNDG_RL');
1223: fnd_message.raise_error;
1224: --
1225: end if;
1226: --
1219: --
1220: -- raise error
1221: --
1222: fnd_message.set_name('BEN','BEN_91042_INVALID_RNDG_RL');
1223: fnd_message.raise_error;
1224: --
1225: end if;
1226: --
1227: close c1;
1229: --
1230: -- Unless Rounding Code = Rule, Rounding rule must be blank.
1231: if nvl(p_rndg_cd,hr_api.g_varchar2) <> 'RL' and p_rndg_rl is not null then
1232: --
1233: fnd_message.set_name('BEN','BEN_91043_RNDG_RL_NOT_NULL');
1234: fnd_message.raise_error;
1235: --
1236: elsif nvl(p_rndg_cd,hr_api.g_varchar2) = 'RL' and p_rndg_rl is null then
1237: --
1230: -- Unless Rounding Code = Rule, Rounding rule must be blank.
1231: if nvl(p_rndg_cd,hr_api.g_varchar2) <> 'RL' and p_rndg_rl is not null then
1232: --
1233: fnd_message.set_name('BEN','BEN_91043_RNDG_RL_NOT_NULL');
1234: fnd_message.raise_error;
1235: --
1236: elsif nvl(p_rndg_cd,hr_api.g_varchar2) = 'RL' and p_rndg_rl is null then
1237: --
1238: fnd_message.set_name('BEN','BEN_92340_RNDG_RL_NULL');
1234: fnd_message.raise_error;
1235: --
1236: elsif nvl(p_rndg_cd,hr_api.g_varchar2) = 'RL' and p_rndg_rl is null then
1237: --
1238: fnd_message.set_name('BEN','BEN_92340_RNDG_RL_NULL');
1239: fnd_message.raise_error;
1240: --
1241: end if;
1242: --
1235: --
1236: elsif nvl(p_rndg_cd,hr_api.g_varchar2) = 'RL' and p_rndg_rl is null then
1237: --
1238: fnd_message.set_name('BEN','BEN_92340_RNDG_RL_NULL');
1239: fnd_message.raise_error;
1240: --
1241: end if;
1242: --
1243: end if;
1261: close c1;
1262: --
1263: -- raise error
1264: --
1265: fnd_message.set_name('BEN','BEN_91815_INVALID_LWR_LMT_RL');
1266: fnd_message.raise_error;
1267: --
1268: end if;
1269: --
1262: --
1263: -- raise error
1264: --
1265: fnd_message.set_name('BEN','BEN_91815_INVALID_LWR_LMT_RL');
1266: fnd_message.raise_error;
1267: --
1268: end if;
1269: --
1270: close c1;
1290: close c1;
1291: --
1292: -- raise error
1293: --
1294: fnd_message.set_name('BEN','BEN_91823_INVALID_UPR_LMT_RL');
1295: fnd_message.raise_error;
1296: --
1297: end if;
1298: --
1291: --
1292: -- raise error
1293: --
1294: fnd_message.set_name('BEN','BEN_91823_INVALID_UPR_LMT_RL');
1295: fnd_message.raise_error;
1296: --
1297: end if;
1298: --
1299: close c1;
1319: close c1;
1320: --
1321: -- raise error
1322: --
1323: fnd_message.set_name('BEN','BEN_91174_VAL_CALC_RL');
1324: fnd_message.raise_error;
1325: --
1326: end if;
1327: --
1320: --
1321: -- raise error
1322: --
1323: fnd_message.set_name('BEN','BEN_91174_VAL_CALC_RL');
1324: fnd_message.raise_error;
1325: --
1326: end if;
1327: --
1328: close c1;
1349: close c1;
1350: --
1351: -- raise error
1352: --
1353: fnd_message.set_name('BEN','BEN_91471_FORMULA_NOT_FOUND');
1354: fnd_message.set_token('ID',p_prort_mn_ann_elcn_val_rl);
1355: fnd_message.set_token('TYPE_ID',-534);
1356: fnd_message.raise_error;
1357: --
1350: --
1351: -- raise error
1352: --
1353: fnd_message.set_name('BEN','BEN_91471_FORMULA_NOT_FOUND');
1354: fnd_message.set_token('ID',p_prort_mn_ann_elcn_val_rl);
1355: fnd_message.set_token('TYPE_ID',-534);
1356: fnd_message.raise_error;
1357: --
1358: end if;
1351: -- raise error
1352: --
1353: fnd_message.set_name('BEN','BEN_91471_FORMULA_NOT_FOUND');
1354: fnd_message.set_token('ID',p_prort_mn_ann_elcn_val_rl);
1355: fnd_message.set_token('TYPE_ID',-534);
1356: fnd_message.raise_error;
1357: --
1358: end if;
1359: --
1352: --
1353: fnd_message.set_name('BEN','BEN_91471_FORMULA_NOT_FOUND');
1354: fnd_message.set_token('ID',p_prort_mn_ann_elcn_val_rl);
1355: fnd_message.set_token('TYPE_ID',-534);
1356: fnd_message.raise_error;
1357: --
1358: end if;
1359: --
1360: close c1;
1380: close c1;
1381: --
1382: -- raise error
1383: --
1384: fnd_message.set_name('BEN','BEN_91741_FORMULA_NOT_FOUND');
1385: fnd_message.set_token('ID',p_prort_mx_ann_elcn_val_rl);
1386: fnd_message.set_token('TYPE_ID',-534);
1387: fnd_message.raise_error;
1388: --
1381: --
1382: -- raise error
1383: --
1384: fnd_message.set_name('BEN','BEN_91741_FORMULA_NOT_FOUND');
1385: fnd_message.set_token('ID',p_prort_mx_ann_elcn_val_rl);
1386: fnd_message.set_token('TYPE_ID',-534);
1387: fnd_message.raise_error;
1388: --
1389: end if;
1382: -- raise error
1383: --
1384: fnd_message.set_name('BEN','BEN_91741_FORMULA_NOT_FOUND');
1385: fnd_message.set_token('ID',p_prort_mx_ann_elcn_val_rl);
1386: fnd_message.set_token('TYPE_ID',-534);
1387: fnd_message.raise_error;
1388: --
1389: end if;
1390: --
1383: --
1384: fnd_message.set_name('BEN','BEN_91741_FORMULA_NOT_FOUND');
1385: fnd_message.set_token('ID',p_prort_mx_ann_elcn_val_rl);
1386: fnd_message.set_token('TYPE_ID',-534);
1387: fnd_message.raise_error;
1388: --
1389: end if;
1390: --
1391: close c1;
1413: close c1;
1414: --
1415: -- raise error
1416: --
1417: fnd_message.set_name('BEN','BEN_94127_INVALID_MN_MX_RL');
1418: fnd_message.raise_error;
1419: --
1420: end if;
1421: --
1414: --
1415: -- raise error
1416: --
1417: fnd_message.set_name('BEN','BEN_94127_INVALID_MN_MX_RL');
1418: fnd_message.raise_error;
1419: --
1420: end if;
1421: --
1422: close c1;
1443: --
1444: close c1;
1445: --
1446:
1447: fnd_message.set_name('BEN','BEN_91741_FORMULA_NOT_FOUND');
1448: fnd_message.set_token('ID',p_element_det_rl);
1449: fnd_message.set_token('TYPE_ID',-557);
1450: fnd_message.raise_error;
1451:
1444: close c1;
1445: --
1446:
1447: fnd_message.set_name('BEN','BEN_91741_FORMULA_NOT_FOUND');
1448: fnd_message.set_token('ID',p_element_det_rl);
1449: fnd_message.set_token('TYPE_ID',-557);
1450: fnd_message.raise_error;
1451:
1452: --
1445: --
1446:
1447: fnd_message.set_name('BEN','BEN_91741_FORMULA_NOT_FOUND');
1448: fnd_message.set_token('ID',p_element_det_rl);
1449: fnd_message.set_token('TYPE_ID',-557);
1450: fnd_message.raise_error;
1451:
1452: --
1453: end if;
1446:
1447: fnd_message.set_name('BEN','BEN_91741_FORMULA_NOT_FOUND');
1448: fnd_message.set_token('ID',p_element_det_rl);
1449: fnd_message.set_token('TYPE_ID',-557);
1450: fnd_message.raise_error;
1451:
1452: --
1453: end if;
1454: --
1570: p_effective_date => p_effective_date) then
1571: --
1572: -- raise error as does not exist as lookup
1573: --
1574: fnd_message.set_name('BEN','BEN_91175_CALC_NET_FLX_CR_FLAG');
1575: fnd_message.raise_error;
1576: --
1577: end if;
1578: --
1571: --
1572: -- raise error as does not exist as lookup
1573: --
1574: fnd_message.set_name('BEN','BEN_91175_CALC_NET_FLX_CR_FLAG');
1575: fnd_message.raise_error;
1576: --
1577: end if;
1578: --
1579: end if;
1592: p_effective_date => p_effective_date) then
1593: --
1594: -- raise error as does not exist as lookup
1595: --
1596: fnd_message.set_name('BEN','BEN_91176_ASN_ON_ENRT_FLAG');
1597: fnd_message.raise_error;
1598: --
1599: end if;
1600: --
1593: --
1594: -- raise error as does not exist as lookup
1595: --
1596: fnd_message.set_name('BEN','BEN_91176_ASN_ON_ENRT_FLAG');
1597: fnd_message.raise_error;
1598: --
1599: end if;
1600: --
1601: end if;
1615: p_effective_date => p_effective_date) then
1616: --
1617: -- raise error as does not exist as lookup
1618: --
1619: fnd_message.set_name('BEN','BEN_91177_ABV_MX_EL_ALWD_FLAG');
1620: fnd_message.raise_error;
1621: --
1622: end if;
1623: --
1616: --
1617: -- raise error as does not exist as lookup
1618: --
1619: fnd_message.set_name('BEN','BEN_91177_ABV_MX_EL_ALWD_FLAG');
1620: fnd_message.raise_error;
1621: --
1622: end if;
1623: --
1624: end if;
1638: p_effective_date => p_effective_date) then
1639: --
1640: -- raise error as does not exist as lookup
1641: --
1642: fnd_message.set_name('BEN','BEN_91178_BLW_MN_EL_ALWD_FLAG');
1643: fnd_message.raise_error;
1644: --
1645: end if;
1646: --
1639: --
1640: -- raise error as does not exist as lookup
1641: --
1642: fnd_message.set_name('BEN','BEN_91178_BLW_MN_EL_ALWD_FLAG');
1643: fnd_message.raise_error;
1644: --
1645: end if;
1646: --
1647: end if;
1660: p_effective_date => p_effective_date) then
1661: --
1662: -- raise error as does not exist as lookup
1663: --
1664: fnd_message.set_name('BEN','BEN_91627_DSPLY_ON_ENRT_FLAG');
1665: fnd_message.raise_error;
1666: --
1667: end if;
1668: --
1661: --
1662: -- raise error as does not exist as lookup
1663: --
1664: fnd_message.set_name('BEN','BEN_91627_DSPLY_ON_ENRT_FLAG');
1665: fnd_message.raise_error;
1666: --
1667: end if;
1668: --
1669: end if;
1682: p_effective_date => p_effective_date) then
1683: --
1684: -- raise error as does not exist as lookup
1685: --
1686: fnd_message.set_name('BEN','BEN_91179_CAL_ACTY_BS_RT_FLAG');
1687: fnd_message.raise_error;
1688: --
1689: end if;
1690: --
1683: --
1684: -- raise error as does not exist as lookup
1685: --
1686: fnd_message.set_name('BEN','BEN_91179_CAL_ACTY_BS_RT_FLAG');
1687: fnd_message.raise_error;
1688: --
1689: end if;
1690: --
1691: end if;
1706: p_effective_date => p_effective_date) then
1707: --
1708: -- raise error as does not exist as lookup
1709: --
1710: fnd_message.set_name('BEN','BEN_91180_USES_DED_SCHED_FLAG');
1711: fnd_message.raise_error;
1712: --
1713: end if;
1714: --
1707: --
1708: -- raise error as does not exist as lookup
1709: --
1710: fnd_message.set_name('BEN','BEN_91180_USES_DED_SCHED_FLAG');
1711: fnd_message.raise_error;
1712: --
1713: end if;
1714: --
1715: end if;
1728: p_effective_date => p_effective_date) then
1729: --
1730: -- raise error as does not exist as lookup
1731: --
1732: fnd_message.set_name('BEN','BEN_91181_USES_VARBL_RT_FLAG');
1733: fnd_message.raise_error;
1734: --
1735: end if;
1736: --
1729: --
1730: -- raise error as does not exist as lookup
1731: --
1732: fnd_message.set_name('BEN','BEN_91181_USES_VARBL_RT_FLAG');
1733: fnd_message.raise_error;
1734: --
1735: end if;
1736: --
1737: -- Uses Variable Rate Falg cannot be updated to "off", when acty variable rate rule or
1751: open c1;
1752: fetch c1 into l_dummy;
1753: if c1%found then
1754: close c1;
1755: fnd_message.set_name('BEN','BEN_91430_VRBL_RT_RL_EXISTS');
1756: fnd_message.raise_error;
1757: end if;
1758: close c1;
1759: end if;
1752: fetch c1 into l_dummy;
1753: if c1%found then
1754: close c1;
1755: fnd_message.set_name('BEN','BEN_91430_VRBL_RT_RL_EXISTS');
1756: fnd_message.raise_error;
1757: end if;
1758: close c1;
1759: end if;
1760: --
1774: p_effective_date => p_effective_date) then
1775: --
1776: -- raise error as does not exist as lookup
1777: --
1778: fnd_message.set_name('BEN','BEN_91182_VSTG_SCHED_APLS_FLAG');
1779: fnd_message.raise_error;
1780: --
1781: end if;
1782: --
1775: --
1776: -- raise error as does not exist as lookup
1777: --
1778: fnd_message.set_name('BEN','BEN_91182_VSTG_SCHED_APLS_FLAG');
1779: fnd_message.raise_error;
1780: --
1781: end if;
1782: --
1783: end if;
1796: p_effective_date => p_effective_date) then
1797: --
1798: -- raise error as does not exist as lookup
1799: --
1800: fnd_message.set_name('BEN','BEN_91183_PROC_PP_DFLT_FLAG');
1801: fnd_message.raise_error;
1802: --
1803: end if;
1804: --
1797: --
1798: -- raise error as does not exist as lookup
1799: --
1800: fnd_message.set_name('BEN','BEN_91183_PROC_PP_DFLT_FLAG');
1801: fnd_message.raise_error;
1802: --
1803: end if;
1804: --
1805: end if;
1818: p_effective_date => p_effective_date) then
1819: --
1820: -- raise error as does not exist as lookup
1821: --
1822: fnd_message.set_name('BEN','BEN_91184_PRDCT_FLX_CR_FLAG');
1823: fnd_message.raise_error;
1824: --
1825: end if;
1826: --
1819: --
1820: -- raise error as does not exist as lookup
1821: --
1822: fnd_message.set_name('BEN','BEN_91184_PRDCT_FLX_CR_FLAG');
1823: fnd_message.raise_error;
1824: --
1825: end if;
1826: --
1827: end if;
1840: p_effective_date => p_effective_date) then
1841: --
1842: -- raise error as does not exist as lookup
1843: --
1844: fnd_message.set_name('BEN','BEN_91185_NO_STD_RT_US_FLAG');
1845: fnd_message.raise_error;
1846: --
1847: end if;
1848: --
1841: --
1842: -- raise error as does not exist as lookup
1843: --
1844: fnd_message.set_name('BEN','BEN_91185_NO_STD_RT_US_FLAG');
1845: fnd_message.raise_error;
1846: --
1847: end if;
1848: --
1849: -- If no standard Rate Used Flag is "on", then uses Variable Rate flag
1848: --
1849: -- If no standard Rate Used Flag is "on", then uses Variable Rate flag
1850: -- must be "on".
1851: If P_NO_STD_RT_USED_FLAG = 'Y' and P_USES_VARBL_RT_FLAG <> 'Y' then
1852: fnd_message.set_name('BEN','BEN_91417_INVLD_STD_VRBL_FLAGS');
1853: fnd_message.raise_error;
1854: end if;
1855: --
1856: end if;
1849: -- If no standard Rate Used Flag is "on", then uses Variable Rate flag
1850: -- must be "on".
1851: If P_NO_STD_RT_USED_FLAG = 'Y' and P_USES_VARBL_RT_FLAG <> 'Y' then
1852: fnd_message.set_name('BEN','BEN_91417_INVLD_STD_VRBL_FLAGS');
1853: fnd_message.raise_error;
1854: end if;
1855: --
1856: end if;
1857: --
1869: p_effective_date => p_effective_date) then
1870: --
1871: -- raise error as does not exist as lookup
1872: --
1873: fnd_message.set_name('BEN','BEN_91186_USES_PYMT_SCHED_FLAG');
1874: fnd_message.raise_error;
1875: --
1876: end if;
1877: /* --
1870: --
1871: -- raise error as does not exist as lookup
1872: --
1873: fnd_message.set_name('BEN','BEN_91186_USES_PYMT_SCHED_FLAG');
1874: fnd_message.raise_error;
1875: --
1876: end if;
1877: /* --
1878: -- Process each pay period and Uses payment frequecy flags must be
1881: (p_uses_pymt_sched_flag = 'Y' and p_proc_each_pp_dflt_flag = 'Y' ) or
1882: (p_uses_pymt_sched_flag = 'N' and p_proc_each_pp_dflt_flag = 'N'))
1883: then
1884: --
1885: fnd_message.set_name('BEN','BEN_91412_PROC_PP_PYMT_SCHED_F');
1886: fnd_message.raise_error;
1887: --
1888: end if;*/
1889: end if;
1882: (p_uses_pymt_sched_flag = 'N' and p_proc_each_pp_dflt_flag = 'N'))
1883: then
1884: --
1885: fnd_message.set_name('BEN','BEN_91412_PROC_PP_PYMT_SCHED_F');
1886: fnd_message.raise_error;
1887: --
1888: end if;*/
1889: end if;
1890: --
1902: p_effective_date => p_effective_date) then
1903: --
1904: -- raise error as does not exist as lookup
1905: --
1906: fnd_message.set_name('BEN','BEN_91187_VAL_OVRID_ALWD_FLAG');
1907: fnd_message.raise_error;
1908: --
1909: end if;
1910: --
1903: --
1904: -- raise error as does not exist as lookup
1905: --
1906: fnd_message.set_name('BEN','BEN_91187_VAL_OVRID_ALWD_FLAG');
1907: fnd_message.raise_error;
1908: --
1909: end if;
1910: --
1911: end if;
1924: p_effective_date => p_effective_date) then
1925: --
1926: -- raise error as does not exist as lookup
1927: --
1928: fnd_message.set_name('BEN','BEN_91188_NO_MX_ELCN_VAL_FLAG');
1929: fnd_message.raise_error;
1930: --
1931: end if;
1932: --
1925: --
1926: -- raise error as does not exist as lookup
1927: --
1928: fnd_message.set_name('BEN','BEN_91188_NO_MX_ELCN_VAL_FLAG');
1929: fnd_message.raise_error;
1930: --
1931: end if;
1932: --
1933: end if;
1946: p_effective_date => p_effective_date) then
1947: --
1948: -- raise error as does not exist as lookup
1949: --
1950: fnd_message.set_name('BEN','BEN_91189_ENT_VAL_AT_ENRT_FLAG');
1951: fnd_message.raise_error;
1952: --
1953: end if;
1954: --
1947: --
1948: -- raise error as does not exist as lookup
1949: --
1950: fnd_message.set_name('BEN','BEN_91189_ENT_VAL_AT_ENRT_FLAG');
1951: fnd_message.raise_error;
1952: --
1953: end if;
1954: --
1955: end if;
1968: p_effective_date => p_effective_date) then
1969: --
1970: -- raise error as does not exist as lookup
1971: --
1972: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
1973: fnd_message.set_token('FIELD','p_entr_ann_val_flag');
1974: fnd_message.set_token('VALUE', p_entr_ann_val_flag);
1975: fnd_message.set_token('TYPE','YES_NO');
1976: fnd_message.raise_error;
1969: --
1970: -- raise error as does not exist as lookup
1971: --
1972: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
1973: fnd_message.set_token('FIELD','p_entr_ann_val_flag');
1974: fnd_message.set_token('VALUE', p_entr_ann_val_flag);
1975: fnd_message.set_token('TYPE','YES_NO');
1976: fnd_message.raise_error;
1977: --
1970: -- raise error as does not exist as lookup
1971: --
1972: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
1973: fnd_message.set_token('FIELD','p_entr_ann_val_flag');
1974: fnd_message.set_token('VALUE', p_entr_ann_val_flag);
1975: fnd_message.set_token('TYPE','YES_NO');
1976: fnd_message.raise_error;
1977: --
1978: end if;
1971: --
1972: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
1973: fnd_message.set_token('FIELD','p_entr_ann_val_flag');
1974: fnd_message.set_token('VALUE', p_entr_ann_val_flag);
1975: fnd_message.set_token('TYPE','YES_NO');
1976: fnd_message.raise_error;
1977: --
1978: end if;
1979: --
1972: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
1973: fnd_message.set_token('FIELD','p_entr_ann_val_flag');
1974: fnd_message.set_token('VALUE', p_entr_ann_val_flag);
1975: fnd_message.set_token('TYPE','YES_NO');
1976: fnd_message.raise_error;
1977: --
1978: end if;
1979: --
1980: end if;
1982: -- if the enter annual val flag is on, the enter val at enrollment flag must
1983: -- be on. If either is on, display-on-enrollment and assign-on-enrollment
1984: -- flags must be on.
1985: if p_entr_ann_val_flag = 'Y' and p_entr_val_at_enrt_flag = 'N' then
1986: fnd_message.set_name('BEN','BEN_92416_ENTR_FLAGS');
1987: fnd_message.raise_error;
1988: end if;
1989: --Bug 2172033 error this only if p_acty_typ_cd is not like CWB%
1990: --
1983: -- be on. If either is on, display-on-enrollment and assign-on-enrollment
1984: -- flags must be on.
1985: if p_entr_ann_val_flag = 'Y' and p_entr_val_at_enrt_flag = 'N' then
1986: fnd_message.set_name('BEN','BEN_92416_ENTR_FLAGS');
1987: fnd_message.raise_error;
1988: end if;
1989: --Bug 2172033 error this only if p_acty_typ_cd is not like CWB%
1990: --
1991: if substr(p_acty_typ_cd,1,3) <> 'CWB' then
1991: if substr(p_acty_typ_cd,1,3) <> 'CWB' then
1992: --
1993: if p_entr_val_at_enrt_flag = 'Y'
1994: and (p_dsply_on_enrt_flag = 'N' or p_asn_on_enrt_flag = 'N') then
1995: fnd_message.set_name('BEN','BEN_92417_ENTR_FLAGS2');
1996: fnd_message.raise_error;
1997: end if;
1998: --
1999: end if;
1992: --
1993: if p_entr_val_at_enrt_flag = 'Y'
1994: and (p_dsply_on_enrt_flag = 'N' or p_asn_on_enrt_flag = 'N') then
1995: fnd_message.set_name('BEN','BEN_92417_ENTR_FLAGS2');
1996: fnd_message.raise_error;
1997: end if;
1998: --
1999: end if;
2000: --
1998: --
1999: end if;
2000: --
2001: if p_acty_typ_cd = 'SSDSPLY' and p_dsply_on_enrt_flag = 'N' then
2002: fnd_message.set_name ('BEN','BEN_92629_ENTR_FLAGS3');
2003: fnd_message.raise_error;
2004: end if;
2005:
2006: if (l_api_updating
1999: end if;
2000: --
2001: if p_acty_typ_cd = 'SSDSPLY' and p_dsply_on_enrt_flag = 'N' then
2002: fnd_message.set_name ('BEN','BEN_92629_ENTR_FLAGS3');
2003: fnd_message.raise_error;
2004: end if;
2005:
2006: if (l_api_updating
2007: and p_no_mn_elcn_val_dfnd_flag
2017: p_effective_date => p_effective_date) then
2018: --
2019: -- raise error as does not exist as lookup
2020: --
2021: fnd_message.set_name('BEN','BEN_91190_NO_MN_EL_DFND_FLAG');
2022: fnd_message.raise_error; --
2023: end if;
2024: --
2025: end if;
2018: --
2019: -- raise error as does not exist as lookup
2020: --
2021: fnd_message.set_name('BEN','BEN_91190_NO_MN_EL_DFND_FLAG');
2022: fnd_message.raise_error; --
2023: end if;
2024: --
2025: end if;
2026: --
2038: p_effective_date => p_effective_date) then
2039: --
2040: -- raise error as does not exist as lookup
2041: --
2042: fnd_message.set_name('BEN','BEN_91410_ONE_BAL_TYPE_ALWD');
2043: fnd_message.raise_error;
2044: --
2045: end if;
2046: --
2039: --
2040: -- raise error as does not exist as lookup
2041: --
2042: fnd_message.set_name('BEN','BEN_91410_ONE_BAL_TYPE_ALWD');
2043: fnd_message.raise_error;
2044: --
2045: end if;
2046: --
2047: end if;
2060: p_effective_date => p_effective_date) then
2061: --
2062: -- raise error as does not exist as lookup
2063: --
2064: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2065: fnd_message.set_token('FIELD', 'p_ele_rqd_flag');
2066: fnd_message.set_token('VALUE', p_ele_rqd_flag);
2067: fnd_message.set_token('TYPE', 'YES_NO');
2068: fnd_message.raise_error;
2061: --
2062: -- raise error as does not exist as lookup
2063: --
2064: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2065: fnd_message.set_token('FIELD', 'p_ele_rqd_flag');
2066: fnd_message.set_token('VALUE', p_ele_rqd_flag);
2067: fnd_message.set_token('TYPE', 'YES_NO');
2068: fnd_message.raise_error;
2069: --
2062: -- raise error as does not exist as lookup
2063: --
2064: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2065: fnd_message.set_token('FIELD', 'p_ele_rqd_flag');
2066: fnd_message.set_token('VALUE', p_ele_rqd_flag);
2067: fnd_message.set_token('TYPE', 'YES_NO');
2068: fnd_message.raise_error;
2069: --
2070: end if;
2063: --
2064: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2065: fnd_message.set_token('FIELD', 'p_ele_rqd_flag');
2066: fnd_message.set_token('VALUE', p_ele_rqd_flag);
2067: fnd_message.set_token('TYPE', 'YES_NO');
2068: fnd_message.raise_error;
2069: --
2070: end if;
2071: --
2064: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2065: fnd_message.set_token('FIELD', 'p_ele_rqd_flag');
2066: fnd_message.set_token('VALUE', p_ele_rqd_flag);
2067: fnd_message.set_token('TYPE', 'YES_NO');
2068: fnd_message.raise_error;
2069: --
2070: end if;
2071: --
2072: end if;
2085: p_effective_date => p_effective_date) then
2086: --
2087: -- raise error as does not exist as lookup
2088: --
2089: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2090: fnd_message.set_token('FIELD', 'p_subj_to_imptd_incm_flag');
2091: fnd_message.set_token('VALUE', p_subj_to_imptd_incm_flag);
2092: fnd_message.set_token('TYPE', 'YES_NO');
2093: fnd_message.raise_error;
2086: --
2087: -- raise error as does not exist as lookup
2088: --
2089: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2090: fnd_message.set_token('FIELD', 'p_subj_to_imptd_incm_flag');
2091: fnd_message.set_token('VALUE', p_subj_to_imptd_incm_flag);
2092: fnd_message.set_token('TYPE', 'YES_NO');
2093: fnd_message.raise_error;
2094: --
2087: -- raise error as does not exist as lookup
2088: --
2089: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2090: fnd_message.set_token('FIELD', 'p_subj_to_imptd_incm_flag');
2091: fnd_message.set_token('VALUE', p_subj_to_imptd_incm_flag);
2092: fnd_message.set_token('TYPE', 'YES_NO');
2093: fnd_message.raise_error;
2094: --
2095: end if;
2088: --
2089: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2090: fnd_message.set_token('FIELD', 'p_subj_to_imptd_incm_flag');
2091: fnd_message.set_token('VALUE', p_subj_to_imptd_incm_flag);
2092: fnd_message.set_token('TYPE', 'YES_NO');
2093: fnd_message.raise_error;
2094: --
2095: end if;
2096: --
2089: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2090: fnd_message.set_token('FIELD', 'p_subj_to_imptd_incm_flag');
2091: fnd_message.set_token('VALUE', p_subj_to_imptd_incm_flag);
2092: fnd_message.set_token('TYPE', 'YES_NO');
2093: fnd_message.raise_error;
2094: --
2095: end if;
2096: --
2097: end if;
2143: --
2144: if p_det_pl_ytd_cntrs_cd = 'ESTONLY' and
2145: p_ptd_comp_lvl_fctr_id is not null then
2146: --
2147: fnd_message.set_name('BEN','BEN_92515_ESTONLY_NO_PTD_FCTR');
2148: fnd_message.raise_error;
2149: --
2150: end if;
2151: --
2144: if p_det_pl_ytd_cntrs_cd = 'ESTONLY' and
2145: p_ptd_comp_lvl_fctr_id is not null then
2146: --
2147: fnd_message.set_name('BEN','BEN_92515_ESTONLY_NO_PTD_FCTR');
2148: fnd_message.raise_error;
2149: --
2150: end if;
2151: --
2152: end chk_estonly_no_ptd_fctr;
2226: open c1;
2227: fetch c1 into l_dummy;
2228: if c1%FOUND then
2229: close c1;
2230: fnd_message.set_name('BEN','BEN_92656_ONE_RT_REIMBMTS');
2231: fnd_message.raise_error;
2232: end if;
2233: close c1;
2234: --
2227: fetch c1 into l_dummy;
2228: if c1%FOUND then
2229: close c1;
2230: fnd_message.set_name('BEN','BEN_92656_ONE_RT_REIMBMTS');
2231: fnd_message.raise_error;
2232: end if;
2233: close c1;
2234: --
2235: if p_pl_id is not null then
2242: close c_plip;
2243: end if ;
2244: --
2245: if nvl(l_alws_reimbmts_flag,'N') <> 'Y' then
2246: fnd_message.set_name('BEN','BEN_92655_ALWS_REIMBMTS_FLAG');
2247: fnd_message.raise_error;
2248: end if;
2249: --
2250: end if;
2243: end if ;
2244: --
2245: if nvl(l_alws_reimbmts_flag,'N') <> 'Y' then
2246: fnd_message.set_name('BEN','BEN_92655_ALWS_REIMBMTS_FLAG');
2247: fnd_message.raise_error;
2248: end if;
2249: --
2250: end if;
2251: /*
2252: -- Commented : Bug 3570935
2253: --when the acty type cd in ( 'CWBWS' , CWBAHE) then the sub_acty_typ_cd should have value
2254: if p_acty_typ_cd in ( 'CWBWS', 'CWBAHE') then
2255: if p_sub_acty_typ_cd is null then
2256: fnd_message.set_name('BEN','BEN_93738_CWB_SACTY_TYP_ERR');
2257: fnd_message.raise_error;
2258: end if ;
2259: end if ;
2260: */
2253: --when the acty type cd in ( 'CWBWS' , CWBAHE) then the sub_acty_typ_cd should have value
2254: if p_acty_typ_cd in ( 'CWBWS', 'CWBAHE') then
2255: if p_sub_acty_typ_cd is null then
2256: fnd_message.set_name('BEN','BEN_93738_CWB_SACTY_TYP_ERR');
2257: fnd_message.raise_error;
2258: end if ;
2259: end if ;
2260: */
2261:
2265: --
2266: /*
2267: -- Commented : Bug 3570935
2268: if p_acty_typ_cd not in ( 'CWBWS' , 'CWBAHE') then
2269: fnd_message.set_name('BEN','BEN_93739_CWB_SACTY_NOT_NULL');
2270: fnd_message.raise_error;
2271: end if ;
2272: */
2273: if hr_api.not_exists_in_hr_lookups
2266: /*
2267: -- Commented : Bug 3570935
2268: if p_acty_typ_cd not in ( 'CWBWS' , 'CWBAHE') then
2269: fnd_message.set_name('BEN','BEN_93739_CWB_SACTY_NOT_NULL');
2270: fnd_message.raise_error;
2271: end if ;
2272: */
2273: if hr_api.not_exists_in_hr_lookups
2274: (p_lookup_type => 'BEN_SUB_ACTY_TYP',
2276: p_effective_date => p_effective_start_date) then
2277: --
2278: -- raise error as does not exist as lookup
2279: --
2280: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2281: fnd_message.set_token('FIELD', 'sub_acty_typ_cd');
2282: fnd_message.set_token('VALUE', p_sub_acty_typ_cd);
2283: fnd_message.set_token('TYPE', 'BEN_SUB_ACTY_TYP');
2284: fnd_message.raise_error;
2277: --
2278: -- raise error as does not exist as lookup
2279: --
2280: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2281: fnd_message.set_token('FIELD', 'sub_acty_typ_cd');
2282: fnd_message.set_token('VALUE', p_sub_acty_typ_cd);
2283: fnd_message.set_token('TYPE', 'BEN_SUB_ACTY_TYP');
2284: fnd_message.raise_error;
2285: --
2278: -- raise error as does not exist as lookup
2279: --
2280: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2281: fnd_message.set_token('FIELD', 'sub_acty_typ_cd');
2282: fnd_message.set_token('VALUE', p_sub_acty_typ_cd);
2283: fnd_message.set_token('TYPE', 'BEN_SUB_ACTY_TYP');
2284: fnd_message.raise_error;
2285: --
2286: end if ;
2279: --
2280: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2281: fnd_message.set_token('FIELD', 'sub_acty_typ_cd');
2282: fnd_message.set_token('VALUE', p_sub_acty_typ_cd);
2283: fnd_message.set_token('TYPE', 'BEN_SUB_ACTY_TYP');
2284: fnd_message.raise_error;
2285: --
2286: end if ;
2287: end if ;
2280: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2281: fnd_message.set_token('FIELD', 'sub_acty_typ_cd');
2282: fnd_message.set_token('VALUE', p_sub_acty_typ_cd);
2283: fnd_message.set_token('TYPE', 'BEN_SUB_ACTY_TYP');
2284: fnd_message.raise_error;
2285: --
2286: end if ;
2287: end if ;
2288:
2329: -- mutually exclusive.
2330: if (p_lwr_lmt_val is not null and p_lwr_lmt_calc_rl is not null)
2331: then
2332: --
2333: fnd_message.set_name('BEN','BEN_91859_LWR_LMT_VAL_AND_RL');
2334: fnd_message.raise_error;
2335: --
2336: end if;
2337: end chk_lwr_lmt_val_and_rl;
2330: if (p_lwr_lmt_val is not null and p_lwr_lmt_calc_rl is not null)
2331: then
2332: --
2333: fnd_message.set_name('BEN','BEN_91859_LWR_LMT_VAL_AND_RL');
2334: fnd_message.raise_error;
2335: --
2336: end if;
2337: end chk_lwr_lmt_val_and_rl;
2338: --
2375: if (p_upr_lmt_val is not null and p_lwr_lmt_val is not null) and
2376: (p_upr_lmt_val < p_lwr_lmt_val)
2377: then
2378: --
2379: fnd_message.set_name('BEN','BEN_92505_HIGH_LOW_LMT_VAL');
2380: fnd_message.raise_error;
2381: null;
2382: --
2383: end if;
2376: (p_upr_lmt_val < p_lwr_lmt_val)
2377: then
2378: --
2379: fnd_message.set_name('BEN','BEN_92505_HIGH_LOW_LMT_VAL');
2380: fnd_message.raise_error;
2381: null;
2382: --
2383: end if;
2384: end chk_upr_lwr_lmt_val;
2429: if (p_incrmt_elcn_val is not null and p_mx_elcn_val is not null) and
2430: (p_incrmt_elcn_val > abs(p_mx_elcn_val))
2431: then
2432: --
2433: fnd_message.set_name('BEN','BEN_93881_INCR_GRTR_TH_MAX_ERR');
2434: fnd_message.set_token('MAX_FIELD','Max');
2435: fnd_message.raise_error;
2436: null;
2437: --
2430: (p_incrmt_elcn_val > abs(p_mx_elcn_val))
2431: then
2432: --
2433: fnd_message.set_name('BEN','BEN_93881_INCR_GRTR_TH_MAX_ERR');
2434: fnd_message.set_token('MAX_FIELD','Max');
2435: fnd_message.raise_error;
2436: null;
2437: --
2438: end if;
2431: then
2432: --
2433: fnd_message.set_name('BEN','BEN_93881_INCR_GRTR_TH_MAX_ERR');
2434: fnd_message.set_token('MAX_FIELD','Max');
2435: fnd_message.raise_error;
2436: null;
2437: --
2438: end if;
2439: --
2443: if (p_incrmt_elcn_val is not null and p_ann_mx_elcn_val is not null) and
2444: (p_incrmt_elcn_val > abs(p_ann_mx_elcn_val ))
2445: then
2446: --
2447: fnd_message.set_name('BEN','BEN_93881_INCR_GRTR_TH_MAX_ERR');
2448: fnd_message.set_token('MAX_FIELD','Annual Max');
2449: fnd_message.raise_error;
2450: null;
2451: --
2444: (p_incrmt_elcn_val > abs(p_ann_mx_elcn_val ))
2445: then
2446: --
2447: fnd_message.set_name('BEN','BEN_93881_INCR_GRTR_TH_MAX_ERR');
2448: fnd_message.set_token('MAX_FIELD','Annual Max');
2449: fnd_message.raise_error;
2450: null;
2451: --
2452: end if;
2445: then
2446: --
2447: fnd_message.set_name('BEN','BEN_93881_INCR_GRTR_TH_MAX_ERR');
2448: fnd_message.set_token('MAX_FIELD','Annual Max');
2449: fnd_message.raise_error;
2450: null;
2451: --
2452: end if;
2453: --
2497: -- mutually exclusive.
2498: if (p_upr_lmt_val is not null and p_upr_lmt_calc_rl is not null)
2499: then
2500: --
2501: fnd_message.set_name('BEN','BEN_91860_UPR_LMT_VAL_AND_RL');
2502: fnd_message.raise_error;
2503: --
2504: end if;
2505: end chk_upr_lmt_val_and_rl;
2498: if (p_upr_lmt_val is not null and p_upr_lmt_calc_rl is not null)
2499: then
2500: --
2501: fnd_message.set_name('BEN','BEN_91860_UPR_LMT_VAL_AND_RL');
2502: fnd_message.raise_error;
2503: --
2504: end if;
2505: end chk_upr_lmt_val_and_rl;
2506: --
2581: open chk_opt_usg_pltyp;
2582: fetch chk_opt_usg_pltyp into l_dummy;
2583: if chk_opt_usg_pltyp%NOTFOUND then
2584: close chk_opt_usg_pltyp;
2585: fnd_message.set_name('BEN','BEN_ABR_SEQ_NUM_NOT_ALLOWED');
2586: fnd_message.raise_error;
2587: end if;
2588: close chk_opt_usg_pltyp;
2589: --
2582: fetch chk_opt_usg_pltyp into l_dummy;
2583: if chk_opt_usg_pltyp%NOTFOUND then
2584: close chk_opt_usg_pltyp;
2585: fnd_message.set_name('BEN','BEN_ABR_SEQ_NUM_NOT_ALLOWED');
2586: fnd_message.raise_error;
2587: end if;
2588: close chk_opt_usg_pltyp;
2589: --
2590: else
2600: open chk_opt_usg_pl(l_pl_id);
2601: fetch chk_opt_usg_pl into l_dummy;
2602: if chk_opt_usg_pl%NOTFOUND then
2603: close chk_opt_usg_pl;
2604: fnd_message.set_name('BEN','BEN_ABR_SEQ_NUM_NOT_ALLOWED');
2605: fnd_message.raise_error;
2606: end if;
2607: close chk_opt_usg_pl;
2608: --
2601: fetch chk_opt_usg_pl into l_dummy;
2602: if chk_opt_usg_pl%NOTFOUND then
2603: close chk_opt_usg_pl;
2604: fnd_message.set_name('BEN','BEN_ABR_SEQ_NUM_NOT_ALLOWED');
2605: fnd_message.raise_error;
2606: end if;
2607: close chk_opt_usg_pl;
2608: --
2609: end if;
2700: p_effective_date => p_effective_date) then
2701: --
2702: -- raise error as does not exist as lookup
2703: --
2704: fnd_message.set_name('BEN','BEN_91431_INVLD_RT_USG_CD');
2705: fnd_message.raise_error;
2706: --
2707: end if;
2708: --
2701: --
2702: -- raise error as does not exist as lookup
2703: --
2704: fnd_message.set_name('BEN','BEN_91431_INVLD_RT_USG_CD');
2705: fnd_message.raise_error;
2706: --
2707: end if;
2708: --
2709: end if;
2722: p_effective_date => p_effective_date) then
2723: --
2724: -- raise error as does not exist as lookup
2725: --
2726: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2727: fnd_message.set_token('FIELD','p_prort_mn_ann_elcn_val_cd');
2728: fnd_message.set_token('VALUE', p_prort_mn_ann_elcn_val_cd);
2729: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2730: fnd_message.raise_error;
2723: --
2724: -- raise error as does not exist as lookup
2725: --
2726: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2727: fnd_message.set_token('FIELD','p_prort_mn_ann_elcn_val_cd');
2728: fnd_message.set_token('VALUE', p_prort_mn_ann_elcn_val_cd);
2729: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2730: fnd_message.raise_error;
2731: --
2724: -- raise error as does not exist as lookup
2725: --
2726: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2727: fnd_message.set_token('FIELD','p_prort_mn_ann_elcn_val_cd');
2728: fnd_message.set_token('VALUE', p_prort_mn_ann_elcn_val_cd);
2729: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2730: fnd_message.raise_error;
2731: --
2732: end if;
2725: --
2726: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2727: fnd_message.set_token('FIELD','p_prort_mn_ann_elcn_val_cd');
2728: fnd_message.set_token('VALUE', p_prort_mn_ann_elcn_val_cd);
2729: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2730: fnd_message.raise_error;
2731: --
2732: end if;
2733: --
2726: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2727: fnd_message.set_token('FIELD','p_prort_mn_ann_elcn_val_cd');
2728: fnd_message.set_token('VALUE', p_prort_mn_ann_elcn_val_cd);
2729: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2730: fnd_message.raise_error;
2731: --
2732: end if;
2733: --
2734: end if;
2747: p_effective_date => p_effective_date) then
2748: --
2749: -- raise error as does not exist as lookup
2750: --
2751: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2752: fnd_message.set_token('FIELD','p_prort_mx_ann_elcn_val_cd');
2753: fnd_message.set_token('VALUE', p_prort_mx_ann_elcn_val_cd);
2754: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2755: fnd_message.raise_error;
2748: --
2749: -- raise error as does not exist as lookup
2750: --
2751: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2752: fnd_message.set_token('FIELD','p_prort_mx_ann_elcn_val_cd');
2753: fnd_message.set_token('VALUE', p_prort_mx_ann_elcn_val_cd);
2754: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2755: fnd_message.raise_error;
2756: --
2749: -- raise error as does not exist as lookup
2750: --
2751: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2752: fnd_message.set_token('FIELD','p_prort_mx_ann_elcn_val_cd');
2753: fnd_message.set_token('VALUE', p_prort_mx_ann_elcn_val_cd);
2754: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2755: fnd_message.raise_error;
2756: --
2757: end if;
2750: --
2751: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2752: fnd_message.set_token('FIELD','p_prort_mx_ann_elcn_val_cd');
2753: fnd_message.set_token('VALUE', p_prort_mx_ann_elcn_val_cd);
2754: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2755: fnd_message.raise_error;
2756: --
2757: end if;
2758: --
2751: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2752: fnd_message.set_token('FIELD','p_prort_mx_ann_elcn_val_cd');
2753: fnd_message.set_token('VALUE', p_prort_mx_ann_elcn_val_cd);
2754: fnd_message.set_token('TYPE','BEN_PRORT_ANN_ELCN_VAL');
2755: fnd_message.raise_error;
2756: --
2757: end if;
2758: --
2759: end if;
2772: p_effective_date => p_effective_date) then
2773: --
2774: -- raise error as does not exist as lookup
2775: --
2776: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2777: fnd_message.set_token('FIELD','p_one_ann_pymt_cd');
2778: fnd_message.set_token('VALUE', p_one_ann_pymt_cd);
2779: fnd_message.set_token('TYPE','BEN_ONE_ANN_PYMT');
2780: fnd_message.raise_error;
2773: --
2774: -- raise error as does not exist as lookup
2775: --
2776: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2777: fnd_message.set_token('FIELD','p_one_ann_pymt_cd');
2778: fnd_message.set_token('VALUE', p_one_ann_pymt_cd);
2779: fnd_message.set_token('TYPE','BEN_ONE_ANN_PYMT');
2780: fnd_message.raise_error;
2781: --
2774: -- raise error as does not exist as lookup
2775: --
2776: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2777: fnd_message.set_token('FIELD','p_one_ann_pymt_cd');
2778: fnd_message.set_token('VALUE', p_one_ann_pymt_cd);
2779: fnd_message.set_token('TYPE','BEN_ONE_ANN_PYMT');
2780: fnd_message.raise_error;
2781: --
2782: end if;
2775: --
2776: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2777: fnd_message.set_token('FIELD','p_one_ann_pymt_cd');
2778: fnd_message.set_token('VALUE', p_one_ann_pymt_cd);
2779: fnd_message.set_token('TYPE','BEN_ONE_ANN_PYMT');
2780: fnd_message.raise_error;
2781: --
2782: end if;
2783: --
2776: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
2777: fnd_message.set_token('FIELD','p_one_ann_pymt_cd');
2778: fnd_message.set_token('VALUE', p_one_ann_pymt_cd);
2779: fnd_message.set_token('TYPE','BEN_ONE_ANN_PYMT');
2780: fnd_message.raise_error;
2781: --
2782: end if;
2783: --
2784: end if;
2797: p_effective_date => p_effective_date) then
2798: --
2799: -- raise error as does not exist as lookup
2800: --
2801: fnd_message.set_name('BEN','BEN_91191_ACTY_TYP_CD');
2802: fnd_message.raise_error;
2803: --
2804: end if;
2805: --
2798: --
2799: -- raise error as does not exist as lookup
2800: --
2801: fnd_message.set_name('BEN','BEN_91191_ACTY_TYP_CD');
2802: fnd_message.raise_error;
2803: --
2804: end if;
2805: --
2806: -- If Activity Type Code = Distribution, the Partial Month
2807: -- Determination Method Code must be blank.
2808: If p_rt_usg_cd = 'FLXCR' and p_acty_typ_cd in ('ERPYD', 'EEPYD')
2809: and p_PRTL_MO_DET_MTHD_CD is not null
2810: then
2811: fnd_message.set_name('BEN','BEN_91418_PRTL_MO_DET_CD_NOTNL');
2812: fnd_message.raise_error;
2813: end if;
2814: end if;
2815: --
2808: If p_rt_usg_cd = 'FLXCR' and p_acty_typ_cd in ('ERPYD', 'EEPYD')
2809: and p_PRTL_MO_DET_MTHD_CD is not null
2810: then
2811: fnd_message.set_name('BEN','BEN_91418_PRTL_MO_DET_CD_NOTNL');
2812: fnd_message.raise_error;
2813: end if;
2814: end if;
2815: --
2816: --
2828: p_effective_date => p_effective_date) then
2829: --
2830: -- raise error as does not exist as lookup
2831: --
2832: fnd_message.set_name('BEN','BEN_91192_RT_TYP_CD');
2833: fnd_message.raise_error;
2834: --
2835: end if;
2836: --
2829: --
2830: -- raise error as does not exist as lookup
2831: --
2832: fnd_message.set_name('BEN','BEN_91192_RT_TYP_CD');
2833: fnd_message.raise_error;
2834: --
2835: end if;
2836: --
2837: end if;
2850: p_effective_date => p_effective_date) then
2851: --
2852: -- raise error as does not exist as lookup
2853: --
2854: fnd_message.set_name('BEN','BEN_91192_RT_TYP_CD');
2855: fnd_message.raise_error;
2856: --
2857: end if;
2858: --
2851: --
2852: -- raise error as does not exist as lookup
2853: --
2854: fnd_message.set_name('BEN','BEN_91192_RT_TYP_CD');
2855: fnd_message.raise_error;
2856: --
2857: end if;
2858: --
2859: end if;
2873: p_effective_date => p_effective_date) then
2874: --
2875: -- raise error as does not exist as lookup
2876: --
2877: fnd_message.set_name('BEN','BEN_91193_INVLD_TX_TYP_CD');
2878: fnd_message.raise_error;
2879: --
2880: end if;
2881: --
2874: --
2875: -- raise error as does not exist as lookup
2876: --
2877: fnd_message.set_name('BEN','BEN_91193_INVLD_TX_TYP_CD');
2878: fnd_message.raise_error;
2879: --
2880: end if;
2881: --
2882: end if;
2896: p_effective_date => p_effective_date) then
2897: --
2898: -- raise error as does not exist as lookup
2899: --
2900: fnd_message.set_name('BEN','BEN_91194_INVLD_PARNT_CHLD_CD');
2901: fnd_message.raise_error;
2902: --
2903: end if;
2904: --
2897: --
2898: -- raise error as does not exist as lookup
2899: --
2900: fnd_message.set_name('BEN','BEN_91194_INVLD_PARNT_CHLD_CD');
2901: fnd_message.raise_error;
2902: --
2903: end if;
2904: --
2905: end if;
2919: p_effective_date => p_effective_date) then
2920: --
2921: -- raise error as does not exist as lookup
2922: --
2923: fnd_message.set_name('BEN','BEN_91195_INVLD_RT_MLT_CD');
2924: fnd_message.raise_error;
2925: --
2926: end if;
2927: --
2920: --
2921: -- raise error as does not exist as lookup
2922: --
2923: fnd_message.set_name('BEN','BEN_91195_INVLD_RT_MLT_CD');
2924: fnd_message.raise_error;
2925: --
2926: end if;
2927: --
2928: -- COMMENT OUT PER BUG# 894
2928: -- COMMENT OUT PER BUG# 894
2929: -- -- Rate Multiple code = Balance Type or Comp lvl Factor
2930: -- if p_rt_usg_cd = 'FLXCR' and
2931: -- p_rt_mlt_cd not in ('BALTYP', 'COMPLVLFCTR', 'NONE') THEN
2932: -- fnd_message.set_name('BEN','BEN_91416_INVLD_MLT_FOR_FLXCR');
2933: -- fnd_message.raise_error;
2934: -- end if;
2935: --
2936: end if;
2929: -- -- Rate Multiple code = Balance Type or Comp lvl Factor
2930: -- if p_rt_usg_cd = 'FLXCR' and
2931: -- p_rt_mlt_cd not in ('BALTYP', 'COMPLVLFCTR', 'NONE') THEN
2932: -- fnd_message.set_name('BEN','BEN_91416_INVLD_MLT_FOR_FLXCR');
2933: -- fnd_message.raise_error;
2934: -- end if;
2935: --
2936: end if;
2937: --
2950: p_effective_date => p_effective_date) then
2951: --
2952: -- raise error as does not exist as lookup
2953: --
2954: fnd_message.set_name('BEN','BEN_91196_INVLD_RCRRG_CD');
2955: fnd_message.raise_error;
2956: --
2957: end if;
2958: --
2951: --
2952: -- raise error as does not exist as lookup
2953: --
2954: fnd_message.set_name('BEN','BEN_91196_INVLD_RCRRG_CD');
2955: fnd_message.raise_error;
2956: --
2957: end if;
2958: --
2959: end if;
2973: p_effective_date => p_effective_date) then
2974: --
2975: -- raise error as does not exist as lookup
2976: --
2977: fnd_message.set_name('BEN','BEN_91041_INVALID_RNDG_CD');
2978: fnd_message.raise_error;
2979: --
2980: end if;
2981: --
2974: --
2975: -- raise error as does not exist as lookup
2976: --
2977: fnd_message.set_name('BEN','BEN_91041_INVALID_RNDG_CD');
2978: fnd_message.raise_error;
2979: --
2980: end if;
2981: --
2982: end if;
2996: p_effective_date => p_effective_date) then
2997: --
2998: -- raise error as does not exist as lookup
2999: --
3000: fnd_message.set_name('BEN','BEN_91200_INVLD_PRTL_MO_DET_CD');
3001: fnd_message.raise_error;
3002: --
3003: end if;
3004: --
2997: --
2998: -- raise error as does not exist as lookup
2999: --
3000: fnd_message.set_name('BEN','BEN_91200_INVLD_PRTL_MO_DET_CD');
3001: fnd_message.raise_error;
3002: --
3003: end if;
3004: --
3005: end if;
3019: p_effective_date => p_effective_date) then
3020: --
3021: -- raise error as does not exist as lookup
3022: --
3023: fnd_message.set_name('BEN','BEN_21201_INVLD_BASE_RT_STA_CD');
3024: fnd_message.raise_error;
3025: --
3026: end if;
3027: --
3020: --
3021: -- raise error as does not exist as lookup
3022: --
3023: fnd_message.set_name('BEN','BEN_21201_INVLD_BASE_RT_STA_CD');
3024: fnd_message.raise_error;
3025: --
3026: end if;
3027: --
3028: end if;
3042: p_effective_date => p_effective_date) then
3043: --
3044: -- raise error as does not exist as lookup
3045: --
3046: fnd_message.set_name('BEN','BEN_91203_INVLD_PROCG_SRC_CD');
3047: fnd_message.raise_error;
3048: --
3049: end if;
3050: --
3043: --
3044: -- raise error as does not exist as lookup
3045: --
3046: fnd_message.set_name('BEN','BEN_91203_INVLD_PROCG_SRC_CD');
3047: fnd_message.raise_error;
3048: --
3049: end if;
3050: --
3051: end if;
3065: p_effective_date => p_effective_date) then
3066: --
3067: -- raise error as does not exist as lookup
3068: --
3069: fnd_message.set_name('BEN','BEN_91204_FRGN_ERG_DED_TYP_CD');
3070: fnd_message.raise_error;
3071: --
3072: end if;
3073: --
3066: --
3067: -- raise error as does not exist as lookup
3068: --
3069: fnd_message.set_name('BEN','BEN_91204_FRGN_ERG_DED_TYP_CD');
3070: fnd_message.raise_error;
3071: --
3072: end if;
3073: --
3074: end if;
3088: p_effective_date => p_effective_date) then
3089: --
3090: -- raise error as does not exist as lookup
3091: --
3092: fnd_message.set_name('BEN','BEN_91205_PRTL_MO_EFF_DT_DE_CD');
3093: fnd_message.raise_error;
3094: --
3095: end if;
3096: --
3089: --
3090: -- raise error as does not exist as lookup
3091: --
3092: fnd_message.set_name('BEN','BEN_91205_PRTL_MO_EFF_DT_DE_CD');
3093: fnd_message.raise_error;
3094: --
3095: end if;
3096: --
3097: end if;
3110: p_effective_date => p_effective_date) then
3111: --
3112: -- raise error as does not exist as lookup
3113: --
3114: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3115: fnd_message.set_token('FIELD','p_det_pl_ytd_cntrs_cd');
3116: fnd_message.set_token('VALUE', p_det_pl_ytd_cntrs_cd);
3117: fnd_message.set_token('TYPE','BEN_DET_PL_YTD_CNTRS');
3118: fnd_message.raise_error;
3111: --
3112: -- raise error as does not exist as lookup
3113: --
3114: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3115: fnd_message.set_token('FIELD','p_det_pl_ytd_cntrs_cd');
3116: fnd_message.set_token('VALUE', p_det_pl_ytd_cntrs_cd);
3117: fnd_message.set_token('TYPE','BEN_DET_PL_YTD_CNTRS');
3118: fnd_message.raise_error;
3119: --
3112: -- raise error as does not exist as lookup
3113: --
3114: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3115: fnd_message.set_token('FIELD','p_det_pl_ytd_cntrs_cd');
3116: fnd_message.set_token('VALUE', p_det_pl_ytd_cntrs_cd);
3117: fnd_message.set_token('TYPE','BEN_DET_PL_YTD_CNTRS');
3118: fnd_message.raise_error;
3119: --
3120: end if;
3113: --
3114: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3115: fnd_message.set_token('FIELD','p_det_pl_ytd_cntrs_cd');
3116: fnd_message.set_token('VALUE', p_det_pl_ytd_cntrs_cd);
3117: fnd_message.set_token('TYPE','BEN_DET_PL_YTD_CNTRS');
3118: fnd_message.raise_error;
3119: --
3120: end if;
3121: --
3114: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3115: fnd_message.set_token('FIELD','p_det_pl_ytd_cntrs_cd');
3116: fnd_message.set_token('VALUE', p_det_pl_ytd_cntrs_cd);
3117: fnd_message.set_token('TYPE','BEN_DET_PL_YTD_CNTRS');
3118: fnd_message.raise_error;
3119: --
3120: end if;
3121: --
3122: end if;
3135: p_effective_date => p_effective_date) then
3136: --
3137: -- raise error as does not exist as lookup
3138: --
3139: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3140: fnd_message.set_token('FIELD','p_asmt_to_use_cd');
3141: fnd_message.set_token('VALUE', p_asmt_to_use_cd);
3142: fnd_message.set_token('TYPE','BEN_ASMT_TO_USE');
3143: fnd_message.raise_error;
3136: --
3137: -- raise error as does not exist as lookup
3138: --
3139: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3140: fnd_message.set_token('FIELD','p_asmt_to_use_cd');
3141: fnd_message.set_token('VALUE', p_asmt_to_use_cd);
3142: fnd_message.set_token('TYPE','BEN_ASMT_TO_USE');
3143: fnd_message.raise_error;
3144: --
3137: -- raise error as does not exist as lookup
3138: --
3139: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3140: fnd_message.set_token('FIELD','p_asmt_to_use_cd');
3141: fnd_message.set_token('VALUE', p_asmt_to_use_cd);
3142: fnd_message.set_token('TYPE','BEN_ASMT_TO_USE');
3143: fnd_message.raise_error;
3144: --
3145: end if;
3138: --
3139: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3140: fnd_message.set_token('FIELD','p_asmt_to_use_cd');
3141: fnd_message.set_token('VALUE', p_asmt_to_use_cd);
3142: fnd_message.set_token('TYPE','BEN_ASMT_TO_USE');
3143: fnd_message.raise_error;
3144: --
3145: end if;
3146: --
3139: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3140: fnd_message.set_token('FIELD','p_asmt_to_use_cd');
3141: fnd_message.set_token('VALUE', p_asmt_to_use_cd);
3142: fnd_message.set_token('TYPE','BEN_ASMT_TO_USE');
3143: fnd_message.raise_error;
3144: --
3145: end if;
3146: --
3147: end if;
3160: p_effective_date => p_effective_date) then
3161: --
3162: -- raise error as does not exist as lookup
3163: --
3164: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3165: fnd_message.set_token('FIELD','p_currency_det_cd');
3166: fnd_message.set_token('VALUE', p_currency_det_cd);
3167: fnd_message.set_token('TYPE','BEN_CUR_DET');
3168: fnd_message.raise_error;
3161: --
3162: -- raise error as does not exist as lookup
3163: --
3164: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3165: fnd_message.set_token('FIELD','p_currency_det_cd');
3166: fnd_message.set_token('VALUE', p_currency_det_cd);
3167: fnd_message.set_token('TYPE','BEN_CUR_DET');
3168: fnd_message.raise_error;
3169: --
3162: -- raise error as does not exist as lookup
3163: --
3164: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3165: fnd_message.set_token('FIELD','p_currency_det_cd');
3166: fnd_message.set_token('VALUE', p_currency_det_cd);
3167: fnd_message.set_token('TYPE','BEN_CUR_DET');
3168: fnd_message.raise_error;
3169: --
3170: end if;
3163: --
3164: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3165: fnd_message.set_token('FIELD','p_currency_det_cd');
3166: fnd_message.set_token('VALUE', p_currency_det_cd);
3167: fnd_message.set_token('TYPE','BEN_CUR_DET');
3168: fnd_message.raise_error;
3169: --
3170: end if;
3171: --
3164: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3165: fnd_message.set_token('FIELD','p_currency_det_cd');
3166: fnd_message.set_token('VALUE', p_currency_det_cd);
3167: fnd_message.set_token('TYPE','BEN_CUR_DET');
3168: fnd_message.raise_error;
3169: --
3170: end if;
3171: --
3172: end if;
3211: hr_utility.set_location('Entering:'||l_proc, 5);
3212: --
3213: if (p_prtl_mo_det_mthd_cd <> 'RL' and p_prtl_mo_det_mthd_rl is not null)
3214: then
3215: fnd_message.set_name('BEN','BEN_91730_NO_RULE');
3216: fnd_message.raise_error;
3217: end if;
3218:
3219: if (p_prtl_mo_det_mthd_cd = 'RL' and p_prtl_mo_det_mthd_rl is null)
3212: --
3213: if (p_prtl_mo_det_mthd_cd <> 'RL' and p_prtl_mo_det_mthd_rl is not null)
3214: then
3215: fnd_message.set_name('BEN','BEN_91730_NO_RULE');
3216: fnd_message.raise_error;
3217: end if;
3218:
3219: if (p_prtl_mo_det_mthd_cd = 'RL' and p_prtl_mo_det_mthd_rl is null)
3220: then
3217: end if;
3218:
3219: if (p_prtl_mo_det_mthd_cd = 'RL' and p_prtl_mo_det_mthd_rl is null)
3220: then
3221: fnd_message.set_name('BEN','BEN_91731_RULE');
3222: fnd_message.raise_error;
3223: end if;
3224: --
3225: -- Leaving Procedure.
3218:
3219: if (p_prtl_mo_det_mthd_cd = 'RL' and p_prtl_mo_det_mthd_rl is null)
3220: then
3221: fnd_message.set_name('BEN','BEN_91731_RULE');
3222: fnd_message.raise_error;
3223: end if;
3224: --
3225: -- Leaving Procedure.
3226: --
3267: -- check dependency of Code and Rule.
3268: --
3269: if (p_rndg_cd <> 'RL' and
3270: p_rndg_rl is not null) then
3271: fnd_message.set_name('BEN','BEN_91732_NO_RNDG_RULE');
3272: fnd_message.raise_error;
3273: end if;
3274:
3275: if (p_rndg_cd = 'RL' and p_rndg_rl is null) then
3268: --
3269: if (p_rndg_cd <> 'RL' and
3270: p_rndg_rl is not null) then
3271: fnd_message.set_name('BEN','BEN_91732_NO_RNDG_RULE');
3272: fnd_message.raise_error;
3273: end if;
3274:
3275: if (p_rndg_cd = 'RL' and p_rndg_rl is null) then
3276: fnd_message.set_name('BEN','BEN_91733_RNDG_RULE');
3272: fnd_message.raise_error;
3273: end if;
3274:
3275: if (p_rndg_cd = 'RL' and p_rndg_rl is null) then
3276: fnd_message.set_name('BEN','BEN_91733_RNDG_RULE');
3277: fnd_message.raise_error;
3278: end if;
3279:
3280: --
3273: end if;
3274:
3275: if (p_rndg_cd = 'RL' and p_rndg_rl is null) then
3276: fnd_message.set_name('BEN','BEN_91733_RNDG_RULE');
3277: fnd_message.raise_error;
3278: end if;
3279:
3280: --
3281: -- Leaving Procedure.
3338: if (p_prort_mn_ann_elcn_val_cd <> 'RL' and
3339: p_prort_mn_ann_elcn_val_rl is not null) or
3340: (p_prort_mx_ann_elcn_val_cd <> 'RL' and
3341: p_prort_mx_ann_elcn_val_rl is not null) then
3342: fnd_message.set_name('BEN','BEN_91730_NO_RULE');
3343: fnd_message.raise_error;
3344: end if;
3345:
3346: if (p_prort_mn_ann_elcn_val_cd = 'RL'
3339: p_prort_mn_ann_elcn_val_rl is not null) or
3340: (p_prort_mx_ann_elcn_val_cd <> 'RL' and
3341: p_prort_mx_ann_elcn_val_rl is not null) then
3342: fnd_message.set_name('BEN','BEN_91730_NO_RULE');
3343: fnd_message.raise_error;
3344: end if;
3345:
3346: if (p_prort_mn_ann_elcn_val_cd = 'RL'
3347: and p_prort_mn_ann_elcn_val_rl is null) or
3346: if (p_prort_mn_ann_elcn_val_cd = 'RL'
3347: and p_prort_mn_ann_elcn_val_rl is null) or
3348: (p_prort_mx_ann_elcn_val_cd = 'RL'
3349: and p_prort_mx_ann_elcn_val_rl is null) then
3350: fnd_message.set_name('BEN','BEN_91731_RULE');
3351: fnd_message.raise_error;
3352: end if;
3353:
3354: -- check comp lvl fctrs
3347: and p_prort_mn_ann_elcn_val_rl is null) or
3348: (p_prort_mx_ann_elcn_val_cd = 'RL'
3349: and p_prort_mx_ann_elcn_val_rl is null) then
3350: fnd_message.set_name('BEN','BEN_91731_RULE');
3351: fnd_message.raise_error;
3352: end if;
3353:
3354: -- check comp lvl fctrs
3355: if p_clm_comp_lvl_fctr_id = p_ptd_comp_lvl_fctr_id then
3352: end if;
3353:
3354: -- check comp lvl fctrs
3355: if p_clm_comp_lvl_fctr_id = p_ptd_comp_lvl_fctr_id then
3356: fnd_message.set_name('BEN','BEN_92414_SAME_COMP_FCTRS');
3357: fnd_message.raise_error;
3358: end if;
3359:
3360: -- check entr ann val flag dependency
3353:
3354: -- check comp lvl fctrs
3355: if p_clm_comp_lvl_fctr_id = p_ptd_comp_lvl_fctr_id then
3356: fnd_message.set_name('BEN','BEN_92414_SAME_COMP_FCTRS');
3357: fnd_message.raise_error;
3358: end if;
3359:
3360: -- check entr ann val flag dependency
3361: -- Bug 4016477. Should able to use for SAREC Case also.
3366: p_prort_mn_ann_elcn_val_cd is not null or
3367: p_prort_mn_ann_elcn_val_rl is not null or
3368: p_prort_mx_ann_elcn_val_cd is not null or
3369: p_prort_mx_ann_elcn_val_rl is not null) then
3370: fnd_message.set_name('BEN','BEN_92415_ENTR_ANN_VAL');
3371: fnd_message.raise_error;
3372: end if;
3373:
3374: --
3367: p_prort_mn_ann_elcn_val_rl is not null or
3368: p_prort_mx_ann_elcn_val_cd is not null or
3369: p_prort_mx_ann_elcn_val_rl is not null) then
3370: fnd_message.set_name('BEN','BEN_92415_ENTR_ANN_VAL');
3371: fnd_message.raise_error;
3372: end if;
3373:
3374: --
3375: -- Leaving Procedure.
3451: if l_cum_id_val > 1 then
3452: --
3453: -- raise error as both pl_id and pgm_id can't be not null
3454: --
3455: fnd_message.set_name('BEN','BEN_91436_ONLY_ONE_ID_ALWD');
3456: fnd_message.raise_error;
3457: --
3458: elsif l_cum_id_val = 0 then
3459: --
3452: --
3453: -- raise error as both pl_id and pgm_id can't be not null
3454: --
3455: fnd_message.set_name('BEN','BEN_91436_ONLY_ONE_ID_ALWD');
3456: fnd_message.raise_error;
3457: --
3458: elsif l_cum_id_val = 0 then
3459: --
3460: -- Atleast all id values are null so raise the error
3458: elsif l_cum_id_val = 0 then
3459: --
3460: -- Atleast all id values are null so raise the error
3461: --
3462: fnd_message.set_name('BEN','BEN_91437_ONE_ID_REQD');
3463: fnd_message.raise_error;
3464: --
3465: end if;
3466: hr_utility.set_location('Leaving:'||l_proc,10);
3459: --
3460: -- Atleast all id values are null so raise the error
3461: --
3462: fnd_message.set_name('BEN','BEN_91437_ONE_ID_REQD');
3463: fnd_message.raise_error;
3464: --
3465: end if;
3466: hr_utility.set_location('Leaving:'||l_proc,10);
3467: --
3527: --
3528: -- the actual premium that we are trying to attach to the
3529: -- acty_base_rt has a prem_asnmt_cd = 'PROC'(error)
3530: --
3531: fnd_message.set_name('BEN','BEN_92457_ACTL_PREM_PROC');
3532: fnd_message.raise_error;
3533: --
3534: end if;
3535: close c1;
3528: -- the actual premium that we are trying to attach to the
3529: -- acty_base_rt has a prem_asnmt_cd = 'PROC'(error)
3530: --
3531: fnd_message.set_name('BEN','BEN_92457_ACTL_PREM_PROC');
3532: fnd_message.raise_error;
3533: --
3534: end if;
3535: close c1;
3536: --
3600: open c1;
3601: fetch c1 into l_dummy;
3602: if c1%notfound then
3603: close c1;
3604: fnd_message.set_name('BEN','BEN_91414_INVLD_PGM_FOR_FLXCR');
3605: fnd_message.raise_error;
3606: end if;
3607: close c1;
3608: end if;
3601: fetch c1 into l_dummy;
3602: if c1%notfound then
3603: close c1;
3604: fnd_message.set_name('BEN','BEN_91414_INVLD_PGM_FOR_FLXCR');
3605: fnd_message.raise_error;
3606: end if;
3607: close c1;
3608: end if;
3609: --
3611: open c2;
3612: fetch c2 into l_dummy;
3613: if c2%notfound then
3614: close c2;
3615: fnd_message.set_name('BEN','BEN_91414_INVLD_PGM_FOR_FLXCR');
3616: fnd_message.raise_error;
3617: end if;
3618: close c2;
3619: end if;
3612: fetch c2 into l_dummy;
3613: if c2%notfound then
3614: close c2;
3615: fnd_message.set_name('BEN','BEN_91414_INVLD_PGM_FOR_FLXCR');
3616: fnd_message.raise_error;
3617: end if;
3618: close c2;
3619: end if;
3620: --
3787: --
3788: fetch c1 into l_dummy;
3789: if c1%notfound then
3790: close c1;
3791: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
3792: fnd_message.set_token('PROCEDURE', l_proc);
3793: fnd_message.set_token('STEP','10');
3794: fnd_message.raise_error;
3795:
3788: fetch c1 into l_dummy;
3789: if c1%notfound then
3790: close c1;
3791: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
3792: fnd_message.set_token('PROCEDURE', l_proc);
3793: fnd_message.set_token('STEP','10');
3794: fnd_message.raise_error;
3795:
3796: end if;
3789: if c1%notfound then
3790: close c1;
3791: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
3792: fnd_message.set_token('PROCEDURE', l_proc);
3793: fnd_message.set_token('STEP','10');
3794: fnd_message.raise_error;
3795:
3796: end if;
3797: --
3790: close c1;
3791: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
3792: fnd_message.set_token('PROCEDURE', l_proc);
3793: fnd_message.set_token('STEP','10');
3794: fnd_message.raise_error;
3795:
3796: end if;
3797: --
3798: close c1;
3805: --
3806: fetch c2 into l_dummy;
3807: if c2%notfound then
3808: close c2;
3809: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
3810: fnd_message.set_token('PROCEDURE', l_proc);
3811: fnd_message.set_token('STEP','11');
3812: fnd_message.raise_error;
3813:
3806: fetch c2 into l_dummy;
3807: if c2%notfound then
3808: close c2;
3809: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
3810: fnd_message.set_token('PROCEDURE', l_proc);
3811: fnd_message.set_token('STEP','11');
3812: fnd_message.raise_error;
3813:
3814: end if;
3807: if c2%notfound then
3808: close c2;
3809: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
3810: fnd_message.set_token('PROCEDURE', l_proc);
3811: fnd_message.set_token('STEP','11');
3812: fnd_message.raise_error;
3813:
3814: end if;
3815: --
3808: close c2;
3809: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
3810: fnd_message.set_token('PROCEDURE', l_proc);
3811: fnd_message.set_token('STEP','11');
3812: fnd_message.raise_error;
3813:
3814: end if;
3815: --
3816: close c2;
3895: --
3896: -- raise error as FK does not relate to PK in fnd_currencies_tl
3897: -- table.
3898: --
3899: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3900: fnd_message.set_token('FIELD','p_nnmntry_uom');
3901: fnd_message.set_token('VALUE', p_nnmntry_uom);
3902: fnd_message.set_token('TYPE','BEN_NNMNTRY_UOM');
3903: fnd_message.raise_error;
3896: -- raise error as FK does not relate to PK in fnd_currencies_tl
3897: -- table.
3898: --
3899: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3900: fnd_message.set_token('FIELD','p_nnmntry_uom');
3901: fnd_message.set_token('VALUE', p_nnmntry_uom);
3902: fnd_message.set_token('TYPE','BEN_NNMNTRY_UOM');
3903: fnd_message.raise_error;
3904: --
3897: -- table.
3898: --
3899: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3900: fnd_message.set_token('FIELD','p_nnmntry_uom');
3901: fnd_message.set_token('VALUE', p_nnmntry_uom);
3902: fnd_message.set_token('TYPE','BEN_NNMNTRY_UOM');
3903: fnd_message.raise_error;
3904: --
3905: end if;
3898: --
3899: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3900: fnd_message.set_token('FIELD','p_nnmntry_uom');
3901: fnd_message.set_token('VALUE', p_nnmntry_uom);
3902: fnd_message.set_token('TYPE','BEN_NNMNTRY_UOM');
3903: fnd_message.raise_error;
3904: --
3905: end if;
3906: end if;
3899: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
3900: fnd_message.set_token('FIELD','p_nnmntry_uom');
3901: fnd_message.set_token('VALUE', p_nnmntry_uom);
3902: fnd_message.set_token('TYPE','BEN_NNMNTRY_UOM');
3903: fnd_message.raise_error;
3904: --
3905: end if;
3906: end if;
3907: --
4101: -- raise error as a Rate already exists for the Option in the
4102: -- table ben_acty_base_rt_f with the same Activity Type Code.
4103: --
4104: l_acty_typ_meaning := hr_general.decode_lookup('BEN_ACTY_TYP',p_acty_typ_cd);
4105: fnd_message.set_name('BEN','BEN_93018_ACTY_TYP_NOT_UNIQUE');
4106: fnd_message.set_token('ACTY_TYPE_CODE',l_acty_typ_meaning);
4107: fnd_message.raise_error;
4108: --
4109: end if;
4102: -- table ben_acty_base_rt_f with the same Activity Type Code.
4103: --
4104: l_acty_typ_meaning := hr_general.decode_lookup('BEN_ACTY_TYP',p_acty_typ_cd);
4105: fnd_message.set_name('BEN','BEN_93018_ACTY_TYP_NOT_UNIQUE');
4106: fnd_message.set_token('ACTY_TYPE_CODE',l_acty_typ_meaning);
4107: fnd_message.raise_error;
4108: --
4109: end if;
4110: --
4103: --
4104: l_acty_typ_meaning := hr_general.decode_lookup('BEN_ACTY_TYP',p_acty_typ_cd);
4105: fnd_message.set_name('BEN','BEN_93018_ACTY_TYP_NOT_UNIQUE');
4106: fnd_message.set_token('ACTY_TYPE_CODE',l_acty_typ_meaning);
4107: fnd_message.raise_error;
4108: --
4109: end if;
4110: --
4111: close c2;
4120: -- raise error as a Rate already exists for the Plan in the
4121: -- table ben_acty_base_rt_f with the same Activity Type Code.
4122: --
4123: l_acty_typ_meaning := hr_general.decode_lookup('BEN_ACTY_TYP',p_acty_typ_cd);
4124: fnd_message.set_name('BEN','BEN_93018_ACTY_TYP_NOT_UNIQUE');
4125: fnd_message.set_token('ACTY_TYPE_CODE',l_acty_typ_meaning);
4126: fnd_message.raise_error;
4127: --
4128: end if;
4121: -- table ben_acty_base_rt_f with the same Activity Type Code.
4122: --
4123: l_acty_typ_meaning := hr_general.decode_lookup('BEN_ACTY_TYP',p_acty_typ_cd);
4124: fnd_message.set_name('BEN','BEN_93018_ACTY_TYP_NOT_UNIQUE');
4125: fnd_message.set_token('ACTY_TYPE_CODE',l_acty_typ_meaning);
4126: fnd_message.raise_error;
4127: --
4128: end if;
4129: --
4122: --
4123: l_acty_typ_meaning := hr_general.decode_lookup('BEN_ACTY_TYP',p_acty_typ_cd);
4124: fnd_message.set_name('BEN','BEN_93018_ACTY_TYP_NOT_UNIQUE');
4125: fnd_message.set_token('ACTY_TYPE_CODE',l_acty_typ_meaning);
4126: fnd_message.raise_error;
4127: --
4128: end if;
4129: --
4130: close c1;
4209: --
4210: fetch c1 into l_dummy;
4211: if c1%found then
4212: --
4213: fnd_message.set_name('BEN','BEN_93549_ACTY_TYP_GSP');
4214: fnd_message.raise_error;
4215: --
4216:
4217: end if;
4210: fetch c1 into l_dummy;
4211: if c1%found then
4212: --
4213: fnd_message.set_name('BEN','BEN_93549_ACTY_TYP_GSP');
4214: fnd_message.raise_error;
4215: --
4216:
4217: end if;
4218: --
4248:
4249: if p_element_det_rl is not null and p_acty_typ_cd not like 'CWB%' then
4250:
4251: --
4252: fnd_message.set_name('BEN','BEN_94998_CWB_INVLD');
4253: fnd_message.set_token('FIELD','Element Determination Rule');
4254: fnd_message.raise_error;
4255: --
4256: end if;
4249: if p_element_det_rl is not null and p_acty_typ_cd not like 'CWB%' then
4250:
4251: --
4252: fnd_message.set_name('BEN','BEN_94998_CWB_INVLD');
4253: fnd_message.set_token('FIELD','Element Determination Rule');
4254: fnd_message.raise_error;
4255: --
4256: end if;
4257:
4250:
4251: --
4252: fnd_message.set_name('BEN','BEN_94998_CWB_INVLD');
4253: fnd_message.set_token('FIELD','Element Determination Rule');
4254: fnd_message.raise_error;
4255: --
4256: end if;
4257:
4258: if p_currency_det_cd is NOT NULL and p_acty_typ_cd not like 'CWB%' then
4257:
4258: if p_currency_det_cd is NOT NULL and p_acty_typ_cd not like 'CWB%' then
4259:
4260: --
4261: fnd_message.set_name('BEN','BEN_94998_CWB_INVLD');
4262: fnd_message.set_token('FIELD','Currency Determination Code');
4263: fnd_message.raise_error;
4264: --
4265: end if;
4258: if p_currency_det_cd is NOT NULL and p_acty_typ_cd not like 'CWB%' then
4259:
4260: --
4261: fnd_message.set_name('BEN','BEN_94998_CWB_INVLD');
4262: fnd_message.set_token('FIELD','Currency Determination Code');
4263: fnd_message.raise_error;
4264: --
4265: end if;
4266: --
4259:
4260: --
4261: fnd_message.set_name('BEN','BEN_94998_CWB_INVLD');
4262: fnd_message.set_token('FIELD','Currency Determination Code');
4263: fnd_message.raise_error;
4264: --
4265: end if;
4266: --
4267: hr_utility.set_location('Leaving:'||l_proc,10);
4646: --
4647: -- An unhandled or unexpected error has occurred which
4648: -- we must report
4649: --
4650: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4651: fnd_message.set_token('PROCEDURE', l_proc);
4652: fnd_message.set_token('STEP','15');
4653: fnd_message.raise_error;
4654: End dt_update_validate;
4647: -- An unhandled or unexpected error has occurred which
4648: -- we must report
4649: --
4650: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4651: fnd_message.set_token('PROCEDURE', l_proc);
4652: fnd_message.set_token('STEP','15');
4653: fnd_message.raise_error;
4654: End dt_update_validate;
4655: --
4648: -- we must report
4649: --
4650: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4651: fnd_message.set_token('PROCEDURE', l_proc);
4652: fnd_message.set_token('STEP','15');
4653: fnd_message.raise_error;
4654: End dt_update_validate;
4655: --
4656: -- ----------------------------------------------------------------------------
4649: --
4650: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4651: fnd_message.set_token('PROCEDURE', l_proc);
4652: fnd_message.set_token('STEP','15');
4653: fnd_message.raise_error;
4654: End dt_update_validate;
4655: --
4656: -- ----------------------------------------------------------------------------
4657: -- |--------------------------< dt_delete_validate >--------------------------|
4861: --
4862: -- An unhandled or unexpected error has occurred which
4863: -- we must report
4864: --
4865: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4866: fnd_message.set_token('PROCEDURE', l_proc);
4867: fnd_message.set_token('STEP','15');
4868: fnd_message.raise_error;
4869: End dt_delete_validate;
4862: -- An unhandled or unexpected error has occurred which
4863: -- we must report
4864: --
4865: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4866: fnd_message.set_token('PROCEDURE', l_proc);
4867: fnd_message.set_token('STEP','15');
4868: fnd_message.raise_error;
4869: End dt_delete_validate;
4870: --
4863: -- we must report
4864: --
4865: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4866: fnd_message.set_token('PROCEDURE', l_proc);
4867: fnd_message.set_token('STEP','15');
4868: fnd_message.raise_error;
4869: End dt_delete_validate;
4870: --
4871: -- ----------------------------------------------------------------------------
4864: --
4865: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4866: fnd_message.set_token('PROCEDURE', l_proc);
4867: fnd_message.set_token('STEP','15');
4868: fnd_message.raise_error;
4869: End dt_delete_validate;
4870: --
4871: -- ----------------------------------------------------------------------------
4872: -- |------< chk_mlt_cd_dependencies >------|
4952: and p_rt_mlt_cd in ('FLFX', 'CVG', 'CL') then
4953: --
4954: if p_val is null then
4955: --
4956: fnd_message.set_name('BEN','BEN_91536_VAL_RQD');
4957: fnd_message.raise_error;
4958: --
4959: end if;
4960: --
4953: --
4954: if p_val is null then
4955: --
4956: fnd_message.set_name('BEN','BEN_91536_VAL_RQD');
4957: fnd_message.raise_error;
4958: --
4959: end if;
4960: --
4961: if p_mn_elcn_val is not null then
4959: end if;
4960: --
4961: if p_mn_elcn_val is not null then
4962: --
4963: fnd_message.set_name('BEN','BEN_91539_MIN_VAL_SPEC');
4964: fnd_message.raise_error;
4965: --
4966: end if;
4967: --
4960: --
4961: if p_mn_elcn_val is not null then
4962: --
4963: fnd_message.set_name('BEN','BEN_91539_MIN_VAL_SPEC');
4964: fnd_message.raise_error;
4965: --
4966: end if;
4967: --
4968: if p_mx_elcn_val is not null then
4966: end if;
4967: --
4968: if p_mx_elcn_val is not null then
4969: --
4970: fnd_message.set_name('BEN','BEN_91541_MAX_VAL_SPEC');
4971: fnd_message.raise_error;
4972: --
4973: end if;
4974: --
4967: --
4968: if p_mx_elcn_val is not null then
4969: --
4970: fnd_message.set_name('BEN','BEN_91541_MAX_VAL_SPEC');
4971: fnd_message.raise_error;
4972: --
4973: end if;
4974: --
4975: if p_incrmt_elcn_val is not null then
4973: end if;
4974: --
4975: if p_incrmt_elcn_val is not null then
4976: --
4977: fnd_message.set_name('BEN','BEN_91543_INCRMT_VAL_SPEC');
4978: fnd_message.raise_error;
4979: --
4980: end if;
4981: --
4974: --
4975: if p_incrmt_elcn_val is not null then
4976: --
4977: fnd_message.set_name('BEN','BEN_91543_INCRMT_VAL_SPEC');
4978: fnd_message.raise_error;
4979: --
4980: end if;
4981: --
4982: if p_dflt_val is not null then
4980: end if;
4981: --
4982: if p_dflt_val is not null then
4983: --
4984: -- fnd_message.set_name('BEN','BEN_91545_DFLT_VAL_SPEC'); -- Bug 2272978
4985: fnd_message.set_name('BEN','BEN_91551_DFLT_VAL_SPEC');
4986: fnd_message.raise_error;
4987: --
4988: end if;
4981: --
4982: if p_dflt_val is not null then
4983: --
4984: -- fnd_message.set_name('BEN','BEN_91545_DFLT_VAL_SPEC'); -- Bug 2272978
4985: fnd_message.set_name('BEN','BEN_91551_DFLT_VAL_SPEC');
4986: fnd_message.raise_error;
4987: --
4988: end if;
4989: --
4982: if p_dflt_val is not null then
4983: --
4984: -- fnd_message.set_name('BEN','BEN_91545_DFLT_VAL_SPEC'); -- Bug 2272978
4985: fnd_message.set_name('BEN','BEN_91551_DFLT_VAL_SPEC');
4986: fnd_message.raise_error;
4987: --
4988: end if;
4989: --
4990: elsif p_entr_val_at_enrt_flag = 'Y'
4991: and p_rt_mlt_cd in ('FLFX', 'CVG', 'CL') then
4992: --
4993: if p_val is not null then
4994: --
4995: fnd_message.set_name('BEN','BEN_91537_VAL_SPEC');
4996: fnd_message.raise_error;
4997: --
4998: end if;
4999: --
4992: --
4993: if p_val is not null then
4994: --
4995: fnd_message.set_name('BEN','BEN_91537_VAL_SPEC');
4996: fnd_message.raise_error;
4997: --
4998: end if;
4999: --
5000: if p_entr_ann_val_flag = 'N' and substr(p_acty_typ_cd,1,3) <> 'CWB' then
5000: if p_entr_ann_val_flag = 'N' and substr(p_acty_typ_cd,1,3) <> 'CWB' then
5001: --
5002: if p_mn_elcn_val is null then
5003: --
5004: fnd_message.set_name('BEN','BEN_91538_MIN_VAL_RQD');
5005: fnd_message.raise_error;
5006: --
5007: end if;
5008: --
5001: --
5002: if p_mn_elcn_val is null then
5003: --
5004: fnd_message.set_name('BEN','BEN_91538_MIN_VAL_RQD');
5005: fnd_message.raise_error;
5006: --
5007: end if;
5008: --
5009: if p_mx_elcn_val is null then
5007: end if;
5008: --
5009: if p_mx_elcn_val is null then
5010: --
5011: fnd_message.set_name('BEN','BEN_91540_MAX_VAL_RQD');
5012: fnd_message.raise_error;
5013: --
5014: end if;
5015: --
5008: --
5009: if p_mx_elcn_val is null then
5010: --
5011: fnd_message.set_name('BEN','BEN_91540_MAX_VAL_RQD');
5012: fnd_message.raise_error;
5013: --
5014: end if;
5015: --
5016: end if;
5016: end if;
5017: --
5018: if p_incrmt_elcn_val is null and substr(p_acty_typ_cd,1,3) <> 'CWB' then
5019: --
5020: fnd_message.set_name('BEN','BEN_91542_INCRMT_VAL_RQD');
5021: fnd_message.raise_error;
5022: --
5023: end if;
5024: --
5017: --
5018: if p_incrmt_elcn_val is null and substr(p_acty_typ_cd,1,3) <> 'CWB' then
5019: --
5020: fnd_message.set_name('BEN','BEN_91542_INCRMT_VAL_RQD');
5021: fnd_message.raise_error;
5022: --
5023: end if;
5024: --
5025: if p_dflt_val is null and substr(p_acty_typ_cd,1,3) <> 'CWB' then
5023: end if;
5024: --
5025: if p_dflt_val is null and substr(p_acty_typ_cd,1,3) <> 'CWB' then
5026: --
5027: -- fnd_message.set_name('BEN','BEN_91544_DFLT_VAL_RQD');
5028: fnd_message.set_name('BEN','BEN_91550_DFLT_VAL_RQD'); -- Bug 2272978
5029: fnd_message.raise_error;
5030: --
5031: end if;
5024: --
5025: if p_dflt_val is null and substr(p_acty_typ_cd,1,3) <> 'CWB' then
5026: --
5027: -- fnd_message.set_name('BEN','BEN_91544_DFLT_VAL_RQD');
5028: fnd_message.set_name('BEN','BEN_91550_DFLT_VAL_RQD'); -- Bug 2272978
5029: fnd_message.raise_error;
5030: --
5031: end if;
5032: --
5025: if p_dflt_val is null and substr(p_acty_typ_cd,1,3) <> 'CWB' then
5026: --
5027: -- fnd_message.set_name('BEN','BEN_91544_DFLT_VAL_RQD');
5028: fnd_message.set_name('BEN','BEN_91550_DFLT_VAL_RQD'); -- Bug 2272978
5029: fnd_message.raise_error;
5030: --
5031: end if;
5032: --
5033:
5033:
5034: -- begin bug 2282186
5035: if p_dflt_val < p_mn_elcn_val or p_dflt_val > p_mx_elcn_val then
5036: --
5037: fnd_message.set_name('PAY','HR_INPVAL_DEFAULT_INVALID');
5038: fnd_message.raise_error;
5039: --
5040: end if;
5041: -- end bug 2282186
5034: -- begin bug 2282186
5035: if p_dflt_val < p_mn_elcn_val or p_dflt_val > p_mx_elcn_val then
5036: --
5037: fnd_message.set_name('PAY','HR_INPVAL_DEFAULT_INVALID');
5038: fnd_message.raise_error;
5039: --
5040: end if;
5041: -- end bug 2282186
5042:
5043: elsif p_entr_val_at_enrt_flag = 'Y'
5044: and p_rt_mlt_cd in ('AP','PRNT','NSVU','RL','CLANDCVG',
5045: 'APANDCVG','PRNTANDCVG') then
5046: --
5047: fnd_message.set_name('BEN','BEN_91973_ENTR_VAL_AT_ENRT');
5048: fnd_message.raise_error;
5049: --
5050: end if;
5051: --
5044: and p_rt_mlt_cd in ('AP','PRNT','NSVU','RL','CLANDCVG',
5045: 'APANDCVG','PRNTANDCVG') then
5046: --
5047: fnd_message.set_name('BEN','BEN_91973_ENTR_VAL_AT_ENRT');
5048: fnd_message.raise_error;
5049: --
5050: end if;
5051: --
5052: if p_rt_mlt_cd is NULL then
5050: end if;
5051: --
5052: if p_rt_mlt_cd is NULL then
5053: --
5054: fnd_message.set_name('BEN','BEN_91535_MLT_CD_RQD');
5055: fnd_message.raise_error;
5056: --
5057: end if;
5058: --
5051: --
5052: if p_rt_mlt_cd is NULL then
5053: --
5054: fnd_message.set_name('BEN','BEN_91535_MLT_CD_RQD');
5055: fnd_message.raise_error;
5056: --
5057: end if;
5058: --
5059: if p_val is NULL then
5060: --
5061: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5062: 'PRNTANDCBG') then
5063: --
5064: fnd_message.set_name('BEN','BEN_91536_VAL_RQD');
5065: fnd_message.raise_error;
5066: --
5067: end if;
5068: --
5061: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5062: 'PRNTANDCBG') then
5063: --
5064: fnd_message.set_name('BEN','BEN_91536_VAL_RQD');
5065: fnd_message.raise_error;
5066: --
5067: end if;
5068: --
5069: else
5069: else
5070: --
5071: if p_rt_mlt_cd in ('RL','NSVU') then
5072: --
5073: fnd_message.set_name('BEN','BEN_91537_VAL_SPEC');
5074: fnd_message.raise_error;
5075: --
5076: end if;
5077: --
5070: --
5071: if p_rt_mlt_cd in ('RL','NSVU') then
5072: --
5073: fnd_message.set_name('BEN','BEN_91537_VAL_SPEC');
5074: fnd_message.raise_error;
5075: --
5076: end if;
5077: --
5078: end if;
5081: --
5082: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5083: 'PRNTANDCVG','RL','NSVU') then
5084: --
5085: fnd_message.set_name('BEN','BEN_91539_MIN_VAL_SPEC');
5086: fnd_message.raise_error;
5087: --
5088: end if;
5089: --
5082: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5083: 'PRNTANDCVG','RL','NSVU') then
5084: --
5085: fnd_message.set_name('BEN','BEN_91539_MIN_VAL_SPEC');
5086: fnd_message.raise_error;
5087: --
5088: end if;
5089: --
5090: end if;
5093: --
5094: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5095: 'PRNTANDCVG','RL','NSVU') then
5096: --
5097: fnd_message.set_name('BEN','BEN_91541_MAX_VAL_SPEC');
5098: fnd_message.raise_error;
5099: --
5100: end if;
5101: --
5094: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5095: 'PRNTANDCVG','RL','NSVU') then
5096: --
5097: fnd_message.set_name('BEN','BEN_91541_MAX_VAL_SPEC');
5098: fnd_message.raise_error;
5099: --
5100: end if;
5101: --
5102: end if;
5105: --
5106: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5107: 'PRNTANDCVG','RL','NSVU') then
5108: --
5109: fnd_message.set_name('BEN','BEN_91543_INCRMT_VAL_SPEC');
5110: fnd_message.raise_error;
5111: --
5112: end if;
5113: --
5106: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5107: 'PRNTANDCVG','RL','NSVU') then
5108: --
5109: fnd_message.set_name('BEN','BEN_91543_INCRMT_VAL_SPEC');
5110: fnd_message.raise_error;
5111: --
5112: end if;
5113: --
5114: end if;
5117: --
5118: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5119: 'PRNTANDCVG','RL','NSVU') then
5120: --
5121: -- fnd_message.set_name('BEN','BEN_91545_DFLT_VAL_SPEC');
5122: fnd_message.set_name('BEN','BEN_91551_DFLT_VAL_SPEC'); -- Bug 2272978
5123: fnd_message.raise_error;
5124: --
5125: end if;
5118: if p_rt_mlt_cd in ('AP','PRNT','CLANDCVG','APANDCVG',
5119: 'PRNTANDCVG','RL','NSVU') then
5120: --
5121: -- fnd_message.set_name('BEN','BEN_91545_DFLT_VAL_SPEC');
5122: fnd_message.set_name('BEN','BEN_91551_DFLT_VAL_SPEC'); -- Bug 2272978
5123: fnd_message.raise_error;
5124: --
5125: end if;
5126: --
5119: 'PRNTANDCVG','RL','NSVU') then
5120: --
5121: -- fnd_message.set_name('BEN','BEN_91545_DFLT_VAL_SPEC');
5122: fnd_message.set_name('BEN','BEN_91551_DFLT_VAL_SPEC'); -- Bug 2272978
5123: fnd_message.raise_error;
5124: --
5125: end if;
5126: --
5127: end if;
5130: --
5131: if p_rt_mlt_cd in ('CL','AP','PRNT','CLANDCVG','APANDCVG',
5132: 'PRNTANDCVG') then
5133: --
5134: fnd_message.set_name('BEN','BEN_91544_RT_TYP_CD_RQD');
5135: fnd_message.raise_error;
5136: --
5137: end if;
5138: else
5131: if p_rt_mlt_cd in ('CL','AP','PRNT','CLANDCVG','APANDCVG',
5132: 'PRNTANDCVG') then
5133: --
5134: fnd_message.set_name('BEN','BEN_91544_RT_TYP_CD_RQD');
5135: fnd_message.raise_error;
5136: --
5137: end if;
5138: else
5139: --
5138: else
5139: --
5140: if p_rt_mlt_cd in ('FLFX','CVG','RL','NSVU') then
5141: --
5142: fnd_message.set_name('BEN','BEN_91545_RT_TYP_CD_SPEC');
5143: fnd_message.raise_error;
5144: --
5145: end if;
5146: --
5139: --
5140: if p_rt_mlt_cd in ('FLFX','CVG','RL','NSVU') then
5141: --
5142: fnd_message.set_name('BEN','BEN_91545_RT_TYP_CD_SPEC');
5143: fnd_message.raise_error;
5144: --
5145: end if;
5146: --
5147: end if;
5149: if p_bnft_rt_typ_cd is NULL then
5150: --
5151: if p_rt_mlt_cd in ('CVG','CLANDCVG','APANDCVG','PRNTANDCVG') then
5152: --
5153: fnd_message.set_name('BEN','BEN_91546_BNFTS_TYP_CD_RQD');
5154: fnd_message.raise_error;
5155: --
5156: end if;
5157: --
5150: --
5151: if p_rt_mlt_cd in ('CVG','CLANDCVG','APANDCVG','PRNTANDCVG') then
5152: --
5153: fnd_message.set_name('BEN','BEN_91546_BNFTS_TYP_CD_RQD');
5154: fnd_message.raise_error;
5155: --
5156: end if;
5157: --
5158: else
5158: else
5159: --
5160: if p_rt_mlt_cd in ('FLFX','CL','AP','PRNT','RL','NSVU') then
5161: --
5162: fnd_message.set_name('BEN','BEN_91547_BNFTS_TYP_CD_SPEC');
5163: fnd_message.raise_error;
5164: --
5165: end if;
5166: --
5159: --
5160: if p_rt_mlt_cd in ('FLFX','CL','AP','PRNT','RL','NSVU') then
5161: --
5162: fnd_message.set_name('BEN','BEN_91547_BNFTS_TYP_CD_SPEC');
5163: fnd_message.raise_error;
5164: --
5165: end if;
5166: --
5167: end if;
5169: if p_val_calc_rl is NULL then
5170: --
5171: if p_rt_mlt_cd in ('RL') then
5172: --
5173: fnd_message.set_name('BEN','BEN_91548_VAL_CALC_RL_RQD');
5174: fnd_message.raise_error;
5175: --
5176: end if;
5177: --
5170: --
5171: if p_rt_mlt_cd in ('RL') then
5172: --
5173: fnd_message.set_name('BEN','BEN_91548_VAL_CALC_RL_RQD');
5174: fnd_message.raise_error;
5175: --
5176: end if;
5177: --
5178: else
5179: --
5180: if p_rt_mlt_cd in ('FLFX','CL','AP','CVG','PRNT',
5181: 'CLANDCVG','APANDCVG','PRNTANDCVG','NSVU') then
5182: --
5183: fnd_message.set_name('BEN','BEN_91549_VAL_CALC_RL_SPEC');
5184: fnd_message.raise_error;
5185: --
5186: end if;
5187: end if;
5180: if p_rt_mlt_cd in ('FLFX','CL','AP','CVG','PRNT',
5181: 'CLANDCVG','APANDCVG','PRNTANDCVG','NSVU') then
5182: --
5183: fnd_message.set_name('BEN','BEN_91549_VAL_CALC_RL_SPEC');
5184: fnd_message.raise_error;
5185: --
5186: end if;
5187: end if;
5188: --- GSP val is require when the mult cd is PRV
5186: end if;
5187: end if;
5188: --- GSP val is require when the mult cd is PRV
5189: if p_pay_rate_grade_rule_id is not null and p_rt_mlt_cd <> 'PRV' then
5190: fnd_message.set_name('BEN','BEN_91544_RT_TYP_CD_RQD');
5191: fnd_message.raise_error;
5192: end if ;
5193: --Rate by criteria
5194: if (p_acty_typ_cd ='RBC' and p_rt_mlt_cd <> 'NSVU') then
5187: end if;
5188: --- GSP val is require when the mult cd is PRV
5189: if p_pay_rate_grade_rule_id is not null and p_rt_mlt_cd <> 'PRV' then
5190: fnd_message.set_name('BEN','BEN_91544_RT_TYP_CD_RQD');
5191: fnd_message.raise_error;
5192: end if ;
5193: --Rate by criteria
5194: if (p_acty_typ_cd ='RBC' and p_rt_mlt_cd <> 'NSVU') then
5195: fnd_message.set_name('BEN','BEN_94138_ACTY_RT_MLT_CD');
5191: fnd_message.raise_error;
5192: end if ;
5193: --Rate by criteria
5194: if (p_acty_typ_cd ='RBC' and p_rt_mlt_cd <> 'NSVU') then
5195: fnd_message.set_name('BEN','BEN_94138_ACTY_RT_MLT_CD');
5196: fnd_message.raise_error;
5197: end if;
5198:
5199: --
5192: end if ;
5193: --Rate by criteria
5194: if (p_acty_typ_cd ='RBC' and p_rt_mlt_cd <> 'NSVU') then
5195: fnd_message.set_name('BEN','BEN_94138_ACTY_RT_MLT_CD');
5196: fnd_message.raise_error;
5197: end if;
5198:
5199: --
5200: end if;
5258: and p_mx_elcn_val is not null and p_incrmt_elcn_val is not null
5259: and p_dflt_val is not null)
5260: then
5261: --
5262: fnd_message.set_name('BEN','BEN_94128_MN_MX_VAL_AND_RL');
5263: fnd_message.raise_error;
5264: --
5265: end if;
5266: --
5259: and p_dflt_val is not null)
5260: then
5261: --
5262: fnd_message.set_name('BEN','BEN_94128_MN_MX_VAL_AND_RL');
5263: fnd_message.raise_error;
5264: --
5265: end if;
5266: --
5267: --p_mn_mx_elcn_rl is NOT NULL only if
5271:
5272: if (p_mn_mx_elcn_rl is NOT NULL) then
5273: if (p_entr_val_at_enrt_flag <> 'Y' or p_acty_typ_cd not in ('CWBWS', 'CWBRA')) then
5274: --
5275: fnd_message.set_name('BEN','BEN_94129_MN_MX_RL_NOT_NULL');
5276: fnd_message.raise_error;
5277: --
5278: end if;
5279: end if;
5272: if (p_mn_mx_elcn_rl is NOT NULL) then
5273: if (p_entr_val_at_enrt_flag <> 'Y' or p_acty_typ_cd not in ('CWBWS', 'CWBRA')) then
5274: --
5275: fnd_message.set_name('BEN','BEN_94129_MN_MX_RL_NOT_NULL');
5276: fnd_message.raise_error;
5277: --
5278: end if;
5279: end if;
5280:
5326: --
5327: IF NVL(p_code,'N') <> 'RL' AND p_rule IS NOT NULL
5328: THEN
5329: --
5330: fnd_message.set_name ('BEN', 'BEN_91624_CD_RL_2');
5331: fnd_message.raise_error;
5332: --
5333: ELSIF p_code = 'RL' AND p_rule IS NULL
5334: THEN
5327: IF NVL(p_code,'N') <> 'RL' AND p_rule IS NOT NULL
5328: THEN
5329: --
5330: fnd_message.set_name ('BEN', 'BEN_91624_CD_RL_2');
5331: fnd_message.raise_error;
5332: --
5333: ELSIF p_code = 'RL' AND p_rule IS NULL
5334: THEN
5335: --
5332: --
5333: ELSIF p_code = 'RL' AND p_rule IS NULL
5334: THEN
5335: --
5336: fnd_message.set_name ('BEN', 'BEN_91623_CD_RL_1');
5337: fnd_message.raise_error;
5338: --
5339: END IF;
5340:
5333: ELSIF p_code = 'RL' AND p_rule IS NULL
5334: THEN
5335: --
5336: fnd_message.set_name ('BEN', 'BEN_91623_CD_RL_1');
5337: fnd_message.raise_error;
5338: --
5339: END IF;
5340:
5341: --
5341: --
5342: IF NVL(p_code,'N') <> 'WASHRULE' AND p_num IS NOT NULL
5343: THEN
5344: --
5345: fnd_message.set_name ('BEN', 'BEN_92270_NTWSHRL_NUM_NTNULL');
5346: fnd_message.raise_error;
5347: --
5348: ELSIF p_code = 'WASHRULE' AND p_num IS NULL
5349: THEN
5342: IF NVL(p_code,'N') <> 'WASHRULE' AND p_num IS NOT NULL
5343: THEN
5344: --
5345: fnd_message.set_name ('BEN', 'BEN_92270_NTWSHRL_NUM_NTNULL');
5346: fnd_message.raise_error;
5347: --
5348: ELSIF p_code = 'WASHRULE' AND p_num IS NULL
5349: THEN
5350: --
5347: --
5348: ELSIF p_code = 'WASHRULE' AND p_num IS NULL
5349: THEN
5350: --
5351: fnd_message.set_name ('BEN', 'BEN_92271_NTWSHRL_NUM_NULL');
5352: fnd_message.raise_error;
5353: --
5354: END IF;
5355:
5348: ELSIF p_code = 'WASHRULE' AND p_num IS NULL
5349: THEN
5350: --
5351: fnd_message.set_name ('BEN', 'BEN_92271_NTWSHRL_NUM_NULL');
5352: fnd_message.raise_error;
5353: --
5354: END IF;
5355:
5356: --
6186: close csr_leg_code;
6187: --
6188: -- The primary key is invalid therefore we must error
6189: --
6190: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
6191: fnd_message.raise_error;
6192: --
6193: end if;
6194: --
6187: --
6188: -- The primary key is invalid therefore we must error
6189: --
6190: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
6191: fnd_message.raise_error;
6192: --
6193: end if;
6194: --
6195: close csr_leg_code;