48: --
49: -- {End Of Comments}
50: -- ----------------------------------------------------------------------------
51: Procedure delete_dml
52: (p_rec in ota_tcc_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: ota_tcc_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 ota_tcc_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 ota_tcc_shd.g_rec_type) is
157: --
158: l_proc varchar2(72) := g_package||'post_delete';
159: --
160: Begin
164: ota_tcc_rkd.after_delete
165: (p_cross_charge_id
166: => p_rec.cross_charge_id
167: ,p_business_group_id_o
168: => ota_tcc_shd.g_old_rec.business_group_id
169: ,p_gl_set_of_books_id_o
170: => ota_tcc_shd.g_old_rec.gl_set_of_books_id
171: ,p_object_version_number_o
172: => ota_tcc_shd.g_old_rec.object_version_number
166: => p_rec.cross_charge_id
167: ,p_business_group_id_o
168: => ota_tcc_shd.g_old_rec.business_group_id
169: ,p_gl_set_of_books_id_o
170: => ota_tcc_shd.g_old_rec.gl_set_of_books_id
171: ,p_object_version_number_o
172: => ota_tcc_shd.g_old_rec.object_version_number
173: ,p_type_o
174: => ota_tcc_shd.g_old_rec.type
168: => ota_tcc_shd.g_old_rec.business_group_id
169: ,p_gl_set_of_books_id_o
170: => ota_tcc_shd.g_old_rec.gl_set_of_books_id
171: ,p_object_version_number_o
172: => ota_tcc_shd.g_old_rec.object_version_number
173: ,p_type_o
174: => ota_tcc_shd.g_old_rec.type
175: ,p_from_to_o
176: => ota_tcc_shd.g_old_rec.from_to
170: => ota_tcc_shd.g_old_rec.gl_set_of_books_id
171: ,p_object_version_number_o
172: => ota_tcc_shd.g_old_rec.object_version_number
173: ,p_type_o
174: => ota_tcc_shd.g_old_rec.type
175: ,p_from_to_o
176: => ota_tcc_shd.g_old_rec.from_to
177: ,p_start_date_active_o
178: => ota_tcc_shd.g_old_rec.start_date_active
172: => ota_tcc_shd.g_old_rec.object_version_number
173: ,p_type_o
174: => ota_tcc_shd.g_old_rec.type
175: ,p_from_to_o
176: => ota_tcc_shd.g_old_rec.from_to
177: ,p_start_date_active_o
178: => ota_tcc_shd.g_old_rec.start_date_active
179: ,p_end_date_active_o
180: => ota_tcc_shd.g_old_rec.end_date_active
174: => ota_tcc_shd.g_old_rec.type
175: ,p_from_to_o
176: => ota_tcc_shd.g_old_rec.from_to
177: ,p_start_date_active_o
178: => ota_tcc_shd.g_old_rec.start_date_active
179: ,p_end_date_active_o
180: => ota_tcc_shd.g_old_rec.end_date_active
181: );
182: --
176: => ota_tcc_shd.g_old_rec.from_to
177: ,p_start_date_active_o
178: => ota_tcc_shd.g_old_rec.start_date_active
179: ,p_end_date_active_o
180: => ota_tcc_shd.g_old_rec.end_date_active
181: );
182: --
183: exception
184: --
196: -- ----------------------------------------------------------------------------
197: -- |---------------------------------< del >----------------------------------|
198: -- ----------------------------------------------------------------------------
199: Procedure del
200: (p_rec in ota_tcc_shd.g_rec_type
201: ,p_validate in boolean default false
202: ) is
203: --
204: l_proc varchar2(72) := g_package||'del';
217:
218: --
219: -- We must lock the row which we need to delete.
220: --
221: ota_tcc_shd.lck
222: (p_rec.cross_charge_id
223: ,p_rec.object_version_number
224: );
225: --
264: ,p_object_version_number in number
265: ,p_validate in boolean default false
266: ) is
267: --
268: l_rec ota_tcc_shd.g_rec_type;
269: l_proc varchar2(72) := g_package||'del';
270: --
271: Begin
272: hr_utility.set_location('Entering:'||l_proc, 5);