[Home] [Help]
1: Package Body hxc_tkg_del as
2: /* $Header: hxctkgrhi.pkb 120.2 2005/09/23 05:28:58 rchennur noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_tkg_del.'; -- Global package name
9: g_debug boolean := hr_utility.debug_enabled;
10: --
11: -- ----------------------------------------------------------------------------
12: -- |------------------------------< delete_dml >------------------------------|
234: hxc_tkg_bus.delete_validate(p_rec);
235: --
236: -- Call the supporting pre-delete operation
237: --
238: hxc_tkg_del.pre_delete(p_rec);
239: --
240: -- Delete the row.
241: --
242: hxc_tkg_del.delete_dml(p_rec);
238: hxc_tkg_del.pre_delete(p_rec);
239: --
240: -- Delete the row.
241: --
242: hxc_tkg_del.delete_dml(p_rec);
243: --
244: -- Call the supporting post-delete operation
245: --
246: hxc_tkg_del.post_delete(p_rec);
242: hxc_tkg_del.delete_dml(p_rec);
243: --
244: -- Call the supporting post-delete operation
245: --
246: hxc_tkg_del.post_delete(p_rec);
247: --
248: End del;
249: --
250: -- ----------------------------------------------------------------------------
276: -- Having converted the arguments into the hxc_tkg_rec
277: -- plsql record structure we must call the corresponding entity
278: -- business process
279: --
280: hxc_tkg_del.del(l_rec);
281: --
282: if g_debug then
283: hr_utility.set_location(' Leaving:'||l_proc, 10);
284: end if;
283: hr_utility.set_location(' Leaving:'||l_proc, 10);
284: end if;
285: End del;
286: --
287: end hxc_tkg_del;