57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --
60: Begin
61: hr_utility.set_location('Entering:'||l_proc, 5);
62: --
63: -- Increment the object version
64: p_rec.object_version_number := p_rec.object_version_number + 1;
65: --
79: and contribution_usage_type= p_rec.contribution_usage_type ;
80: --
81: --
82: --
83: hr_utility.set_location(' Leaving:'||l_proc, 10);
84: --
85: Exception
86: When hr_api.check_integrity_violated Then
87: -- A check constraint has been violated
141: --
142: l_proc varchar2(72) := g_package||'pre_update';
143: --
144: Begin
145: hr_utility.set_location('Entering:'||l_proc, 5);
146: --
147: hr_utility.set_location(' Leaving:'||l_proc, 10);
148: End pre_update;
149: --
143: --
144: Begin
145: hr_utility.set_location('Entering:'||l_proc, 5);
146: --
147: hr_utility.set_location(' Leaving:'||l_proc, 10);
148: End pre_update;
149: --
150: -- ----------------------------------------------------------------------------
151: -- |-----------------------------< post_update >------------------------------|
185: --
186: l_proc varchar2(72) := g_package||'post_update';
187: --
188: Begin
189: hr_utility.set_location('Entering:'||l_proc, 5);
190: begin
191: --
192: pay_cnu_rku.after_update
193: (p_contribution_usage_id => p_rec.contribution_usage_id
219: ,p_hook_type => 'AU');
220: --
221: end;
222: --
223: hr_utility.set_location(' Leaving:'||l_proc, 10);
224: End post_update;
225: --
226: -- ----------------------------------------------------------------------------
227: -- |-----------------------------< convert_defs >-----------------------------|
342: --
343: l_proc varchar2(72) := g_package||'upd';
344: --
345: Begin
346: hr_utility.set_location('Entering:'||l_proc, 5);
347: --
348: -- We must lock the row which we need to update.
349: --
350: pay_cnu_shd.lck
396: l_rec pay_cnu_shd.g_rec_type;
397: l_proc varchar2(72) := g_package||'upd';
398: --
399: Begin
400: hr_utility.set_location('Entering:'||l_proc, 5);
401: --
402: -- Call conversion function to turn arguments into the
403: -- l_rec structure.
404: --
424: -- Having converted the arguments into the
425: -- plsql record structure we call the corresponding record
426: -- business process.
427: --
428: hr_utility.set_location(' Step:'|| l_proc, 20);
429: --
430: pay_cnu_upd.upd
431: ( p_effective_date
432: ,l_rec
432: ,l_rec
433: );
434: p_object_version_number := l_rec.object_version_number;
435: --
436: hr_utility.set_location(' Leaving:'||l_proc, 30);
437: End upd;
438: --
439: end pay_cnu_upd;