83: --
84: hr_utility.set_location(' Leaving:'||l_proc, 10);
85: --
86: Exception
87: When hr_api.check_integrity_violated Then
88: -- A check constraint has been violated
89: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
90: pay_apm_shd.constraint_error
91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
87: When hr_api.check_integrity_violated Then
88: -- A check constraint has been violated
89: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
90: pay_apm_shd.constraint_error
91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
95: pay_apm_shd.constraint_error
88: -- A check constraint has been violated
89: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
90: pay_apm_shd.constraint_error
91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
95: pay_apm_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
95: pay_apm_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
100: pay_apm_shd.constraint_error
93: -- Parent integrity has been violated
94: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
95: pay_apm_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
100: pay_apm_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
100: pay_apm_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
102: When Others Then
103: pay_apm_shd.g_api_dml := false; -- Unset the api dml status
104: Raise;
105: End update_dml;
249: -- p_rec plsql record structure
250: -- to see if a system default is being used. If a system default
251: -- is being used then we must set to the 'current' argument value.
252: --
253: If (p_rec.process_id = hr_api.g_number) then
254: p_rec.process_id :=
255: pay_apm_shd.g_old_rec.process_id;
256: End If;
257: If (p_rec.module_id = hr_api.g_number) then
253: If (p_rec.process_id = hr_api.g_number) then
254: p_rec.process_id :=
255: pay_apm_shd.g_old_rec.process_id;
256: End If;
257: If (p_rec.module_id = hr_api.g_number) then
258: p_rec.module_id :=
259: pay_apm_shd.g_old_rec.module_id;
260: End If;
261: If (p_rec.process_sequence = hr_api.g_number) then
257: If (p_rec.module_id = hr_api.g_number) then
258: p_rec.module_id :=
259: pay_apm_shd.g_old_rec.module_id;
260: End If;
261: If (p_rec.process_sequence = hr_api.g_number) then
262: p_rec.process_sequence :=
263: pay_apm_shd.g_old_rec.process_sequence;
264: End If;
265: If (p_rec.enabled_flag = hr_api.g_varchar2) then
261: If (p_rec.process_sequence = hr_api.g_number) then
262: p_rec.process_sequence :=
263: pay_apm_shd.g_old_rec.process_sequence;
264: End If;
265: If (p_rec.enabled_flag = hr_api.g_varchar2) then
266: p_rec.enabled_flag :=
267: pay_apm_shd.g_old_rec.enabled_flag;
268: End If;
269: --