[Home] [Help]
1: Package Body per_jgr_upd as
2: /* $Header: pejgrrhi.pkb 115.9 2004/09/09 08:11:45 smparame noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_jgr_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< update_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
352: );
353: --
354: -- Call the supporting pre-update operation
355: --
356: per_jgr_upd.pre_update(p_rec);
357: --
358: -- Update the row.
359: --
360: per_jgr_upd.update_dml(p_rec);
356: per_jgr_upd.pre_update(p_rec);
357: --
358: -- Update the row.
359: --
360: per_jgr_upd.update_dml(p_rec);
361: --
362: -- Call the supporting post-update operation
363: --
364: per_jgr_upd.post_update
360: per_jgr_upd.update_dml(p_rec);
361: --
362: -- Call the supporting post-update operation
363: --
364: per_jgr_upd.post_update
365: (p_effective_date
366: ,p_rec
367: );
368: End upd;
406: -- Having converted the arguments into the
407: -- plsql record structure we call the corresponding record
408: -- business process.
409: --
410: per_jgr_upd.upd
411: (p_effective_date
412: ,l_rec
413: );
414: p_object_version_number := l_rec.object_version_number;
415: --
416: hr_utility.set_location(' Leaving:'||l_proc, 10);
417: End upd;
418: --
419: end per_jgr_upd;