1: Package Body hxc_han_del as
2: /* $Header: hxchanrhi.pkb 120.2 2006/07/10 10:09:56 gsirigin noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_han_del.'; -- Global package name
9: g_debug boolean := hr_utility.debug_enabled;
10: --
11: -- ----------------------------------------------------------------------------
12: -- |------------------------------< delete_dml >------------------------------|
233: hr_multi_message.end_validation_set;
234: --
235: -- Call the supporting pre-delete operation
236: --
237: hxc_han_del.pre_delete(p_rec);
238: --
239: -- Delete the row.
240: --
241: hxc_han_del.delete_dml(p_rec);
237: hxc_han_del.pre_delete(p_rec);
238: --
239: -- Delete the row.
240: --
241: hxc_han_del.delete_dml(p_rec);
242: --
243: -- Call the supporting post-delete operation
244: --
245: hxc_han_del.post_delete(p_rec);
241: hxc_han_del.delete_dml(p_rec);
242: --
243: -- Call the supporting post-delete operation
244: --
245: hxc_han_del.post_delete(p_rec);
246: --
247: -- Call to raise any errors on multi-message list
248: hr_multi_message.end_validation_set;
249: --
277: -- Having converted the arguments into the hxc_han_rec
278: -- plsql record structure we must call the corresponding entity
279: -- business process
280: --
281: hxc_han_del.del(l_rec);
282: --
283: if g_debug then
284: hr_utility.set_location(' Leaving:'||l_proc, 10);
285: end if;
284: hr_utility.set_location(' Leaving:'||l_proc, 10);
285: end if;
286: End del;
287: --
288: end hxc_han_del;