[Home] [Help]
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: --
58: Begin
59: hr_utility.set_location('Entering:'||l_proc, 5);
60: --
61: -- Increment the object version
62: --
63: p_rec.object_version_number := p_rec.object_version_number + 1;
105: where application_id = p_rec.application_id;
106: --
107: per_apl_shd.g_api_dml := false; -- Unset the api dml status
108: --
109: hr_utility.set_location(' Leaving:'||l_proc, 10);
110: --
111: Exception
112: When hr_api.check_integrity_violated Then
113: -- A check constraint has been violated
165: --
166: l_proc varchar2(72) := g_package||'pre_update';
167: --
168: Begin
169: hr_utility.set_location('Entering:'||l_proc, 5);
170: --
171: hr_utility.set_location(' Leaving:'||l_proc, 10);
172: End pre_update;
173: --
167: --
168: Begin
169: hr_utility.set_location('Entering:'||l_proc, 5);
170: --
171: hr_utility.set_location(' Leaving:'||l_proc, 10);
172: End pre_update;
173: --
174: -- ----------------------------------------------------------------------------
175: -- |-----------------------------< post_update >------------------------------|
208: --
209: l_proc varchar2(72) := g_package||'post_update';
210: --
211: Begin
212: hr_utility.set_location('Entering:'||l_proc, 5);
213: --
214: -- Start of API User Hook for post_update.
215: begin
216: per_apl_rku.after_update
325: );
326: end;
327: -- End of API User Hook for post_update.
328: --
329: hr_utility.set_location(' Leaving:'||l_proc, 10);
330: End post_update;
331: --
332: -- ----------------------------------------------------------------------------
333: -- |-----------------------------< convert_defs >-----------------------------|
378: l_proc varchar2(72) := g_package||'convert_defs';
379: --
380: Begin
381: --
382: hr_utility.set_location('Entering:'||l_proc, 5);
383: --
384: -- We must now examine each argument value in the
385: -- p_rec plsql record structure
386: -- to see if a system default is being used. If a system default
394: p_rec.person_id :=
395: per_apl_shd.g_old_rec.person_id;
396: End If;
397: If (p_rec.date_received = hr_api.g_date) then
398: hr_utility.set_location(l_proc,6);
399: p_rec.date_received :=
400: per_apl_shd.g_old_rec.date_received;
401: End If;
402: If (p_rec.comments = hr_api.g_varchar2) then
524: per_apl_shd.g_old_rec.appl_attribute20;
525: End If;
526:
527: --
528: hr_utility.set_location(' Leaving:'||l_proc, 10);
529: --
530: End convert_defs;
531: --
532: -- ----------------------------------------------------------------------------
541: --
542: l_proc varchar2(72) := g_package||'upd';
543: --
544: Begin
545: hr_utility.set_location('Entering:'||l_proc, 5);
546: --
547: -- Determine if the business process is to be validated.
548: --
549: If p_validate then
597: If p_validate then
598: Raise HR_Api.Validate_Enabled;
599: End If;
600: --
601: hr_utility.set_location(' Leaving:'||l_proc, 10);
602: Exception
603: When HR_Api.Validate_Enabled Then
604: --
605: -- As the Validate_Enabled exception has been raised
654: l_rec per_apl_shd.g_rec_type;
655: l_proc varchar2(72) := g_package||'upd';
656: --
657: Begin
658: hr_utility.set_location('Entering:'||l_proc, 5);
659: --
660: -- Call conversion function to turn arguments into the
661: -- l_rec structure.
662: --
707: --
708: upd(l_rec, p_effective_date, p_validate);
709: p_object_version_number := l_rec.object_version_number;
710: --
711: hr_utility.set_location(' Leaving:'||l_proc, 10);
712: End upd;
713: --
714: end per_apl_upd;