48: --
49: -- {End Of Comments}
50: -- ----------------------------------------------------------------------------
51: Procedure delete_dml
52: (p_rec in pay_evp_shd.g_rec_type
53: ) is
54: --
55: l_proc varchar2(72) := g_package||'delete_dml';
56: --
71: Exception
72: When hr_api.child_integrity_violated then
73: -- Child integrity has been violated
74: --
75: pay_evp_shd.constraint_error
76: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When Others Then
78: --
79: Raise;
110: -- Internal Row Handler Use Only.
111: --
112: -- {End Of Comments}
113: -- ----------------------------------------------------------------------------
114: Procedure pre_delete(p_rec in pay_evp_shd.g_rec_type) is
115: --
116: l_proc varchar2(72) := g_package||'pre_delete';
117: --
118: Begin
152: -- Internal Row Handler Use Only.
153: --
154: -- {End Of Comments}
155: -- -----------------------------------------------------------------------------
156: Procedure post_delete(p_rec in pay_evp_shd.g_rec_type) is
157: --
158: l_proc varchar2(72) := g_package||'post_delete';
159: --
160: Begin
164: pay_evp_rkd.after_delete
165: (p_event_procedure_id
166: => p_rec.event_procedure_id
167: ,p_dated_table_id_o
168: => pay_evp_shd.g_old_rec.dated_table_id
169: ,p_procedure_name_o
170: => pay_evp_shd.g_old_rec.procedure_name
171: ,p_business_group_id_o
172: => pay_evp_shd.g_old_rec.business_group_id
166: => p_rec.event_procedure_id
167: ,p_dated_table_id_o
168: => pay_evp_shd.g_old_rec.dated_table_id
169: ,p_procedure_name_o
170: => pay_evp_shd.g_old_rec.procedure_name
171: ,p_business_group_id_o
172: => pay_evp_shd.g_old_rec.business_group_id
173: ,p_legislation_code_o
174: => pay_evp_shd.g_old_rec.legislation_code
168: => pay_evp_shd.g_old_rec.dated_table_id
169: ,p_procedure_name_o
170: => pay_evp_shd.g_old_rec.procedure_name
171: ,p_business_group_id_o
172: => pay_evp_shd.g_old_rec.business_group_id
173: ,p_legislation_code_o
174: => pay_evp_shd.g_old_rec.legislation_code
175: ,p_column_name_o
176: => pay_evp_shd.g_old_rec.column_name
170: => pay_evp_shd.g_old_rec.procedure_name
171: ,p_business_group_id_o
172: => pay_evp_shd.g_old_rec.business_group_id
173: ,p_legislation_code_o
174: => pay_evp_shd.g_old_rec.legislation_code
175: ,p_column_name_o
176: => pay_evp_shd.g_old_rec.column_name
177: ,p_object_version_number_o
178: => pay_evp_shd.g_old_rec.object_version_number
172: => pay_evp_shd.g_old_rec.business_group_id
173: ,p_legislation_code_o
174: => pay_evp_shd.g_old_rec.legislation_code
175: ,p_column_name_o
176: => pay_evp_shd.g_old_rec.column_name
177: ,p_object_version_number_o
178: => pay_evp_shd.g_old_rec.object_version_number
179: );
180: --
174: => pay_evp_shd.g_old_rec.legislation_code
175: ,p_column_name_o
176: => pay_evp_shd.g_old_rec.column_name
177: ,p_object_version_number_o
178: => pay_evp_shd.g_old_rec.object_version_number
179: );
180: --
181: exception
182: --
194: -- ----------------------------------------------------------------------------
195: -- |---------------------------------< del >----------------------------------|
196: -- ----------------------------------------------------------------------------
197: Procedure del
198: (p_rec in pay_evp_shd.g_rec_type
199: ) is
200: --
201: l_proc varchar2(72) := g_package||'del';
202: --
204: hr_utility.set_location('Entering:'||l_proc, 5);
205: --
206: -- We must lock the row which we need to delete.
207: --
208: pay_evp_shd.lck
209: (p_rec.event_procedure_id
210: ,p_rec.object_version_number
211: );
212: --
235: (p_event_procedure_id in number
236: ,p_object_version_number in number
237: ) is
238: --
239: l_rec pay_evp_shd.g_rec_type;
240: l_proc varchar2(72) := g_package||'del';
241: --
242: Begin
243: hr_utility.set_location('Entering:'||l_proc, 5);