1: Package Body pqh_rls_upd as
2: /* $Header: pqrlsrhi.pkb 115.21 2004/02/18 12:06:25 srajakum noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pqh_rls_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< update_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
643: );
644: --
645: -- Call the supporting pre-update operation
646: --
647: pqh_rls_upd.pre_update(p_rec);
648: --
649: -- Update the row.
650: --
651: pqh_rls_upd.update_dml(p_rec);
647: pqh_rls_upd.pre_update(p_rec);
648: --
649: -- Update the row.
650: --
651: pqh_rls_upd.update_dml(p_rec);
652: --
653: -- Call the supporting post-update operation
654: --
655: pqh_rls_upd.post_update
651: pqh_rls_upd.update_dml(p_rec);
652: --
653: -- Call the supporting post-update operation
654: --
655: pqh_rls_upd.post_update
656: (p_effective_date
657: ,p_rec
658: );
659: End upd;
761: -- Having converted the arguments into the
762: -- plsql record structure we call the corresponding record
763: -- business process.
764: --
765: pqh_rls_upd.upd
766: (p_effective_date
767: ,l_rec
768: );
769: p_object_version_number := l_rec.object_version_number;
770: --
771: hr_utility.set_location(' Leaving:'||l_proc,10);
772: End upd;
773: --
774: end pqh_rls_upd;