80: --
81: hr_utility.set_location(' Leaving:'||l_proc, 10);
82: --
83: Exception
84: When hr_api.check_integrity_violated Then
85: -- A check constraint has been violated
86: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
87: ghr_pdc_shd.constraint_error
88: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
84: When hr_api.check_integrity_violated Then
85: -- A check constraint has been violated
86: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
87: ghr_pdc_shd.constraint_error
88: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
89: When hr_api.parent_integrity_violated Then
90: -- Parent integrity has been violated
91: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
92: ghr_pdc_shd.constraint_error
85: -- A check constraint has been violated
86: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
87: ghr_pdc_shd.constraint_error
88: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
89: When hr_api.parent_integrity_violated Then
90: -- Parent integrity has been violated
91: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
92: ghr_pdc_shd.constraint_error
93: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
89: When hr_api.parent_integrity_violated Then
90: -- Parent integrity has been violated
91: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
92: ghr_pdc_shd.constraint_error
93: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
94: When hr_api.unique_integrity_violated Then
95: -- Unique integrity has been violated
96: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
97: ghr_pdc_shd.constraint_error
90: -- Parent integrity has been violated
91: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
92: ghr_pdc_shd.constraint_error
93: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
94: When hr_api.unique_integrity_violated Then
95: -- Unique integrity has been violated
96: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
97: ghr_pdc_shd.constraint_error
98: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
94: When hr_api.unique_integrity_violated Then
95: -- Unique integrity has been violated
96: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
97: ghr_pdc_shd.constraint_error
98: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
99: When Others Then
100: --ghr_pdc_shd.g_api_dml := false; -- Unset the api dml status
101: Raise;
102: End update_dml;
203: p_object_version_number_o => ghr_pdc_shd.g_old_rec.object_version_number
204: );
205:
206: exception
207: when hr_api.cannot_find_prog_unit then
208: hr_api.cannot_find_prog_unit_error
209: ( p_module_name => 'GHR_PD_CLASSIFICATIONS'
210: ,p_hook_type => 'AU'
211: );
204: );
205:
206: exception
207: when hr_api.cannot_find_prog_unit then
208: hr_api.cannot_find_prog_unit_error
209: ( p_module_name => 'GHR_PD_CLASSIFICATIONS'
210: ,p_hook_type => 'AU'
211: );
212: end;
271: -- p_rec plsql record structure
272: -- to see if a system default is being used. If a system default
273: -- is being used then we must set to the 'current' argument value.
274: --
275: If (p_rec.position_description_id = hr_api.g_number) then
276: p_rec.position_description_id :=
277: ghr_pdc_shd.g_old_rec.position_description_id;
278: End If;
279: If (p_rec.class_grade_by = hr_api.g_varchar2) then
275: If (p_rec.position_description_id = hr_api.g_number) then
276: p_rec.position_description_id :=
277: ghr_pdc_shd.g_old_rec.position_description_id;
278: End If;
279: If (p_rec.class_grade_by = hr_api.g_varchar2) then
280: p_rec.class_grade_by :=
281: ghr_pdc_shd.g_old_rec.class_grade_by;
282: End If;
283: If (p_rec.official_title = hr_api.g_varchar2) then
279: If (p_rec.class_grade_by = hr_api.g_varchar2) then
280: p_rec.class_grade_by :=
281: ghr_pdc_shd.g_old_rec.class_grade_by;
282: End If;
283: If (p_rec.official_title = hr_api.g_varchar2) then
284: p_rec.official_title :=
285: ghr_pdc_shd.g_old_rec.official_title;
286: End If;
287: If (p_rec.pay_plan = hr_api.g_varchar2) then
283: If (p_rec.official_title = hr_api.g_varchar2) then
284: p_rec.official_title :=
285: ghr_pdc_shd.g_old_rec.official_title;
286: End If;
287: If (p_rec.pay_plan = hr_api.g_varchar2) then
288: p_rec.pay_plan :=
289: ghr_pdc_shd.g_old_rec.pay_plan;
290: End If;
291: If (p_rec.occupational_code = hr_api.g_varchar2) then
287: If (p_rec.pay_plan = hr_api.g_varchar2) then
288: p_rec.pay_plan :=
289: ghr_pdc_shd.g_old_rec.pay_plan;
290: End If;
291: If (p_rec.occupational_code = hr_api.g_varchar2) then
292: p_rec.occupational_code :=
293: ghr_pdc_shd.g_old_rec.occupational_code;
294: End If;
295: If (p_rec.grade_level = hr_api.g_varchar2) then
291: If (p_rec.occupational_code = hr_api.g_varchar2) then
292: p_rec.occupational_code :=
293: ghr_pdc_shd.g_old_rec.occupational_code;
294: End If;
295: If (p_rec.grade_level = hr_api.g_varchar2) then
296: p_rec.grade_level :=
297: ghr_pdc_shd.g_old_rec.grade_level;
298: End If;
299:
350: -- ----------------------------------------------------------------------------
351: Procedure upd
352: (
353: p_pd_classification_id in number,
354: p_position_description_id in number default hr_api.g_number,
355: p_class_grade_by in varchar2 default hr_api.g_varchar2,
356: p_official_title in varchar2 default hr_api.g_varchar2,
357: p_pay_plan in varchar2 default hr_api.g_varchar2,
358: p_occupational_code in varchar2 default hr_api.g_varchar2,
351: Procedure upd
352: (
353: p_pd_classification_id in number,
354: p_position_description_id in number default hr_api.g_number,
355: p_class_grade_by in varchar2 default hr_api.g_varchar2,
356: p_official_title in varchar2 default hr_api.g_varchar2,
357: p_pay_plan in varchar2 default hr_api.g_varchar2,
358: p_occupational_code in varchar2 default hr_api.g_varchar2,
359: p_grade_level in varchar2 default hr_api.g_varchar2,
352: (
353: p_pd_classification_id in number,
354: p_position_description_id in number default hr_api.g_number,
355: p_class_grade_by in varchar2 default hr_api.g_varchar2,
356: p_official_title in varchar2 default hr_api.g_varchar2,
357: p_pay_plan in varchar2 default hr_api.g_varchar2,
358: p_occupational_code in varchar2 default hr_api.g_varchar2,
359: p_grade_level in varchar2 default hr_api.g_varchar2,
360: p_object_version_number in out NOCOPY number
353: p_pd_classification_id in number,
354: p_position_description_id in number default hr_api.g_number,
355: p_class_grade_by in varchar2 default hr_api.g_varchar2,
356: p_official_title in varchar2 default hr_api.g_varchar2,
357: p_pay_plan in varchar2 default hr_api.g_varchar2,
358: p_occupational_code in varchar2 default hr_api.g_varchar2,
359: p_grade_level in varchar2 default hr_api.g_varchar2,
360: p_object_version_number in out NOCOPY number
361: ) is
354: p_position_description_id in number default hr_api.g_number,
355: p_class_grade_by in varchar2 default hr_api.g_varchar2,
356: p_official_title in varchar2 default hr_api.g_varchar2,
357: p_pay_plan in varchar2 default hr_api.g_varchar2,
358: p_occupational_code in varchar2 default hr_api.g_varchar2,
359: p_grade_level in varchar2 default hr_api.g_varchar2,
360: p_object_version_number in out NOCOPY number
361: ) is
362: --
355: p_class_grade_by in varchar2 default hr_api.g_varchar2,
356: p_official_title in varchar2 default hr_api.g_varchar2,
357: p_pay_plan in varchar2 default hr_api.g_varchar2,
358: p_occupational_code in varchar2 default hr_api.g_varchar2,
359: p_grade_level in varchar2 default hr_api.g_varchar2,
360: p_object_version_number in out NOCOPY number
361: ) is
362: --
363: l_rec ghr_pdc_shd.g_rec_type;