[Home] [Help]
1: Package Body per_abs_upd as
2: /* $Header: peabsrhi.pkb 120.17.12010000.3 2008/09/12 11:33:01 pvelugul ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_abs_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< update_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
1117:
1118: --
1119: -- Call the supporting pre-update operation
1120: --
1121: per_abs_upd.pre_update(p_rec, p_effective_date);
1122: --
1123: -- Update the row.
1124: --
1125: per_abs_upd.update_dml(p_rec);
1121: per_abs_upd.pre_update(p_rec, p_effective_date);
1122: --
1123: -- Update the row.
1124: --
1125: per_abs_upd.update_dml(p_rec);
1126: --
1127: -- Call the supporting post-update operation
1128: --
1129: per_abs_upd.post_update
1125: per_abs_upd.update_dml(p_rec);
1126: --
1127: -- Call the supporting post-update operation
1128: --
1129: per_abs_upd.post_update
1130: (p_effective_date
1131: ,p_rec
1132: );
1133: End upd;
1343: -- Having converted the arguments into the
1344: -- plsql record structure we call the corresponding record
1345: -- business process.
1346: --
1347: per_abs_upd.upd
1348: (p_effective_date => p_effective_date
1349: ,p_rec => l_rec
1350: ,p_dur_dys_less_warning => p_dur_dys_less_warning
1351: ,p_dur_hrs_less_warning => p_dur_hrs_less_warning
1364: hr_utility.set_location(' Leaving:'||l_proc, 10);
1365:
1366: End upd;
1367: --
1368: end per_abs_upd;