65: l_object_version_number ben_elig_dpnt_cvrd_othr_pgm_f.object_version_number%TYPE;
66: --
67: begin
68: --
69: hr_utility.set_location('Entering:'|| l_proc, 10);
70: --
71: -- Issue a savepoint if operating in validation only mode
72: --
73: savepoint create_ELIG_DPNT_CVRD_O_PGM;
71: -- Issue a savepoint if operating in validation only mode
72: --
73: savepoint create_ELIG_DPNT_CVRD_O_PGM;
74: --
75: hr_utility.set_location(l_proc, 20);
76: --
77: -- Process Logic
78: --
79: begin
250: p_base_table_reference_column => 'ELIG_DPNT_CVRD_PGM_FLAG',
251: p_reference_table => 'BEN_ELIG_DPNT_CVRD_OTHR_PGM_F',
252: p_reference_table_column => 'ELIGY_PRFL_ID');
253: --
254: hr_utility.set_location(l_proc, 60);
255: --
256: -- When in validation only mode raise the Validate_Enabled exception
257: --
258: if p_validate then
265: p_effective_start_date := l_effective_start_date;
266: p_effective_end_date := l_effective_end_date;
267: p_object_version_number := l_object_version_number;
268: --
269: hr_utility.set_location(' Leaving:'||l_proc, 70);
270: --
271: exception
272: --
273: when hr_api.validate_enabled then
284: p_elig_dpnt_cvrd_othr_pgm_id := null;
285: p_effective_start_date := null;
286: p_effective_end_date := null;
287: p_object_version_number := null;
288: hr_utility.set_location(' Leaving:'||l_proc, 80);
289: --
290: when others then
291: --
292: -- A validation or unexpected error has occured
296: p_elig_dpnt_cvrd_othr_pgm_id := null;
297: p_effective_start_date := null;
298: p_effective_end_date := null;
299: p_object_version_number := null ;
300: hr_utility.set_location(' Leaving:'||l_proc, 90);
301: raise;
302: --
303: end create_ELIG_DPNT_CVRD_O_PGM;
304: -- ----------------------------------------------------------------------------
361: l_effective_end_date ben_elig_dpnt_cvrd_othr_pgm_f.effective_end_date%TYPE;
362: --
363: begin
364: --
365: hr_utility.set_location('Entering:'|| l_proc, 10);
366: --
367: -- Issue a savepoint if operating in validation only mode
368: --
369: savepoint update_ELIG_DPNT_CVRD_O_PGM;
367: -- Issue a savepoint if operating in validation only mode
368: --
369: savepoint update_ELIG_DPNT_CVRD_O_PGM;
370: --
371: hr_utility.set_location(l_proc, 20);
372: --
373: -- Process Logic
374: --
375: l_object_version_number := p_object_version_number;
543: -- End of API User Hook for the after hook of update_ELIG_DPNT_CVRD_O_PGM
544: --
545: end;
546: --
547: hr_utility.set_location(l_proc, 60);
548: --
549: -- When in validation only mode raise the Validate_Enabled exception
550: --
551: if p_validate then
557: p_object_version_number := l_object_version_number;
558: p_effective_start_date := l_effective_start_date;
559: p_effective_end_date := l_effective_end_date;
560: --
561: hr_utility.set_location(' Leaving:'||l_proc, 70);
562: --
563: exception
564: --
565: when hr_api.validate_enabled then
572: -- Only set output warning arguments
573: -- (Any key or derived arguments must be set to null
574: -- when validation only mode is being used.)
575: --
576: hr_utility.set_location(' Leaving:'||l_proc, 80);
577: --
578: when others then
579: --
580: -- A validation or unexpected error has occured
583: -- NOCOPY Changes
584: p_effective_start_date := null;
585: p_effective_end_date := null;
586: p_object_version_number := l_object_version_number ;
587: hr_utility.set_location(' Leaving:'||l_proc, 90);
588: raise;
589: --
590: end update_ELIG_DPNT_CVRD_O_PGM;
591: -- ----------------------------------------------------------------------------
610: l_effective_end_date ben_elig_dpnt_cvrd_othr_pgm_f.effective_end_date%TYPE;
611: --
612: begin
613: --
614: hr_utility.set_location('Entering:'|| l_proc, 10);
615: --
616: -- Issue a savepoint if operating in validation only mode
617: --
618: savepoint delete_ELIG_DPNT_CVRD_O_PGM;
616: -- Issue a savepoint if operating in validation only mode
617: --
618: savepoint delete_ELIG_DPNT_CVRD_O_PGM;
619: --
620: hr_utility.set_location(l_proc, 20);
621: --
622: -- Process Logic
623: --
624: l_object_version_number := p_object_version_number;
688: p_base_table_reference_column => 'ELIG_DPNT_CVRD_PGM_FLAG',
689: p_reference_table => 'BEN_ELIG_DPNT_CVRD_OTHR_PGM_F',
690: p_reference_table_column => 'ELIGY_PRFL_ID');
691: --
692: hr_utility.set_location(l_proc, 60);
693: --
694: -- When in validation only mode raise the Validate_Enabled exception
695: --
696: if p_validate then
696: if p_validate then
697: raise hr_api.validate_enabled;
698: end if;
699: --
700: hr_utility.set_location(' Leaving:'||l_proc, 70);
701: --
702: exception
703: --
704: when hr_api.validate_enabled then
723: -- NOCOPY Changes
724: p_effective_start_date := null;
725: p_effective_end_date := null;
726: p_object_version_number := l_object_version_number ;
727: hr_utility.set_location(' Leaving:'||l_proc, 90);
728: raise;
729: --
730: end delete_ELIG_DPNT_CVRD_O_PGM;
731: --
751: l_validation_end_date date;
752: --
753: begin
754: --
755: hr_utility.set_location('Entering:'|| l_proc, 10);
756: --
757: ben_edg_shd.lck
758: (
759: p_elig_dpnt_cvrd_othr_pgm_id => p_elig_dpnt_cvrd_othr_pgm_id
763: ,p_effective_date => p_effective_date
764: ,p_datetrack_mode => p_datetrack_mode
765: );
766: --
767: hr_utility.set_location(' Leaving:'||l_proc, 70);
768: --
769: end lck;
770: --
771: end ben_ELIG_DPNT_CVRD_O_PGM_api;