[Home] [Help]
134: l_object_version_number ben_pgm_f.object_version_number%TYPE;
135: --
136: begin
137: --
138: hr_utility.set_location('Entering:'|| l_proc, 10);
139: --
140: -- Issue a savepoint if operating in validation only mode
141: --
142: savepoint create_Program;
140: -- Issue a savepoint if operating in validation only mode
141: --
142: savepoint create_Program;
143: --
144: hr_utility.set_location(l_proc, 20);
145: --
146: -- Process Logic
147: --
148: begin
517: -- End of API User Hook for the after hook of create_Program
518: --
519: end;
520: --
521: hr_utility.set_location(l_proc, 60);
522: --
523: -- When in validation only mode raise the Validate_Enabled exception
524: --
525: if p_validate then
532: p_effective_start_date := l_effective_start_date;
533: p_effective_end_date := l_effective_end_date;
534: p_object_version_number := l_object_version_number;
535: --
536: hr_utility.set_location(' Leaving:'||l_proc, 70);
537: --
538: exception
539: --
540: when hr_api.validate_enabled then
551: p_pgm_id := null;
552: p_effective_start_date := null;
553: p_effective_end_date := null;
554: p_object_version_number := null;
555: hr_utility.set_location(' Leaving:'||l_proc, 80);
556: --
557: when others then
558: --
559: -- A validation or unexpected error has occured
691: l_effective_end_date ben_pgm_f.effective_end_date%TYPE;
692: --
693: begin
694: --
695: hr_utility.set_location('Entering:'|| l_proc, 10);
696: --
697: -- Issue a savepoint if operating in validation only mode
698: --
699: savepoint update_Program;
697: -- Issue a savepoint if operating in validation only mode
698: --
699: savepoint update_Program;
700: --
701: hr_utility.set_location(l_proc, 20);
702: --
703: -- Process Logic
704: --
705: l_object_version_number := p_object_version_number;
1080: -- End of API User Hook for the after hook of update_Program
1081: --
1082: end;
1083: --
1084: hr_utility.set_location(l_proc, 60);
1085: --
1086: -- When in validation only mode raise the Validate_Enabled exception
1087: --
1088: if p_validate then
1094: p_object_version_number := l_object_version_number;
1095: p_effective_start_date := l_effective_start_date;
1096: p_effective_end_date := l_effective_end_date;
1097: --
1098: hr_utility.set_location(' Leaving:'||l_proc, 70);
1099: --
1100: exception
1101: --
1102: when hr_api.validate_enabled then
1109: -- Only set output warning arguments
1110: -- (Any key or derived arguments must be set to null
1111: -- when validation only mode is being used.)
1112: --
1113: hr_utility.set_location(' Leaving:'||l_proc, 80);
1114: --
1115: when others then
1116: --
1117: -- A validation or unexpected error has occured
1146: l_effective_end_date ben_pgm_f.effective_end_date%TYPE;
1147: --
1148: begin
1149: --
1150: hr_utility.set_location('Entering:'|| l_proc, 10);
1151: --
1152: -- Issue a savepoint if operating in validation only mode
1153: --
1154: savepoint delete_Program;
1152: -- Issue a savepoint if operating in validation only mode
1153: --
1154: savepoint delete_Program;
1155: --
1156: hr_utility.set_location(l_proc, 20);
1157: --
1158: -- Process Logic
1159: --
1160: l_object_version_number := p_object_version_number;
1215: -- End of API User Hook for the after hook of delete_Program
1216: --
1217: end;
1218: --
1219: hr_utility.set_location(l_proc, 60);
1220: --
1221: -- When in validation only mode raise the Validate_Enabled exception
1222: --
1223: if p_validate then
1223: if p_validate then
1224: raise hr_api.validate_enabled;
1225: end if;
1226: --
1227: hr_utility.set_location(' Leaving:'||l_proc, 70);
1228: --
1229: exception
1230: --
1231: when hr_api.validate_enabled then
1277: l_validation_end_date date;
1278: --
1279: begin
1280: --
1281: hr_utility.set_location('Entering:'|| l_proc, 10);
1282: --
1283: ben_pgm_shd.lck
1284: (
1285: p_pgm_id => p_pgm_id
1289: ,p_effective_date => p_effective_date
1290: ,p_datetrack_mode => p_datetrack_mode
1291: );
1292: --
1293: hr_utility.set_location(' Leaving:'||l_proc, 70);
1294: --
1295: end lck;
1296: --
1297: end ben_Program_api;