47: -- Internal Row Handler Use Only.
48: --
49: -- {End Of Comments}
50: -- ----------------------------------------------------------------------------
51: Procedure delete_dml(p_rec in ben_bai_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: ben_bai_shd.g_api_dml := true; -- Set the api dml status
59: --
60: -- Delete the ben_batch_actn_item_info row.
61: --
62: delete from ben_batch_actn_item_info
61: --
62: delete from ben_batch_actn_item_info
63: where batch_actn_item_id = p_rec.batch_actn_item_id;
64: --
65: ben_bai_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: ben_bai_shd.g_api_dml := false; -- Unset the api dml status
73: ben_bai_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_bai_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: ben_bai_shd.g_api_dml := false; -- Unset the api dml status
73: ben_bai_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_bai_shd.g_api_dml := false; -- Unset the api dml status
77: Raise;
72: ben_bai_shd.g_api_dml := false; -- Unset the api dml status
73: ben_bai_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_bai_shd.g_api_dml := false; -- Unset the api dml status
77: Raise;
78: End delete_dml;
79: --
80: -- ----------------------------------------------------------------------------
108: -- Internal Row Handler Use Only.
109: --
110: -- {End Of Comments}
111: -- ----------------------------------------------------------------------------
112: Procedure pre_delete(p_rec in ben_bai_shd.g_rec_type) is
113: --
114: l_proc varchar2(72) := g_package||'pre_delete';
115: --
116: Begin
151: --
152: -- {End Of Comments}
153: -- ----------------------------------------------------------------------------
154: Procedure post_delete(
155: p_effective_date in date,p_rec in ben_bai_shd.g_rec_type) is
156: --
157: l_proc varchar2(72) := g_package||'post_delete';
158: --
159: Begin
166: --
167: ben_bai_rkd.after_delete
168: (
169: p_batch_actn_item_id =>p_rec.batch_actn_item_id
170: ,p_benefit_action_id_o =>ben_bai_shd.g_old_rec.benefit_action_id
171: ,p_person_id_o =>ben_bai_shd.g_old_rec.person_id
172: ,p_actn_typ_id_o =>ben_bai_shd.g_old_rec.actn_typ_id
173: ,p_cmpltd_dt_o =>ben_bai_shd.g_old_rec.cmpltd_dt
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
167: ben_bai_rkd.after_delete
168: (
169: p_batch_actn_item_id =>p_rec.batch_actn_item_id
170: ,p_benefit_action_id_o =>ben_bai_shd.g_old_rec.benefit_action_id
171: ,p_person_id_o =>ben_bai_shd.g_old_rec.person_id
172: ,p_actn_typ_id_o =>ben_bai_shd.g_old_rec.actn_typ_id
173: ,p_cmpltd_dt_o =>ben_bai_shd.g_old_rec.cmpltd_dt
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
175: ,p_rqd_flag_o =>ben_bai_shd.g_old_rec.rqd_flag
168: (
169: p_batch_actn_item_id =>p_rec.batch_actn_item_id
170: ,p_benefit_action_id_o =>ben_bai_shd.g_old_rec.benefit_action_id
171: ,p_person_id_o =>ben_bai_shd.g_old_rec.person_id
172: ,p_actn_typ_id_o =>ben_bai_shd.g_old_rec.actn_typ_id
173: ,p_cmpltd_dt_o =>ben_bai_shd.g_old_rec.cmpltd_dt
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
175: ,p_rqd_flag_o =>ben_bai_shd.g_old_rec.rqd_flag
176: ,p_actn_cd_o =>ben_bai_shd.g_old_rec.actn_cd
169: p_batch_actn_item_id =>p_rec.batch_actn_item_id
170: ,p_benefit_action_id_o =>ben_bai_shd.g_old_rec.benefit_action_id
171: ,p_person_id_o =>ben_bai_shd.g_old_rec.person_id
172: ,p_actn_typ_id_o =>ben_bai_shd.g_old_rec.actn_typ_id
173: ,p_cmpltd_dt_o =>ben_bai_shd.g_old_rec.cmpltd_dt
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
175: ,p_rqd_flag_o =>ben_bai_shd.g_old_rec.rqd_flag
176: ,p_actn_cd_o =>ben_bai_shd.g_old_rec.actn_cd
177: ,p_business_group_id_o =>ben_bai_shd.g_old_rec.business_group_id
170: ,p_benefit_action_id_o =>ben_bai_shd.g_old_rec.benefit_action_id
171: ,p_person_id_o =>ben_bai_shd.g_old_rec.person_id
172: ,p_actn_typ_id_o =>ben_bai_shd.g_old_rec.actn_typ_id
173: ,p_cmpltd_dt_o =>ben_bai_shd.g_old_rec.cmpltd_dt
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
175: ,p_rqd_flag_o =>ben_bai_shd.g_old_rec.rqd_flag
176: ,p_actn_cd_o =>ben_bai_shd.g_old_rec.actn_cd
177: ,p_business_group_id_o =>ben_bai_shd.g_old_rec.business_group_id
178: ,p_object_version_number_o =>ben_bai_shd.g_old_rec.object_version_number
171: ,p_person_id_o =>ben_bai_shd.g_old_rec.person_id
172: ,p_actn_typ_id_o =>ben_bai_shd.g_old_rec.actn_typ_id
173: ,p_cmpltd_dt_o =>ben_bai_shd.g_old_rec.cmpltd_dt
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
175: ,p_rqd_flag_o =>ben_bai_shd.g_old_rec.rqd_flag
176: ,p_actn_cd_o =>ben_bai_shd.g_old_rec.actn_cd
177: ,p_business_group_id_o =>ben_bai_shd.g_old_rec.business_group_id
178: ,p_object_version_number_o =>ben_bai_shd.g_old_rec.object_version_number
179: );
172: ,p_actn_typ_id_o =>ben_bai_shd.g_old_rec.actn_typ_id
173: ,p_cmpltd_dt_o =>ben_bai_shd.g_old_rec.cmpltd_dt
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
175: ,p_rqd_flag_o =>ben_bai_shd.g_old_rec.rqd_flag
176: ,p_actn_cd_o =>ben_bai_shd.g_old_rec.actn_cd
177: ,p_business_group_id_o =>ben_bai_shd.g_old_rec.business_group_id
178: ,p_object_version_number_o =>ben_bai_shd.g_old_rec.object_version_number
179: );
180: --
173: ,p_cmpltd_dt_o =>ben_bai_shd.g_old_rec.cmpltd_dt
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
175: ,p_rqd_flag_o =>ben_bai_shd.g_old_rec.rqd_flag
176: ,p_actn_cd_o =>ben_bai_shd.g_old_rec.actn_cd
177: ,p_business_group_id_o =>ben_bai_shd.g_old_rec.business_group_id
178: ,p_object_version_number_o =>ben_bai_shd.g_old_rec.object_version_number
179: );
180: --
181: exception
174: ,p_due_dt_o =>ben_bai_shd.g_old_rec.due_dt
175: ,p_rqd_flag_o =>ben_bai_shd.g_old_rec.rqd_flag
176: ,p_actn_cd_o =>ben_bai_shd.g_old_rec.actn_cd
177: ,p_business_group_id_o =>ben_bai_shd.g_old_rec.business_group_id
178: ,p_object_version_number_o =>ben_bai_shd.g_old_rec.object_version_number
179: );
180: --
181: exception
182: --
199: -- ----------------------------------------------------------------------------
200: Procedure del
201: (
202: p_effective_date in date,
203: p_rec in ben_bai_shd.g_rec_type
204: ) is
205: --
206: l_proc varchar2(72) := g_package||'del';
207: --
209: hr_utility.set_location('Entering:'||l_proc, 5);
210: --
211: -- We must lock the row which we need to delete.
212: --
213: ben_bai_shd.lck
214: (
215: p_rec.batch_actn_item_id,
216: p_rec.object_version_number
217: );
244: p_batch_actn_item_id in number,
245: p_object_version_number in number
246: ) is
247: --
248: l_rec ben_bai_shd.g_rec_type;
249: l_proc varchar2(72) := g_package||'del';
250: --
251: Begin
252: hr_utility.set_location('Entering:'||l_proc, 5);