82: per_qua_shd.g_api_dml := false; -- Unset the api dml status
83: --
84: hr_utility.set_location(' Leaving:'||l_proc, 10);
85: Exception
86: When hr_api.check_integrity_violated Then
87: -- A check constraint has been violated
88: per_qua_shd.g_api_dml := false; -- Unset the api dml status
89: per_qua_shd.constraint_error
90: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When hr_api.check_integrity_violated Then
87: -- A check constraint has been violated
88: per_qua_shd.g_api_dml := false; -- Unset the api dml status
89: per_qua_shd.constraint_error
90: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
91: When hr_api.parent_integrity_violated Then
92: -- Parent integrity has been violated
93: per_qua_shd.g_api_dml := false; -- Unset the api dml status
94: per_qua_shd.constraint_error
87: -- A check constraint has been violated
88: per_qua_shd.g_api_dml := false; -- Unset the api dml status
89: per_qua_shd.constraint_error
90: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
91: When hr_api.parent_integrity_violated Then
92: -- Parent integrity has been violated
93: per_qua_shd.g_api_dml := false; -- Unset the api dml status
94: per_qua_shd.constraint_error
95: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
91: When hr_api.parent_integrity_violated Then
92: -- Parent integrity has been violated
93: per_qua_shd.g_api_dml := false; -- Unset the api dml status
94: per_qua_shd.constraint_error
95: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.unique_integrity_violated Then
97: -- Unique integrity has been violated
98: per_qua_shd.g_api_dml := false; -- Unset the api dml status
99: per_qua_shd.constraint_error
92: -- Parent integrity has been violated
93: per_qua_shd.g_api_dml := false; -- Unset the api dml status
94: per_qua_shd.constraint_error
95: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.unique_integrity_violated Then
97: -- Unique integrity has been violated
98: per_qua_shd.g_api_dml := false; -- Unset the api dml status
99: per_qua_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.unique_integrity_violated Then
97: -- Unique integrity has been violated
98: per_qua_shd.g_api_dml := false; -- Unset the api dml status
99: per_qua_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When Others Then
102: per_qua_shd.g_api_dml := false; -- Unset the api dml status
103: Raise;
104: End insert_dml;
179: --
180: -- If we are validating then raise the Validate_Enabled exception
181: --
182: If p_validate then
183: Raise HR_Api.Validate_Enabled;
184: End If;
185: --
186: hr_utility.set_location(' Leaving:'||l_proc, 10);
187: Exception
184: End If;
185: --
186: hr_utility.set_location(' Leaving:'||l_proc, 10);
187: Exception
188: When HR_Api.Validate_Enabled Then
189: --
190: -- As the Validate_Enabled exception has been raised
191: -- we must rollback to the savepoint
192: --