[Home] [Help]
43: l_start_date per_cagr_retained_rights.start_date%TYPE;
44: l_end_date per_cagr_retained_rights.end_date%TYPE;
45: --
46: begin
47: hr_utility.set_location('Entering:'|| l_proc, 10);
48: --
49: -- Issue a savepoint
50: --
51: savepoint create_retained_right;
361: --
362: p_cagr_retained_right_id := l_cagr_retained_right_id;
363: p_object_version_number := l_object_version_number;
364: --
365: hr_utility.set_location(' Leaving:'||l_proc, 70);
366: exception
367: when hr_api.validate_enabled then
368: --
369: -- As the Validate_Enabled exception has been raised
376: -- when validation only mode is being used.)
377: --
378: p_cagr_retained_right_id := null;
379: p_object_version_number := null;
380: hr_utility.set_location(' Leaving:'||l_proc, 80);
381: when others then
382: --
383: -- A validation or unexpected error has occured
384: --
382: --
383: -- A validation or unexpected error has occured
384: --
385: rollback to create_retained_right;
386: hr_utility.set_location(' Leaving:'||l_proc, 90);
387: raise;
388: end create_retained_right;
389: --
390: -- ----------------------------------------------------------------------------
407: l_effective_date date;
408: l_end_date per_cagr_retained_rights.end_date%TYPE;
409: --
410: begin
411: hr_utility.set_location('Entering:'|| l_proc, 10);
412: --
413: -- Issue a savepoint
414: --
415: savepoint update_retained_right;
673: -- Set all output arguments
674: --
675: p_object_version_number := l_object_version_number;
676: --
677: hr_utility.set_location(' Leaving:'||l_proc, 70);
678: exception
679: when hr_api.validate_enabled then
680: --
681: -- As the Validate_Enabled exception has been raised
686: -- Only set output warning arguments
687: -- (Any key or derived arguments must be set to null
688: -- when validation only mode is being used.)
689: --
690: hr_utility.set_location(' Leaving:'||l_proc, 80);
691: when others then
692: --
693: -- A validation or unexpected error has occured
694: --
692: --
693: -- A validation or unexpected error has occured
694: --
695: rollback to update_retained_right;
696: hr_utility.set_location(' Leaving:'||l_proc, 90);
697: raise;
698: end update_retained_right;
699: --
700: --
712: --
713: l_proc varchar2(72) := g_package||'delete_retained_right';
714: --
715: begin
716: hr_utility.set_location('Entering:'|| l_proc, 5);
717: --
718: -- Issue a savepoint if operating in validation only mode.
719: --
720: savepoint delete_retained_right;
737: end;
738: --
739: --
740: */
741: hr_utility.set_location(l_proc, 7);
742: --
743: -- Process Logic
744: --
745: per_ret_del.del
746: (p_cagr_retained_right_id => p_cagr_retained_right_id
747: ,p_object_version_number => p_object_version_number
748: );
749: --
750: hr_utility.set_location(l_proc, 8);
751: --
752: /*
753: --
754: -- Call After Process User Hook
770: if p_validate then
771: raise hr_api.validate_enabled;
772: end if;
773: --
774: hr_utility.set_location(' Leaving:'||l_proc, 11);
775: exception
776: when hr_api.validate_enabled then
777: --
778: -- As the Validate_Enabled exception has been raised
779: -- we must rollback to the savepoint
780: --
781: ROLLBACK TO delete_retained_right;
782: --
783: hr_utility.set_location(' Leaving:'||l_proc, 12);
784: --
785: when others then
786: --
787: --