133: p_effective_date => p_effective_date) then
134: --
135: -- raise error as does not exist as lookup
136: --
137: fnd_message.set_name('PAY','HR_LOOKUP_DOES_NOT_EXIST');
138: fnd_message.raise_error;
139: --
140: end if;
141: --
134: --
135: -- raise error as does not exist as lookup
136: --
137: fnd_message.set_name('PAY','HR_LOOKUP_DOES_NOT_EXIST');
138: fnd_message.raise_error;
139: --
140: end if;
141: --
142: end if;
194: open c1;
195: fetch c1 into l_dummy;
196: if c1%found then
197: close c1;
198: fnd_message.set_name('BEN','BEN_91001_SEQ_NOT_UNIQUE');
199: fnd_message.raise_error;
200: end if;
201: close c1;
202: --
195: fetch c1 into l_dummy;
196: if c1%found then
197: close c1;
198: fnd_message.set_name('BEN','BEN_91001_SEQ_NOT_UNIQUE');
199: fnd_message.raise_error;
200: end if;
201: close c1;
202: --
203: hr_utility.set_location('Leaving:'||l_proc, 15);
284: close c3;
285: --
286: -- raise error as this criteria already exists for this profile
287: --
288: fnd_message.set_name('BEN', 'BEN_91349_DUP_ELIG_CRITERIA');
289: fnd_message.raise_error;
290: --
291: end if;
292: close c3;
285: --
286: -- raise error as this criteria already exists for this profile
287: --
288: fnd_message.set_name('BEN', 'BEN_91349_DUP_ELIG_CRITERIA');
289: fnd_message.raise_error;
290: --
291: end if;
292: close c3;
293: --
362: p_effective_date => p_effective_date) then
363: --
364: -- raise error as does not exist as lookup
365: --
366: fnd_message.set_name('PAY','HR_LOOKUP_DOES_NOT_EXIST');
367: fnd_message.raise_error;
368: --
369: end if;
370: --
363: --
364: -- raise error as does not exist as lookup
365: --
366: fnd_message.set_name('PAY','HR_LOOKUP_DOES_NOT_EXIST');
367: fnd_message.raise_error;
368: --
369: end if;
370: --
371: if p_hrs_num is null and p_max_hrs_num is null then
368: --
369: end if;
370: --
371: if p_hrs_num is null and p_max_hrs_num is null then
372: fnd_message.set_name('BEN','BEN_93222_MIN_MAX_HRS_NOT_NULL');
373: fnd_message.raise_error;
374: end if;
375: --
376: end if;
369: end if;
370: --
371: if p_hrs_num is null and p_max_hrs_num is null then
372: fnd_message.set_name('BEN','BEN_93222_MIN_MAX_HRS_NOT_NULL');
373: fnd_message.raise_error;
374: end if;
375: --
376: end if;
377: --
440: p_effective_date => p_effective_date) then
441: --
442: -- raise error as does not exist as lookup
443: --
444: fnd_message.set_name('PAY','HR_LOOKUP_DOES_NOT_EXIST');
445: fnd_message.raise_error;
446: --
447: end if;
448: --
441: --
442: -- raise error as does not exist as lookup
443: --
444: fnd_message.set_name('PAY','HR_LOOKUP_DOES_NOT_EXIST');
445: fnd_message.raise_error;
446: --
447: end if;
448: --
449: if nvl(p_determination_cd,hr_api.g_number)='RL' and p_determination_rl is null then
448: --
449: if nvl(p_determination_cd,hr_api.g_number)='RL' and p_determination_rl is null then
450: -- raise error as rule is specified, but code is not 'RL'
451: --
452: fnd_message.set_name('BEN','BEN_91098_LOS_DET_RL_NULL');
453: fnd_message.raise_error;
454: --
455: end if;
456:
449: if nvl(p_determination_cd,hr_api.g_number)='RL' and p_determination_rl is null then
450: -- raise error as rule is specified, but code is not 'RL'
451: --
452: fnd_message.set_name('BEN','BEN_91098_LOS_DET_RL_NULL');
453: fnd_message.raise_error;
454: --
455: end if;
456:
457: if p_determination_rl is not null and nvl(p_determination_cd,hr_api.g_varchar2) <> 'RL' then
456:
457: if p_determination_rl is not null and nvl(p_determination_cd,hr_api.g_varchar2) <> 'RL' then
458: -- raise error as rule is specified, but code is not 'RL'
459: --
460: fnd_message.set_name('BEN','BEN_91071_LOS_DET_RL_NOT_NULL');
461: fnd_message.raise_error;
462: --
463: end if;
464: --
457: if p_determination_rl is not null and nvl(p_determination_cd,hr_api.g_varchar2) <> 'RL' then
458: -- raise error as rule is specified, but code is not 'RL'
459: --
460: fnd_message.set_name('BEN','BEN_91071_LOS_DET_RL_NOT_NULL');
461: fnd_message.raise_error;
462: --
463: end if;
464: --
465: end if;
526: --
527: if nvl(p_rounding_cd,hr_api.g_number)='RL' and p_rounding_rl is null then
528: -- raise error as rule is specified, but code is not 'RL'
529: --
530: fnd_message.set_name('BEN','BEN_91733_RNDG_RULE');
531: fnd_message.raise_error;
532: --
533: end if;
534:
527: if nvl(p_rounding_cd,hr_api.g_number)='RL' and p_rounding_rl is null then
528: -- raise error as rule is specified, but code is not 'RL'
529: --
530: fnd_message.set_name('BEN','BEN_91733_RNDG_RULE');
531: fnd_message.raise_error;
532: --
533: end if;
534:
535: if p_rounding_rl is not null and nvl(p_rounding_cd,hr_api.g_varchar2) <> 'RL' then
534:
535: if p_rounding_rl is not null and nvl(p_rounding_cd,hr_api.g_varchar2) <> 'RL' then
536: -- raise error as rule is specified, but code is not 'RL'
537: --
538: fnd_message.set_name('BEN','BEN_91043_RNDG_RL_NOT_NULL');
539: fnd_message.raise_error;
540: --
541: end if;
542:
535: if p_rounding_rl is not null and nvl(p_rounding_cd,hr_api.g_varchar2) <> 'RL' then
536: -- raise error as rule is specified, but code is not 'RL'
537: --
538: fnd_message.set_name('BEN','BEN_91043_RNDG_RL_NOT_NULL');
539: fnd_message.raise_error;
540: --
541: end if;
542:
543:
549: p_effective_date => p_effective_date) then
550: --
551: -- raise error as does not exist as lookup
552: --
553: fnd_message.set_name('PAY','HR_LOOKUP_DOES_NOT_EXIST');
554: fnd_message.raise_error;
555: --
556: end if;
557: --
550: --
551: -- raise error as does not exist as lookup
552: --
553: fnd_message.set_name('PAY','HR_LOOKUP_DOES_NOT_EXIST');
554: fnd_message.raise_error;
555: --
556: end if;
557: --
558: end if;
684: --
685: if p_determination_rl is not null and nvl(p_determination_cd,hr_api.g_varchar2) <> 'RL' then
686: -- raise error as rule is specified, but code is not 'RL'
687: --
688: fnd_message.set_name('BEN','BEN_91071_LOS_DET_RL_NOT_NULL');
689: fnd_message.raise_error;
690: --
691: end if;
692:
685: if p_determination_rl is not null and nvl(p_determination_cd,hr_api.g_varchar2) <> 'RL' then
686: -- raise error as rule is specified, but code is not 'RL'
687: --
688: fnd_message.set_name('BEN','BEN_91071_LOS_DET_RL_NOT_NULL');
689: fnd_message.raise_error;
690: --
691: end if;
692:
693: if nvl(p_determination_cd,hr_api.g_number)='RL' and p_determination_rl is null then
692:
693: if nvl(p_determination_cd,hr_api.g_number)='RL' and p_determination_rl is null then
694: -- raise error as rule is specified, but code is not 'RL'
695: --
696: fnd_message.set_name('BEN','BEN_91098_LOS_DET_RL_NULL');
697: fnd_message.raise_error;
698: --
699: end if;
700:
693: if nvl(p_determination_cd,hr_api.g_number)='RL' and p_determination_rl is null then
694: -- raise error as rule is specified, but code is not 'RL'
695: --
696: fnd_message.set_name('BEN','BEN_91098_LOS_DET_RL_NULL');
697: fnd_message.raise_error;
698: --
699: end if;
700:
701: if nvl(p_determination_cd,hr_api.g_varchar2)='RL' then
703: p_formula_type_id => -170,p_effective_date => p_effective_date) then
704: --
705: -- raise error as forumula type not exists
706:
707: fnd_message.set_name('BEN','BEN_91066_INVLD_LOS_DET_RL');
708: fnd_message.raise_error;
709: end if;
710: --
711: end if;
704: --
705: -- raise error as forumula type not exists
706:
707: fnd_message.set_name('BEN','BEN_91066_INVLD_LOS_DET_RL');
708: fnd_message.raise_error;
709: end if;
710: --
711: end if;
712: --
777:
778: if p_rounding_rl is not null and nvl(p_rounding_cd,hr_api.g_varchar2) <> 'RL' then
779: -- raise error as rule is specified, but code is not 'RL'
780:
781: fnd_message.set_name('BEN','BEN_91043_RNDG_RL_NOT_NULL');
782: fnd_message.raise_error;
783: --
784: end if;
785:
778: if p_rounding_rl is not null and nvl(p_rounding_cd,hr_api.g_varchar2) <> 'RL' then
779: -- raise error as rule is specified, but code is not 'RL'
780:
781: fnd_message.set_name('BEN','BEN_91043_RNDG_RL_NOT_NULL');
782: fnd_message.raise_error;
783: --
784: end if;
785:
786: if nvl(p_rounding_cd,hr_api.g_number)='RL' and p_rounding_rl is null then
785:
786: if nvl(p_rounding_cd,hr_api.g_number)='RL' and p_rounding_rl is null then
787: -- raise error as rule is specified, but code is not 'RL'
788: --
789: fnd_message.set_name('BEN','BEN_91733_RNDG_RULE');
790: fnd_message.raise_error;
791: --
792: end if;
793:
786: if nvl(p_rounding_cd,hr_api.g_number)='RL' and p_rounding_rl is null then
787: -- raise error as rule is specified, but code is not 'RL'
788: --
789: fnd_message.set_name('BEN','BEN_91733_RNDG_RULE');
790: fnd_message.raise_error;
791: --
792: end if;
793:
794: if nvl(p_rounding_cd,hr_api.g_varchar2)='RL' then
795: if not match_formula_type(p_rl => p_rounding_rl,
796: p_formula_type_id => -169,p_effective_date => p_effective_date) then
797: -- raise error as forumula type not exists
798: --
799: fnd_message.set_name('BEN','BEN_91042_INVALID_RNDG_RL');
800: fnd_message.raise_error;
801: end if;
802: --
803: end if;
796: p_formula_type_id => -169,p_effective_date => p_effective_date) then
797: -- raise error as forumula type not exists
798: --
799: fnd_message.set_name('BEN','BEN_91042_INVALID_RNDG_RL');
800: fnd_message.raise_error;
801: end if;
802: --
803: end if;
804: --
867: p_effective_date => p_effective_date) then
868: --
869: -- raise error as forumula type not exists
870: --
871: fnd_message.set_name('BEN','BEN_93221_SCH_HRS_RL_INVALID');
872: fnd_message.raise_error;
873: --
874: end if;
875: --
868: --
869: -- raise error as forumula type not exists
870: --
871: fnd_message.set_name('BEN','BEN_93221_SCH_HRS_RL_INVALID');
872: fnd_message.raise_error;
873: --
874: end if;
875: --
876: --
939: -- check if min or max is null, if freq_cd is specified
940: -- note that this check is also there in the chk_freq_cd procedure.
941: if (p_hrs_num is null and p_max_hrs_num is null) then
942: if p_freq_cd is not null then
943: fnd_message.set_name('BEN', 'BEN_93222_MIN_MAX_HRS_NOT_NULL');
944: fnd_message.raise_error;
945: end if;
946: end if;
947: --
940: -- note that this check is also there in the chk_freq_cd procedure.
941: if (p_hrs_num is null and p_max_hrs_num is null) then
942: if p_freq_cd is not null then
943: fnd_message.set_name('BEN', 'BEN_93222_MIN_MAX_HRS_NOT_NULL');
944: fnd_message.raise_error;
945: end if;
946: end if;
947: --
948:
947: --
948:
949: -- check if freq_cd is not given
950: if (p_hrs_num is not null or p_max_hrs_num is not null) and p_freq_cd is null then
951: fnd_message.set_name('BEN', 'BEN_93220_MIN_MAX_HRS_OR_RULE');
952: fnd_message.raise_error;
953:
954: end if;
955:
948:
949: -- check if freq_cd is not given
950: if (p_hrs_num is not null or p_max_hrs_num is not null) and p_freq_cd is null then
951: fnd_message.set_name('BEN', 'BEN_93220_MIN_MAX_HRS_OR_RULE');
952: fnd_message.raise_error;
953:
954: end if;
955:
956:
957:
958: -- check if value of min hours is greater than max hours
959: if not (p_hrs_num is null or p_max_hrs_num is null) then
960: if nvl(p_hrs_num,hr_api.g_number) > nvl(p_max_hrs_num,hr_api.g_number) then
961: fnd_message.set_name('BEN', 'BEN_91069_INVALID_MIN_MAX');
962: fnd_message.raise_error;
963: end if;
964:
965: end if;
958: -- check if value of min hours is greater than max hours
959: if not (p_hrs_num is null or p_max_hrs_num is null) then
960: if nvl(p_hrs_num,hr_api.g_number) > nvl(p_max_hrs_num,hr_api.g_number) then
961: fnd_message.set_name('BEN', 'BEN_91069_INVALID_MIN_MAX');
962: fnd_message.raise_error;
963: end if;
964:
965: end if;
966: --
1058: --
1059: -- A referential integrity check was violated therefore
1060: -- we must error
1061: --
1062: fnd_message.set_name('PAY', 'HR_7216_DT_UPD_INTEGRITY_ERR');
1063: fnd_message.set_token('TABLE_NAME', l_table_name);
1064: fnd_message.raise_error;
1065: When Others Then
1066: --
1059: -- A referential integrity check was violated therefore
1060: -- we must error
1061: --
1062: fnd_message.set_name('PAY', 'HR_7216_DT_UPD_INTEGRITY_ERR');
1063: fnd_message.set_token('TABLE_NAME', l_table_name);
1064: fnd_message.raise_error;
1065: When Others Then
1066: --
1067: -- An unhandled or unexpected error has occurred which
1060: -- we must error
1061: --
1062: fnd_message.set_name('PAY', 'HR_7216_DT_UPD_INTEGRITY_ERR');
1063: fnd_message.set_token('TABLE_NAME', l_table_name);
1064: fnd_message.raise_error;
1065: When Others Then
1066: --
1067: -- An unhandled or unexpected error has occurred which
1068: -- we must report
1066: --
1067: -- An unhandled or unexpected error has occurred which
1068: -- we must report
1069: --
1070: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1071: fnd_message.set_token('PROCEDURE', l_proc);
1072: fnd_message.set_token('STEP','15');
1073: fnd_message.raise_error;
1074: End dt_update_validate;
1067: -- An unhandled or unexpected error has occurred which
1068: -- we must report
1069: --
1070: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1071: fnd_message.set_token('PROCEDURE', l_proc);
1072: fnd_message.set_token('STEP','15');
1073: fnd_message.raise_error;
1074: End dt_update_validate;
1075: --
1068: -- we must report
1069: --
1070: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1071: fnd_message.set_token('PROCEDURE', l_proc);
1072: fnd_message.set_token('STEP','15');
1073: fnd_message.raise_error;
1074: End dt_update_validate;
1075: --
1076: -- ----------------------------------------------------------------------------
1069: --
1070: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1071: fnd_message.set_token('PROCEDURE', l_proc);
1072: fnd_message.set_token('STEP','15');
1073: fnd_message.raise_error;
1074: End dt_update_validate;
1075: --
1076: -- ----------------------------------------------------------------------------
1077: -- |--------------------------< dt_delete_validate >--------------------------|
1162: --
1163: -- A referential integrity check was violated therefore
1164: -- we must error
1165: --
1166: fnd_message.set_name('PAY', 'HR_7215_DT_CHILD_EXISTS');
1167: fnd_message.set_token('TABLE_NAME', l_table_name);
1168: fnd_message.raise_error;
1169: When Others Then
1170: --
1163: -- A referential integrity check was violated therefore
1164: -- we must error
1165: --
1166: fnd_message.set_name('PAY', 'HR_7215_DT_CHILD_EXISTS');
1167: fnd_message.set_token('TABLE_NAME', l_table_name);
1168: fnd_message.raise_error;
1169: When Others Then
1170: --
1171: -- An unhandled or unexpected error has occurred which
1164: -- we must error
1165: --
1166: fnd_message.set_name('PAY', 'HR_7215_DT_CHILD_EXISTS');
1167: fnd_message.set_token('TABLE_NAME', l_table_name);
1168: fnd_message.raise_error;
1169: When Others Then
1170: --
1171: -- An unhandled or unexpected error has occurred which
1172: -- we must report
1170: --
1171: -- An unhandled or unexpected error has occurred which
1172: -- we must report
1173: --
1174: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1175: fnd_message.set_token('PROCEDURE', l_proc);
1176: fnd_message.set_token('STEP','15');
1177: fnd_message.raise_error;
1178: End dt_delete_validate;
1171: -- An unhandled or unexpected error has occurred which
1172: -- we must report
1173: --
1174: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1175: fnd_message.set_token('PROCEDURE', l_proc);
1176: fnd_message.set_token('STEP','15');
1177: fnd_message.raise_error;
1178: End dt_delete_validate;
1179: --
1172: -- we must report
1173: --
1174: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1175: fnd_message.set_token('PROCEDURE', l_proc);
1176: fnd_message.set_token('STEP','15');
1177: fnd_message.raise_error;
1178: End dt_delete_validate;
1179: --
1180: -- ----------------------------------------------------------------------------
1173: --
1174: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1175: fnd_message.set_token('PROCEDURE', l_proc);
1176: fnd_message.set_token('STEP','15');
1177: fnd_message.raise_error;
1178: End dt_delete_validate;
1179: --
1180: -- ----------------------------------------------------------------------------
1181: -- |---------------------------< insert_validate >----------------------------|
1462: close csr_leg_code;
1463: --
1464: -- The primary key is invalid therefore we must error
1465: --
1466: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
1467: fnd_message.raise_error;
1468: --
1469: end if;
1470: --
1463: --
1464: -- The primary key is invalid therefore we must error
1465: --
1466: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
1467: fnd_message.raise_error;
1468: --
1469: end if;
1470: --
1471: close csr_leg_code;