79: --
80: hr_utility.set_location(' Leaving:'||l_proc, 10);
81: --
82: Exception
83: When hr_api.check_integrity_violated Then
84: -- A check constraint has been violated
85: --
86: hr_tpc_shd.constraint_error
87: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
83: When hr_api.check_integrity_violated Then
84: -- A check constraint has been violated
85: --
86: hr_tpc_shd.constraint_error
87: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
88: When hr_api.parent_integrity_violated Then
89: -- Parent integrity has been violated
90: --
91: hr_tpc_shd.constraint_error
84: -- A check constraint has been violated
85: --
86: hr_tpc_shd.constraint_error
87: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
88: When hr_api.parent_integrity_violated Then
89: -- Parent integrity has been violated
90: --
91: hr_tpc_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
88: When hr_api.parent_integrity_violated Then
89: -- Parent integrity has been violated
90: --
91: hr_tpc_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.unique_integrity_violated Then
94: -- Unique integrity has been violated
95: --
96: hr_tpc_shd.constraint_error
89: -- Parent integrity has been violated
90: --
91: hr_tpc_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.unique_integrity_violated Then
94: -- Unique integrity has been violated
95: --
96: hr_tpc_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.unique_integrity_violated Then
94: -- Unique integrity has been violated
95: --
96: hr_tpc_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When Others Then
99: --
100: Raise;
101: End update_dml;
202: );
203: --
204: exception
205: --
206: when hr_api.cannot_find_prog_unit then
207: --
208: hr_api.cannot_find_prog_unit_error
209: (p_module_name => 'HR_KI_TOPICS'
210: ,p_hook_type => 'AU');
204: exception
205: --
206: when hr_api.cannot_find_prog_unit then
207: --
208: hr_api.cannot_find_prog_unit_error
209: (p_module_name => 'HR_KI_TOPICS'
210: ,p_hook_type => 'AU');
211: --
212: end;
267: -- p_rec plsql record structure
268: -- to see if a system default is being used. If a system default
269: -- is being used then we must set to the 'current' argument value.
270: --
271: If (p_rec.topic_key = hr_api.g_varchar2) then
272: p_rec.topic_key :=
273: hr_tpc_shd.g_old_rec.topic_key;
274: End If;
275: If (p_rec.handler = hr_api.g_varchar2) then
271: If (p_rec.topic_key = hr_api.g_varchar2) then
272: p_rec.topic_key :=
273: hr_tpc_shd.g_old_rec.topic_key;
274: End If;
275: If (p_rec.handler = hr_api.g_varchar2) then
276: p_rec.handler :=
277: hr_tpc_shd.g_old_rec.handler;
278: End If;
279: --
335: -- ----------------------------------------------------------------------------
336: Procedure upd
337: (p_topic_id in number
338: ,p_object_version_number in out nocopy number
339: ,p_handler in varchar2 default hr_api.g_varchar2
340: ) is
341: --
342: l_rec hr_tpc_shd.g_rec_type;
343: l_proc varchar2(72) := g_package||'upd';
350: --
351: l_rec :=
352: hr_tpc_shd.convert_args
353: (p_topic_id
354: ,hr_api.g_varchar2
355: ,p_handler
356: ,p_object_version_number
357: );
358: --