1: Package Body pqp_val_upd as
2: /* $Header: pqvalrhi.pkb 120.0.12010000.3 2008/08/08 07:22:41 ubhat ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pqp_val_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |----------------------------< dt_update_dml >-----------------------------|
12: -- ----------------------------------------------------------------------------
220: --
221: Begin
222: hr_utility.set_location('Entering:'||l_proc, 5);
223: --
224: pqp_val_upd.dt_update_dml
225: (p_rec => p_rec
226: ,p_effective_date => p_effective_date
227: ,p_datetrack_mode => p_datetrack_mode
228: ,p_validation_start_date => p_validation_start_date
1042: -- derive the full record structure values to be updated.
1043: --
1044: -- 2. Call the supporting update validate operations.
1045: --
1046: pqp_val_upd.convert_defs(p_rec);
1047: --
1048: pqp_val_bus.update_validate
1049: (p_rec => p_rec
1050: ,p_effective_date => p_effective_date
1242: -- Having converted the arguments into the
1243: -- plsql record structure we call the corresponding record
1244: -- business process.
1245: --
1246: pqp_val_upd.upd
1247: (p_effective_date
1248: ,p_datetrack_mode
1249: ,l_rec
1250: );
1258: --
1259: hr_utility.set_location(' Leaving:'||l_proc, 10);
1260: End upd;
1261: --
1262: end pqp_val_upd;