54: l_resource_usage_id number;
55: l_object_version_number number;
56: l_effective_date date;
57: begin
58: hr_utility.set_location('Entering:'|| l_proc, 10);
59: --
60: -- Issue a savepoint
61: --
62: savepoint CREATE_RESOURCE;
218: --
219: p_resource_usage_id := l_resource_usage_id;
220: p_object_version_number := l_object_version_number;
221: --
222: hr_utility.set_location(' Leaving:'||l_proc, 70);
223: exception
224: when hr_api.validate_enabled then
225: --
226: -- As the Validate_Enabled exception has been raised
233: -- when validation only mode is being used.)
234: --
235: p_resource_usage_id := null;
236: p_object_version_number := null;
237: hr_utility.set_location(' Leaving:'||l_proc, 80);
238: when others then
239: --
240: -- A validation or unexpected error has occured
241: --
241: --
242: rollback to CREATE_RESOURCE;
243: p_resource_usage_id := null;
244: p_object_version_number := null;
245: hr_utility.set_location(' Leaving:'||l_proc, 90);
246: raise;
247: end Create_resource;
248: -- ----------------------------------------------------------------------------
249: -- |--------------------------< Update_resource >-----------------------------|
293: l_proc varchar2(72) := g_package||'Update_resource';
294: l_effective_date date;
295: l_object_version_number number := p_object_version_number;
296: begin
297: hr_utility.set_location('Entering:'|| l_proc, 10);
298: --
299: -- Issue a savepoint
300: --
301: savepoint UPDATE_RESOURCE;
454: end if;
455: --
456: -- Set all output arguments
457: --
458: hr_utility.set_location(' Leaving:'||l_proc, 70);
459: exception
460: when hr_api.validate_enabled then
461: --
462: -- As the Validate_Enabled exception has been raised
468: -- (Any key or derived arguments must be set to null
469: -- when validation only mode is being used.)
470: --
471: p_object_version_number := null;
472: hr_utility.set_location(' Leaving:'||l_proc, 80);
473: when others then
474: --
475: -- A validation or unexpected error has occured
476: --
475: -- A validation or unexpected error has occured
476: --
477: rollback to UPDATE_RESOURCE;
478: p_object_version_number := l_object_version_number;
479: hr_utility.set_location(' Leaving:'||l_proc, 90);
480: raise;
481: end Update_resource;
482: --
483: -- ----------------------------------------------------------------------------
496: l_budget_version_id number;
497: --
498: --
499: begin
500: hr_utility.set_location('Entering:'|| l_proc, 10);
501: --
502: -- Issue a savepoint
503: --
504: savepoint DELETE_RESOURCE;
558: --
559: -- Set all output arguments
560: --
561: --
562: hr_utility.set_location(' Leaving:'||l_proc, 170);
563: exception
564: when hr_api.validate_enabled then
565: --
566: -- As the Validate_Enabled exception has been raised
571: -- Only set output warning arguments
572: -- (Any key or derived arguments must be set to null
573: -- when validation only mode is being used.)
574: --
575: hr_utility.set_location(' Leaving:'||l_proc, 180);
576: when others then
577: --
578: -- A validation or unexpected error has occured
579: --
577: --
578: -- A validation or unexpected error has occured
579: --
580: rollback to DELETE_RESOURCE;
581: hr_utility.set_location(' Leaving:'||l_proc, 190);
582: raise;
583: end Delete_resource;
584: --
585: end OTA_RESOURCE_USAGE_API;