42: l_api_updating boolean;
43: --
44: Begin
45: --
46: hr_utility.set_location('Entering:'||l_proc, 5);
47: --
48: l_api_updating := ben_pfr_shd.api_updating
49: (p_effective_date => p_effective_date,
50: p_pct_fl_tm_rt_id => p_pct_fl_tm_rt_id,
71: end if;
72: --
73: end if;
74: --
75: hr_utility.set_location('Leaving:'||l_proc, 10);
76: --
77: End chk_pct_fl_tm_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_pfr_shd.api_updating
177: (p_pct_fl_tm_rt_id => p_pct_fl_tm_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_pct_fl_tm_fctr_id is not null then
248: open c1;
249: fetch c1 into l_dummy;
247: if p_pct_fl_tm_fctr_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,'%_FL_TM_FCTR_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,'%_FL_TM_FCTR_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_pct_fl_tm_fctr_id;
260:
261: -- ----------------------------------------------------------------------------
314: and p_validation_end_date >= effective_start_date;
315: --
316: BEGIN
317: --
318: hr_utility.set_location('Entering:'||l_proc, 5);
319: --
320: l_api_updating := ben_pfr_shd.api_updating
321: (p_pct_fl_tm_rt_id => p_pct_fl_tm_rt_id,
322: p_effective_date => p_effective_date,
341: end if;
342: close c_dup;
343: --
344: end if;
345: hr_utility.set_location('Leaving:'||l_proc,10);
346: --
347: END chk_dup_record;
348:
349: --
386: l_integrity_error Exception;
387: l_table_name all_tables.table_name%TYPE;
388: --
389: Begin
390: hr_utility.set_location('Entering:'||l_proc, 5);
391: --
392: -- Ensure that the p_datetrack_mode argument is not null
393: --
394: hr_api.mandatory_arg_error
425: End If;
426: --
427: End If;
428: --
429: hr_utility.set_location(' Leaving:'||l_proc, 10);
430: Exception
431: When l_integrity_error Then
432: --
433: -- A referential integrity check was violated therefore
439: --
440: -- An unhandled or unexpected error has occurred which
441: -- we must report
442: --
443: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
444: hr_utility.set_message_token('PROCEDURE', l_proc);
445: hr_utility.set_message_token('STEP','15');
446: hr_utility.raise_error;
447: End dt_update_validate;
440: -- An unhandled or unexpected error has occurred which
441: -- we must report
442: --
443: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
444: hr_utility.set_message_token('PROCEDURE', l_proc);
445: hr_utility.set_message_token('STEP','15');
446: hr_utility.raise_error;
447: End dt_update_validate;
448: --
441: -- we must report
442: --
443: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
444: hr_utility.set_message_token('PROCEDURE', l_proc);
445: hr_utility.set_message_token('STEP','15');
446: hr_utility.raise_error;
447: End dt_update_validate;
448: --
449: -- ----------------------------------------------------------------------------
442: --
443: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
444: hr_utility.set_message_token('PROCEDURE', l_proc);
445: hr_utility.set_message_token('STEP','15');
446: hr_utility.raise_error;
447: End dt_update_validate;
448: --
449: -- ----------------------------------------------------------------------------
450: -- |--------------------------< dt_delete_validate >--------------------------|
491: l_rows_exist Exception;
492: l_table_name all_tables.table_name%TYPE;
493: --
494: Begin
495: hr_utility.set_location('Entering:'||l_proc, 5);
496: --
497: -- Ensure that the p_datetrack_mode argument is not null
498: --
499: hr_api.mandatory_arg_error
528: --
529: --
530: End If;
531: --
532: hr_utility.set_location(' Leaving:'||l_proc, 10);
533: Exception
534: When l_rows_exist Then
535: --
536: -- A referential integrity check was violated therefore
535: --
536: -- A referential integrity check was violated therefore
537: -- we must error
538: --
539: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
540: hr_utility.set_message_token('TABLE_NAME', l_table_name);
541: hr_utility.raise_error;
542: When Others Then
543: --
536: -- A referential integrity check was violated therefore
537: -- we must error
538: --
539: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
540: hr_utility.set_message_token('TABLE_NAME', l_table_name);
541: hr_utility.raise_error;
542: When Others Then
543: --
544: -- An unhandled or unexpected error has occurred which
537: -- we must error
538: --
539: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
540: hr_utility.set_message_token('TABLE_NAME', l_table_name);
541: hr_utility.raise_error;
542: When Others Then
543: --
544: -- An unhandled or unexpected error has occurred which
545: -- we must report
543: --
544: -- An unhandled or unexpected error has occurred which
545: -- we must report
546: --
547: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
548: hr_utility.set_message_token('PROCEDURE', l_proc);
549: hr_utility.set_message_token('STEP','15');
550: hr_utility.raise_error;
551: End dt_delete_validate;
544: -- An unhandled or unexpected error has occurred which
545: -- we must report
546: --
547: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
548: hr_utility.set_message_token('PROCEDURE', l_proc);
549: hr_utility.set_message_token('STEP','15');
550: hr_utility.raise_error;
551: End dt_delete_validate;
552: --
545: -- we must report
546: --
547: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
548: hr_utility.set_message_token('PROCEDURE', l_proc);
549: hr_utility.set_message_token('STEP','15');
550: hr_utility.raise_error;
551: End dt_delete_validate;
552: --
553: -- ----------------------------------------------------------------------------
546: --
547: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
548: hr_utility.set_message_token('PROCEDURE', l_proc);
549: hr_utility.set_message_token('STEP','15');
550: hr_utility.raise_error;
551: End dt_delete_validate;
552: --
553: -- ----------------------------------------------------------------------------
554: -- |---------------------------< insert_validate >----------------------------|
562: --
563: l_proc varchar2(72) := g_package||'insert_validate';
564: --
565: Begin
566: hr_utility.set_location('Entering:'||l_proc, 5);
567: --
568: -- Call all supporting business operations
569: --
570: --
601: ,p_effective_date => p_effective_date
602: ,p_business_group_id => p_rec.business_group_id
603: ,p_pct_fl_tm_rt_id => p_rec.pct_fl_tm_rt_id);
604: --
605: hr_utility.set_location(' Leaving:'||l_proc, 10);
606: End insert_validate;
607: --
608: -- ----------------------------------------------------------------------------
609: -- |---------------------------< update_validate >----------------------------|
617: --
618: l_proc varchar2(72) := g_package||'update_validate';
619: --
620: Begin
621: hr_utility.set_location('Entering:'||l_proc, 5);
622: --
623: -- Call all supporting business operations
624: --
625: --
664: ,p_effective_date => p_effective_date
665: ,p_business_group_id => p_rec.business_group_id
666: ,p_pct_fl_tm_rt_id => p_rec.pct_fl_tm_rt_id);
667: --
668: hr_utility.set_location(' Leaving:'||l_proc, 10);
669: End update_validate;
670: --
671: -- ----------------------------------------------------------------------------
672: -- |---------------------------< delete_validate >----------------------------|
680: --
681: l_proc varchar2(72) := g_package||'delete_validate';
682: --
683: Begin
684: hr_utility.set_location('Entering:'||l_proc, 5);
685: --
686: -- Call all supporting business operations
687: --
688: dt_delete_validate
690: p_validation_start_date => p_validation_start_date,
691: p_validation_end_date => p_validation_end_date,
692: p_pct_fl_tm_rt_id => p_rec.pct_fl_tm_rt_id);
693: --
694: hr_utility.set_location(' Leaving:'||l_proc, 10);
695: End delete_validate;
696: --
697: --
698: -- ---------------------------------------------------------------------------
717: l_proc varchar2(72) := g_package||'return_legislation_code';
718: --
719: begin
720: --
721: hr_utility.set_location('Entering:'|| l_proc, 10);
722: --
723: -- Ensure that all the mandatory parameter are not null
724: --
725: hr_api.mandatory_arg_error(p_api_name => l_proc,
735: close csr_leg_code;
736: --
737: -- The primary key is invalid therefore we must error
738: --
739: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
740: hr_utility.raise_error;
741: --
742: end if;
743: --
736: --
737: -- The primary key is invalid therefore we must error
738: --
739: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
740: hr_utility.raise_error;
741: --
742: end if;
743: --
744: close csr_leg_code;
742: end if;
743: --
744: close csr_leg_code;
745: --
746: hr_utility.set_location(' Leaving:'|| l_proc, 20);
747: --
748: return l_legislation_code;
749: --
750: end return_legislation_code;