68: --
69: hr_utility.set_location(' Leaving:'||l_proc, 10);
70: --
71: Exception
72: When hr_api.check_integrity_violated Then
73: -- A check constraint has been violated
74: pqh_ttl_shd.constraint_error
75: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
76: When hr_api.parent_integrity_violated Then
71: Exception
72: When hr_api.check_integrity_violated Then
73: -- A check constraint has been violated
74: pqh_ttl_shd.constraint_error
75: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
76: When hr_api.parent_integrity_violated Then
77: -- Parent integrity has been violated
78: pqh_ttl_shd.constraint_error
79: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
72: When hr_api.check_integrity_violated Then
73: -- A check constraint has been violated
74: pqh_ttl_shd.constraint_error
75: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
76: When hr_api.parent_integrity_violated Then
77: -- Parent integrity has been violated
78: pqh_ttl_shd.constraint_error
79: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
80: When hr_api.unique_integrity_violated Then
75: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
76: When hr_api.parent_integrity_violated Then
77: -- Parent integrity has been violated
78: pqh_ttl_shd.constraint_error
79: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
80: When hr_api.unique_integrity_violated Then
81: -- Unique integrity has been violated
82: pqh_ttl_shd.constraint_error
83: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
76: When hr_api.parent_integrity_violated Then
77: -- Parent integrity has been violated
78: pqh_ttl_shd.constraint_error
79: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
80: When hr_api.unique_integrity_violated Then
81: -- Unique integrity has been violated
82: pqh_ttl_shd.constraint_error
83: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
84: When Others Then
79: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
80: When hr_api.unique_integrity_violated Then
81: -- Unique integrity has been violated
82: pqh_ttl_shd.constraint_error
83: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
84: When Others Then
85: Raise;
86: End update_dml;
87: --
183: );
184: --
185: exception
186: --
187: when hr_api.cannot_find_prog_unit then
188: --
189: hr_api.cannot_find_prog_unit_error
190: (p_module_name => 'pqh_templates_tl'
191: ,p_hook_type => 'AU');
185: exception
186: --
187: when hr_api.cannot_find_prog_unit then
188: --
189: hr_api.cannot_find_prog_unit_error
190: (p_module_name => 'pqh_templates_tl'
191: ,p_hook_type => 'AU');
192: --
193: end;
253: -- p_rec plsql record structure
254: -- to see if a system default is being used. If a system default
255: -- is being used then we must set to the 'current' argument value.
256: --
257: If (p_rec.template_name = hr_api.g_varchar2) then
258: p_rec.template_name :=
259: pqh_ttl_shd.g_old_rec.template_name;
260: End If;
261: If (p_rec.source_lang = hr_api.g_varchar2) then
257: If (p_rec.template_name = hr_api.g_varchar2) then
258: p_rec.template_name :=
259: pqh_ttl_shd.g_old_rec.template_name;
260: End If;
261: If (p_rec.source_lang = hr_api.g_varchar2) then
262: p_rec.source_lang :=
263: pqh_ttl_shd.g_old_rec.source_lang;
264: End If;
265: --
315: -- ----------------------------------------------------------------------------
316: Procedure upd
317: (
318: p_template_id in number,
319: p_template_name in varchar2 default hr_api.g_varchar2,
320: p_language in varchar2,
321: p_source_lang in varchar2 default hr_api.g_varchar2
322: ) is
323: --
317: (
318: p_template_id in number,
319: p_template_name in varchar2 default hr_api.g_varchar2,
320: p_language in varchar2,
321: p_source_lang in varchar2 default hr_api.g_varchar2
322: ) is
323: --
324: l_rec pqh_ttl_shd.g_rec_type;
325: l_proc varchar2(72) := g_package||'upd';
358: Procedure upd_tl
359: (
360: p_template_id in number,
361: p_language_code in varchar2,
362: p_template_name in varchar2 default hr_api.g_varchar2
363: )is
364:
365: Cursor csr_upd_langs is
366: select ttl.language