1: Package Body pqh_sts_upd as
2: /* $Header: pqstsrhi.pkb 120.0 2005/05/29 02:43 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pqh_sts_upd.'; -- Global package name
9: g_debug boolean := hr_utility.debug_enabled;
10: --
11: -- ----------------------------------------------------------------------------
12: -- |------------------------------< update_dml >------------------------------|
609: hr_multi_message.end_validation_set;
610: --
611: -- Call the supporting pre-update operation
612: --
613: pqh_sts_upd.pre_update(p_rec);
614: --
615: -- Update the row.
616: --
617: pqh_sts_upd.update_dml(p_rec);
613: pqh_sts_upd.pre_update(p_rec);
614: --
615: -- Update the row.
616: --
617: pqh_sts_upd.update_dml(p_rec);
618: --
619: -- Call the supporting post-update operation
620: --
621: pqh_sts_upd.post_update
617: pqh_sts_upd.update_dml(p_rec);
618: --
619: -- Call the supporting post-update operation
620: --
621: pqh_sts_upd.post_update
622: (p_effective_date
623: ,p_rec
624: );
625: --
723: -- Having converted the arguments into the
724: -- plsql record structure we call the corresponding record
725: -- business process.
726: --
727: pqh_sts_upd.upd
728: (p_effective_date
729: ,l_rec
730: );
731: p_object_version_number := l_rec.object_version_number;
737: End if;
738: --
739: End upd;
740: --
741: end pqh_sts_upd;