[Home] [Help]
1: Package Body pqp_erg_del as
2: /* $Header: pqergrhi.pkb 115.9 2003/02/19 02:25:55 sshetty noship $ */
3:
4: --
5: -- ----------------------------------------------------------------------------
5: -- ----------------------------------------------------------------------------
6: -- | Private Global Definitions |
7: -- ----------------------------------------------------------------------------
8: --
9: g_package varchar2(33) := ' pqp_erg_del.'; -- Global package name
10: --
11: -- ----------------------------------------------------------------------------
12: -- ----------------------< delete_app_ownerships >----------------------------|
13: -- ----------------------------------------------------------------------------
260: pqp_erg_bus.delete_validate(l_rec);
261: --
262: -- Call the supporting pre-delete operation
263: --
264: pqp_erg_del.pre_delete(p_rec);
265: --
266: -- Delete the row.
267: --
268: pqp_erg_del.delete_dml(p_rec);
264: pqp_erg_del.pre_delete(p_rec);
265: --
266: -- Delete the row.
267: --
268: pqp_erg_del.delete_dml(p_rec);
269: --
270: -- Call the supporting post-delete operation
271: --
272: pqp_erg_del.post_delete(p_rec);
268: pqp_erg_del.delete_dml(p_rec);
269: --
270: -- Call the supporting post-delete operation
271: --
272: pqp_erg_del.post_delete(p_rec);
273: --
274: End del;
275: --
276: -- ----------------------------------------------------------------------------
298: -- Having converted the arguments into the pqp_erg_rec
299: -- plsql record structure we must call the corresponding entity
300: -- business process
301: --
302: pqp_erg_del.del(l_rec);
303: --
304: hr_utility.set_location(' Leaving:'||l_proc, 10);
305: End del;
306: --
303: --
304: hr_utility.set_location(' Leaving:'||l_proc, 10);
305: End del;
306: --
307: end pqp_erg_del;