152: close c1;
153: --
154: -- raise error
155: --
156: fnd_message.set_name('BEN','BEN_91042_INVALID_RNDG_RL');
157: fnd_message.raise_error;
158: --
159: end if;
160: --
153: --
154: -- raise error
155: --
156: fnd_message.set_name('BEN','BEN_91042_INVALID_RNDG_RL');
157: fnd_message.raise_error;
158: --
159: end if;
160: --
161: close c1;
164: --
165: -- Unless Rounding Code = Rule, Rounding rule must be blank.
166: if nvl(p_rndg_cd,hr_api.g_varchar2) <> 'RL' and p_rndg_rl is not null then
167: --
168: fnd_message.set_name('BEN', 'BEN_91043_RNDG_RL_NOT_NULL');
169: fnd_message.raise_error;
170: --
171: elsif nvl(p_rndg_cd,hr_api.g_varchar2) = 'RL' and p_rndg_rl is null then
172: --
165: -- Unless Rounding Code = Rule, Rounding rule must be blank.
166: if nvl(p_rndg_cd,hr_api.g_varchar2) <> 'RL' and p_rndg_rl is not null then
167: --
168: fnd_message.set_name('BEN', 'BEN_91043_RNDG_RL_NOT_NULL');
169: fnd_message.raise_error;
170: --
171: elsif nvl(p_rndg_cd,hr_api.g_varchar2) = 'RL' and p_rndg_rl is null then
172: --
173: fnd_message.set_name('BEN', 'BEN_92340_RNDG_RL_NULL');
169: fnd_message.raise_error;
170: --
171: elsif nvl(p_rndg_cd,hr_api.g_varchar2) = 'RL' and p_rndg_rl is null then
172: --
173: fnd_message.set_name('BEN', 'BEN_92340_RNDG_RL_NULL');
174: fnd_message.raise_error;
175: --
176: end if;
177: --
170: --
171: elsif nvl(p_rndg_cd,hr_api.g_varchar2) = 'RL' and p_rndg_rl is null then
172: --
173: fnd_message.set_name('BEN', 'BEN_92340_RNDG_RL_NULL');
174: fnd_message.raise_error;
175: --
176: end if;
177: --
178: hr_utility.set_location('Leaving:'||l_proc,10);
235: p_effective_date => p_effective_date) then
236: --
237: -- raise error as does not exist as lookup
238: --
239: fnd_message.set_name('BEN','BEN_91040_INVALID_RNDG_CD');
240: fnd_message.raise_error;
241: --
242: end if;
243: --
236: --
237: -- raise error as does not exist as lookup
238: --
239: fnd_message.set_name('BEN','BEN_91040_INVALID_RNDG_CD');
240: fnd_message.raise_error;
241: --
242: end if;
243: --
244: end if;
303: p_effective_date => p_effective_date) then
304: --
305: -- raise error as does not exist as lookup
306: --
307: fnd_message.set_name('BEN','BEN_91059_INVALID_SUM_ALL_ASNT');
308: fnd_message.raise_error;
309: --
310: end if;
311: --
304: --
305: -- raise error as does not exist as lookup
306: --
307: fnd_message.set_name('BEN','BEN_91059_INVALID_SUM_ALL_ASNT');
308: fnd_message.raise_error;
309: --
310: end if;
311: --
312: end if;
371: p_effective_date => p_effective_date) then
372: --
373: -- raise error as does not exist as lookup
374: --
375: fnd_message.set_name('BEN','BEN_91058_INVALID_PRMRY_ASNT');
376: fnd_message.raise_error;
377: --
378: end if;
379: --
372: --
373: -- raise error as does not exist as lookup
374: --
375: fnd_message.set_name('BEN','BEN_91058_INVALID_PRMRY_ASNT');
376: fnd_message.raise_error;
377: --
378: end if;
379: --
380: end if;
439: p_effective_date => p_effective_date) then
440: --
441: -- raise error as does not exist as lookup
442: --
443: fnd_message.set_name('BEN','BEN_91052_INVALID_MAX_FLAG');
444: fnd_message.raise_error;
445: --
446: end if;
447: --
440: --
441: -- raise error as does not exist as lookup
442: --
443: fnd_message.set_name('BEN','BEN_91052_INVALID_MAX_FLAG');
444: fnd_message.raise_error;
445: --
446: end if;
447: --
448: end if;
507: p_effective_date => p_effective_date) then
508: --
509: -- raise error as does not exist as lookup
510: --
511: fnd_message.set_name('BEN','BEN_91051_INVALID_MIN_FLAG');
512: fnd_message.raise_error;
513: --
514: end if;
515: --
508: --
509: -- raise error as does not exist as lookup
510: --
511: fnd_message.set_name('BEN','BEN_91051_INVALID_MIN_FLAG');
512: fnd_message.raise_error;
513: --
514: end if;
515: --
516: end if;
573: -- Bug Fix 1873685
574: if (p_mx_pct_val < p_mn_pct_val) then
575: -- if (p_mx_pct_val <= p_mn_pct_val) then
576: -- End fix 1873685
577: fnd_message.set_name('BEN','BEN_91069_INVALID_MIN_MAX');
578: fnd_message.raise_error;
579: end if;
580: --
581: --
574: if (p_mx_pct_val < p_mn_pct_val) then
575: -- if (p_mx_pct_val <= p_mn_pct_val) then
576: -- End fix 1873685
577: fnd_message.set_name('BEN','BEN_91069_INVALID_MIN_MAX');
578: fnd_message.raise_error;
579: end if;
580: --
581: --
582: end if;
586: --
587: if nvl( p_no_mn_pct_val_flag, hr_api.g_varchar2) = 'Y'
588: and p_mn_pct_val is not null
589: then
590: fnd_message.set_name('BEN','BEN_91054_MIN_VAL_NOT_NULL');
591: fnd_message.raise_error;
592: elsif nvl( p_no_mn_pct_val_flag, hr_api.g_varchar2) = 'N'
593: and p_mn_pct_val is null
594: then
587: if nvl( p_no_mn_pct_val_flag, hr_api.g_varchar2) = 'Y'
588: and p_mn_pct_val is not null
589: then
590: fnd_message.set_name('BEN','BEN_91054_MIN_VAL_NOT_NULL');
591: fnd_message.raise_error;
592: elsif nvl( p_no_mn_pct_val_flag, hr_api.g_varchar2) = 'N'
593: and p_mn_pct_val is null
594: then
595: fnd_message.set_name('BEN','BEN_91055_MIN_VAL_REQUIRED');
591: fnd_message.raise_error;
592: elsif nvl( p_no_mn_pct_val_flag, hr_api.g_varchar2) = 'N'
593: and p_mn_pct_val is null
594: then
595: fnd_message.set_name('BEN','BEN_91055_MIN_VAL_REQUIRED');
596: fnd_message.raise_error;
597: end if;
598: --
599: -- If No Maximum Percent value flag set to "on" (Y),
592: elsif nvl( p_no_mn_pct_val_flag, hr_api.g_varchar2) = 'N'
593: and p_mn_pct_val is null
594: then
595: fnd_message.set_name('BEN','BEN_91055_MIN_VAL_REQUIRED');
596: fnd_message.raise_error;
597: end if;
598: --
599: -- If No Maximum Percent value flag set to "on" (Y),
600: -- then maximum percent value must be blank.
601: --
602: if nvl( p_no_mx_pct_val_flag, hr_api.g_varchar2) = 'Y'
603: and p_mx_pct_val is not null
604: then
605: fnd_message.set_name('BEN','BEN_91056_MAX_VAL_NOT_NULL');
606: fnd_message.raise_error;
607: elsif nvl( p_no_mx_pct_val_flag, hr_api.g_varchar2) = 'N'
608: and p_mx_pct_val is null
609: then
602: if nvl( p_no_mx_pct_val_flag, hr_api.g_varchar2) = 'Y'
603: and p_mx_pct_val is not null
604: then
605: fnd_message.set_name('BEN','BEN_91056_MAX_VAL_NOT_NULL');
606: fnd_message.raise_error;
607: elsif nvl( p_no_mx_pct_val_flag, hr_api.g_varchar2) = 'N'
608: and p_mx_pct_val is null
609: then
610: fnd_message.set_name('BEN','BEN_91057_MAX_VAL_REQUIRED');
606: fnd_message.raise_error;
607: elsif nvl( p_no_mx_pct_val_flag, hr_api.g_varchar2) = 'N'
608: and p_mx_pct_val is null
609: then
610: fnd_message.set_name('BEN','BEN_91057_MAX_VAL_REQUIRED');
611: fnd_message.raise_error;
612: end if;
613: --
614: hr_utility.set_location('Leaving:'||l_proc,10);
607: elsif nvl( p_no_mx_pct_val_flag, hr_api.g_varchar2) = 'N'
608: and p_mx_pct_val is null
609: then
610: fnd_message.set_name('BEN','BEN_91057_MAX_VAL_REQUIRED');
611: fnd_message.raise_error;
612: end if;
613: --
614: hr_utility.set_location('Leaving:'||l_proc,10);
615: --
688: close c1;
689: --
690: -- raise error
691: --
692: fnd_message.set_name('BEN','BEN_91009_NAME_NOT_UNIQUE');
693: fnd_message.raise_error;
694: --
695: end if;
696: --
689: --
690: -- raise error
691: --
692: fnd_message.set_name('BEN','BEN_91009_NAME_NOT_UNIQUE');
693: fnd_message.raise_error;
694: --
695: end if;
696: --
697: close c1;
974: close csr_leg_code;
975: --
976: -- The primary key is invalid therefore we must error
977: --
978: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
979: fnd_message.raise_error;
980: --
981: end if;
982: --
975: --
976: -- The primary key is invalid therefore we must error
977: --
978: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
979: fnd_message.raise_error;
980: --
981: end if;
982: --
983: close csr_leg_code;