42: l_api_updating boolean;
43: --
44: Begin
45: --
46: hr_utility.set_location('Entering:'||l_proc, 5);
47: --
48: l_api_updating := ben_brg_shd.api_updating
49: (p_effective_date => p_effective_date,
50: p_benfts_grp_rt_id => p_benfts_grp_rt_id,
71: end if;
72: --
73: end if;
74: --
75: hr_utility.set_location('Leaving:'||l_proc, 10);
76: --
77: End chk_benfts_grp_rt_id;
78: --
79: -- |--------------------< chk_duplicate_ordr_num >----------------------------|
118: and business_group_id + 0 = p_business_group_id
119: and ordr_num = p_ordr_num;
120: --
121: Begin
122: hr_utility.set_location('Entering:'||l_proc, 5);
123:
124: --
125: open c1;
126: fetch c1 into l_dummy;
130: fnd_message.raise_error;
131: end if;
132: close c1;
133: --
134: hr_utility.set_location('Leaving:'||l_proc, 15);
135: End chk_duplicate_ordr_num;
136:
137: --
138: -- ----------------------------------------------------------------------------
170: l_api_updating boolean;
171: --
172: Begin
173: --
174: hr_utility.set_location('Entering:'||l_proc, 5);
175: --
176: l_api_updating := ben_brg_shd.api_updating
177: (p_benfts_grp_rt_id => p_benfts_grp_rt_id,
178: p_effective_date => p_effective_date,
192: p_effective_date => p_effective_date) then
193: --
194: -- raise error as does not exist as lookup
195: --
196: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
197: hr_utility.raise_error;
198: --
199: end if;
200: --
193: --
194: -- raise error as does not exist as lookup
195: --
196: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
197: hr_utility.raise_error;
198: --
199: end if;
200: --
201: end if;
199: end if;
200: --
201: end if;
202: --
203: hr_utility.set_location('Leaving:'||l_proc,10);
204: --
205: end chk_excld_flag;
206: --
207: -- ----------------------------------------------------------------------------
241: --
242:
243: Begin
244: --
245: hr_utility.set_location('Entering:'||l_proc, 5);
246: --
247: if p_benfts_grp_id is not null then
248: open c1;
249: fetch c1 into l_dummy;
247: if p_benfts_grp_id is not null then
248: open c1;
249: fetch c1 into l_dummy;
250: if c1%notfound then
251: hr_utility.set_message(801,'Benfts_Grp_NotExist');
252: hr_utility.raise_error;
253: end if;
254: close c1;
255: end if;
248: open c1;
249: fetch c1 into l_dummy;
250: if c1%notfound then
251: hr_utility.set_message(801,'Benfts_Grp_NotExist');
252: hr_utility.raise_error;
253: end if;
254: close c1;
255: end if;
256: --
253: end if;
254: close c1;
255: end if;
256: --
257: hr_utility.set_location('Leaving:'||l_proc, 10);
258: --
259: End chk_benfts_grp_id;
260:
261: --
315: and p_validation_end_date >= effective_start_date;
316: --
317: BEGIN
318: --
319: hr_utility.set_location('Entering:'||l_proc, 5);
320: --
321: l_api_updating := ben_brg_shd.api_updating
322: (p_benfts_grp_rt_id => p_benfts_grp_rt_id,
323: p_effective_date => p_effective_date,
342: end if;
343: close c_dup;
344: --
345: end if;
346: hr_utility.set_location('Leaving:'||l_proc,10);
347: --
348: END chk_dup_record;
349:
350: --
387: l_integrity_error Exception;
388: l_table_name all_tables.table_name%TYPE;
389: --
390: Begin
391: hr_utility.set_location('Entering:'||l_proc, 5);
392: --
393: -- Ensure that the p_datetrack_mode argument is not null
394: --
395: hr_api.mandatory_arg_error
426: End If;
427: --
428: End If;
429: --
430: hr_utility.set_location(' Leaving:'||l_proc, 10);
431: Exception
432: When l_integrity_error Then
433: --
434: -- A referential integrity check was violated therefore
440: --
441: -- An unhandled or unexpected error has occurred which
442: -- we must report
443: --
444: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
445: hr_utility.set_message_token('PROCEDURE', l_proc);
446: hr_utility.set_message_token('STEP','15');
447: hr_utility.raise_error;
448: End dt_update_validate;
441: -- An unhandled or unexpected error has occurred which
442: -- we must report
443: --
444: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
445: hr_utility.set_message_token('PROCEDURE', l_proc);
446: hr_utility.set_message_token('STEP','15');
447: hr_utility.raise_error;
448: End dt_update_validate;
449: --
442: -- we must report
443: --
444: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
445: hr_utility.set_message_token('PROCEDURE', l_proc);
446: hr_utility.set_message_token('STEP','15');
447: hr_utility.raise_error;
448: End dt_update_validate;
449: --
450: -- ----------------------------------------------------------------------------
443: --
444: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
445: hr_utility.set_message_token('PROCEDURE', l_proc);
446: hr_utility.set_message_token('STEP','15');
447: hr_utility.raise_error;
448: End dt_update_validate;
449: --
450: -- ----------------------------------------------------------------------------
451: -- |--------------------------< dt_delete_validate >--------------------------|
492: l_rows_exist Exception;
493: l_table_name all_tables.table_name%TYPE;
494: --
495: Begin
496: hr_utility.set_location('Entering:'||l_proc, 5);
497: --
498: -- Ensure that the p_datetrack_mode argument is not null
499: --
500: hr_api.mandatory_arg_error
529: --
530: --
531: End If;
532: --
533: hr_utility.set_location(' Leaving:'||l_proc, 10);
534: Exception
535: When l_rows_exist Then
536: --
537: -- A referential integrity check was violated therefore
536: --
537: -- A referential integrity check was violated therefore
538: -- we must error
539: --
540: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
541: hr_utility.set_message_token('TABLE_NAME', l_table_name);
542: hr_utility.raise_error;
543: When Others Then
544: --
537: -- A referential integrity check was violated therefore
538: -- we must error
539: --
540: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
541: hr_utility.set_message_token('TABLE_NAME', l_table_name);
542: hr_utility.raise_error;
543: When Others Then
544: --
545: -- An unhandled or unexpected error has occurred which
538: -- we must error
539: --
540: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
541: hr_utility.set_message_token('TABLE_NAME', l_table_name);
542: hr_utility.raise_error;
543: When Others Then
544: --
545: -- An unhandled or unexpected error has occurred which
546: -- we must report
544: --
545: -- An unhandled or unexpected error has occurred which
546: -- we must report
547: --
548: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
549: hr_utility.set_message_token('PROCEDURE', l_proc);
550: hr_utility.set_message_token('STEP','15');
551: hr_utility.raise_error;
552: End dt_delete_validate;
545: -- An unhandled or unexpected error has occurred which
546: -- we must report
547: --
548: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
549: hr_utility.set_message_token('PROCEDURE', l_proc);
550: hr_utility.set_message_token('STEP','15');
551: hr_utility.raise_error;
552: End dt_delete_validate;
553: --
546: -- we must report
547: --
548: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
549: hr_utility.set_message_token('PROCEDURE', l_proc);
550: hr_utility.set_message_token('STEP','15');
551: hr_utility.raise_error;
552: End dt_delete_validate;
553: --
554: -- ----------------------------------------------------------------------------
547: --
548: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
549: hr_utility.set_message_token('PROCEDURE', l_proc);
550: hr_utility.set_message_token('STEP','15');
551: hr_utility.raise_error;
552: End dt_delete_validate;
553: --
554: -- ----------------------------------------------------------------------------
555: -- |---------------------------< insert_validate >----------------------------|
563: --
564: l_proc varchar2(72) := g_package||'insert_validate';
565: --
566: Begin
567: hr_utility.set_location('Entering:'||l_proc, 5);
568: --
569: -- Call all supporting business operations
570: --
571: --
602: ,p_ordr_num => p_rec.ordr_num
603: ,p_effective_date => p_effective_date
604: ,p_business_group_id => p_rec.business_group_id);
605: --
606: hr_utility.set_location(' Leaving:'||l_proc, 10);
607: End insert_validate;
608: --
609: -- ----------------------------------------------------------------------------
610: -- |---------------------------< update_validate >----------------------------|
618: --
619: l_proc varchar2(72) := g_package||'update_validate';
620: --
621: Begin
622: hr_utility.set_location('Entering:'||l_proc, 5);
623: --
624: -- Call all supporting business operations
625: --
626: --
666: ,p_ordr_num => p_rec.ordr_num
667: ,p_effective_date => p_effective_date
668: ,p_business_group_id => p_rec.business_group_id);
669: --
670: hr_utility.set_location(' Leaving:'||l_proc, 10);
671: End update_validate;
672: --
673: -- ----------------------------------------------------------------------------
674: -- |---------------------------< delete_validate >----------------------------|
682: --
683: l_proc varchar2(72) := g_package||'delete_validate';
684: --
685: Begin
686: hr_utility.set_location('Entering:'||l_proc, 5);
687: --
688: -- Call all supporting business operations
689: --
690: dt_delete_validate
692: p_validation_start_date => p_validation_start_date,
693: p_validation_end_date => p_validation_end_date,
694: p_benfts_grp_rt_id => p_rec.benfts_grp_rt_id);
695: --
696: hr_utility.set_location(' Leaving:'||l_proc, 10);
697: End delete_validate;
698: --
699: --
700: -- ---------------------------------------------------------------------------
719: l_proc varchar2(72) := g_package||'return_legislation_code';
720: --
721: begin
722: --
723: hr_utility.set_location('Entering:'|| l_proc, 10);
724: --
725: -- Ensure that all the mandatory parameter are not null
726: --
727: hr_api.mandatory_arg_error(p_api_name => l_proc,
737: close csr_leg_code;
738: --
739: -- The primary key is invalid therefore we must error
740: --
741: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
742: hr_utility.raise_error;
743: --
744: end if;
745: --
738: --
739: -- The primary key is invalid therefore we must error
740: --
741: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
742: hr_utility.raise_error;
743: --
744: end if;
745: --
746: close csr_leg_code;
744: end if;
745: --
746: close csr_leg_code;
747: --
748: hr_utility.set_location(' Leaving:'|| l_proc, 20);
749: --
750: return l_legislation_code;
751: --
752: end return_legislation_code;