[Home] [Help]
1: Package Body ota_tpc_del as
2: /* $Header: ottpcrhi.pkb 115.5 2003/06/17 14:27:43 sfmorris noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' ota_tpc_del.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< delete_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
343: ota_tpc_bus.delete_validate(p_rec);
344: --
345: -- Call the supporting pre-delete operation
346: --
347: ota_tpc_del.pre_delete(p_rec);
348: --
349: -- Delete the row.
350: --
351: ota_tpc_del.delete_dml(p_rec);
347: ota_tpc_del.pre_delete(p_rec);
348: --
349: -- Delete the row.
350: --
351: ota_tpc_del.delete_dml(p_rec);
352: --
353: -- Call the supporting post-delete operation
354: --
355: ota_tpc_del.post_delete(p_rec);
351: ota_tpc_del.delete_dml(p_rec);
352: --
353: -- Call the supporting post-delete operation
354: --
355: ota_tpc_del.post_delete(p_rec);
356: --
357: End del;
358: --
359: -- ----------------------------------------------------------------------------
381: -- Having converted the arguments into the ota_tpc_rec
382: -- plsql record structure we must call the corresponding entity
383: -- business process
384: --
385: ota_tpc_del.del(l_rec);
386: --
387: hr_utility.set_location(' Leaving:'||l_proc, 10);
388: End del;
389: --
386: --
387: hr_utility.set_location(' Leaving:'||l_proc, 10);
388: End del;
389: --
390: end ota_tpc_del;