1: Package Body per_pem_del as
2: /* $Header: pepemrhi.pkb 120.3.12020000.2 2012/09/07 10:43:01 srannama ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_pem_del.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< delete_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
361: hr_multi_message.end_validation_set;
362: --
363: -- Call the supporting pre-delete operation
364: --
365: per_pem_del.pre_delete(p_rec);
366: --
367: -- Delete the row.
368: --
369: per_pem_del.delete_dml(p_rec);
365: per_pem_del.pre_delete(p_rec);
366: --
367: -- Delete the row.
368: --
369: per_pem_del.delete_dml(p_rec);
370: --
371: -- Call the supporting post-delete operation
372: --
373: per_pem_del.post_delete(p_rec);
369: per_pem_del.delete_dml(p_rec);
370: --
371: -- Call the supporting post-delete operation
372: --
373: per_pem_del.post_delete(p_rec);
374: -- Call to raise any errors on multi-message list
375: hr_multi_message.end_validation_set;
376: --
377: End del;
401: -- Having converted the arguments into the per_pem_rec
402: -- plsql record structure we must call the corresponding entity
403: -- business process
404: --
405: per_pem_del.del(l_rec);
406: --
407: hr_utility.set_location(' Leaving:'||l_proc, 10);
408: End del;
409: --
406: --
407: hr_utility.set_location(' Leaving:'||l_proc, 10);
408: End del;
409: --
410: end per_pem_del;