[Home] [Help]
PACKAGE BODY: APPS.OTA_COURSE_PREREQUISITE_API
Source
1 PACKAGE BODY ota_course_prerequisite_api as
2 /* $Header: otcprapi.pkb 120.0 2005/05/29 07:07 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' ota_course_prerequisite_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |-------------------------< create_course_prerequisite >-------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_course_prerequisite
13 (p_validate in boolean default false
14 ,p_effective_date in date
15 ,p_activity_version_id in number
16 ,p_prerequisite_course_id in number
17 ,p_business_group_id in number
18 ,p_prerequisite_type in varchar2
19 ,p_enforcement_mode in varchar2
20 ,p_object_version_number out nocopy number
21 )
22 is
23 --
24 -- Declare cursors and local variables
25 --
26 l_proc varchar2(72) := g_package||' create_course_prerequisite ';
27 l_object_version_number number;
28 l_effective_date date;
29
30 begin
31 hr_utility.set_location('Entering:'|| l_proc, 10);
32 --
33 -- Issue a savepoint
34 --
35 savepoint create_course_prerequisite;
36 --
37 -- Truncate the time portion from all IN date parameters
38 --
39 l_effective_date := trunc(p_effective_date);
40
41 --
42 -- Call Before Process User Hook
43 --
44 begin
45 ota_course_prerequisite_bk1.create_course_prerequisite_b
46 (p_effective_date => l_effective_date
47 ,p_activity_version_id => p_activity_version_id
48 ,p_prerequisite_course_id => p_prerequisite_course_id
49 ,p_business_group_id => p_business_group_id
50 ,p_prerequisite_type => p_prerequisite_type
51 ,p_enforcement_mode => p_enforcement_mode
52 );
53 exception
54 when hr_api.cannot_find_prog_unit then
55 hr_api.cannot_find_prog_unit_error
56 (p_module_name => 'create_course_prerequisite_b'
57 ,p_hook_type => 'BP'
58 );
59 end;
60 --
61 -- Validation in addition to Row Handlers
62 --
63 --
64 -- Process Logic
65 --
66 ota_cpr_ins.ins
67 (p_effective_date => l_effective_date
68 ,p_activity_version_id => p_activity_version_id
69 ,p_prerequisite_course_id => p_prerequisite_course_id
70 ,p_business_group_id => p_business_group_id
71 ,p_prerequisite_type => p_prerequisite_type
72 ,p_enforcement_mode => p_enforcement_mode
73 ,p_object_version_number => l_object_version_number
74 );
75 --
76 -- Call After Process User Hook
77 --
78 begin
79 ota_course_prerequisite_bk1.create_course_prerequisite_a
80 (p_effective_date => l_effective_date
81 ,p_activity_version_id => p_activity_version_id
82 ,p_prerequisite_course_id => p_prerequisite_course_id
83 ,p_business_group_id => p_business_group_id
84 ,p_prerequisite_type => p_prerequisite_type
85 ,p_enforcement_mode => p_enforcement_mode
86 ,p_object_version_number => l_object_version_number
87 );
88
89 exception
90 when hr_api.cannot_find_prog_unit then
91 hr_api.cannot_find_prog_unit_error
92 (p_module_name => 'create_course_prerequisite_a'
93 ,p_hook_type => 'AP'
94 );
95 end;
96 --
97 -- When in validation only mode raise the Validate_Enabled exception
98 --
99 if p_validate then
100 raise hr_api.validate_enabled;
101 end if;
102 --
103 -- Set all output arguments
104 --
105 --
106 p_object_version_number := l_object_version_number;
107 --
108 hr_utility.set_location(' Leaving:'||l_proc, 70);
109 exception
110 when hr_api.validate_enabled then
111 --
112 -- As the Validate_Enabled exception has been raised
113 -- we must rollback to the savepoint
114 --
115 rollback to create_course_prerequisite;
116 --
117 -- Only set output warning arguments
118 -- (Any key or derived arguments must be set to null
119 -- when validation only mode is being used.)
120 --
121 p_object_version_number := null;
122 hr_utility.set_location(' Leaving:'||l_proc, 80);
123 when others then
124 --
125 -- A validation or unexpected error has occured
126 --
127 rollback to create_course_prerequisite;
128 p_object_version_number := null;
129 hr_utility.set_location(' Leaving:'||l_proc, 90);
130 raise;
131 end create_course_prerequisite ;
132 --
133 -- ----------------------------------------------------------------------------
134 -- |-------------------------< update_course_prerequisite >-------------------|
135 -- ----------------------------------------------------------------------------
136 --
137 procedure update_course_prerequisite
138 (p_validate in boolean default false
139 ,p_effective_date in date
140 ,p_activity_version_id in number
141 ,p_prerequisite_course_id in number
142 ,p_business_group_id in number
143 ,p_prerequisite_type in varchar2
144 ,p_enforcement_mode in varchar2
145 ,p_object_version_number in out nocopy number
146 ) is
147 --
148 -- Declare cursors and local variables
149 --
150 l_proc varchar2(72) := g_package||' update_course_prerequisite ';
151 l_object_version_number number := p_object_version_number;
152 l_effective_date date;
153
154 begin
155 hr_utility.set_location('Entering:'|| l_proc, 10);
156 --
157 -- Issue a savepoint
158 --
159 savepoint update_course_prerequisite ;
160
161 --
162 -- Truncate the time portion from all IN date parameters
163 --
164 l_effective_date := trunc(p_effective_date);
165 --
166
167 -- Call Before Process User Hook
168 --
169 begin
170 ota_course_prerequisite_bk2.update_course_prerequisite_b
171 (p_effective_date => l_effective_date
172 ,p_activity_version_id => p_activity_version_id
173 ,p_prerequisite_course_id => p_prerequisite_course_id
174 ,p_business_group_id => p_business_group_id
175 ,p_prerequisite_type => p_prerequisite_type
176 ,p_enforcement_mode => p_enforcement_mode
177 ,p_object_version_number => l_object_version_number
178 );
179
180 exception
181 when hr_api.cannot_find_prog_unit then
182 hr_api.cannot_find_prog_unit_error
183 (p_module_name => 'update_course_prerequisite_b'
184 ,p_hook_type => 'BP'
185 );
186 end;
187 --
188 -- Validation in addition to Row Handlers
189 --
190 --
191 -- Process Logic
192 --
193 ota_cpr_upd.upd
194 (p_effective_date => l_effective_date
195 ,p_activity_version_id => p_activity_version_id
196 ,p_prerequisite_course_id => p_prerequisite_course_id
197 ,p_business_group_id => p_business_group_id
198 ,p_prerequisite_type => p_prerequisite_type
199 ,p_enforcement_mode => p_enforcement_mode
200 ,p_object_version_number => l_object_version_number
201 );
202 --
203 -- Call After Process User Hook
204 --
205 begin
206 ota_course_prerequisite_bk2.update_course_prerequisite_a
207 (p_effective_date => l_effective_date
208 ,p_activity_version_id => p_activity_version_id
209 ,p_prerequisite_course_id => p_prerequisite_course_id
210 ,p_business_group_id => p_business_group_id
211 ,p_prerequisite_type => p_prerequisite_type
212 ,p_enforcement_mode => p_enforcement_mode
213 ,p_object_version_number => l_object_version_number
214 );
215 exception
216 when hr_api.cannot_find_prog_unit then
217 hr_api.cannot_find_prog_unit_error
218 (p_module_name => 'update_course_prerequisite_a'
219 ,p_hook_type => 'AP'
220 );
221 end;
222 --
223 -- When in validation only mode raise the Validate_Enabled exception
224 --
225 if p_validate then
226 raise hr_api.validate_enabled;
227 end if;
228 --
229 -- Set all output arguments
230 --
231 p_object_version_number := l_object_version_number;
232 --
233 hr_utility.set_location(' Leaving:'||l_proc, 70);
234 exception
235 when hr_api.validate_enabled then
236 --
237 -- As the Validate_Enabled exception has been raised
238 -- we must rollback to the savepoint
239 --
240 rollback to update_course_prerequisite ;
241 --
242 -- Only set output warning arguments
243 -- (Any key or derived arguments must be set to null
244 -- when validation only mode is being used.)
245 --
246 p_object_version_number := null;
247 hr_utility.set_location(' Leaving:'||l_proc, 80);
248 when others then
249 --
250 -- A validation or unexpected error has occured
251 --
252 rollback to update_course_prerequisite ;
253 hr_utility.set_location(' Leaving:'||l_proc, 90);
254 p_object_version_number := l_object_version_number;
255 raise;
256 end update_course_prerequisite ;
257 --
258 -- ----------------------------------------------------------------------------
259 -- |-------------------------< delete_course_prerequisite >-------------------|
260 -- ----------------------------------------------------------------------------
261 --
262 procedure delete_course_prerequisite
263 (p_validate in boolean default false
264 ,p_activity_version_id in number
265 ,p_prerequisite_course_id in number
266 ,p_object_version_number in number
267 ) is
268 --
269 -- Declare cursors and local variables
270 --
271 l_proc varchar2(72) := g_package||' delete_course_prerequisite ';
272 --
273 begin
274 hr_utility.set_location('Entering:'|| l_proc, 10);
275 --
276 -- Issue a savepoint
277 --
278 savepoint delete_course_prerequisite ;
279 --
280 -- Call Before Process User Hook
281 --
282 begin
283 ota_course_prerequisite_bk3.delete_course_prerequisite_b
284 (p_activity_version_id => p_activity_version_id
285 ,p_prerequisite_course_id => p_prerequisite_course_id
286 ,p_object_version_number => p_object_version_number);
287
288 exception
289 when hr_api.cannot_find_prog_unit then
290 hr_api.cannot_find_prog_unit_error
291 (p_module_name => 'delete_course_prerequisite_b '
292 ,p_hook_type => 'BP'
293 );
294 end;
295 --
296 -- Validation in addition to Row Handlers
297 --
298 --
299 -- Process Logic
300 --
301 ota_cpr_del.del
302 (p_activity_version_id => p_activity_version_id
303 ,p_prerequisite_course_id => p_prerequisite_course_id
304 ,p_object_version_number => p_object_version_number);
305 --
306 -- Call After Process User Hook
307 --
308 begin
309
310 ota_course_prerequisite_bk3.delete_course_prerequisite_a
311 (p_activity_version_id => p_activity_version_id
312 ,p_prerequisite_course_id => p_prerequisite_course_id
313 ,p_object_version_number => p_object_version_number);
314 exception
315 when hr_api.cannot_find_prog_unit then
316 hr_api.cannot_find_prog_unit_error
317 (p_module_name => 'delete_course_prerequisite_a '
318 ,p_hook_type => 'AP'
319 );
320 end;
321 --
322 -- When in validation only mode raise the Validate_Enabled exception
323 --
324 if p_validate then
325 raise hr_api.validate_enabled;
326 end if;
327 --
328 -- Set all output arguments
329 --
330 --
331 hr_utility.set_location(' Leaving:'||l_proc, 170);
332 exception
333 when hr_api.validate_enabled then
334 --
335 -- As the Validate_Enabled exception has been raised
336 -- we must rollback to the savepoint
337 --
338 rollback to delete_course_prerequisite ;
339 --
340 -- Only set output warning arguments
341 -- (Any key or derived arguments must be set to null
342 -- when validation only mode is being used.)
343 --
344 hr_utility.set_location(' Leaving:'||l_proc, 180);
345 when others then
346 --
347 -- A validation or unexpected error has occured
348 --
349 rollback to delete_course_prerequisite ;
350 hr_utility.set_location(' Leaving:'||l_proc, 190);
351 raise;
352 end delete_course_prerequisite;
353 --
354 end ota_course_prerequisite_api;