[Home] [Help]
1: Package Body per_ose_del as
2: /* $Header: peoserhi.pkb 120.2.12000000.1 2007/01/22 00:38:55 appldev ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_ose_del.'; -- Global package name
9: --
10: --
11: -- -------------------------------------------------------------------------------
12: -- |---------------------------< chk_org_in_hierarchy >----------------------------|
293: );
294: --
295: -- Call the supporting pre-delete operation
296: --
297: per_ose_del.pre_delete(p_rec);
298: --
299: -- Delete the row.
300: --
301: per_ose_del.delete_dml(p_rec);
297: per_ose_del.pre_delete(p_rec);
298: --
299: -- Delete the row.
300: --
301: per_ose_del.delete_dml(p_rec);
302: --
303: -- Call the supporting post-delete operation
304: --
305: per_ose_del.post_delete
301: per_ose_del.delete_dml(p_rec);
302: --
303: -- Call the supporting post-delete operation
304: --
305: per_ose_del.post_delete
306: (per_ose_shd.g_old_rec
307: -- ,p_exists_in_hierarchy => p_exists_in_hierarchy --Bug 3205553
308: );
309: --
340: -- Having converted the arguments into the per_ose_rec
341: -- plsql record structure we must call the corresponding entity
342: -- business process
343: --
344: per_ose_del.del(p_rec => l_rec
345: ,p_hr_installed => p_hr_installed
346: ,p_pa_installed => p_pa_installed
347: ,p_chk_children_exist => p_chk_children_exist
348: -- ,p_exists_in_hierarchy => p_exists_in_hierarchy -- Bug 3205553
350: --
351: hr_utility.set_location(' Leaving:'||l_proc, 10);
352: End del;
353: --
354: end per_ose_del;