84: --
85: hr_utility.set_location(' Leaving:'||l_proc, 10);
86: --
87: Exception
88: When hr_api.check_integrity_violated Then
89: -- A check constraint has been violated
90: --
91: per_stc_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
88: When hr_api.check_integrity_violated Then
89: -- A check constraint has been violated
90: --
91: per_stc_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.parent_integrity_violated Then
94: -- Parent integrity has been violated
95: --
96: per_stc_shd.constraint_error
89: -- A check constraint has been violated
90: --
91: per_stc_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.parent_integrity_violated Then
94: -- Parent integrity has been violated
95: --
96: per_stc_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.parent_integrity_violated Then
94: -- Parent integrity has been violated
95: --
96: per_stc_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When hr_api.unique_integrity_violated Then
99: -- Unique integrity has been violated
100: --
101: per_stc_shd.constraint_error
94: -- Parent integrity has been violated
95: --
96: per_stc_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When hr_api.unique_integrity_violated Then
99: -- Unique integrity has been violated
100: --
101: per_stc_shd.constraint_error
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When hr_api.unique_integrity_violated Then
99: -- Unique integrity has been violated
100: --
101: per_stc_shd.constraint_error
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
103: When Others Then
104: --
105: Raise;
106: End update_dml;
223: );
224: --
225: exception
226: --
227: when hr_api.cannot_find_prog_unit then
228: --
229: hr_api.cannot_find_prog_unit_error
230: (p_module_name => 'PER_SOLUTION_TYPE_CMPTS'
231: ,p_hook_type => 'AU');
225: exception
226: --
227: when hr_api.cannot_find_prog_unit then
228: --
229: hr_api.cannot_find_prog_unit_error
230: (p_module_name => 'PER_SOLUTION_TYPE_CMPTS'
231: ,p_hook_type => 'AU');
232: --
233: end;
288: -- p_rec plsql record structure
289: -- to see if a system default is being used. If a system default
290: -- is being used then we must set to the 'current' argument value.
291: --
292: If (p_rec.api_name = hr_api.g_varchar2) then
293: p_rec.api_name :=
294: per_stc_shd.g_old_rec.api_name;
295: End If;
296: If (p_rec.parent_component_name = hr_api.g_varchar2) then
292: If (p_rec.api_name = hr_api.g_varchar2) then
293: p_rec.api_name :=
294: per_stc_shd.g_old_rec.api_name;
295: End If;
296: If (p_rec.parent_component_name = hr_api.g_varchar2) then
297: p_rec.parent_component_name :=
298: per_stc_shd.g_old_rec.parent_component_name;
299: End If;
300: If (p_rec.updateable = hr_api.g_varchar2) then
296: If (p_rec.parent_component_name = hr_api.g_varchar2) then
297: p_rec.parent_component_name :=
298: per_stc_shd.g_old_rec.parent_component_name;
299: End If;
300: If (p_rec.updateable = hr_api.g_varchar2) then
301: p_rec.updateable :=
302: per_stc_shd.g_old_rec.updateable;
303: End If;
304: If (p_rec.extensible = hr_api.g_varchar2) then
300: If (p_rec.updateable = hr_api.g_varchar2) then
301: p_rec.updateable :=
302: per_stc_shd.g_old_rec.updateable;
303: End If;
304: If (p_rec.extensible = hr_api.g_varchar2) then
305: p_rec.extensible :=
306: per_stc_shd.g_old_rec.extensible;
307: End If;
308: --
372: ,p_component_name in varchar2
373: ,p_solution_type_name in varchar2
374: ,p_legislation_code in varchar2
375: ,p_object_version_number in out nocopy number
376: ,p_api_name in varchar2 default hr_api.g_varchar2
377: ,p_updateable in varchar2 default hr_api.g_varchar2
378: ,p_extensible in varchar2 default hr_api.g_varchar2
379: ,p_parent_component_name in varchar2 default hr_api.g_varchar2
380: ) is
373: ,p_solution_type_name in varchar2
374: ,p_legislation_code in varchar2
375: ,p_object_version_number in out nocopy number
376: ,p_api_name in varchar2 default hr_api.g_varchar2
377: ,p_updateable in varchar2 default hr_api.g_varchar2
378: ,p_extensible in varchar2 default hr_api.g_varchar2
379: ,p_parent_component_name in varchar2 default hr_api.g_varchar2
380: ) is
381: --
374: ,p_legislation_code in varchar2
375: ,p_object_version_number in out nocopy number
376: ,p_api_name in varchar2 default hr_api.g_varchar2
377: ,p_updateable in varchar2 default hr_api.g_varchar2
378: ,p_extensible in varchar2 default hr_api.g_varchar2
379: ,p_parent_component_name in varchar2 default hr_api.g_varchar2
380: ) is
381: --
382: l_rec per_stc_shd.g_rec_type;
375: ,p_object_version_number in out nocopy number
376: ,p_api_name in varchar2 default hr_api.g_varchar2
377: ,p_updateable in varchar2 default hr_api.g_varchar2
378: ,p_extensible in varchar2 default hr_api.g_varchar2
379: ,p_parent_component_name in varchar2 default hr_api.g_varchar2
380: ) is
381: --
382: l_rec per_stc_shd.g_rec_type;
383: l_proc varchar2(72) := g_package||'upd';