[Home] [Help]
1: Package Body hxc_hac_del as
2: /* $Header: hxchacrhi.pkb 120.4 2006/06/13 08:42:23 gsirigin noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_hac_del.'; -- Global package name
9: g_debug boolean := hr_utility.debug_enabled;
10: --
11: -- ----------------------------------------------------------------------------
12: -- |------------------------------< delete_dml >------------------------------|
254: hxc_hac_bus.delete_validate(p_rec);
255: --
256: -- Call the supporting pre-delete operation
257: --
258: hxc_hac_del.pre_delete(p_rec);
259: --
260: -- Delete the row.
261: --
262: hxc_hac_del.delete_dml(p_rec);
258: hxc_hac_del.pre_delete(p_rec);
259: --
260: -- Delete the row.
261: --
262: hxc_hac_del.delete_dml(p_rec);
263: --
264: -- Call the supporting post-delete operation
265: --
266: hxc_hac_del.post_delete(p_rec);
262: hxc_hac_del.delete_dml(p_rec);
263: --
264: -- Call the supporting post-delete operation
265: --
266: hxc_hac_del.post_delete(p_rec);
267: --
268: End del;
269: --
270: -- ----------------------------------------------------------------------------
296: -- Having converted the arguments into the hxc_hac_rec
297: -- plsql record structure we must call the corresponding entity
298: -- business process
299: --
300: hxc_hac_del.del(l_rec);
301: --
302: if g_debug then
303: hr_utility.set_location(' Leaving:'||l_proc, 10);
304: end if;
303: hr_utility.set_location(' Leaving:'||l_proc, 10);
304: end if;
305: End del;
306: --
307: end hxc_hac_del;