1: Package Body hr_tpp_upd as
2: /* $Header: hrtpprhi.pkb 115.5 2003/10/23 01:45:13 bsubrama noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hr_tpp_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< update_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
611: );
612: --
613: -- Call the supporting pre-update operation
614: --
615: hr_tpp_upd.pre_update(p_rec);
616: --
617: -- Update the row.
618: --
619: hr_tpp_upd.update_dml(p_rec);
615: hr_tpp_upd.pre_update(p_rec);
616: --
617: -- Update the row.
618: --
619: hr_tpp_upd.update_dml(p_rec);
620: --
621: -- Call the supporting post-update operation
622: --
623: hr_tpp_upd.post_update
619: hr_tpp_upd.update_dml(p_rec);
620: --
621: -- Call the supporting post-update operation
622: --
623: hr_tpp_upd.post_update
624: (p_effective_date
625: ,p_rec
626: );
627: End upd;
723: -- Having converted the arguments into the
724: -- plsql record structure we call the corresponding record
725: -- business process.
726: --
727: hr_tpp_upd.upd
728: (p_effective_date
729: ,l_rec
730: );
731: --
732: p_object_version_number := l_rec.object_version_number;
733: hr_utility.set_location(' Leaving:'||l_proc, 10);
734: End upd;
735: --
736: end hr_tpp_upd;