42: l_api_updating boolean;
43: --
44: Begin
45: --
46: hr_utility.set_location('Entering:'||l_proc, 5);
47: --
48: l_api_updating := ben_wlr_shd.api_updating
49: (p_effective_date => p_effective_date,
50: p_wk_loc_rt_id => p_wk_loc_rt_id,
71: end if;
72: --
73: end if;
74: --
75: hr_utility.set_location('Leaving:'||l_proc, 10);
76: --
77: End chk_wk_loc_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_wlr_shd.api_updating
118: (p_wk_loc_rt_id => p_wk_loc_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: -- ----------------------------------------------------------------------------
180: and p_effective_date <= nvl(inactive_date, p_effective_date);
181: --
182: Begin
183: --
184: hr_utility.set_location('Entering:'||l_proc, 5);
185: --
186: if p_location_id is not null then
187: open c1;
188: fetch c1 into l_dummy;
186: if p_location_id is not null then
187: open c1;
188: fetch c1 into l_dummy;
189: if c1%notfound then
190: hr_utility.set_message(801,'Location_NotFound');
191: hr_utility.raise_error;
192: end if;
193: close c1;
194: end if;
187: open c1;
188: fetch c1 into l_dummy;
189: if c1%notfound then
190: hr_utility.set_message(801,'Location_NotFound');
191: hr_utility.raise_error;
192: end if;
193: close c1;
194: end if;
195: --
192: end if;
193: close c1;
194: end if;
195: --
196: hr_utility.set_location('Leaving:'||l_proc, 10);
197: --
198: End chk_location_id;
199: -- ----------------------------------------------------------------------------
200: -- |------< chk_dup_record >------|
252: and p_validation_end_date >= effective_start_date;
253: --
254: BEGIN
255: --
256: hr_utility.set_location('Entering:'||l_proc, 5);
257: --
258: l_api_updating := ben_wlr_shd.api_updating
259: (p_wk_loc_rt_id => p_wk_loc_rt_id,
260: p_effective_date => p_effective_date,
279: end if;
280: close c_dup;
281: --
282: end if;
283: hr_utility.set_location('Leaving:'||l_proc,10);
284: --
285: END chk_dup_record;
286: --
287: -- added for Bug 5078478 .. add this procedure to check the duplicate seq no
335: and business_group_id + 0 = p_business_group_id
336: and ordr_num = p_ordr_num;
337: --
338: Begin
339: hr_utility.set_location('Entering:'||l_proc, 5);
340:
341: --
342: open c1;
343: fetch c1 into l_dummy;
347: fnd_message.raise_error;
348: end if;
349: close c1;
350: --
351: hr_utility.set_location('Leaving:'||l_proc, 15);
352: End chk_duplicate_ordr_num;
353:
354:
355:
394: l_integrity_error Exception;
395: l_table_name all_tables.table_name%TYPE;
396: --
397: Begin
398: hr_utility.set_location('Entering:'||l_proc, 5);
399: --
400: -- Ensure that the p_datetrack_mode argument is not null
401: --
402: hr_api.mandatory_arg_error
433: End If;
434: --
435: End If;
436: --
437: hr_utility.set_location(' Leaving:'||l_proc, 10);
438: Exception
439: When l_integrity_error Then
440: --
441: -- A referential integrity check was violated therefore
447: --
448: -- An unhandled or unexpected error has occurred which
449: -- we must report
450: --
451: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
452: hr_utility.set_message_token('PROCEDURE', l_proc);
453: hr_utility.set_message_token('STEP','15');
454: hr_utility.raise_error;
455: End dt_update_validate;
448: -- An unhandled or unexpected error has occurred which
449: -- we must report
450: --
451: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
452: hr_utility.set_message_token('PROCEDURE', l_proc);
453: hr_utility.set_message_token('STEP','15');
454: hr_utility.raise_error;
455: End dt_update_validate;
456: --
449: -- we must report
450: --
451: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
452: hr_utility.set_message_token('PROCEDURE', l_proc);
453: hr_utility.set_message_token('STEP','15');
454: hr_utility.raise_error;
455: End dt_update_validate;
456: --
457: -- ----------------------------------------------------------------------------
450: --
451: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
452: hr_utility.set_message_token('PROCEDURE', l_proc);
453: hr_utility.set_message_token('STEP','15');
454: hr_utility.raise_error;
455: End dt_update_validate;
456: --
457: -- ----------------------------------------------------------------------------
458: -- |--------------------------< dt_delete_validate >--------------------------|
499: l_rows_exist Exception;
500: l_table_name all_tables.table_name%TYPE;
501: --
502: Begin
503: hr_utility.set_location('Entering:'||l_proc, 5);
504: --
505: -- Ensure that the p_datetrack_mode argument is not null
506: --
507: hr_api.mandatory_arg_error
536: --
537: --
538: End If;
539: --
540: hr_utility.set_location(' Leaving:'||l_proc, 10);
541: Exception
542: When l_rows_exist Then
543: --
544: -- A referential integrity check was violated therefore
543: --
544: -- A referential integrity check was violated therefore
545: -- we must error
546: --
547: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
548: hr_utility.set_message_token('TABLE_NAME', l_table_name);
549: hr_utility.raise_error;
550: When Others Then
551: --
544: -- A referential integrity check was violated therefore
545: -- we must error
546: --
547: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
548: hr_utility.set_message_token('TABLE_NAME', l_table_name);
549: hr_utility.raise_error;
550: When Others Then
551: --
552: -- An unhandled or unexpected error has occurred which
545: -- we must error
546: --
547: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
548: hr_utility.set_message_token('TABLE_NAME', l_table_name);
549: hr_utility.raise_error;
550: When Others Then
551: --
552: -- An unhandled or unexpected error has occurred which
553: -- we must report
551: --
552: -- An unhandled or unexpected error has occurred which
553: -- we must report
554: --
555: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
556: hr_utility.set_message_token('PROCEDURE', l_proc);
557: hr_utility.set_message_token('STEP','15');
558: hr_utility.raise_error;
559: End dt_delete_validate;
552: -- An unhandled or unexpected error has occurred which
553: -- we must report
554: --
555: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
556: hr_utility.set_message_token('PROCEDURE', l_proc);
557: hr_utility.set_message_token('STEP','15');
558: hr_utility.raise_error;
559: End dt_delete_validate;
560: --
553: -- we must report
554: --
555: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
556: hr_utility.set_message_token('PROCEDURE', l_proc);
557: hr_utility.set_message_token('STEP','15');
558: hr_utility.raise_error;
559: End dt_delete_validate;
560: --
561: -- ----------------------------------------------------------------------------
554: --
555: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
556: hr_utility.set_message_token('PROCEDURE', l_proc);
557: hr_utility.set_message_token('STEP','15');
558: hr_utility.raise_error;
559: End dt_delete_validate;
560: --
561: -- ----------------------------------------------------------------------------
562: -- |---------------------------< insert_validate >----------------------------|
570: --
571: l_proc varchar2(72) := g_package||'insert_validate';
572: --
573: Begin
574: hr_utility.set_location('Entering:'||l_proc, 5);
575: --
576: -- Call all supporting business operations
577: --
578: --
612: ,p_validation_end_date => p_validation_end_date
613: ,p_business_group_id => p_rec.business_group_id);
614:
615: --
616: hr_utility.set_location(' Leaving:'||l_proc, 10);
617: End insert_validate;
618: --
619: -- ----------------------------------------------------------------------------
620: -- |---------------------------< update_validate >----------------------------|
628: --
629: l_proc varchar2(72) := g_package||'update_validate';
630: --
631: Begin
632: hr_utility.set_location('Entering:'||l_proc, 5);
633: --
634: -- Call all supporting business operations
635: --
636: --
678: p_datetrack_mode => p_datetrack_mode,
679: p_validation_start_date => p_validation_start_date,
680: p_validation_end_date => p_validation_end_date);
681: --
682: hr_utility.set_location(' Leaving:'||l_proc, 10);
683: End update_validate;
684: --
685: -- ----------------------------------------------------------------------------
686: -- |---------------------------< delete_validate >----------------------------|
694: --
695: l_proc varchar2(72) := g_package||'delete_validate';
696: --
697: Begin
698: hr_utility.set_location('Entering:'||l_proc, 5);
699: --
700: -- Call all supporting business operations
701: --
702: dt_delete_validate
704: p_validation_start_date => p_validation_start_date,
705: p_validation_end_date => p_validation_end_date,
706: p_wk_loc_rt_id => p_rec.wk_loc_rt_id);
707: --
708: hr_utility.set_location(' Leaving:'||l_proc, 10);
709: End delete_validate;
710: --
711: --
712: -- ---------------------------------------------------------------------------
731: l_proc varchar2(72) := g_package||'return_legislation_code';
732: --
733: begin
734: --
735: hr_utility.set_location('Entering:'|| l_proc, 10);
736: --
737: -- Ensure that all the mandatory parameter are not null
738: --
739: hr_api.mandatory_arg_error(p_api_name => l_proc,
749: close csr_leg_code;
750: --
751: -- The primary key is invalid therefore we must error
752: --
753: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
754: hr_utility.raise_error;
755: --
756: end if;
757: --
750: --
751: -- The primary key is invalid therefore we must error
752: --
753: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
754: hr_utility.raise_error;
755: --
756: end if;
757: --
758: close csr_leg_code;
756: end if;
757: --
758: close csr_leg_code;
759: --
760: hr_utility.set_location(' Leaving:'|| l_proc, 20);
761: --
762: return l_legislation_code;
763: --
764: end return_legislation_code;