[Home] [Help]
133: l_object_version_number ben_pgm_f.object_version_number%TYPE;
134: --
135: begin
136: --
137: hr_utility.set_location('Entering:'|| l_proc, 10);
138: --
139: -- Issue a savepoint if operating in validation only mode
140: --
141: savepoint create_Program;
139: -- Issue a savepoint if operating in validation only mode
140: --
141: savepoint create_Program;
142: --
143: hr_utility.set_location(l_proc, 20);
144: --
145: -- Process Logic
146: --
147: begin
513: -- End of API User Hook for the after hook of create_Program
514: --
515: end;
516: --
517: hr_utility.set_location(l_proc, 60);
518: --
519: -- When in validation only mode raise the Validate_Enabled exception
520: --
521: if p_validate then
528: p_effective_start_date := l_effective_start_date;
529: p_effective_end_date := l_effective_end_date;
530: p_object_version_number := l_object_version_number;
531: --
532: hr_utility.set_location(' Leaving:'||l_proc, 70);
533: --
534: exception
535: --
536: when hr_api.validate_enabled then
547: p_pgm_id := null;
548: p_effective_start_date := null;
549: p_effective_end_date := null;
550: p_object_version_number := null;
551: hr_utility.set_location(' Leaving:'||l_proc, 80);
552: --
553: when others then
554: --
555: -- A validation or unexpected error has occured
686: l_effective_end_date ben_pgm_f.effective_end_date%TYPE;
687: --
688: begin
689: --
690: hr_utility.set_location('Entering:'|| l_proc, 10);
691: --
692: -- Issue a savepoint if operating in validation only mode
693: --
694: savepoint update_Program;
692: -- Issue a savepoint if operating in validation only mode
693: --
694: savepoint update_Program;
695: --
696: hr_utility.set_location(l_proc, 20);
697: --
698: -- Process Logic
699: --
700: l_object_version_number := p_object_version_number;
1072: -- End of API User Hook for the after hook of update_Program
1073: --
1074: end;
1075: --
1076: hr_utility.set_location(l_proc, 60);
1077: --
1078: -- When in validation only mode raise the Validate_Enabled exception
1079: --
1080: if p_validate then
1086: p_object_version_number := l_object_version_number;
1087: p_effective_start_date := l_effective_start_date;
1088: p_effective_end_date := l_effective_end_date;
1089: --
1090: hr_utility.set_location(' Leaving:'||l_proc, 70);
1091: --
1092: exception
1093: --
1094: when hr_api.validate_enabled then
1101: -- Only set output warning arguments
1102: -- (Any key or derived arguments must be set to null
1103: -- when validation only mode is being used.)
1104: --
1105: hr_utility.set_location(' Leaving:'||l_proc, 80);
1106: --
1107: when others then
1108: --
1109: -- A validation or unexpected error has occured
1138: l_effective_end_date ben_pgm_f.effective_end_date%TYPE;
1139: --
1140: begin
1141: --
1142: hr_utility.set_location('Entering:'|| l_proc, 10);
1143: --
1144: -- Issue a savepoint if operating in validation only mode
1145: --
1146: savepoint delete_Program;
1144: -- Issue a savepoint if operating in validation only mode
1145: --
1146: savepoint delete_Program;
1147: --
1148: hr_utility.set_location(l_proc, 20);
1149: --
1150: -- Process Logic
1151: --
1152: l_object_version_number := p_object_version_number;
1207: -- End of API User Hook for the after hook of delete_Program
1208: --
1209: end;
1210: --
1211: hr_utility.set_location(l_proc, 60);
1212: --
1213: -- When in validation only mode raise the Validate_Enabled exception
1214: --
1215: if p_validate then
1215: if p_validate then
1216: raise hr_api.validate_enabled;
1217: end if;
1218: --
1219: hr_utility.set_location(' Leaving:'||l_proc, 70);
1220: --
1221: exception
1222: --
1223: when hr_api.validate_enabled then
1269: l_validation_end_date date;
1270: --
1271: begin
1272: --
1273: hr_utility.set_location('Entering:'|| l_proc, 10);
1274: --
1275: ben_pgm_shd.lck
1276: (
1277: p_pgm_id => p_pgm_id
1281: ,p_effective_date => p_effective_date
1282: ,p_datetrack_mode => p_datetrack_mode
1283: );
1284: --
1285: hr_utility.set_location(' Leaving:'||l_proc, 70);
1286: --
1287: end lck;
1288: --
1289: end ben_Program_api;