67: --
68: hr_utility.set_location(' Leaving:'||l_proc, 10);
69: --
70: Exception
71: When hr_api.check_integrity_violated Then
72: -- A check constraint has been violated
73: pqh_atl_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
70: Exception
71: When hr_api.check_integrity_violated Then
72: -- A check constraint has been violated
73: pqh_atl_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
76: -- Parent integrity has been violated
77: pqh_atl_shd.constraint_error
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
71: When hr_api.check_integrity_violated Then
72: -- A check constraint has been violated
73: pqh_atl_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
76: -- Parent integrity has been violated
77: pqh_atl_shd.constraint_error
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
79: When hr_api.unique_integrity_violated Then
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
76: -- Parent integrity has been violated
77: pqh_atl_shd.constraint_error
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
79: When hr_api.unique_integrity_violated Then
80: -- Unique integrity has been violated
81: pqh_atl_shd.constraint_error
82: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
76: -- Parent integrity has been violated
77: pqh_atl_shd.constraint_error
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
79: When hr_api.unique_integrity_violated Then
80: -- Unique integrity has been violated
81: pqh_atl_shd.constraint_error
82: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
83: When Others Then
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
79: When hr_api.unique_integrity_violated Then
80: -- Unique integrity has been violated
81: pqh_atl_shd.constraint_error
82: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
83: When Others Then
84: Raise;
85: End update_dml;
86: --
182: );
183: --
184: exception
185: --
186: when hr_api.cannot_find_prog_unit then
187: --
188: hr_api.cannot_find_prog_unit_error
189: (p_module_name => 'pqh_attributes_tl'
190: ,p_hook_type => 'AU');
184: exception
185: --
186: when hr_api.cannot_find_prog_unit then
187: --
188: hr_api.cannot_find_prog_unit_error
189: (p_module_name => 'pqh_attributes_tl'
190: ,p_hook_type => 'AU');
191: --
192: end;
252: -- p_rec plsql record structure
253: -- to see if a system default is being used. If a system default
254: -- is being used then we must set to the 'current' argument value.
255: --
256: If (p_rec.attribute_name = hr_api.g_varchar2) then
257: p_rec.attribute_name :=
258: pqh_atl_shd.g_old_rec.attribute_name;
259: End If;
260: If (p_rec.source_lang = hr_api.g_varchar2) then
256: If (p_rec.attribute_name = hr_api.g_varchar2) then
257: p_rec.attribute_name :=
258: pqh_atl_shd.g_old_rec.attribute_name;
259: End If;
260: If (p_rec.source_lang = hr_api.g_varchar2) then
261: p_rec.source_lang :=
262: pqh_atl_shd.g_old_rec.source_lang;
263: End If;
264: --
314: -- ----------------------------------------------------------------------------
315: Procedure upd
316: (
317: p_attribute_id in number,
318: p_attribute_name in varchar2 default hr_api.g_varchar2,
319: p_language in varchar2,
320: p_source_lang in varchar2 default hr_api.g_varchar2
321: ) is
322: --
316: (
317: p_attribute_id in number,
318: p_attribute_name in varchar2 default hr_api.g_varchar2,
319: p_language in varchar2,
320: p_source_lang in varchar2 default hr_api.g_varchar2
321: ) is
322: --
323: l_rec pqh_atl_shd.g_rec_type;
324: l_proc varchar2(72) := g_package||'upd';