[Home] [Help]
1: Package Body pqh_rha_upd as
2: /* $Header: pqrharhi.pkb 120.1 2005/08/03 13:43:25 nsanghal noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pqh_rha_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< update_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
406: );
407: --
408: -- Call the supporting pre-update operation
409: --
410: pqh_rha_upd.pre_update(p_rec);
411: --
412: -- Update the row.
413: --
414: pqh_rha_upd.update_dml(p_rec);
410: pqh_rha_upd.pre_update(p_rec);
411: --
412: -- Update the row.
413: --
414: pqh_rha_upd.update_dml(p_rec);
415: --
416: -- Call the supporting post-update operation
417: --
418: pqh_rha_upd.post_update
414: pqh_rha_upd.update_dml(p_rec);
415: --
416: -- Call the supporting post-update operation
417: --
418: pqh_rha_upd.post_update
419: (p_effective_date
420: ,p_rec
421: );
422: End upd;
472: -- Having converted the arguments into the
473: -- plsql record structure we call the corresponding record
474: -- business process.
475: --
476: pqh_rha_upd.upd
477: (p_effective_date
478: ,l_rec
479: );
480: p_object_version_number := l_rec.object_version_number;
481: --
482: hr_utility.set_location(' Leaving:'||l_proc, 10);
483: End upd;
484: --
485: end pqh_rha_upd;