318: -- Account for cases where formula returns an unknown
319: -- variable name
320: hr_utility.set_location('In the Loop wrong Name ',10);
321: --
322: fnd_message.set_name('BEN','BEN_92310_FORMULA_RET_PARAM');
323: fnd_message.set_token('PROC',l_package);
324: fnd_message.set_token('FORMULA',p_formula_id);
325: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
326: fnd_message.raise_error;
319: -- variable name
320: hr_utility.set_location('In the Loop wrong Name ',10);
321: --
322: fnd_message.set_name('BEN','BEN_92310_FORMULA_RET_PARAM');
323: fnd_message.set_token('PROC',l_package);
324: fnd_message.set_token('FORMULA',p_formula_id);
325: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
326: fnd_message.raise_error;
327: --
320: hr_utility.set_location('In the Loop wrong Name ',10);
321: --
322: fnd_message.set_name('BEN','BEN_92310_FORMULA_RET_PARAM');
323: fnd_message.set_token('PROC',l_package);
324: fnd_message.set_token('FORMULA',p_formula_id);
325: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
326: fnd_message.raise_error;
327: --
328: end if;
321: --
322: fnd_message.set_name('BEN','BEN_92310_FORMULA_RET_PARAM');
323: fnd_message.set_token('PROC',l_package);
324: fnd_message.set_token('FORMULA',p_formula_id);
325: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
326: fnd_message.raise_error;
327: --
328: end if;
329: --
322: fnd_message.set_name('BEN','BEN_92310_FORMULA_RET_PARAM');
323: fnd_message.set_token('PROC',l_package);
324: fnd_message.set_token('FORMULA',p_formula_id);
325: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
326: fnd_message.raise_error;
327: --
328: end if;
329: --
330: exception when others then
330: exception when others then
331: --
332: hr_utility.set_location('BEN_92311_FORMULA_VAL_PARAM ',10);
333: --
334: fnd_message.set_name('BEN','BEN_92311_FORMULA_VAL_PARAM');
335: fnd_message.set_token('PROC',l_package);
336: fnd_message.set_token('FORMULA',p_formula_id);
337: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
338: fnd_message.raise_error;
331: --
332: hr_utility.set_location('BEN_92311_FORMULA_VAL_PARAM ',10);
333: --
334: fnd_message.set_name('BEN','BEN_92311_FORMULA_VAL_PARAM');
335: fnd_message.set_token('PROC',l_package);
336: fnd_message.set_token('FORMULA',p_formula_id);
337: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
338: fnd_message.raise_error;
339: --
332: hr_utility.set_location('BEN_92311_FORMULA_VAL_PARAM ',10);
333: --
334: fnd_message.set_name('BEN','BEN_92311_FORMULA_VAL_PARAM');
335: fnd_message.set_token('PROC',l_package);
336: fnd_message.set_token('FORMULA',p_formula_id);
337: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
338: fnd_message.raise_error;
339: --
340: end;
333: --
334: fnd_message.set_name('BEN','BEN_92311_FORMULA_VAL_PARAM');
335: fnd_message.set_token('PROC',l_package);
336: fnd_message.set_token('FORMULA',p_formula_id);
337: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
338: fnd_message.raise_error;
339: --
340: end;
341: end loop ;
334: fnd_message.set_name('BEN','BEN_92311_FORMULA_VAL_PARAM');
335: fnd_message.set_token('PROC',l_package);
336: fnd_message.set_token('FORMULA',p_formula_id);
337: fnd_message.set_token('PARAMETER',l_outputs(l_count).name);
338: fnd_message.raise_error;
339: --
340: end;
341: end loop ;
342: ELSE
512: -- Start Date should be less than end date.
513: --
514: if p_end_date < p_start_date then
515: --
516: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
517: fnd_message.set_token('PROC',l_package);
518: fnd_message.set_token('START_DT',to_char(p_start_date));
519: fnd_message.set_token('END_DT',to_char(p_end_date));
520: fnd_message.raise_error;
513: --
514: if p_end_date < p_start_date then
515: --
516: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
517: fnd_message.set_token('PROC',l_package);
518: fnd_message.set_token('START_DT',to_char(p_start_date));
519: fnd_message.set_token('END_DT',to_char(p_end_date));
520: fnd_message.raise_error;
521: --
514: if p_end_date < p_start_date then
515: --
516: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
517: fnd_message.set_token('PROC',l_package);
518: fnd_message.set_token('START_DT',to_char(p_start_date));
519: fnd_message.set_token('END_DT',to_char(p_end_date));
520: fnd_message.raise_error;
521: --
522: else
515: --
516: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
517: fnd_message.set_token('PROC',l_package);
518: fnd_message.set_token('START_DT',to_char(p_start_date));
519: fnd_message.set_token('END_DT',to_char(p_end_date));
520: fnd_message.raise_error;
521: --
522: else
523: --
516: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
517: fnd_message.set_token('PROC',l_package);
518: fnd_message.set_token('START_DT',to_char(p_start_date));
519: fnd_message.set_token('END_DT',to_char(p_end_date));
520: fnd_message.raise_error;
521: --
522: else
523: --
524: -- need to add 1 day to correctly calc time between 2 dates.
569: --
570: l_periods := 0;
571: --
572: if p_payroll_id is null then
573: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
574: fnd_message.set_token('PROC',l_package);
575: fnd_message.raise_error;
576: end if;
577: -- Check if period_type of the payroll is
570: l_periods := 0;
571: --
572: if p_payroll_id is null then
573: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
574: fnd_message.set_token('PROC',l_package);
575: fnd_message.raise_error;
576: end if;
577: -- Check if period_type of the payroll is
578: -- either Calendar or Lunar month
571: --
572: if p_payroll_id is null then
573: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
574: fnd_message.set_token('PROC',l_package);
575: fnd_message.raise_error;
576: end if;
577: -- Check if period_type of the payroll is
578: -- either Calendar or Lunar month
579: -- Standard skip rules aren't applied to these
812: if g_debug then
813: hr_utility.set_location('l_tot_perd = 0 and l_periods = 0 ' ,234);
814: end if;
815: --
816: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
817: fnd_message.set_token('PROC',l_package);
818: fnd_message.raise_error;
819: end if;
820: --
813: hr_utility.set_location('l_tot_perd = 0 and l_periods = 0 ' ,234);
814: end if;
815: --
816: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
817: fnd_message.set_token('PROC',l_package);
818: fnd_message.raise_error;
819: end if;
820: --
821: if p_acty_ref_perd_cd = 'EPP' then
814: end if;
815: --
816: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
817: fnd_message.set_token('PROC',l_package);
818: fnd_message.raise_error;
819: end if;
820: --
821: if p_acty_ref_perd_cd = 'EPP' then
822: --
851: --
852: l_periods := 0;
853: --
854: if p_payroll_id is null then
855: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
856: fnd_message.set_token('PROC',l_package);
857: fnd_message.raise_error;
858: end if;
859: --
852: l_periods := 0;
853: --
854: if p_payroll_id is null then
855: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
856: fnd_message.set_token('PROC',l_package);
857: fnd_message.raise_error;
858: end if;
859: --
860: -- Check whether any element rule available for the element type.
853: --
854: if p_payroll_id is null then
855: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
856: fnd_message.set_token('PROC',l_package);
857: fnd_message.raise_error;
858: end if;
859: --
860: -- Check whether any element rule available for the element type.
861: -- If not, do not call the payroll check routine.
920: if l_periods = 0 then
921: --
922: -- Raise error as payroll was not found.
923: --
924: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
925: fnd_message.set_token('PROC',l_package);
926: fnd_message.raise_error;
927: end if;
928:
921: --
922: -- Raise error as payroll was not found.
923: --
924: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
925: fnd_message.set_token('PROC',l_package);
926: fnd_message.raise_error;
927: end if;
928:
929:
922: -- Raise error as payroll was not found.
923: --
924: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
925: fnd_message.set_token('PROC',l_package);
926: fnd_message.raise_error;
927: end if;
928:
929:
930: elsif p_acty_ref_perd_cd = 'BWK' then
980: else
981: --
982: -- Invalid Activity reference period code.
983: --
984: fnd_message.set_name('BEN','BEN_91299_INV_ACTY_REF_PERD_CD');
985: fnd_message.set_token('PROC',l_package);
986: fnd_message.set_token('ACTY_REF_PERD_CD',p_acty_ref_perd_cd);
987: fnd_message.raise_error;
988: --
981: --
982: -- Invalid Activity reference period code.
983: --
984: fnd_message.set_name('BEN','BEN_91299_INV_ACTY_REF_PERD_CD');
985: fnd_message.set_token('PROC',l_package);
986: fnd_message.set_token('ACTY_REF_PERD_CD',p_acty_ref_perd_cd);
987: fnd_message.raise_error;
988: --
989: end if;
982: -- Invalid Activity reference period code.
983: --
984: fnd_message.set_name('BEN','BEN_91299_INV_ACTY_REF_PERD_CD');
985: fnd_message.set_token('PROC',l_package);
986: fnd_message.set_token('ACTY_REF_PERD_CD',p_acty_ref_perd_cd);
987: fnd_message.raise_error;
988: --
989: end if;
990:
983: --
984: fnd_message.set_name('BEN','BEN_91299_INV_ACTY_REF_PERD_CD');
985: fnd_message.set_token('PROC',l_package);
986: fnd_message.set_token('ACTY_REF_PERD_CD',p_acty_ref_perd_cd);
987: fnd_message.raise_error;
988: --
989: end if;
990:
991: if g_debug then
997:
998: exception
999: --
1000: when others then
1001: fnd_message.raise_error;
1002: --
1003: end get_periods_between;
1004: --
1005: --overloaded the function to calculate periods based on cheque dateS
1171: -- Start Date should be less than end date.
1172: --
1173: if p_end_date < p_start_date then
1174: --
1175: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
1176: fnd_message.set_token('PROC',l_package);
1177: fnd_message.set_token('START_DT',to_char(p_start_date));
1178: fnd_message.set_token('END_DT',to_char(p_end_date));
1179: fnd_message.raise_error;
1172: --
1173: if p_end_date < p_start_date then
1174: --
1175: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
1176: fnd_message.set_token('PROC',l_package);
1177: fnd_message.set_token('START_DT',to_char(p_start_date));
1178: fnd_message.set_token('END_DT',to_char(p_end_date));
1179: fnd_message.raise_error;
1180: --
1173: if p_end_date < p_start_date then
1174: --
1175: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
1176: fnd_message.set_token('PROC',l_package);
1177: fnd_message.set_token('START_DT',to_char(p_start_date));
1178: fnd_message.set_token('END_DT',to_char(p_end_date));
1179: fnd_message.raise_error;
1180: --
1181: else
1174: --
1175: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
1176: fnd_message.set_token('PROC',l_package);
1177: fnd_message.set_token('START_DT',to_char(p_start_date));
1178: fnd_message.set_token('END_DT',to_char(p_end_date));
1179: fnd_message.raise_error;
1180: --
1181: else
1182: --
1175: fnd_message.set_name('BEN','BEN_91824_START_DT_AFTR_END_DT');
1176: fnd_message.set_token('PROC',l_package);
1177: fnd_message.set_token('START_DT',to_char(p_start_date));
1178: fnd_message.set_token('END_DT',to_char(p_end_date));
1179: fnd_message.raise_error;
1180: --
1181: else
1182: --
1183: -- need to add 1 day to correctly calc time between 2 dates.
1227: --
1228: l_periods := 0;
1229: --
1230: if p_payroll_id is null then
1231: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
1232: fnd_message.set_token('PROC',l_package);
1233: fnd_message.raise_error;
1234: end if;
1235: -- Check if period_type of the payroll is
1228: l_periods := 0;
1229: --
1230: if p_payroll_id is null then
1231: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
1232: fnd_message.set_token('PROC',l_package);
1233: fnd_message.raise_error;
1234: end if;
1235: -- Check if period_type of the payroll is
1236: -- either Calendar or Lunar month
1229: --
1230: if p_payroll_id is null then
1231: fnd_message.set_name('BEN','BEN_92403_PAYROLL_ID_REQ');
1232: fnd_message.set_token('PROC',l_package);
1233: fnd_message.raise_error;
1234: end if;
1235: -- Check if period_type of the payroll is
1236: -- either Calendar or Lunar month
1237: -- Standard skip rules aren't applied to these
1446: if g_debug then
1447: hr_utility.set_location('l_tot_perd = 0 and l_periods = 0 ' ,234);
1448: end if;
1449: --
1450: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
1451: fnd_message.set_token('PROC',l_package);
1452: fnd_message.raise_error;
1453: end if;
1454: --
1447: hr_utility.set_location('l_tot_perd = 0 and l_periods = 0 ' ,234);
1448: end if;
1449: --
1450: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
1451: fnd_message.set_token('PROC',l_package);
1452: fnd_message.raise_error;
1453: end if;
1454: --
1455: if p_acty_ref_perd_cd = 'EPP' then
1448: end if;
1449: --
1450: fnd_message.set_name('BEN', 'BEN_92346_PAYROLL_NOT_DEFINED');
1451: fnd_message.set_token('PROC',l_package);
1452: fnd_message.raise_error;
1453: end if;
1454: --
1455: if p_acty_ref_perd_cd = 'EPP' then
1456: --
1524: else
1525: --
1526: -- Invalid Activity reference period code.
1527: --
1528: fnd_message.set_name('BEN','BEN_91299_INV_ACTY_REF_PERD_CD');
1529: fnd_message.set_token('PROC',l_package);
1530: fnd_message.set_token('ACTY_REF_PERD_CD',p_acty_ref_perd_cd);
1531: fnd_message.raise_error;
1532: --
1525: --
1526: -- Invalid Activity reference period code.
1527: --
1528: fnd_message.set_name('BEN','BEN_91299_INV_ACTY_REF_PERD_CD');
1529: fnd_message.set_token('PROC',l_package);
1530: fnd_message.set_token('ACTY_REF_PERD_CD',p_acty_ref_perd_cd);
1531: fnd_message.raise_error;
1532: --
1533: end if;
1526: -- Invalid Activity reference period code.
1527: --
1528: fnd_message.set_name('BEN','BEN_91299_INV_ACTY_REF_PERD_CD');
1529: fnd_message.set_token('PROC',l_package);
1530: fnd_message.set_token('ACTY_REF_PERD_CD',p_acty_ref_perd_cd);
1531: fnd_message.raise_error;
1532: --
1533: end if;
1534:
1527: --
1528: fnd_message.set_name('BEN','BEN_91299_INV_ACTY_REF_PERD_CD');
1529: fnd_message.set_token('PROC',l_package);
1530: fnd_message.set_token('ACTY_REF_PERD_CD',p_acty_ref_perd_cd);
1531: fnd_message.raise_error;
1532: --
1533: end if;
1534:
1535: if g_debug then
1541:
1542: exception
1543: --
1544: when others then
1545: fnd_message.raise_error;
1546: --
1547: end get_periods_between;
1548: --
1549: ---------------------------------------------------------------------------
2030: --
2031: exception
2032: --
2033: when others then
2034: fnd_message.raise_error;
2035: --
2036: end get_balance;
2037: ---------------------------------------------------------------------------
2038: -- This procedure set the start date, end date, activity reference
2271: --
2272: if c_ecr%notfound then
2273: --
2274: close c_ecr;
2275: fnd_message.set_name('BEN','BEN_91825_ENRT_RT_NOT_FOUND');
2276: fnd_message.set_token('PROC',l_package);
2277: fnd_message.set_token('ENRT_RT_ID',to_char(p_enrt_rt_id));
2278: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
2279: fnd_message.raise_error;
2272: if c_ecr%notfound then
2273: --
2274: close c_ecr;
2275: fnd_message.set_name('BEN','BEN_91825_ENRT_RT_NOT_FOUND');
2276: fnd_message.set_token('PROC',l_package);
2277: fnd_message.set_token('ENRT_RT_ID',to_char(p_enrt_rt_id));
2278: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
2279: fnd_message.raise_error;
2280: --
2273: --
2274: close c_ecr;
2275: fnd_message.set_name('BEN','BEN_91825_ENRT_RT_NOT_FOUND');
2276: fnd_message.set_token('PROC',l_package);
2277: fnd_message.set_token('ENRT_RT_ID',to_char(p_enrt_rt_id));
2278: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
2279: fnd_message.raise_error;
2280: --
2281: else
2274: close c_ecr;
2275: fnd_message.set_name('BEN','BEN_91825_ENRT_RT_NOT_FOUND');
2276: fnd_message.set_token('PROC',l_package);
2277: fnd_message.set_token('ENRT_RT_ID',to_char(p_enrt_rt_id));
2278: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
2279: fnd_message.raise_error;
2280: --
2281: else
2282: --
2275: fnd_message.set_name('BEN','BEN_91825_ENRT_RT_NOT_FOUND');
2276: fnd_message.set_token('PROC',l_package);
2277: fnd_message.set_token('ENRT_RT_ID',to_char(p_enrt_rt_id));
2278: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
2279: fnd_message.raise_error;
2280: --
2281: else
2282: --
2283: close c_ecr;
2335: --
2336: close c_epe;
2337: -- hr_utility.set_location('BEN_91457_ELCTBL_CHC_NOT_FOUND ID:'||
2338: -- to_char(p_elig_per_elctbl_chc_id), 50);
2339: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
2340: fnd_message.set_token('ID',to_char(p_elig_per_elctbl_chc_id));
2341: fnd_message.set_token('PROC',l_package);
2342: fnd_message.raise_error;
2343: --
2336: close c_epe;
2337: -- hr_utility.set_location('BEN_91457_ELCTBL_CHC_NOT_FOUND ID:'||
2338: -- to_char(p_elig_per_elctbl_chc_id), 50);
2339: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
2340: fnd_message.set_token('ID',to_char(p_elig_per_elctbl_chc_id));
2341: fnd_message.set_token('PROC',l_package);
2342: fnd_message.raise_error;
2343: --
2344: else
2337: -- hr_utility.set_location('BEN_91457_ELCTBL_CHC_NOT_FOUND ID:'||
2338: -- to_char(p_elig_per_elctbl_chc_id), 50);
2339: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
2340: fnd_message.set_token('ID',to_char(p_elig_per_elctbl_chc_id));
2341: fnd_message.set_token('PROC',l_package);
2342: fnd_message.raise_error;
2343: --
2344: else
2345: --
2338: -- to_char(p_elig_per_elctbl_chc_id), 50);
2339: fnd_message.set_name('BEN','BEN_91457_ELCTBL_CHC_NOT_FOUND');
2340: fnd_message.set_token('ID',to_char(p_elig_per_elctbl_chc_id));
2341: fnd_message.set_token('PROC',l_package);
2342: fnd_message.raise_error;
2343: --
2344: else
2345: --
2346: close c_epe;
2366: --
2367: else
2368: --
2369: -- hr_utility.set_location('BEN_91884_CHC_N_RT_NOT_FOUND:', 50);
2370: fnd_message.set_name('BEN','BEN_91884_CHC_N_RT_NOT_FOUND');
2371: fnd_message.set_token('PROC',l_package);
2372: fnd_message.raise_error;
2373: --
2374: end if;
2367: else
2368: --
2369: -- hr_utility.set_location('BEN_91884_CHC_N_RT_NOT_FOUND:', 50);
2370: fnd_message.set_name('BEN','BEN_91884_CHC_N_RT_NOT_FOUND');
2371: fnd_message.set_token('PROC',l_package);
2372: fnd_message.raise_error;
2373: --
2374: end if;
2375: --
2368: --
2369: -- hr_utility.set_location('BEN_91884_CHC_N_RT_NOT_FOUND:', 50);
2370: fnd_message.set_name('BEN','BEN_91884_CHC_N_RT_NOT_FOUND');
2371: fnd_message.set_token('PROC',l_package);
2372: fnd_message.raise_error;
2373: --
2374: end if;
2375: --
2376: --end if;
2441: l_yrp.end_date := TO_DATE('12/31/'||l_year,'MM/DD/YYYY');
2442: --
2443: else
2444: --
2445: fnd_message.set_name('BEN','BEN_91334_PLAN_YR_PERD');
2446: fnd_message.set_token('PROC',l_package);
2447: fnd_message.raise_error;
2448: --
2449: end if;
2442: --
2443: else
2444: --
2445: fnd_message.set_name('BEN','BEN_91334_PLAN_YR_PERD');
2446: fnd_message.set_token('PROC',l_package);
2447: fnd_message.raise_error;
2448: --
2449: end if;
2450: --
2443: else
2444: --
2445: fnd_message.set_name('BEN','BEN_91334_PLAN_YR_PERD');
2446: fnd_message.set_token('PROC',l_package);
2447: fnd_message.raise_error;
2448: --
2449: end if;
2450: --
2451: end if;
2541: end if;
2542: p_start_date := l_start_date_nc_buffer; -- no copy changes
2543: p_end_date := l_end_date_nc_buffer; -- no copy changes
2544: p_yr_start_date := null; -- no copy changes
2545: fnd_message.raise_error;
2546: --
2547: end set_default_dates;
2548: --
2549: ---------------------------------------------------------------------------
2827: --
2828: exception
2829: --
2830: when others then
2831: fnd_message.raise_error;
2832: --
2833: end period_to_annual;
2834:
2835: --
3116: --
3117: exception
3118: --
3119: when others then
3120: fnd_message.raise_error;
3121: --
3122: end period_to_annual;
3123:
3124: --
3478: --
3479: exception
3480: --
3481: when others then
3482: fnd_message.raise_error;
3483: --
3484: end annual_to_period;
3485: --
3486: ---------------------------------------------------------------------------
3837: --
3838: exception
3839: --
3840: when others then
3841: fnd_message.raise_error;
3842: --
3843: end annual_to_period;
3844: function annual_to_period_out(p_amount in number,
3845: p_enrt_rt_id in number default null,
4116: exception
4117: --
4118: when others then
4119: p_pp_in_yr_used_num := null; -- no copy changes
4120: fnd_message.raise_error;
4121: --
4122: end annual_to_period_out;
4123: ---------------------------------------------------------------------------
4124: -- compare_balances
4225: close get_epe;
4226: elsif (p_pgm_id is null and p_pl_id is null and p_oipl_id is null)
4227: or p_per_in_ler_id is null or p_business_group_id is null
4228: or p_lf_evt_ocrd_dt is null then
4229: fnd_message.set_name('BEN','BEN_92404_NEED_MORE_VARS');
4230: fnd_message.set_token('PROC',l_package);
4231: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4232: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4226: elsif (p_pgm_id is null and p_pl_id is null and p_oipl_id is null)
4227: or p_per_in_ler_id is null or p_business_group_id is null
4228: or p_lf_evt_ocrd_dt is null then
4229: fnd_message.set_name('BEN','BEN_92404_NEED_MORE_VARS');
4230: fnd_message.set_token('PROC',l_package);
4231: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4232: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4227: or p_per_in_ler_id is null or p_business_group_id is null
4228: or p_lf_evt_ocrd_dt is null then
4229: fnd_message.set_name('BEN','BEN_92404_NEED_MORE_VARS');
4230: fnd_message.set_token('PROC',l_package);
4231: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4232: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4235: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4228: or p_lf_evt_ocrd_dt is null then
4229: fnd_message.set_name('BEN','BEN_92404_NEED_MORE_VARS');
4230: fnd_message.set_token('PROC',l_package);
4231: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4232: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4235: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4236: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4229: fnd_message.set_name('BEN','BEN_92404_NEED_MORE_VARS');
4230: fnd_message.set_token('PROC',l_package);
4231: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4232: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4235: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4236: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4237: fnd_message.set_token('LF_EVT_OCRD_DT',to_char(p_lf_evt_ocrd_dt));
4230: fnd_message.set_token('PROC',l_package);
4231: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4232: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4235: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4236: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4237: fnd_message.set_token('LF_EVT_OCRD_DT',to_char(p_lf_evt_ocrd_dt));
4238: fnd_message.raise_error;
4231: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4232: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4235: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4236: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4237: fnd_message.set_token('LF_EVT_OCRD_DT',to_char(p_lf_evt_ocrd_dt));
4238: fnd_message.raise_error;
4239: else
4232: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4235: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4236: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4237: fnd_message.set_token('LF_EVT_OCRD_DT',to_char(p_lf_evt_ocrd_dt));
4238: fnd_message.raise_error;
4239: else
4240: --
4233: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4235: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4236: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4237: fnd_message.set_token('LF_EVT_OCRD_DT',to_char(p_lf_evt_ocrd_dt));
4238: fnd_message.raise_error;
4239: else
4240: --
4241: open c_pel;
4234: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4235: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4236: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4237: fnd_message.set_token('LF_EVT_OCRD_DT',to_char(p_lf_evt_ocrd_dt));
4238: fnd_message.raise_error;
4239: else
4240: --
4241: open c_pel;
4242: fetch c_pel into l_get_epe.enrt_perd_id,
4253: --
4254: end if;
4255:
4256: if p_entered_ann_val is null and p_perform_edit_flag = 'Y' then
4257: fnd_message.set_name('BEN','BEN_92405_NEED_ENTERED_VAL');
4258: fnd_message.set_token('PROC',l_package);
4259: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4260: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4254: end if;
4255:
4256: if p_entered_ann_val is null and p_perform_edit_flag = 'Y' then
4257: fnd_message.set_name('BEN','BEN_92405_NEED_ENTERED_VAL');
4258: fnd_message.set_token('PROC',l_package);
4259: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4260: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4262: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4255:
4256: if p_entered_ann_val is null and p_perform_edit_flag = 'Y' then
4257: fnd_message.set_name('BEN','BEN_92405_NEED_ENTERED_VAL');
4258: fnd_message.set_token('PROC',l_package);
4259: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4260: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4262: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4263: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4256: if p_entered_ann_val is null and p_perform_edit_flag = 'Y' then
4257: fnd_message.set_name('BEN','BEN_92405_NEED_ENTERED_VAL');
4258: fnd_message.set_token('PROC',l_package);
4259: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4260: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4262: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4263: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4264: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4257: fnd_message.set_name('BEN','BEN_92405_NEED_ENTERED_VAL');
4258: fnd_message.set_token('PROC',l_package);
4259: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4260: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4262: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4263: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4264: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4265: fnd_message.raise_error;
4258: fnd_message.set_token('PROC',l_package);
4259: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4260: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4262: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4263: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4264: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4265: fnd_message.raise_error;
4266: end if;
4259: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4260: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4262: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4263: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4264: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4265: fnd_message.raise_error;
4266: end if;
4267:
4260: fnd_message.set_token('PGM_ID',to_char(p_pgm_id));
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4262: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4263: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4264: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4265: fnd_message.raise_error;
4266: end if;
4267:
4268: p_ptd_balance := null;
4261: fnd_message.set_token('PL_ID',to_char(p_pl_id));
4262: fnd_message.set_token('OIPL_ID',to_char(p_oipl_id));
4263: fnd_message.set_token('PER_IN_LER_ID',to_char(p_per_in_ler_id));
4264: fnd_message.set_token('BG_ID',to_char(p_business_group_id));
4265: fnd_message.raise_error;
4266: end if;
4267:
4268: p_ptd_balance := null;
4269: p_clm_balance := null;
4297: if p_ptd_balance is not null and p_entered_ann_val < p_ptd_balance and
4298: p_perform_edit_flag = 'Y' then
4299: -- The period-to-date is what the prtt has already paid into this plan.
4300: -- Do not allow their elected annual value to fall below the ptd-balance.
4301: fnd_message.set_name('BEN','BEN_92406_BELOW_PTD');
4302: fnd_message.set_token('PROC',l_package);
4303: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4304: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4305: fnd_message.set_token('PTD_BAL',to_char(p_ptd_balance));
4298: p_perform_edit_flag = 'Y' then
4299: -- The period-to-date is what the prtt has already paid into this plan.
4300: -- Do not allow their elected annual value to fall below the ptd-balance.
4301: fnd_message.set_name('BEN','BEN_92406_BELOW_PTD');
4302: fnd_message.set_token('PROC',l_package);
4303: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4304: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4305: fnd_message.set_token('PTD_BAL',to_char(p_ptd_balance));
4306: fnd_message.raise_error;
4299: -- The period-to-date is what the prtt has already paid into this plan.
4300: -- Do not allow their elected annual value to fall below the ptd-balance.
4301: fnd_message.set_name('BEN','BEN_92406_BELOW_PTD');
4302: fnd_message.set_token('PROC',l_package);
4303: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4304: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4305: fnd_message.set_token('PTD_BAL',to_char(p_ptd_balance));
4306: fnd_message.raise_error;
4307: end if;
4300: -- Do not allow their elected annual value to fall below the ptd-balance.
4301: fnd_message.set_name('BEN','BEN_92406_BELOW_PTD');
4302: fnd_message.set_token('PROC',l_package);
4303: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4304: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4305: fnd_message.set_token('PTD_BAL',to_char(p_ptd_balance));
4306: fnd_message.raise_error;
4307: end if;
4308: end if;
4301: fnd_message.set_name('BEN','BEN_92406_BELOW_PTD');
4302: fnd_message.set_token('PROC',l_package);
4303: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4304: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4305: fnd_message.set_token('PTD_BAL',to_char(p_ptd_balance));
4306: fnd_message.raise_error;
4307: end if;
4308: end if;
4309:
4302: fnd_message.set_token('PROC',l_package);
4303: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4304: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4305: fnd_message.set_token('PTD_BAL',to_char(p_ptd_balance));
4306: fnd_message.raise_error;
4307: end if;
4308: end if;
4309:
4310: if l_abr_balance.clm_comp_lvl_fctr_id is not null then
4325: if p_clm_balance is not null and p_entered_ann_val < p_clm_balance and
4326: p_perform_edit_flag = 'Y' then
4327: --The claims-to-date is what the prtt has already claimed against the FSA
4328: --Do not allow their elected annual value to fall below the clm-balance.
4329: fnd_message.set_name('BEN','BEN_92407_BELOW_CLM');
4330: fnd_message.set_token('PROC',l_package);
4331: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4332: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4333: fnd_message.set_token('CLM_BAL',to_char(p_clm_balance));
4326: p_perform_edit_flag = 'Y' then
4327: --The claims-to-date is what the prtt has already claimed against the FSA
4328: --Do not allow their elected annual value to fall below the clm-balance.
4329: fnd_message.set_name('BEN','BEN_92407_BELOW_CLM');
4330: fnd_message.set_token('PROC',l_package);
4331: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4332: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4333: fnd_message.set_token('CLM_BAL',to_char(p_clm_balance));
4334: fnd_message.raise_error;
4327: --The claims-to-date is what the prtt has already claimed against the FSA
4328: --Do not allow their elected annual value to fall below the clm-balance.
4329: fnd_message.set_name('BEN','BEN_92407_BELOW_CLM');
4330: fnd_message.set_token('PROC',l_package);
4331: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4332: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4333: fnd_message.set_token('CLM_BAL',to_char(p_clm_balance));
4334: fnd_message.raise_error;
4335: end if;
4328: --Do not allow their elected annual value to fall below the clm-balance.
4329: fnd_message.set_name('BEN','BEN_92407_BELOW_CLM');
4330: fnd_message.set_token('PROC',l_package);
4331: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4332: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4333: fnd_message.set_token('CLM_BAL',to_char(p_clm_balance));
4334: fnd_message.raise_error;
4335: end if;
4336: end if;
4329: fnd_message.set_name('BEN','BEN_92407_BELOW_CLM');
4330: fnd_message.set_token('PROC',l_package);
4331: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4332: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4333: fnd_message.set_token('CLM_BAL',to_char(p_clm_balance));
4334: fnd_message.raise_error;
4335: end if;
4336: end if;
4337:
4330: fnd_message.set_token('PROC',l_package);
4331: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4332: fnd_message.set_token('ANN_VAL',to_char(p_entered_ann_val));
4333: fnd_message.set_token('CLM_BAL',to_char(p_clm_balance));
4334: fnd_message.raise_error;
4335: end if;
4336: end if;
4337:
4338: if g_debug then
4481: open get_epe_pl_yr;
4482: fetch get_epe_pl_yr into l_get_epe_pl_yr;
4483: if get_epe_pl_yr%NOTFOUND or get_epe_pl_yr%NOTFOUND is null then
4484: close get_epe_pl_yr;
4485: fnd_message.set_name('BEN','BEN_92408_EPE_PL_YR_NOTF');
4486: fnd_message.set_token('PROC',l_package);
4487: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4488: fnd_message.set_token('CHC',to_char(p_elig_per_elctbl_chc_id));
4489: fnd_message.set_token('ACTY_BASE_RT_ID',to_char(p_acty_base_rt_id));
4482: fetch get_epe_pl_yr into l_get_epe_pl_yr;
4483: if get_epe_pl_yr%NOTFOUND or get_epe_pl_yr%NOTFOUND is null then
4484: close get_epe_pl_yr;
4485: fnd_message.set_name('BEN','BEN_92408_EPE_PL_YR_NOTF');
4486: fnd_message.set_token('PROC',l_package);
4487: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4488: fnd_message.set_token('CHC',to_char(p_elig_per_elctbl_chc_id));
4489: fnd_message.set_token('ACTY_BASE_RT_ID',to_char(p_acty_base_rt_id));
4490: fnd_message.raise_error;
4483: if get_epe_pl_yr%NOTFOUND or get_epe_pl_yr%NOTFOUND is null then
4484: close get_epe_pl_yr;
4485: fnd_message.set_name('BEN','BEN_92408_EPE_PL_YR_NOTF');
4486: fnd_message.set_token('PROC',l_package);
4487: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4488: fnd_message.set_token('CHC',to_char(p_elig_per_elctbl_chc_id));
4489: fnd_message.set_token('ACTY_BASE_RT_ID',to_char(p_acty_base_rt_id));
4490: fnd_message.raise_error;
4491: end if;
4484: close get_epe_pl_yr;
4485: fnd_message.set_name('BEN','BEN_92408_EPE_PL_YR_NOTF');
4486: fnd_message.set_token('PROC',l_package);
4487: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4488: fnd_message.set_token('CHC',to_char(p_elig_per_elctbl_chc_id));
4489: fnd_message.set_token('ACTY_BASE_RT_ID',to_char(p_acty_base_rt_id));
4490: fnd_message.raise_error;
4491: end if;
4492: close get_epe_pl_yr;
4485: fnd_message.set_name('BEN','BEN_92408_EPE_PL_YR_NOTF');
4486: fnd_message.set_token('PROC',l_package);
4487: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4488: fnd_message.set_token('CHC',to_char(p_elig_per_elctbl_chc_id));
4489: fnd_message.set_token('ACTY_BASE_RT_ID',to_char(p_acty_base_rt_id));
4490: fnd_message.raise_error;
4491: end if;
4492: close get_epe_pl_yr;
4493: --
4486: fnd_message.set_token('PROC',l_package);
4487: fnd_message.set_token('PERSON_ID',to_char(p_person_id));
4488: fnd_message.set_token('CHC',to_char(p_elig_per_elctbl_chc_id));
4489: fnd_message.set_token('ACTY_BASE_RT_ID',to_char(p_acty_base_rt_id));
4490: fnd_message.raise_error;
4491: end if;
4492: close get_epe_pl_yr;
4493: --
4494: -- Bug No 4290565
4561: open get_asg_info;
4562: fetch get_asg_info into l_get_asg_info;
4563: if get_asg_info%NOTFOUND or get_asg_info%NOTFOUND is null then
4564: close get_asg_info;
4565: fnd_message.set_name('BEN','BEN_92409_ASG_NOT_FOUND');
4566: fnd_message.set_token('PROC',l_package);
4567: fnd_message.set_token('PERSON',to_char(p_person_id));
4568: fnd_message.raise_error;
4569: end if;
4562: fetch get_asg_info into l_get_asg_info;
4563: if get_asg_info%NOTFOUND or get_asg_info%NOTFOUND is null then
4564: close get_asg_info;
4565: fnd_message.set_name('BEN','BEN_92409_ASG_NOT_FOUND');
4566: fnd_message.set_token('PROC',l_package);
4567: fnd_message.set_token('PERSON',to_char(p_person_id));
4568: fnd_message.raise_error;
4569: end if;
4570: close get_asg_info;
4563: if get_asg_info%NOTFOUND or get_asg_info%NOTFOUND is null then
4564: close get_asg_info;
4565: fnd_message.set_name('BEN','BEN_92409_ASG_NOT_FOUND');
4566: fnd_message.set_token('PROC',l_package);
4567: fnd_message.set_token('PERSON',to_char(p_person_id));
4568: fnd_message.raise_error;
4569: end if;
4570: close get_asg_info;
4571: end if;
4564: close get_asg_info;
4565: fnd_message.set_name('BEN','BEN_92409_ASG_NOT_FOUND');
4566: fnd_message.set_token('PROC',l_package);
4567: fnd_message.set_token('PERSON',to_char(p_person_id));
4568: fnd_message.raise_error;
4569: end if;
4570: close get_asg_info;
4571: end if;
4572: