109: hr_utility.set_location('Entering:'||l_proc, 5);
110: --
111: if p_name is null or p_prmry_care_prvdr_typ_cd is null then
112: hr_utility.set_location('Error Provider Name or Speciality is null',99);
113: fnd_message.set_name('BEN','BEN_94126_PCP_NAME_SPL_REQD');
114: fnd_message.raise_error;
115: end if;
116: --
117: hr_utility.set_location('Leaving:'||l_proc,10);
110: --
111: if p_name is null or p_prmry_care_prvdr_typ_cd is null then
112: hr_utility.set_location('Error Provider Name or Speciality is null',99);
113: fnd_message.set_name('BEN','BEN_94126_PCP_NAME_SPL_REQD');
114: fnd_message.raise_error;
115: end if;
116: --
117: hr_utility.set_location('Leaving:'||l_proc,10);
118: --
185: p_effective_date => p_effective_date) then
186: --
187: -- raise error as does not exist as lookup
188: --
189: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
190: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
191: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
192: fnd_message.raise_error;
193: --
186: --
187: -- raise error as does not exist as lookup
188: --
189: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
190: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
191: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
192: fnd_message.raise_error;
193: --
194: end if;
187: -- raise error as does not exist as lookup
188: --
189: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
190: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
191: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
192: fnd_message.raise_error;
193: --
194: end if;
195: --
188: --
189: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
190: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
191: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
192: fnd_message.raise_error;
193: --
194: end if;
195: --
196:
201: p_effective_date => p_effective_date) then
202: --
203: -- raise error as does not exist as lookup
204: --
205: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
206: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
207: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
208: fnd_message.raise_error;
209: --
202: --
203: -- raise error as does not exist as lookup
204: --
205: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
206: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
207: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
208: fnd_message.raise_error;
209: --
210: end if;
203: -- raise error as does not exist as lookup
204: --
205: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
206: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
207: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
208: fnd_message.raise_error;
209: --
210: end if;
211: --
204: --
205: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
206: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
207: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
208: fnd_message.raise_error;
209: --
210: end if;
211: --
212: End if;
253: p_effective_date => p_effective_date) then
254: --
255: -- raise error as does not exist as lookup
256: --
257: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
258: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
259: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
260: fnd_message.raise_error;
261: --
254: --
255: -- raise error as does not exist as lookup
256: --
257: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
258: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
259: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
260: fnd_message.raise_error;
261: --
262: end if;
255: -- raise error as does not exist as lookup
256: --
257: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
258: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
259: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
260: fnd_message.raise_error;
261: --
262: end if;
263: --
256: --
257: fnd_message.set_name('BEN','BEN_91628_LOOKUP_TYPE_GENERIC');
258: fnd_message.set_token('FIELD','p_prmry_care_prvdr_typ_cd');
259: fnd_message.set_token('TYPE', 'BEN_PRMRY_CARE_PRVDR_TYP');
260: fnd_message.raise_error;
261: --
262: end if;
263: --
264: end if;
331: if c1%found then
332: close c1;
333: -- raise error as there is another record for this result or dependent
334: -- that has the same pcp type cd.
335: fnd_message.set_name('BEN','BEN_91818_PPR_TYP_UNIQUE');
336: fnd_message.raise_error;
337: end if;
338: close c1;
339: end if;
332: close c1;
333: -- raise error as there is another record for this result or dependent
334: -- that has the same pcp type cd.
335: fnd_message.set_name('BEN','BEN_91818_PPR_TYP_UNIQUE');
336: fnd_message.raise_error;
337: end if;
338: close c1;
339: end if;
340:
428: fetch c1 into l_c1_row;
429: if c1%notfound then
430: close c1;
431: -- raise error as this plan does not allow selection of pcp
432: fnd_message.set_name('BEN','BEN_92568_DSGN_NOT_ALWD');
433: fnd_message.raise_error;
434:
435: elsif c1%found then
436: close c1;
429: if c1%notfound then
430: close c1;
431: -- raise error as this plan does not allow selection of pcp
432: fnd_message.set_name('BEN','BEN_92568_DSGN_NOT_ALWD');
433: fnd_message.raise_error;
434:
435: elsif c1%found then
436: close c1;
437: end if;
447: fetch c2 into l_c2_row;
448: if c2%notfound then
449: close c2;
450: -- raise error as this plan does not allow dependent selection of pcp
451: fnd_message.set_name('BEN','BEN_92569_DPNT_DSGN_NOT_ALWD');
452: fnd_message.raise_error;
453: elsif c2%found then
454: close c2;
455: end if;
448: if c2%notfound then
449: close c2;
450: -- raise error as this plan does not allow dependent selection of pcp
451: fnd_message.set_name('BEN','BEN_92569_DPNT_DSGN_NOT_ALWD');
452: fnd_message.raise_error;
453: elsif c2%found then
454: close c2;
455: end if;
456: elsif c4%found then
494: --
495: hr_utility.set_location('Entering:'||l_proc, 5);
496: --
497: if p_prtt_enrt_rslt_id is null and p_elig_cvrd_dpnt_id is null then
498: fnd_message.set_name('BEN','BEN_91819_RSLT_DPNT_NULL');
499: fnd_message.raise_error;
500: elsif p_prtt_enrt_rslt_id is not null
501: and p_elig_cvrd_dpnt_id is not null then
502: fnd_message.set_name('BEN','BEN_91820_RSLT_DPNT_NOTNULL');
495: hr_utility.set_location('Entering:'||l_proc, 5);
496: --
497: if p_prtt_enrt_rslt_id is null and p_elig_cvrd_dpnt_id is null then
498: fnd_message.set_name('BEN','BEN_91819_RSLT_DPNT_NULL');
499: fnd_message.raise_error;
500: elsif p_prtt_enrt_rslt_id is not null
501: and p_elig_cvrd_dpnt_id is not null then
502: fnd_message.set_name('BEN','BEN_91820_RSLT_DPNT_NOTNULL');
503: fnd_message.raise_error;
498: fnd_message.set_name('BEN','BEN_91819_RSLT_DPNT_NULL');
499: fnd_message.raise_error;
500: elsif p_prtt_enrt_rslt_id is not null
501: and p_elig_cvrd_dpnt_id is not null then
502: fnd_message.set_name('BEN','BEN_91820_RSLT_DPNT_NOTNULL');
503: fnd_message.raise_error;
504: end if;
505: --
506: hr_utility.set_location('Leaving:'||l_proc, 10);
499: fnd_message.raise_error;
500: elsif p_prtt_enrt_rslt_id is not null
501: and p_elig_cvrd_dpnt_id is not null then
502: fnd_message.set_name('BEN','BEN_91820_RSLT_DPNT_NOTNULL');
503: fnd_message.raise_error;
504: end if;
505: --
506: hr_utility.set_location('Leaving:'||l_proc, 10);
507: --
617: end if;
618: if l_min_age <> -1 then
619: l_min_msg := l_min_age;
620: end if;
621: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
622: fnd_message.set_token('MIN', l_min_msg);
623: fnd_message.set_token('MAX', l_max_msg);
624: fnd_message.set_token('GENDER', 'n/a');
625: fnd_message.raise_error;
618: if l_min_age <> -1 then
619: l_min_msg := l_min_age;
620: end if;
621: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
622: fnd_message.set_token('MIN', l_min_msg);
623: fnd_message.set_token('MAX', l_max_msg);
624: fnd_message.set_token('GENDER', 'n/a');
625: fnd_message.raise_error;
626: end if;
619: l_min_msg := l_min_age;
620: end if;
621: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
622: fnd_message.set_token('MIN', l_min_msg);
623: fnd_message.set_token('MAX', l_max_msg);
624: fnd_message.set_token('GENDER', 'n/a');
625: fnd_message.raise_error;
626: end if;
627: end if;
620: end if;
621: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
622: fnd_message.set_token('MIN', l_min_msg);
623: fnd_message.set_token('MAX', l_max_msg);
624: fnd_message.set_token('GENDER', 'n/a');
625: fnd_message.raise_error;
626: end if;
627: end if;
628: if l_sex is not null and l_gender is not null then
621: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
622: fnd_message.set_token('MIN', l_min_msg);
623: fnd_message.set_token('MAX', l_max_msg);
624: fnd_message.set_token('GENDER', 'n/a');
625: fnd_message.raise_error;
626: end if;
627: end if;
628: if l_sex is not null and l_gender is not null then
629: if (l_sex <> l_gender ) then
626: end if;
627: end if;
628: if l_sex is not null and l_gender is not null then
629: if (l_sex <> l_gender ) then
630: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
631: fnd_message.set_token('MIN', l_min_msg);
632: fnd_message.set_token('MAX', l_max_msg);
633: fnd_message.set_token('GENDER', l_gender);
634: fnd_message.raise_error;
627: end if;
628: if l_sex is not null and l_gender is not null then
629: if (l_sex <> l_gender ) then
630: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
631: fnd_message.set_token('MIN', l_min_msg);
632: fnd_message.set_token('MAX', l_max_msg);
633: fnd_message.set_token('GENDER', l_gender);
634: fnd_message.raise_error;
635: end if;
628: if l_sex is not null and l_gender is not null then
629: if (l_sex <> l_gender ) then
630: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
631: fnd_message.set_token('MIN', l_min_msg);
632: fnd_message.set_token('MAX', l_max_msg);
633: fnd_message.set_token('GENDER', l_gender);
634: fnd_message.raise_error;
635: end if;
636: end if;
629: if (l_sex <> l_gender ) then
630: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
631: fnd_message.set_token('MIN', l_min_msg);
632: fnd_message.set_token('MAX', l_max_msg);
633: fnd_message.set_token('GENDER', l_gender);
634: fnd_message.raise_error;
635: end if;
636: end if;
637: end if;
630: fnd_message.set_name('BEN','BEN_92579_AGE_GNDR_REQD');
631: fnd_message.set_token('MIN', l_min_msg);
632: fnd_message.set_token('MAX', l_max_msg);
633: fnd_message.set_token('GENDER', l_gender);
634: fnd_message.raise_error;
635: end if;
636: end if;
637: end if;
638:
727: close c_count_rows;
728:
729: -- comparing number of changes
730: if l_num_of_chgs >= l_num_chgs_alwd then
731: fnd_message.set_name('BEN','BEN_92580_MAX_NUM_CHGS');
732: fnd_message.set_token('NDATE', (l_last_day + 1));
733: fnd_message.raise_error;
734: end if;
735: hr_utility.set_location('Leaving:'||l_proc, 15);
728:
729: -- comparing number of changes
730: if l_num_of_chgs >= l_num_chgs_alwd then
731: fnd_message.set_name('BEN','BEN_92580_MAX_NUM_CHGS');
732: fnd_message.set_token('NDATE', (l_last_day + 1));
733: fnd_message.raise_error;
734: end if;
735: hr_utility.set_location('Leaving:'||l_proc, 15);
736: End chk_max_chgs_ppr_record ;
729: -- comparing number of changes
730: if l_num_of_chgs >= l_num_chgs_alwd then
731: fnd_message.set_name('BEN','BEN_92580_MAX_NUM_CHGS');
732: fnd_message.set_token('NDATE', (l_last_day + 1));
733: fnd_message.raise_error;
734: end if;
735: hr_utility.set_location('Leaving:'||l_proc, 15);
736: End chk_max_chgs_ppr_record ;
737: --
839: --
840: -- An unhandled or unexpected error has occurred which
841: -- we must report
842: --
843: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
844: fnd_message.set_token('PROCEDURE', l_proc);
845: fnd_message.set_token('STEP','15');
846: fnd_message.raise_error;
847: End dt_update_validate;
840: -- An unhandled or unexpected error has occurred which
841: -- we must report
842: --
843: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
844: fnd_message.set_token('PROCEDURE', l_proc);
845: fnd_message.set_token('STEP','15');
846: fnd_message.raise_error;
847: End dt_update_validate;
848: --
841: -- we must report
842: --
843: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
844: fnd_message.set_token('PROCEDURE', l_proc);
845: fnd_message.set_token('STEP','15');
846: fnd_message.raise_error;
847: End dt_update_validate;
848: --
849: -- ----------------------------------------------------------------------------
842: --
843: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
844: fnd_message.set_token('PROCEDURE', l_proc);
845: fnd_message.set_token('STEP','15');
846: fnd_message.raise_error;
847: End dt_update_validate;
848: --
849: -- ----------------------------------------------------------------------------
850: -- |--------------------------< dt_delete_validate >--------------------------|
942: --
943: -- An unhandled or unexpected error has occurred which
944: -- we must report
945: --
946: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
947: fnd_message.set_token('PROCEDURE', l_proc);
948: fnd_message.set_token('STEP','15');
949: fnd_message.raise_error;
950: End dt_delete_validate;
943: -- An unhandled or unexpected error has occurred which
944: -- we must report
945: --
946: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
947: fnd_message.set_token('PROCEDURE', l_proc);
948: fnd_message.set_token('STEP','15');
949: fnd_message.raise_error;
950: End dt_delete_validate;
951: --
944: -- we must report
945: --
946: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
947: fnd_message.set_token('PROCEDURE', l_proc);
948: fnd_message.set_token('STEP','15');
949: fnd_message.raise_error;
950: End dt_delete_validate;
951: --
952: -- ----------------------------------------------------------------------------
945: --
946: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
947: fnd_message.set_token('PROCEDURE', l_proc);
948: fnd_message.set_token('STEP','15');
949: fnd_message.raise_error;
950: End dt_delete_validate;
951: --
952: -- ----------------------------------------------------------------------------
953: -- |---------------------------< insert_validate >----------------------------|
1169: close csr_leg_code;
1170: --
1171: -- The primary key is invalid therefore we must error
1172: --
1173: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
1174: fnd_message.raise_error;
1175: --
1176: end if;
1177: --
1170: --
1171: -- The primary key is invalid therefore we must error
1172: --
1173: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
1174: fnd_message.raise_error;
1175: --
1176: end if;
1177: --
1178: close csr_leg_code;