[Home] [Help]
1: Package Body ben_ctk_del as
2: /* $Header: bectkrhi.pkb 120.0 2005/05/28 01:25 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' ben_ctk_del.'; -- Global package name
9: g_debug boolean := hr_utility.debug_enabled;
10: --
11: -- ----------------------------------------------------------------------------
12: -- |------------------------------< delete_dml >------------------------------|
239: hr_multi_message.end_validation_set;
240: --
241: -- Call the supporting pre-delete operation
242: --
243: ben_ctk_del.pre_delete(p_rec);
244: --
245: -- Delete the row.
246: --
247: ben_ctk_del.delete_dml(p_rec);
243: ben_ctk_del.pre_delete(p_rec);
244: --
245: -- Delete the row.
246: --
247: ben_ctk_del.delete_dml(p_rec);
248: --
249: -- Call the supporting post-delete operation
250: --
251: ben_ctk_del.post_delete(p_rec);
247: ben_ctk_del.delete_dml(p_rec);
248: --
249: -- Call the supporting post-delete operation
250: --
251: ben_ctk_del.post_delete(p_rec);
252: --
253: -- Call to raise any errors on multi-message list
254: hr_multi_message.end_validation_set;
255: --
284: -- Having converted the arguments into the ben_ctk_rec
285: -- plsql record structure we must call the corresponding entity
286: -- business process
287: --
288: ben_ctk_del.del(l_rec);
289: --
290: if g_debug then
291: hr_utility.set_location(' Leaving:'||l_proc, 10);
292: end if;
291: hr_utility.set_location(' Leaving:'||l_proc, 10);
292: end if;
293: End del;
294: --
295: end ben_ctk_del;