47: -- Internal Table Handler Use Only.
48: --
49: -- {End Of Comments}
50: -- ----------------------------------------------------------------------------
51: Procedure delete_dml(p_rec in per_za_eqt_shd.g_rec_type) is
52: --
53: l_proc varchar2(72) := g_package||'delete_dml';
54: --
55: Begin
54: --
55: Begin
56: hr_utility.set_location('Entering:'||l_proc, 5);
57: --
58: per_za_eqt_shd.g_api_dml := true; -- Set the api dml status
59: --
60: -- Delete the per_qualification_types row.
61: --
62: delete from per_qualification_types
64:
65: delete from per_za_qualification_types
66: where qualification_type_id = p_rec.qualification_type_id;
67: --
68: per_za_eqt_shd.g_api_dml := false; -- Unset the api dml status
69: --
70: hr_utility.set_location(' Leaving:'||l_proc, 10);
71: --
72: Exception
71: --
72: Exception
73: When hr_api.child_integrity_violated then
74: -- Child integrity has been violated
75: per_za_eqt_shd.g_api_dml := false; -- Unset the api dml status
76: per_za_eqt_shd.constraint_error
77: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
78: When Others Then
79: per_za_eqt_shd.g_api_dml := false; -- Unset the api dml status
72: Exception
73: When hr_api.child_integrity_violated then
74: -- Child integrity has been violated
75: per_za_eqt_shd.g_api_dml := false; -- Unset the api dml status
76: per_za_eqt_shd.constraint_error
77: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
78: When Others Then
79: per_za_eqt_shd.g_api_dml := false; -- Unset the api dml status
80: Raise;
75: per_za_eqt_shd.g_api_dml := false; -- Unset the api dml status
76: per_za_eqt_shd.constraint_error
77: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
78: When Others Then
79: per_za_eqt_shd.g_api_dml := false; -- Unset the api dml status
80: Raise;
81: End delete_dml;
82: --
83: -- ----------------------------------------------------------------------------
111: -- Internal Table Handler Use Only.
112: --
113: -- {End Of Comments}
114: -- ----------------------------------------------------------------------------
115: Procedure pre_delete(p_rec in per_za_eqt_shd.g_rec_type) is
116: --
117: l_proc varchar2(72) := g_package||'pre_delete';
118: --
119: Begin
153: -- Internal table Handler Use Only.
154: --
155: -- {End Of Comments}
156: -- ----------------------------------------------------------------------------
157: Procedure post_delete(p_rec in per_za_eqt_shd.g_rec_type) is
158: --
159: l_proc varchar2(72) := g_package||'post_delete';
160: --
161: Begin
168: -- |---------------------------------< del >----------------------------------|
169: -- ----------------------------------------------------------------------------
170: Procedure del
171: (
172: p_rec in per_za_eqt_shd.g_rec_type,
173: p_validate in boolean default false
174: ) is
175: --
176: l_proc varchar2(72) := g_package||'del';
188: End If;
189: --
190: -- We must lock the row which we need to delete.
191: --
192: per_za_eqt_shd.lck
193: (
194: p_rec.qualification_type_id,
195: p_rec.object_version_number
196: );
236: p_object_version_number in number,
237: p_validate in boolean default false
238: ) is
239: --
240: l_rec per_za_eqt_shd.g_rec_type;
241: l_proc varchar2(72) := g_package||'del';
242: --
243: Begin
244: hr_utility.set_location('Entering:'||l_proc, 5);