[Home] [Help]
1: Package Body pqh_vld_del as
2: /* $Header: pqvldrhi.pkb 115.2 2002/12/13 00:33:20 rpasapul noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pqh_vld_del.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< delete_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
240: hr_multi_message.end_validation_set;
241: --
242: -- Call the supporting pre-delete operation
243: --
244: pqh_vld_del.pre_delete(p_rec);
245: --
246: -- Delete the row.
247: --
248: pqh_vld_del.delete_dml(p_rec);
244: pqh_vld_del.pre_delete(p_rec);
245: --
246: -- Delete the row.
247: --
248: pqh_vld_del.delete_dml(p_rec);
249: --
250: -- Call the supporting post-delete operation
251: --
252: pqh_vld_del.post_delete(p_rec);
248: pqh_vld_del.delete_dml(p_rec);
249: --
250: -- Call the supporting post-delete operation
251: --
252: pqh_vld_del.post_delete(p_rec);
253: --
254: -- Call to raise any errors on multi-message list
255: hr_multi_message.end_validation_set;
256: --
281: -- Having converted the arguments into the pqh_vld_rec
282: -- plsql record structure we must call the corresponding entity
283: -- business process
284: --
285: pqh_vld_del.del(l_rec);
286: --
287: hr_utility.set_location(' Leaving:'||l_proc, 10);
288: End del;
289: --
286: --
287: hr_utility.set_location(' Leaving:'||l_proc, 10);
288: End del;
289: --
290: end pqh_vld_del;