54: --
55: Begin
56: hr_utility.set_location('Entering:'||l_proc, 5);
57: --
58: per_qua_shd.g_api_dml := true; -- Set the api dml status
59: --
60: -- Delete the per_qualifications row.
61: --
62: delete from per_za_formal_qualifications
61: --
62: delete from per_za_formal_qualifications
63: where qualification_id = p_rec.qualification_id;
64: --
65: per_qua_shd.g_api_dml := false; -- Unset the api dml status
66: --
67: hr_utility.set_location(' Leaving:'||l_proc, 10);
68: --
69: Exception
68: --
69: Exception
70: When hr_api.child_integrity_violated then
71: -- Child integrity has been violated
72: per_qua_shd.g_api_dml := false; -- Unset the api dml status
73: per_qua_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: per_qua_shd.g_api_dml := false; -- Unset the api dml status
69: Exception
70: When hr_api.child_integrity_violated then
71: -- Child integrity has been violated
72: per_qua_shd.g_api_dml := false; -- Unset the api dml status
73: per_qua_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: per_qua_shd.g_api_dml := false; -- Unset the api dml status
77: Raise;
72: per_qua_shd.g_api_dml := false; -- Unset the api dml status
73: per_qua_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: per_qua_shd.g_api_dml := false; -- Unset the api dml status
77: Raise;
78: End delete_dml;
79: --
80: -- ----------------------------------------------------------------------------