47: -- Internal Row Handler Use Only.
48: --
49: -- {End Of Comments}
50: -- ----------------------------------------------------------------------------
51: Procedure delete_dml(p_rec in ben_bli_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_bli_shd.g_api_dml := true; -- Set the api dml status
59: --
60: -- Delete the ben_batch_ler_info row.
61: --
62: delete from ben_batch_ler_info
61: --
62: delete from ben_batch_ler_info
63: where batch_ler_id = p_rec.batch_ler_id;
64: --
65: ben_bli_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_bli_shd.g_api_dml := false; -- Unset the api dml status
73: ben_bli_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_bli_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_bli_shd.g_api_dml := false; -- Unset the api dml status
73: ben_bli_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_bli_shd.g_api_dml := false; -- Unset the api dml status
77: Raise;
72: ben_bli_shd.g_api_dml := false; -- Unset the api dml status
73: ben_bli_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_bli_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_bli_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(p_effective_date in date,
155: p_rec in ben_bli_shd.g_rec_type) is
156: --
157: l_proc varchar2(72) := g_package||'post_delete';
158: --
159: Begin
165: begin
166: --
167: ben_bli_rkd.after_delete
168: (p_batch_ler_id =>p_rec.batch_ler_id
169: ,p_benefit_action_id_o =>ben_bli_shd.g_old_rec.benefit_action_id
170: ,p_person_id_o =>ben_bli_shd.g_old_rec.person_id
171: ,p_ler_id_o =>ben_bli_shd.g_old_rec.ler_id
172: ,p_lf_evt_ocrd_dt_o =>ben_bli_shd.g_old_rec.lf_evt_ocrd_dt
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
166: --
167: ben_bli_rkd.after_delete
168: (p_batch_ler_id =>p_rec.batch_ler_id
169: ,p_benefit_action_id_o =>ben_bli_shd.g_old_rec.benefit_action_id
170: ,p_person_id_o =>ben_bli_shd.g_old_rec.person_id
171: ,p_ler_id_o =>ben_bli_shd.g_old_rec.ler_id
172: ,p_lf_evt_ocrd_dt_o =>ben_bli_shd.g_old_rec.lf_evt_ocrd_dt
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
167: ben_bli_rkd.after_delete
168: (p_batch_ler_id =>p_rec.batch_ler_id
169: ,p_benefit_action_id_o =>ben_bli_shd.g_old_rec.benefit_action_id
170: ,p_person_id_o =>ben_bli_shd.g_old_rec.person_id
171: ,p_ler_id_o =>ben_bli_shd.g_old_rec.ler_id
172: ,p_lf_evt_ocrd_dt_o =>ben_bli_shd.g_old_rec.lf_evt_ocrd_dt
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
168: (p_batch_ler_id =>p_rec.batch_ler_id
169: ,p_benefit_action_id_o =>ben_bli_shd.g_old_rec.benefit_action_id
170: ,p_person_id_o =>ben_bli_shd.g_old_rec.person_id
171: ,p_ler_id_o =>ben_bli_shd.g_old_rec.ler_id
172: ,p_lf_evt_ocrd_dt_o =>ben_bli_shd.g_old_rec.lf_evt_ocrd_dt
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
169: ,p_benefit_action_id_o =>ben_bli_shd.g_old_rec.benefit_action_id
170: ,p_person_id_o =>ben_bli_shd.g_old_rec.person_id
171: ,p_ler_id_o =>ben_bli_shd.g_old_rec.ler_id
172: ,p_lf_evt_ocrd_dt_o =>ben_bli_shd.g_old_rec.lf_evt_ocrd_dt
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
170: ,p_person_id_o =>ben_bli_shd.g_old_rec.person_id
171: ,p_ler_id_o =>ben_bli_shd.g_old_rec.ler_id
172: ,p_lf_evt_ocrd_dt_o =>ben_bli_shd.g_old_rec.lf_evt_ocrd_dt
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
171: ,p_ler_id_o =>ben_bli_shd.g_old_rec.ler_id
172: ,p_lf_evt_ocrd_dt_o =>ben_bli_shd.g_old_rec.lf_evt_ocrd_dt
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
172: ,p_lf_evt_ocrd_dt_o =>ben_bli_shd.g_old_rec.lf_evt_ocrd_dt
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
173: ,p_replcd_flag_o =>ben_bli_shd.g_old_rec.replcd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
174: ,p_crtd_flag_o =>ben_bli_shd.g_old_rec.crtd_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
175: ,p_tmprl_flag_o =>ben_bli_shd.g_old_rec.tmprl_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
176: ,p_dltd_flag_o =>ben_bli_shd.g_old_rec.dltd_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
184: ,p_cvrge_rt_prem_flag_o =>ben_bli_shd.g_old_rec.cvrge_rt_prem_flag
177: ,p_open_and_clsd_flag_o =>ben_bli_shd.g_old_rec.open_and_clsd_flag
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
184: ,p_cvrge_rt_prem_flag_o =>ben_bli_shd.g_old_rec.cvrge_rt_prem_flag
185: ,p_per_in_ler_id_o =>ben_bli_shd.g_old_rec.per_in_ler_id
178: ,p_clsd_flag_o =>ben_bli_shd.g_old_rec.clsd_flag
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
184: ,p_cvrge_rt_prem_flag_o =>ben_bli_shd.g_old_rec.cvrge_rt_prem_flag
185: ,p_per_in_ler_id_o =>ben_bli_shd.g_old_rec.per_in_ler_id
186: ,p_business_group_id_o =>ben_bli_shd.g_old_rec.business_group_id
179: ,p_not_crtd_flag_o =>ben_bli_shd.g_old_rec.not_crtd_flag
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
184: ,p_cvrge_rt_prem_flag_o =>ben_bli_shd.g_old_rec.cvrge_rt_prem_flag
185: ,p_per_in_ler_id_o =>ben_bli_shd.g_old_rec.per_in_ler_id
186: ,p_business_group_id_o =>ben_bli_shd.g_old_rec.business_group_id
187: ,p_object_version_number_o =>ben_bli_shd.g_old_rec.object_version_number);
180: ,p_stl_actv_flag_o =>ben_bli_shd.g_old_rec.stl_actv_flag
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
184: ,p_cvrge_rt_prem_flag_o =>ben_bli_shd.g_old_rec.cvrge_rt_prem_flag
185: ,p_per_in_ler_id_o =>ben_bli_shd.g_old_rec.per_in_ler_id
186: ,p_business_group_id_o =>ben_bli_shd.g_old_rec.business_group_id
187: ,p_object_version_number_o =>ben_bli_shd.g_old_rec.object_version_number);
188: --
181: ,p_clpsd_flag_o =>ben_bli_shd.g_old_rec.clpsd_flag
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
184: ,p_cvrge_rt_prem_flag_o =>ben_bli_shd.g_old_rec.cvrge_rt_prem_flag
185: ,p_per_in_ler_id_o =>ben_bli_shd.g_old_rec.per_in_ler_id
186: ,p_business_group_id_o =>ben_bli_shd.g_old_rec.business_group_id
187: ,p_object_version_number_o =>ben_bli_shd.g_old_rec.object_version_number);
188: --
189: exception
182: ,p_clsn_flag_o =>ben_bli_shd.g_old_rec.clsn_flag
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
184: ,p_cvrge_rt_prem_flag_o =>ben_bli_shd.g_old_rec.cvrge_rt_prem_flag
185: ,p_per_in_ler_id_o =>ben_bli_shd.g_old_rec.per_in_ler_id
186: ,p_business_group_id_o =>ben_bli_shd.g_old_rec.business_group_id
187: ,p_object_version_number_o =>ben_bli_shd.g_old_rec.object_version_number);
188: --
189: exception
190: --
183: ,p_no_effect_flag_o =>ben_bli_shd.g_old_rec.no_effect_flag
184: ,p_cvrge_rt_prem_flag_o =>ben_bli_shd.g_old_rec.cvrge_rt_prem_flag
185: ,p_per_in_ler_id_o =>ben_bli_shd.g_old_rec.per_in_ler_id
186: ,p_business_group_id_o =>ben_bli_shd.g_old_rec.business_group_id
187: ,p_object_version_number_o =>ben_bli_shd.g_old_rec.object_version_number);
188: --
189: exception
190: --
191: when hr_api.cannot_find_prog_unit then
207: -- ----------------------------------------------------------------------------
208: Procedure del
209: (
210: p_effective_date in date,
211: p_rec in ben_bli_shd.g_rec_type
212: ) is
213: --
214: l_proc varchar2(72) := g_package||'del';
215: --
217: hr_utility.set_location('Entering:'||l_proc, 5);
218: --
219: -- We must lock the row which we need to delete.
220: --
221: ben_bli_shd.lck
222: (
223: p_rec.batch_ler_id,
224: p_rec.object_version_number
225: );
251: p_batch_ler_id in number,
252: p_object_version_number in number
253: ) is
254: --
255: l_rec ben_bli_shd.g_rec_type;
256: l_proc varchar2(72) := g_package||'del';
257: --
258: Begin
259: hr_utility.set_location('Entering:'||l_proc, 5);