69: --
70: hr_utility.set_location(' Leaving:'||l_proc, 10);
71: --
72: Exception
73: When hr_api.check_integrity_violated Then
74: -- A check constraint has been violated
75: pqh_cep_shd.constraint_error
76: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When hr_api.parent_integrity_violated Then
72: Exception
73: When hr_api.check_integrity_violated Then
74: -- A check constraint has been violated
75: pqh_cep_shd.constraint_error
76: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When hr_api.parent_integrity_violated Then
78: -- Parent integrity has been violated
79: pqh_cep_shd.constraint_error
80: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
73: When hr_api.check_integrity_violated Then
74: -- A check constraint has been violated
75: pqh_cep_shd.constraint_error
76: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When hr_api.parent_integrity_violated Then
78: -- Parent integrity has been violated
79: pqh_cep_shd.constraint_error
80: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
81: When hr_api.unique_integrity_violated Then
76: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When hr_api.parent_integrity_violated Then
78: -- Parent integrity has been violated
79: pqh_cep_shd.constraint_error
80: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
81: When hr_api.unique_integrity_violated Then
82: -- Unique integrity has been violated
83: pqh_cep_shd.constraint_error
84: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When hr_api.parent_integrity_violated Then
78: -- Parent integrity has been violated
79: pqh_cep_shd.constraint_error
80: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
81: When hr_api.unique_integrity_violated Then
82: -- Unique integrity has been violated
83: pqh_cep_shd.constraint_error
84: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
85: When Others Then
80: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
81: When hr_api.unique_integrity_violated Then
82: -- Unique integrity has been violated
83: pqh_cep_shd.constraint_error
84: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
85: When Others Then
86: Raise;
87: End update_dml;
88: --
188: );
189: --
190: exception
191: --
192: when hr_api.cannot_find_prog_unit then
193: --
194: hr_api.cannot_find_prog_unit_error
195: (p_module_name => 'pqh_copy_entity_prefs'
196: ,p_hook_type => 'AU');
190: exception
191: --
192: when hr_api.cannot_find_prog_unit then
193: --
194: hr_api.cannot_find_prog_unit_error
195: (p_module_name => 'pqh_copy_entity_prefs'
196: ,p_hook_type => 'AU');
197: --
198: end;
258: -- p_rec plsql record structure
259: -- to see if a system default is being used. If a system default
260: -- is being used then we must set to the 'current' argument value.
261: --
262: If (p_rec.table_route_id = hr_api.g_number) then
263: p_rec.table_route_id :=
264: pqh_cep_shd.g_old_rec.table_route_id;
265: End If;
266: If (p_rec.copy_entity_txn_id = hr_api.g_number) then
262: If (p_rec.table_route_id = hr_api.g_number) then
263: p_rec.table_route_id :=
264: pqh_cep_shd.g_old_rec.table_route_id;
265: End If;
266: If (p_rec.copy_entity_txn_id = hr_api.g_number) then
267: p_rec.copy_entity_txn_id :=
268: pqh_cep_shd.g_old_rec.copy_entity_txn_id;
269: End If;
270: If (p_rec.select_flag = hr_api.g_varchar2) then
266: If (p_rec.copy_entity_txn_id = hr_api.g_number) then
267: p_rec.copy_entity_txn_id :=
268: pqh_cep_shd.g_old_rec.copy_entity_txn_id;
269: End If;
270: If (p_rec.select_flag = hr_api.g_varchar2) then
271: p_rec.select_flag :=
272: pqh_cep_shd.g_old_rec.select_flag;
273: End If;
274:
329: Procedure upd
330: (
331: p_effective_date in date,
332: p_copy_entity_pref_id in number,
333: p_table_route_id in number default hr_api.g_number,
334: p_copy_entity_txn_id in number default hr_api.g_number,
335: p_select_flag in varchar2 default hr_api.g_varchar2,
336: p_object_version_number in out nocopy number
337: ) is
330: (
331: p_effective_date in date,
332: p_copy_entity_pref_id in number,
333: p_table_route_id in number default hr_api.g_number,
334: p_copy_entity_txn_id in number default hr_api.g_number,
335: p_select_flag in varchar2 default hr_api.g_varchar2,
336: p_object_version_number in out nocopy number
337: ) is
338: --
331: p_effective_date in date,
332: p_copy_entity_pref_id in number,
333: p_table_route_id in number default hr_api.g_number,
334: p_copy_entity_txn_id in number default hr_api.g_number,
335: p_select_flag in varchar2 default hr_api.g_varchar2,
336: p_object_version_number in out nocopy number
337: ) is
338: --
339: l_rec pqh_cep_shd.g_rec_type;