238: per_elc_shd.g_api_dml := false; -- Unset the api dml status
239: --
240: hr_utility.set_location(' Leaving:'||l_proc, 10);
241: Exception
242: When hr_api.check_integrity_violated Then
243: -- A check constraint has been violated
244: per_elc_shd.g_api_dml := false; -- Unset the api dml status
245: per_elc_shd.constraint_error
246: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
242: When hr_api.check_integrity_violated Then
243: -- A check constraint has been violated
244: per_elc_shd.g_api_dml := false; -- Unset the api dml status
245: per_elc_shd.constraint_error
246: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
247: When hr_api.parent_integrity_violated Then
248: -- Parent integrity has been violated
249: per_elc_shd.g_api_dml := false; -- Unset the api dml status
250: per_elc_shd.constraint_error
243: -- A check constraint has been violated
244: per_elc_shd.g_api_dml := false; -- Unset the api dml status
245: per_elc_shd.constraint_error
246: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
247: When hr_api.parent_integrity_violated Then
248: -- Parent integrity has been violated
249: per_elc_shd.g_api_dml := false; -- Unset the api dml status
250: per_elc_shd.constraint_error
251: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
247: When hr_api.parent_integrity_violated Then
248: -- Parent integrity has been violated
249: per_elc_shd.g_api_dml := false; -- Unset the api dml status
250: per_elc_shd.constraint_error
251: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
252: When hr_api.unique_integrity_violated Then
253: -- Unique integrity has been violated
254: per_elc_shd.g_api_dml := false; -- Unset the api dml status
255: per_elc_shd.constraint_error
248: -- Parent integrity has been violated
249: per_elc_shd.g_api_dml := false; -- Unset the api dml status
250: per_elc_shd.constraint_error
251: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
252: When hr_api.unique_integrity_violated Then
253: -- Unique integrity has been violated
254: per_elc_shd.g_api_dml := false; -- Unset the api dml status
255: per_elc_shd.constraint_error
256: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
252: When hr_api.unique_integrity_violated Then
253: -- Unique integrity has been violated
254: per_elc_shd.g_api_dml := false; -- Unset the api dml status
255: per_elc_shd.constraint_error
256: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
257: When Others Then
258: per_elc_shd.g_api_dml := false; -- Unset the api dml status
259: Raise;
260: End insert_dml;
507: );
508: --
509: exception
510: --
511: when hr_api.cannot_find_prog_unit then
512: --
513: hr_api.cannot_find_prog_unit_error
514: (p_module_name => 'PER_ELECTIONS'
515: ,p_hook_type => 'AI');
509: exception
510: --
511: when hr_api.cannot_find_prog_unit then
512: --
513: hr_api.cannot_find_prog_unit_error
514: (p_module_name => 'PER_ELECTIONS'
515: ,p_hook_type => 'AI');
516: --
517: end;
566: --
567: -- If we are validating then raise the Validate_Enabled exception
568: --
569: If p_validate then
570: Raise HR_Api.Validate_Enabled;
571: End If;
572: --
573: hr_utility.set_location(' Leaving:'||l_proc, 10);
574: Exception
571: End If;
572: --
573: hr_utility.set_location(' Leaving:'||l_proc, 10);
574: Exception
575: When HR_Api.Validate_Enabled Then
576: --
577: -- As the Validate_Enabled exception has been raised
578: -- we must rollback to the savepoint
579: --