[Home] [Help]
1: Package Body hxc_has_del as
2: /* $Header: hxchasrhi.pkb 120.5 2006/06/11 12:53:42 gsirigin noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_has_del.'; -- Global package name
9: g_debug boolean :=hr_utility.debug_enabled;
10: --
11: -- ----------------------------------------------------------------------------
12: -- |------------------------------< delete_dml >------------------------------|
245: hxc_has_bus.delete_validate(p_rec);
246: --
247: -- Call the supporting pre-delete operation
248: --
249: hxc_has_del.pre_delete(p_rec);
250: --
251: -- Delete the row.
252: --
253: hxc_has_del.delete_dml(p_rec);
249: hxc_has_del.pre_delete(p_rec);
250: --
251: -- Delete the row.
252: --
253: hxc_has_del.delete_dml(p_rec);
254: --
255: -- Call the supporting post-delete operation
256: --
257: hxc_has_del.post_delete(p_rec);
253: hxc_has_del.delete_dml(p_rec);
254: --
255: -- Call the supporting post-delete operation
256: --
257: hxc_has_del.post_delete(p_rec);
258: --
259: End del;
260: --
261: -- ----------------------------------------------------------------------------
287: -- Having converted the arguments into the hxc_has_rec
288: -- plsql record structure we must call the corresponding entity
289: -- business process
290: --
291: hxc_has_del.del(l_rec);
292: --
293: if g_debug then
294: hr_utility.set_location(' Leaving:'||l_proc, 10);
295: end if;
294: hr_utility.set_location(' Leaving:'||l_proc, 10);
295: end if;
296: End del;
297: --
298: end hxc_has_del;