42: l_api_updating boolean;
43: --
44: Begin
45: --
46: hr_utility.set_location('Entering:'||l_proc, 5);
47: --
48: l_api_updating := ben_pyr_shd.api_updating
49: (p_effective_date => p_effective_date,
50: p_pyrl_rt_id => p_pyrl_rt_id,
71: end if;
72: --
73: end if;
74: --
75: hr_utility.set_location('Leaving:'||l_proc, 10);
76: --
77: End chk_pyrl_rt_id;
78: --
79: -- ----------------------------------------------------------------------------
111: l_api_updating boolean;
112: --
113: Begin
114: --
115: hr_utility.set_location('Entering:'||l_proc, 5);
116: --
117: l_api_updating := ben_pyr_shd.api_updating
118: (p_pyrl_rt_id => p_pyrl_rt_id,
119: p_effective_date => p_effective_date,
133: p_effective_date => p_effective_date) then
134: --
135: -- raise error as does not exist as lookup
136: --
137: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
138: hr_utility.raise_error;
139: --
140: end if;
141: --
134: --
135: -- raise error as does not exist as lookup
136: --
137: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
138: hr_utility.raise_error;
139: --
140: end if;
141: --
142: end if;
140: end if;
141: --
142: end if;
143: --
144: hr_utility.set_location('Leaving:'||l_proc,10);
145: --
146: end chk_excld_flag;
147: --
148: -- ----------------------------------------------------------------------------
187: --
188:
189: Begin
190: --
191: hr_utility.set_location('Entering:'||l_proc, 5);
192: --
193: if p_payroll_id is not null then
194: open c1;
195: fetch c1 into l_dummy;
193: if p_payroll_id is not null then
194: open c1;
195: fetch c1 into l_dummy;
196: if c1%notfound then
197: hr_utility.set_message(801,'Payroll_NotExist');
198: hr_utility.raise_error;
199: end if;
200: close c1;
201: end if;
194: open c1;
195: fetch c1 into l_dummy;
196: if c1%notfound then
197: hr_utility.set_message(801,'Payroll_NotExist');
198: hr_utility.raise_error;
199: end if;
200: close c1;
201: end if;
202: --
199: end if;
200: close c1;
201: end if;
202: --
203: hr_utility.set_location('Leaving:'||l_proc, 10);
204: --
205: End chk_payroll_id;
206:
207: --
261: and p_validation_end_date >= effective_start_date;
262: --
263: BEGIN
264: --
265: hr_utility.set_location('Entering:'||l_proc, 5);
266: --
267: l_api_updating := ben_pyr_shd.api_updating
268: (p_pyrl_rt_id => p_pyrl_rt_id,
269: p_effective_date => p_effective_date,
288: end if;
289: close c_dup;
290: --
291: end if;
292: hr_utility.set_location('Leaving:'||l_proc,10);
293: --
294: END chk_dup_record;
295:
296: --
345: and business_group_id + 0 = p_business_group_id
346: and ordr_num = p_ordr_num;
347: --
348: Begin
349: hr_utility.set_location('Entering:'||l_proc, 5);
350:
351: --
352: open c1;
353: fetch c1 into l_dummy;
357: fnd_message.raise_error;
358: end if;
359: close c1;
360: --
361: hr_utility.set_location('Leaving:'||l_proc, 15);
362: End chk_duplicate_ordr_num;
363:
364:
365:
405: l_integrity_error Exception;
406: l_table_name all_tables.table_name%TYPE;
407: --
408: Begin
409: hr_utility.set_location('Entering:'||l_proc, 5);
410: --
411: -- Ensure that the p_datetrack_mode argument is not null
412: --
413: hr_api.mandatory_arg_error
457: End If;
458: --
459: End If;
460: --
461: hr_utility.set_location(' Leaving:'||l_proc, 10);
462: Exception
463: When l_integrity_error Then
464: --
465: -- A referential integrity check was violated therefore
464: --
465: -- A referential integrity check was violated therefore
466: -- we must error
467: --
468: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
469: hr_utility.set_message_token('TABLE_NAME', l_table_name);
470: hr_utility.raise_error;
471: When Others Then
472: --
465: -- A referential integrity check was violated therefore
466: -- we must error
467: --
468: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
469: hr_utility.set_message_token('TABLE_NAME', l_table_name);
470: hr_utility.raise_error;
471: When Others Then
472: --
473: -- An unhandled or unexpected error has occurred which
466: -- we must error
467: --
468: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
469: hr_utility.set_message_token('TABLE_NAME', l_table_name);
470: hr_utility.raise_error;
471: When Others Then
472: --
473: -- An unhandled or unexpected error has occurred which
474: -- we must report
472: --
473: -- An unhandled or unexpected error has occurred which
474: -- we must report
475: --
476: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
477: hr_utility.set_message_token('PROCEDURE', l_proc);
478: hr_utility.set_message_token('STEP','15');
479: hr_utility.raise_error;
480: End dt_update_validate;
473: -- An unhandled or unexpected error has occurred which
474: -- we must report
475: --
476: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
477: hr_utility.set_message_token('PROCEDURE', l_proc);
478: hr_utility.set_message_token('STEP','15');
479: hr_utility.raise_error;
480: End dt_update_validate;
481: --
474: -- we must report
475: --
476: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
477: hr_utility.set_message_token('PROCEDURE', l_proc);
478: hr_utility.set_message_token('STEP','15');
479: hr_utility.raise_error;
480: End dt_update_validate;
481: --
482: -- ----------------------------------------------------------------------------
475: --
476: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
477: hr_utility.set_message_token('PROCEDURE', l_proc);
478: hr_utility.set_message_token('STEP','15');
479: hr_utility.raise_error;
480: End dt_update_validate;
481: --
482: -- ----------------------------------------------------------------------------
483: -- |--------------------------< dt_delete_validate >--------------------------|
524: l_rows_exist Exception;
525: l_table_name all_tables.table_name%TYPE;
526: --
527: Begin
528: hr_utility.set_location('Entering:'||l_proc, 5);
529: --
530: -- Ensure that the p_datetrack_mode argument is not null
531: --
532: hr_api.mandatory_arg_error
561: --
562: --
563: End If;
564: --
565: hr_utility.set_location(' Leaving:'||l_proc, 10);
566: Exception
567: When l_rows_exist Then
568: --
569: -- A referential integrity check was violated therefore
568: --
569: -- A referential integrity check was violated therefore
570: -- we must error
571: --
572: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
573: hr_utility.set_message_token('TABLE_NAME', l_table_name);
574: hr_utility.raise_error;
575: When Others Then
576: --
569: -- A referential integrity check was violated therefore
570: -- we must error
571: --
572: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
573: hr_utility.set_message_token('TABLE_NAME', l_table_name);
574: hr_utility.raise_error;
575: When Others Then
576: --
577: -- An unhandled or unexpected error has occurred which
570: -- we must error
571: --
572: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
573: hr_utility.set_message_token('TABLE_NAME', l_table_name);
574: hr_utility.raise_error;
575: When Others Then
576: --
577: -- An unhandled or unexpected error has occurred which
578: -- we must report
576: --
577: -- An unhandled or unexpected error has occurred which
578: -- we must report
579: --
580: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
581: hr_utility.set_message_token('PROCEDURE', l_proc);
582: hr_utility.set_message_token('STEP','15');
583: hr_utility.raise_error;
584: End dt_delete_validate;
577: -- An unhandled or unexpected error has occurred which
578: -- we must report
579: --
580: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
581: hr_utility.set_message_token('PROCEDURE', l_proc);
582: hr_utility.set_message_token('STEP','15');
583: hr_utility.raise_error;
584: End dt_delete_validate;
585: --
578: -- we must report
579: --
580: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
581: hr_utility.set_message_token('PROCEDURE', l_proc);
582: hr_utility.set_message_token('STEP','15');
583: hr_utility.raise_error;
584: End dt_delete_validate;
585: --
586: -- ----------------------------------------------------------------------------
579: --
580: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
581: hr_utility.set_message_token('PROCEDURE', l_proc);
582: hr_utility.set_message_token('STEP','15');
583: hr_utility.raise_error;
584: End dt_delete_validate;
585: --
586: -- ----------------------------------------------------------------------------
587: -- |---------------------------< insert_validate >----------------------------|
595: --
596: l_proc varchar2(72) := g_package||'insert_validate';
597: --
598: Begin
599: hr_utility.set_location('Entering:'||l_proc, 5);
600: --
601: -- Call all supporting business operations
602: --
603: --
640: ,p_business_group_id => p_rec.business_group_id);
641:
642:
643: --
644: hr_utility.set_location(' Leaving:'||l_proc, 10);
645: End insert_validate;
646: --
647: -- ----------------------------------------------------------------------------
648: -- |---------------------------< update_validate >----------------------------|
656: --
657: l_proc varchar2(72) := g_package||'update_validate';
658: --
659: Begin
660: hr_utility.set_location('Entering:'||l_proc, 5);
661: --
662: -- Call all supporting business operations
663: --
664: --
714: --
715:
716:
717: --
718: hr_utility.set_location(' Leaving:'||l_proc, 10);
719: End update_validate;
720: --
721: -- ----------------------------------------------------------------------------
722: -- |---------------------------< delete_validate >----------------------------|
730: --
731: l_proc varchar2(72) := g_package||'delete_validate';
732: --
733: Begin
734: hr_utility.set_location('Entering:'||l_proc, 5);
735: --
736: -- Call all supporting business operations
737: --
738: dt_delete_validate
740: p_validation_start_date => p_validation_start_date,
741: p_validation_end_date => p_validation_end_date,
742: p_pyrl_rt_id => p_rec.pyrl_rt_id);
743: --
744: hr_utility.set_location(' Leaving:'||l_proc, 10);
745: End delete_validate;
746: --
747: --
748: -- ---------------------------------------------------------------------------
767: l_proc varchar2(72) := g_package||'return_legislation_code';
768: --
769: begin
770: --
771: hr_utility.set_location('Entering:'|| l_proc, 10);
772: --
773: -- Ensure that all the mandatory parameter are not null
774: --
775: hr_api.mandatory_arg_error(p_api_name => l_proc,
785: close csr_leg_code;
786: --
787: -- The primary key is invalid therefore we must error
788: --
789: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
790: hr_utility.raise_error;
791: --
792: end if;
793: --
786: --
787: -- The primary key is invalid therefore we must error
788: --
789: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
790: hr_utility.raise_error;
791: --
792: end if;
793: --
794: close csr_leg_code;
792: end if;
793: --
794: close csr_leg_code;
795: --
796: hr_utility.set_location(' Leaving:'|| l_proc, 20);
797: --
798: return l_legislation_code;
799: --
800: end return_legislation_code;