52: l_rec ghr_prh_shd.g_rec_type;
53: --
54: Begin
55: l_proc := g_package||'update_dml';
56: hr_utility.set_location('Entering:'||l_proc, 5);
57: l_rec := p_rec;
58: --
59: -- Increment the object version
60: --
91: date_notification_sent = p_rec.date_notification_sent,
92: object_version_number = p_rec.object_version_number
93: where pa_routing_history_id = p_rec.pa_routing_history_id;
94: --
95: hr_utility.set_location(' Leaving:'||l_proc, 10);
96: --
97: Exception
98: When hr_api.check_integrity_violated Then
99: -- A check constraint has been violated
152: l_proc varchar2(72) ;
153: --
154: Begin
155: l_proc := g_package||'pre_update';
156: hr_utility.set_location('Entering:'||l_proc, 5);
157: --
158: hr_utility.set_location(' Leaving:'||l_proc, 10);
159: End pre_update;
160: --
154: Begin
155: l_proc := g_package||'pre_update';
156: hr_utility.set_location('Entering:'||l_proc, 5);
157: --
158: hr_utility.set_location(' Leaving:'||l_proc, 10);
159: End pre_update;
160: --
161: -- ----------------------------------------------------------------------------
162: -- |-----------------------------< post_update >------------------------------|
195: l_proc varchar2(72);
196: --
197: Begin
198: l_proc := g_package||'post_update';
199: hr_utility.set_location('Entering:'||l_proc, 5);
200: --
201: -- This is a hook point and the user hook for post_update is called here.
202: --
203: begin
265: );
266: end;
267: -- End of API User Hook for post_update.
268: --
269: hr_utility.set_location(' Leaving:'||l_proc, 10);
270: End post_update;
271: --
272: -- ----------------------------------------------------------------------------
273: -- |-----------------------------< convert_defs >-----------------------------|
320: --
321: Begin
322: --
323: l_proc := g_package||'convert_defs';
324: hr_utility.set_location('Entering:'||l_proc, 5);
325: l_rec := p_rec;
326: --
327: -- We must now examine each argument value in the
328: -- p_rec plsql record structure
425: p_rec.date_notification_sent :=
426: ghr_prh_shd.g_old_rec.date_notification_sent;
427: End If;
428: --
429: hr_utility.set_location(' Leaving:'||l_proc, 10);
430: --
431: exception
432: when others then
433: p_rec := l_rec;
447: l_rec ghr_prh_shd.g_rec_type;
448: --
449: Begin
450: l_proc := g_package||'upd';
451: hr_utility.set_location('Entering:'||l_proc, 5);
452: l_rec := p_rec;
453: --
454: -- Determine if the business process is to be validated.
455: --
494: If p_validate then
495: Raise HR_Api.Validate_Enabled;
496: End If;
497: --
498: hr_utility.set_location(' Leaving:'||l_proc, 10);
499: Exception
500: When HR_Api.Validate_Enabled Then
501: --
502: -- As the Validate_Enabled exception has been raised
545: l_object_version_number NUMBER;
546: --
547: Begin
548: l_proc := g_package||'upd';
549: hr_utility.set_location('Entering:'||l_proc, 5);
550: l_object_version_number := p_object_version_number;
551: --
552: -- Call conversion function to turn arguments into the
553: -- l_rec structure.
590: upd(l_rec,p_validate);
591:
592: p_object_version_number := l_rec.object_version_number;
593: --
594: hr_utility.set_location(' Leaving:'||l_proc, 10);
595: exception
596: when others then
597: p_object_version_number := l_object_version_number;
598: raise;