1: Package Body ghr_ccl_del as
2: /* $Header: ghcclrhi.pkb 115.1 2003/01/30 19:25:09 asubrahm noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' ghr_ccl_del.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< delete_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
211: ghr_ccl_bus.delete_validate(p_rec);
212: --
213: -- Call the supporting pre-delete operation
214: --
215: ghr_ccl_del.pre_delete(p_rec);
216: --
217: -- Delete the row.
218: --
219: ghr_ccl_del.delete_dml(p_rec);
215: ghr_ccl_del.pre_delete(p_rec);
216: --
217: -- Delete the row.
218: --
219: ghr_ccl_del.delete_dml(p_rec);
220: --
221: -- Call the supporting post-delete operation
222: --
223: ghr_ccl_del.post_delete(p_rec);
219: ghr_ccl_del.delete_dml(p_rec);
220: --
221: -- Call the supporting post-delete operation
222: --
223: ghr_ccl_del.post_delete(p_rec);
224: --
225: End del;
226: --
227: -- ----------------------------------------------------------------------------
250: -- Having converted the arguments into the ghr_ccl_rec
251: -- plsql record structure we must call the corresponding entity
252: -- business process
253: --
254: ghr_ccl_del.del(l_rec);
255: --
256: hr_utility.set_location(' Leaving:'||l_proc, 10);
257: End del;
258: --
255: --
256: hr_utility.set_location(' Leaving:'||l_proc, 10);
257: End del;
258: --
259: end ghr_ccl_del;