83: -- Internal Row Handler Use Only.
84: --
85: -- {End Of Comments}
86: -- ----------------------------------------------------------------------------
87: Procedure delete_dml(p_rec in ben_xcv_shd.g_rec_type) is
88: --
89: l_proc varchar2(72) := g_package||'delete_dml';
90: --
91: Begin
90: --
91: Begin
92: hr_utility.set_location('Entering:'||l_proc, 5);
93: --
94: ben_xcv_shd.g_api_dml := true; -- Set the api dml status
95: --
96: -- Delete the ben_ext_crit_val row.
97: --
98: delete from ben_ext_crit_val
97: --
98: delete from ben_ext_crit_val
99: where ext_crit_val_id = p_rec.ext_crit_val_id;
100: --
101: ben_xcv_shd.g_api_dml := false; -- Unset the api dml status
102: --
103: hr_utility.set_location(' Leaving:'||l_proc, 10);
104: --
105: Exception
104: --
105: Exception
106: When hr_api.child_integrity_violated then
107: -- Child integrity has been violated
108: ben_xcv_shd.g_api_dml := false; -- Unset the api dml status
109: ben_xcv_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When Others Then
112: ben_xcv_shd.g_api_dml := false; -- Unset the api dml status
105: Exception
106: When hr_api.child_integrity_violated then
107: -- Child integrity has been violated
108: ben_xcv_shd.g_api_dml := false; -- Unset the api dml status
109: ben_xcv_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When Others Then
112: ben_xcv_shd.g_api_dml := false; -- Unset the api dml status
113: Raise;
108: ben_xcv_shd.g_api_dml := false; -- Unset the api dml status
109: ben_xcv_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When Others Then
112: ben_xcv_shd.g_api_dml := false; -- Unset the api dml status
113: Raise;
114: End delete_dml;
115: --
116: -- ----------------------------------------------------------------------------
144: -- Internal Row Handler Use Only.
145: --
146: -- {End Of Comments}
147: -- ----------------------------------------------------------------------------
148: Procedure pre_delete(p_rec in ben_xcv_shd.g_rec_type) is
149: --
150: l_proc varchar2(72) := g_package||'pre_delete';
151: --
152: Begin
186: -- Internal table Handler Use Only.
187: --
188: -- {End Of Comments}
189: -- ----------------------------------------------------------------------------
190: Procedure post_delete(p_rec in ben_xcv_shd.g_rec_type) is
191: --
192: l_proc varchar2(72) := g_package||'post_delete';
193: --
194: Begin
205: --
206: ben_xcv_rkd.after_delete
207: (
208: p_ext_crit_val_id =>p_rec.ext_crit_val_id
209: ,p_val_1_o =>ben_xcv_shd.g_old_rec.val_1
210: ,p_val_2_o =>ben_xcv_shd.g_old_rec.val_2
211: ,p_ext_crit_typ_id_o =>ben_xcv_shd.g_old_rec.ext_crit_typ_id
212: ,p_business_group_id_o =>ben_xcv_shd.g_old_rec.business_group_id
213: ,p_ext_crit_bg_id_o =>ben_xcv_shd.g_old_rec.ext_crit_bg_id
206: ben_xcv_rkd.after_delete
207: (
208: p_ext_crit_val_id =>p_rec.ext_crit_val_id
209: ,p_val_1_o =>ben_xcv_shd.g_old_rec.val_1
210: ,p_val_2_o =>ben_xcv_shd.g_old_rec.val_2
211: ,p_ext_crit_typ_id_o =>ben_xcv_shd.g_old_rec.ext_crit_typ_id
212: ,p_business_group_id_o =>ben_xcv_shd.g_old_rec.business_group_id
213: ,p_ext_crit_bg_id_o =>ben_xcv_shd.g_old_rec.ext_crit_bg_id
214: ,p_legislation_code_o =>ben_xcv_shd.g_old_rec.legislation_code
207: (
208: p_ext_crit_val_id =>p_rec.ext_crit_val_id
209: ,p_val_1_o =>ben_xcv_shd.g_old_rec.val_1
210: ,p_val_2_o =>ben_xcv_shd.g_old_rec.val_2
211: ,p_ext_crit_typ_id_o =>ben_xcv_shd.g_old_rec.ext_crit_typ_id
212: ,p_business_group_id_o =>ben_xcv_shd.g_old_rec.business_group_id
213: ,p_ext_crit_bg_id_o =>ben_xcv_shd.g_old_rec.ext_crit_bg_id
214: ,p_legislation_code_o =>ben_xcv_shd.g_old_rec.legislation_code
215: ,p_object_version_number_o =>ben_xcv_shd.g_old_rec.object_version_number
208: p_ext_crit_val_id =>p_rec.ext_crit_val_id
209: ,p_val_1_o =>ben_xcv_shd.g_old_rec.val_1
210: ,p_val_2_o =>ben_xcv_shd.g_old_rec.val_2
211: ,p_ext_crit_typ_id_o =>ben_xcv_shd.g_old_rec.ext_crit_typ_id
212: ,p_business_group_id_o =>ben_xcv_shd.g_old_rec.business_group_id
213: ,p_ext_crit_bg_id_o =>ben_xcv_shd.g_old_rec.ext_crit_bg_id
214: ,p_legislation_code_o =>ben_xcv_shd.g_old_rec.legislation_code
215: ,p_object_version_number_o =>ben_xcv_shd.g_old_rec.object_version_number
216: );
209: ,p_val_1_o =>ben_xcv_shd.g_old_rec.val_1
210: ,p_val_2_o =>ben_xcv_shd.g_old_rec.val_2
211: ,p_ext_crit_typ_id_o =>ben_xcv_shd.g_old_rec.ext_crit_typ_id
212: ,p_business_group_id_o =>ben_xcv_shd.g_old_rec.business_group_id
213: ,p_ext_crit_bg_id_o =>ben_xcv_shd.g_old_rec.ext_crit_bg_id
214: ,p_legislation_code_o =>ben_xcv_shd.g_old_rec.legislation_code
215: ,p_object_version_number_o =>ben_xcv_shd.g_old_rec.object_version_number
216: );
217: --
210: ,p_val_2_o =>ben_xcv_shd.g_old_rec.val_2
211: ,p_ext_crit_typ_id_o =>ben_xcv_shd.g_old_rec.ext_crit_typ_id
212: ,p_business_group_id_o =>ben_xcv_shd.g_old_rec.business_group_id
213: ,p_ext_crit_bg_id_o =>ben_xcv_shd.g_old_rec.ext_crit_bg_id
214: ,p_legislation_code_o =>ben_xcv_shd.g_old_rec.legislation_code
215: ,p_object_version_number_o =>ben_xcv_shd.g_old_rec.object_version_number
216: );
217: --
218: exception
211: ,p_ext_crit_typ_id_o =>ben_xcv_shd.g_old_rec.ext_crit_typ_id
212: ,p_business_group_id_o =>ben_xcv_shd.g_old_rec.business_group_id
213: ,p_ext_crit_bg_id_o =>ben_xcv_shd.g_old_rec.ext_crit_bg_id
214: ,p_legislation_code_o =>ben_xcv_shd.g_old_rec.legislation_code
215: ,p_object_version_number_o =>ben_xcv_shd.g_old_rec.object_version_number
216: );
217: --
218: exception
219: --
235: -- |---------------------------------< del >----------------------------------|
236: -- ----------------------------------------------------------------------------
237: Procedure del
238: (
239: p_rec in ben_xcv_shd.g_rec_type
240: ) is
241: --
242: l_proc varchar2(72) := g_package||'del';
243: --
245: hr_utility.set_location('Entering:'||l_proc, 5);
246: --
247: -- We must lock the row which we need to delete.
248: --
249: ben_xcv_shd.lck
250: (
251: p_rec.ext_crit_val_id,
252: p_rec.object_version_number
253: );
278: p_legislation_code in varchar2 default null,
279: p_object_version_number in number
280: ) is
281: --
282: l_rec ben_xcv_shd.g_rec_type;
283: l_proc varchar2(72) := g_package||'del';
284: --
285: Begin
286: hr_utility.set_location('Entering:'||l_proc, 5);