[Home] [Help]
1: Package Body pqh_ver_upd as
2: /* $Header: pqverrhi.pkb 115.3 2002/12/05 00:30:42 rpasapul noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pqh_ver_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< update_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
436: hr_multi_message.end_validation_set;
437: --
438: -- Call the supporting pre-update operation
439: --
440: pqh_ver_upd.pre_update(p_rec);
441: --
442: -- Update the row.
443: --
444: pqh_ver_upd.update_dml(p_rec);
440: pqh_ver_upd.pre_update(p_rec);
441: --
442: -- Update the row.
443: --
444: pqh_ver_upd.update_dml(p_rec);
445: --
446: -- Call the supporting post-update operation
447: --
448: pqh_ver_upd.post_update
444: pqh_ver_upd.update_dml(p_rec);
445: --
446: -- Call the supporting post-update operation
447: --
448: pqh_ver_upd.post_update
449: (p_effective_date
450: ,p_rec
451: );
452: --
511: -- Having converted the arguments into the
512: -- plsql record structure we call the corresponding record
513: -- business process.
514: --
515: pqh_ver_upd.upd
516: (p_effective_date
517: ,l_rec
518: );
519: p_object_version_number := l_rec.object_version_number;
520: --
521: hr_utility.set_location(' Leaving:'||l_proc, 10);
522: End upd;
523: --
524: end pqh_ver_upd;