9: --
10: -- ----------------------------------------------------------------------------
11: -- |----------------------
12: -- ----------------------------------------------------------------------------
13: Procedure chk_non_updateable_args(p_rec in per_rtl_shd.g_rec_type) is
14: --
15: l_proc varchar2(72) := g_package||'check_non_updateable_args';
16: l_error exception;
17: l_argument varchar2(30);
21: --
22: -- Only proceed with validation if a row exists for
23: -- the current record in the HR Schema
24: --
25: if not per_rtl_shd.api_updating
26: (p_rating_level_id => p_rec.rating_level_id
27: ,p_object_version_number => p_rec.object_version_number
28: ) then
29: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
31: hr_utility.set_message_token('STEP', '5');
32: end if;
33: hr_utility.set_location(l_proc, 6);
34: --
35: if p_rec.business_group_id <> per_rtl_shd.g_old_rec.business_group_id then
36: l_argument := 'business_group_id';
37: raise l_error;
38: end if;
39: hr_utility.set_location(l_proc, 7);
37: raise l_error;
38: end if;
39: hr_utility.set_location(l_proc, 7);
40: --
41: if p_rec.step_value <> per_rtl_shd.g_old_rec.step_value then
42: l_argument := 'step_value';
43: raise l_error;
44: end if;
45: hr_utility.set_location(l_proc, 8);
43: raise l_error;
44: end if;
45: hr_utility.set_location(l_proc, 8);
46: --
47: if p_rec.competence_id <> per_rtl_shd.g_old_rec.competence_id then
48: l_argument := 'competence_id';
49: raise l_error;
50: end if;
51: hr_utility.set_location(l_proc, 9);
49: raise l_error;
50: end if;
51: hr_utility.set_location(l_proc, 9);
52: --
53: if p_rec.rating_scale_id <> per_rtl_shd.g_old_rec.rating_scale_id then
54: l_argument := 'rating_scale_id';
55: raise l_error;
56: end if;
57: hr_utility.set_location(l_proc, 8);
134: --
135: -- Only proceed with validation if :
136: -- a) The current g_old_rec is current
137: --
138: l_api_updating := per_rtl_shd.api_updating
139: (p_rating_level_id => p_rating_level_id
140: ,p_object_version_number => p_object_version_number);
141:
142: --
266: -- Only proceed with validation if :
267: -- a) The current g_old_rec is current and
268: -- b) The value for name has changed
269: --
270: l_api_updating := per_rtl_shd.api_updating
271: (p_rating_level_id => p_rating_level_id
272: ,p_object_version_number => p_object_version_number);
273: --
274: if ( (l_api_updating and (per_rtl_shd.g_old_rec.name
270: l_api_updating := per_rtl_shd.api_updating
271: (p_rating_level_id => p_rating_level_id
272: ,p_object_version_number => p_object_version_number);
273: --
274: if ( (l_api_updating and (per_rtl_shd.g_old_rec.name
275: <> nvl(p_name,hr_api.g_varchar2))
276: ) or
277: (NOT l_api_updating)
278: ) then
690: -- {End Of Comments}
691: -- ----------------------------------------------------------------------------
692: --
693: procedure chk_df
694: (p_rec in per_rtl_shd.g_rec_type) is
695: --
696: l_proc varchar2(72) := g_package||'chk_df';
697: --
698: begin
698: begin
699: hr_utility.set_location('Entering:'||l_proc, 10);
700: --
701: if (((p_rec.rating_level_id is not null) and (
702: nvl(per_rtl_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
703: nvl(p_rec.attribute_category, hr_api.g_varchar2) or
704: nvl(per_rtl_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>
705: nvl(p_rec.attribute1, hr_api.g_varchar2) or
706: nvl(per_rtl_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
700: --
701: if (((p_rec.rating_level_id is not null) and (
702: nvl(per_rtl_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
703: nvl(p_rec.attribute_category, hr_api.g_varchar2) or
704: nvl(per_rtl_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>
705: nvl(p_rec.attribute1, hr_api.g_varchar2) or
706: nvl(per_rtl_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
707: nvl(p_rec.attribute2, hr_api.g_varchar2) or
708: nvl(per_rtl_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
702: nvl(per_rtl_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
703: nvl(p_rec.attribute_category, hr_api.g_varchar2) or
704: nvl(per_rtl_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>
705: nvl(p_rec.attribute1, hr_api.g_varchar2) or
706: nvl(per_rtl_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
707: nvl(p_rec.attribute2, hr_api.g_varchar2) or
708: nvl(per_rtl_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
709: nvl(p_rec.attribute3, hr_api.g_varchar2) or
710: nvl(per_rtl_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
704: nvl(per_rtl_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>
705: nvl(p_rec.attribute1, hr_api.g_varchar2) or
706: nvl(per_rtl_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
707: nvl(p_rec.attribute2, hr_api.g_varchar2) or
708: nvl(per_rtl_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
709: nvl(p_rec.attribute3, hr_api.g_varchar2) or
710: nvl(per_rtl_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
711: nvl(p_rec.attribute4, hr_api.g_varchar2) or
712: nvl(per_rtl_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
706: nvl(per_rtl_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
707: nvl(p_rec.attribute2, hr_api.g_varchar2) or
708: nvl(per_rtl_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
709: nvl(p_rec.attribute3, hr_api.g_varchar2) or
710: nvl(per_rtl_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
711: nvl(p_rec.attribute4, hr_api.g_varchar2) or
712: nvl(per_rtl_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
713: nvl(p_rec.attribute5, hr_api.g_varchar2) or
714: nvl(per_rtl_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
708: nvl(per_rtl_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
709: nvl(p_rec.attribute3, hr_api.g_varchar2) or
710: nvl(per_rtl_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
711: nvl(p_rec.attribute4, hr_api.g_varchar2) or
712: nvl(per_rtl_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
713: nvl(p_rec.attribute5, hr_api.g_varchar2) or
714: nvl(per_rtl_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
715: nvl(p_rec.attribute6, hr_api.g_varchar2) or
716: nvl(per_rtl_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
710: nvl(per_rtl_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
711: nvl(p_rec.attribute4, hr_api.g_varchar2) or
712: nvl(per_rtl_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
713: nvl(p_rec.attribute5, hr_api.g_varchar2) or
714: nvl(per_rtl_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
715: nvl(p_rec.attribute6, hr_api.g_varchar2) or
716: nvl(per_rtl_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
717: nvl(p_rec.attribute7, hr_api.g_varchar2) or
718: nvl(per_rtl_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
712: nvl(per_rtl_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
713: nvl(p_rec.attribute5, hr_api.g_varchar2) or
714: nvl(per_rtl_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
715: nvl(p_rec.attribute6, hr_api.g_varchar2) or
716: nvl(per_rtl_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
717: nvl(p_rec.attribute7, hr_api.g_varchar2) or
718: nvl(per_rtl_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
719: nvl(p_rec.attribute8, hr_api.g_varchar2) or
720: nvl(per_rtl_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
714: nvl(per_rtl_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
715: nvl(p_rec.attribute6, hr_api.g_varchar2) or
716: nvl(per_rtl_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
717: nvl(p_rec.attribute7, hr_api.g_varchar2) or
718: nvl(per_rtl_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
719: nvl(p_rec.attribute8, hr_api.g_varchar2) or
720: nvl(per_rtl_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
721: nvl(p_rec.attribute9, hr_api.g_varchar2) or
722: nvl(per_rtl_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
716: nvl(per_rtl_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
717: nvl(p_rec.attribute7, hr_api.g_varchar2) or
718: nvl(per_rtl_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
719: nvl(p_rec.attribute8, hr_api.g_varchar2) or
720: nvl(per_rtl_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
721: nvl(p_rec.attribute9, hr_api.g_varchar2) or
722: nvl(per_rtl_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
723: nvl(p_rec.attribute10, hr_api.g_varchar2) or
724: nvl(per_rtl_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
718: nvl(per_rtl_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
719: nvl(p_rec.attribute8, hr_api.g_varchar2) or
720: nvl(per_rtl_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
721: nvl(p_rec.attribute9, hr_api.g_varchar2) or
722: nvl(per_rtl_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
723: nvl(p_rec.attribute10, hr_api.g_varchar2) or
724: nvl(per_rtl_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
725: nvl(p_rec.attribute11, hr_api.g_varchar2) or
726: nvl(per_rtl_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
720: nvl(per_rtl_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
721: nvl(p_rec.attribute9, hr_api.g_varchar2) or
722: nvl(per_rtl_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
723: nvl(p_rec.attribute10, hr_api.g_varchar2) or
724: nvl(per_rtl_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
725: nvl(p_rec.attribute11, hr_api.g_varchar2) or
726: nvl(per_rtl_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
727: nvl(p_rec.attribute12, hr_api.g_varchar2) or
728: nvl(per_rtl_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
722: nvl(per_rtl_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
723: nvl(p_rec.attribute10, hr_api.g_varchar2) or
724: nvl(per_rtl_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
725: nvl(p_rec.attribute11, hr_api.g_varchar2) or
726: nvl(per_rtl_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
727: nvl(p_rec.attribute12, hr_api.g_varchar2) or
728: nvl(per_rtl_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
729: nvl(p_rec.attribute13, hr_api.g_varchar2) or
730: nvl(per_rtl_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
724: nvl(per_rtl_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
725: nvl(p_rec.attribute11, hr_api.g_varchar2) or
726: nvl(per_rtl_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
727: nvl(p_rec.attribute12, hr_api.g_varchar2) or
728: nvl(per_rtl_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
729: nvl(p_rec.attribute13, hr_api.g_varchar2) or
730: nvl(per_rtl_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
731: nvl(p_rec.attribute14, hr_api.g_varchar2) or
732: nvl(per_rtl_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
726: nvl(per_rtl_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
727: nvl(p_rec.attribute12, hr_api.g_varchar2) or
728: nvl(per_rtl_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
729: nvl(p_rec.attribute13, hr_api.g_varchar2) or
730: nvl(per_rtl_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
731: nvl(p_rec.attribute14, hr_api.g_varchar2) or
732: nvl(per_rtl_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
733: nvl(p_rec.attribute15, hr_api.g_varchar2) or
734: nvl(per_rtl_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
728: nvl(per_rtl_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
729: nvl(p_rec.attribute13, hr_api.g_varchar2) or
730: nvl(per_rtl_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
731: nvl(p_rec.attribute14, hr_api.g_varchar2) or
732: nvl(per_rtl_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
733: nvl(p_rec.attribute15, hr_api.g_varchar2) or
734: nvl(per_rtl_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
735: nvl(p_rec.attribute16, hr_api.g_varchar2) or
736: nvl(per_rtl_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
730: nvl(per_rtl_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
731: nvl(p_rec.attribute14, hr_api.g_varchar2) or
732: nvl(per_rtl_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
733: nvl(p_rec.attribute15, hr_api.g_varchar2) or
734: nvl(per_rtl_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
735: nvl(p_rec.attribute16, hr_api.g_varchar2) or
736: nvl(per_rtl_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
737: nvl(p_rec.attribute17, hr_api.g_varchar2) or
738: nvl(per_rtl_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
732: nvl(per_rtl_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
733: nvl(p_rec.attribute15, hr_api.g_varchar2) or
734: nvl(per_rtl_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
735: nvl(p_rec.attribute16, hr_api.g_varchar2) or
736: nvl(per_rtl_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
737: nvl(p_rec.attribute17, hr_api.g_varchar2) or
738: nvl(per_rtl_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
739: nvl(p_rec.attribute18, hr_api.g_varchar2) or
740: nvl(per_rtl_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>
734: nvl(per_rtl_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
735: nvl(p_rec.attribute16, hr_api.g_varchar2) or
736: nvl(per_rtl_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
737: nvl(p_rec.attribute17, hr_api.g_varchar2) or
738: nvl(per_rtl_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
739: nvl(p_rec.attribute18, hr_api.g_varchar2) or
740: nvl(per_rtl_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>
741: nvl(p_rec.attribute19, hr_api.g_varchar2) or
742: nvl(per_rtl_shd.g_old_rec.attribute20, hr_api.g_varchar2) <>
736: nvl(per_rtl_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
737: nvl(p_rec.attribute17, hr_api.g_varchar2) or
738: nvl(per_rtl_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
739: nvl(p_rec.attribute18, hr_api.g_varchar2) or
740: nvl(per_rtl_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>
741: nvl(p_rec.attribute19, hr_api.g_varchar2) or
742: nvl(per_rtl_shd.g_old_rec.attribute20, hr_api.g_varchar2) <>
743: nvl(p_rec.attribute20, hr_api.g_varchar2)))
744: or
738: nvl(per_rtl_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
739: nvl(p_rec.attribute18, hr_api.g_varchar2) or
740: nvl(per_rtl_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>
741: nvl(p_rec.attribute19, hr_api.g_varchar2) or
742: nvl(per_rtl_shd.g_old_rec.attribute20, hr_api.g_varchar2) <>
743: nvl(p_rec.attribute20, hr_api.g_varchar2)))
744: or
745: (p_rec.rating_level_id is null))
746: and hr_rating_levels_api.g_ignore_df <> 'Y' then -- BUG3621261
801: --
802: -- ----------------------------------------------------------------------------
803: -- |---------------------------< insert_validate >----------------------------|
804: -- ----------------------------------------------------------------------------
805: Procedure insert_validate(p_rec in per_rtl_shd.g_rec_type,
806: p_effective_date in date) is
807: --
808: l_proc varchar2(72) := g_package||'insert_validate';
809: --
892: --
893: -- ----------------------------------------------------------------------------
894: -- |---------------------------< update_validate >----------------------------|
895: -- ----------------------------------------------------------------------------
896: Procedure update_validate(p_rec in per_rtl_shd.g_rec_type,
897: p_effective_date in date) is
898: --
899: l_proc varchar2(72) := g_package||'update_validate';
900: --
938: --
939: -- ----------------------------------------------------------------------------
940: -- |---------------------------< delete_validate >----------------------------|
941: -- ----------------------------------------------------------------------------
942: Procedure delete_validate(p_rec in per_rtl_shd.g_rec_type) is
943: --
944: l_proc varchar2(72) := g_package||'delete_validate';
945: --
946: Begin
957: --
958: per_rtl_bus.chk_rating_level_add_del
959: (p_rating_level_id => p_rec.rating_level_id
960: ,p_object_version_number => p_rec.object_version_number
961: ,p_competence_id => per_rtl_shd.g_old_rec.competence_id
962: ,p_rating_scale_id => per_rtl_shd.g_old_rec.rating_scale_id
963: );
964: --
965: hr_utility.set_location(' Leaving:'||l_proc, 10);
958: per_rtl_bus.chk_rating_level_add_del
959: (p_rating_level_id => p_rec.rating_level_id
960: ,p_object_version_number => p_rec.object_version_number
961: ,p_competence_id => per_rtl_shd.g_old_rec.competence_id
962: ,p_rating_scale_id => per_rtl_shd.g_old_rec.rating_scale_id
963: );
964: --
965: hr_utility.set_location(' Leaving:'||l_proc, 10);
966: End delete_validate;