[Home] [Help]
1: Package Body per_env_del as
2: /* $Header: peenvrhi.pkb 120.1 2005/08/04 03:23:12 vegopala noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_env_del.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< delete_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
215: hr_multi_message.end_validation_set;
216: --
217: -- Call the supporting pre-delete operation
218: --
219: per_env_del.pre_delete(p_rec);
220: --
221: -- Delete the row.
222: --
223: per_env_del.delete_dml(p_rec);
219: per_env_del.pre_delete(p_rec);
220: --
221: -- Delete the row.
222: --
223: per_env_del.delete_dml(p_rec);
224: --
225: -- Call the supporting post-delete operation
226: --
227: per_env_del.post_delete(p_rec);
223: per_env_del.delete_dml(p_rec);
224: --
225: -- Call the supporting post-delete operation
226: --
227: per_env_del.post_delete(p_rec);
228: --
229: -- Call to raise any errors on multi-message list
230: hr_multi_message.end_validation_set;
231: --
256: -- Having converted the arguments into the per_env_rec
257: -- plsql record structure we must call the corresponding entity
258: -- business process
259: --
260: per_env_del.del(l_rec);
261: --
262: hr_utility.set_location(' Leaving:'||l_proc, 10);
263: End del;
264: --
261: --
262: hr_utility.set_location(' Leaving:'||l_proc, 10);
263: End del;
264: --
265: end per_env_del;