[Home] [Help]
PACKAGE BODY: APPS.OTA_ACTIVITY_VERSION_API
Source
1 PACKAGE BODY ota_activity_version_api as
2 /* $Header: ottavapi.pkb 120.1.12020000.2 2012/06/29 11:18:17 rpahune ship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' OTA_ACTIVITY_VERSION_API.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |-------------------------< CREATE_ACTIVITY_VERSION >------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_activity_version
13 (
14 p_effective_date in date,
15 p_validate in boolean default false ,
16 p_activity_id in number,
17 p_superseded_by_act_version_id in number ,
18 p_developer_organization_id in number,
19 p_controlling_person_id in number ,
20 p_version_name in varchar2,
21 p_comments in varchar2 ,
22 p_description in varchar2 ,
23 p_duration in number ,
24 p_duration_units in varchar2 ,
25 p_end_date in date ,
26 p_intended_audience in varchar2 ,
27 p_language_id in number ,
28 p_maximum_attendees in number ,
29 p_minimum_attendees in number ,
30 p_objectives in varchar2 ,
31 p_start_date in date ,
32 p_success_criteria in varchar2 ,
33 p_user_status in varchar2 ,
34 p_vendor_id in number ,
35 p_actual_cost in number ,
36 p_budget_cost in number ,
37 p_budget_currency_code in varchar2 ,
38 p_expenses_allowed in varchar2 ,
39 p_professional_credit_type in varchar2 ,
40 p_professional_credits in number ,
41 p_maximum_internal_attendees in number ,
42 p_tav_information_category in varchar2 ,
43 p_tav_information1 in varchar2 ,
44 p_tav_information2 in varchar2 ,
45 p_tav_information3 in varchar2 ,
46 p_tav_information4 in varchar2 ,
47 p_tav_information5 in varchar2 ,
48 p_tav_information6 in varchar2 ,
49 p_tav_information7 in varchar2 ,
50 p_tav_information8 in varchar2 ,
51 p_tav_information9 in varchar2 ,
52 p_tav_information10 in varchar2 ,
53 p_tav_information11 in varchar2 ,
54 p_tav_information12 in varchar2 ,
55 p_tav_information13 in varchar2 ,
56 p_tav_information14 in varchar2 ,
57 p_tav_information15 in varchar2 ,
58 p_tav_information16 in varchar2 ,
59 p_tav_information17 in varchar2 ,
60 p_tav_information18 in varchar2 ,
61 p_tav_information19 in varchar2 ,
62 p_tav_information20 in varchar2 ,
63 p_inventory_item_id in number ,
64 p_organization_id in number ,
65 p_rco_id in number ,
66 p_version_code in varchar2 ,
67 p_keywords in varchar2 ,
68 p_business_group_id in number ,
69 p_activity_version_id out nocopy number ,
70 p_object_version_number out nocopy number,
71 p_data_source in varchar2
72 ,p_competency_update_level in varchar2 ,
73 p_eres_enabled in varchar2
74
75 ) is
76 --
77 -- Declare cursors and local variables
78 --
79 l_proc varchar2(72) := g_package||' Create Activity Version';
80 l_activity_version_id number;
81 l_object_version_number number;
82 l_effective_date date;
83 l_version_name ota_activity_versions_tl.version_name%type;
84 begin
85 hr_utility.set_location('Entering:'|| l_proc, 10);
86 --
87 -- Issue a savepoint
88 --
89 savepoint CREATE_ACTIVITY_VERSION;
90 l_effective_date := trunc(p_effective_date);
91 l_version_name := rtrim(p_version_name);
92 --
93 begin
94 ota_activity_version_bk1.create_activity_version_b
95 (
96 p_effective_date => l_effective_date ,
97 p_activity_id => p_activity_id ,
98 p_superseded_by_act_version_id => p_superseded_by_act_version_id ,
99 p_developer_organization_id => p_developer_organization_id ,
100 p_controlling_person_id => p_controlling_person_id ,
101 p_version_name => l_version_name ,
102 p_comments => p_comments ,
103 p_description => p_description ,
104 p_duration => p_duration ,
105 p_duration_units => p_duration_units ,
106 p_end_date => p_end_date ,
107 p_intended_audience => p_intended_audience ,
108 p_language_id => p_language_id ,
109 p_maximum_attendees => p_maximum_attendees ,
110 p_minimum_attendees => p_minimum_attendees ,
111 p_objectives => p_objectives ,
112 p_start_date => p_start_date ,
113 p_success_criteria => p_success_criteria ,
114 p_user_status => p_user_status ,
115 p_vendor_id => p_vendor_id ,
116 p_actual_cost => p_actual_cost ,
117 p_budget_cost => p_budget_cost ,
118 p_budget_currency_code => p_budget_currency_code ,
119 p_expenses_allowed => p_expenses_allowed ,
120 p_professional_credit_type => p_professional_credit_type ,
121 p_professional_credits => p_professional_credits ,
122 p_maximum_internal_attendees => p_maximum_internal_attendees ,
123 p_tav_information_category => p_tav_information_category ,
124 p_tav_information1 => p_tav_information1 ,
125 p_tav_information2 => p_tav_information2 ,
126 p_tav_information3 => p_tav_information3 ,
127 p_tav_information4 => p_tav_information4 ,
128 p_tav_information5 => p_tav_information5 ,
129 p_tav_information6 => p_tav_information6 ,
130 p_tav_information7 => p_tav_information7 ,
131 p_tav_information8 => p_tav_information8 ,
132 p_tav_information9 => p_tav_information9 ,
133 p_tav_information10 => p_tav_information10 ,
134 p_tav_information11 => p_tav_information11 ,
135 p_tav_information12 => p_tav_information12 ,
136 p_tav_information13 => p_tav_information13 ,
137 p_tav_information14 => p_tav_information14 ,
138 p_tav_information15 => p_tav_information15 ,
139 p_tav_information16 => p_tav_information16 ,
140 p_tav_information17 => p_tav_information17 ,
141 p_tav_information18 => p_tav_information18 ,
142 p_tav_information19 => p_tav_information19 ,
143 p_tav_information20 => p_tav_information20 ,
144 p_inventory_item_id => p_inventory_item_id ,
145 p_organization_id => p_organization_id ,
146 p_rco_id => p_rco_id ,
147 p_version_code => p_version_code ,
148 p_business_group_id => p_business_group_id ,
149 p_object_version_number => l_object_version_number ,
150 p_data_source => p_data_source
151 ,p_competency_update_level => p_competency_update_level
152
153 );
154 exception
155 when hr_api.cannot_find_prog_unit then
156 hr_api.cannot_find_prog_unit_error
157 (p_module_name => 'CREATE_ACTIVITY_VERSION'
158 ,p_hook_type => 'BP'
159 );
160 end;
161
162 --
163 -- Process Logic
164 --
165 ota_tav_ins.ins
166 (
167 p_validate => p_validate ,
168 p_activity_id => p_activity_id ,
169 p_superseded_by_act_version_id => p_superseded_by_act_version_id ,
170 p_developer_organization_id => p_developer_organization_id ,
171 p_controlling_person_id => p_controlling_person_id ,
172 p_version_name => l_version_name ,
173 p_comments => p_comments ,
174 p_description => p_description ,
175 p_duration => p_duration ,
176 p_duration_units => p_duration_units ,
177 p_end_date => p_end_date ,
178 p_intended_audience => p_intended_audience ,
179 p_language_id => p_language_id ,
180 p_maximum_attendees => p_maximum_attendees ,
181 p_minimum_attendees => p_minimum_attendees ,
182 p_objectives => p_objectives ,
183 p_start_date => p_start_date ,
184 p_success_criteria => p_success_criteria ,
185 p_user_status => p_user_status ,
186 p_vendor_id => p_vendor_id ,
187 p_actual_cost => p_actual_cost ,
188 p_budget_cost => p_budget_cost ,
189 p_budget_currency_code => p_budget_currency_code ,
190 p_expenses_allowed => p_expenses_allowed ,
191 p_professional_credit_type => p_professional_credit_type ,
192 p_professional_credits => p_professional_credits ,
193 p_maximum_internal_attendees => p_maximum_internal_attendees ,
194 p_tav_information_category => p_tav_information_category ,
195 p_tav_information1 => p_tav_information1 ,
196 p_tav_information2 => p_tav_information2 ,
197 p_tav_information3 => p_tav_information3 ,
198 p_tav_information4 => p_tav_information4 ,
199 p_tav_information5 => p_tav_information5 ,
200 p_tav_information6 => p_tav_information6 ,
201 p_tav_information7 => p_tav_information7 ,
202 p_tav_information8 => p_tav_information8 ,
203 p_tav_information9 => p_tav_information9 ,
204 p_tav_information10 => p_tav_information10 ,
205 p_tav_information11 => p_tav_information11 ,
206 p_tav_information12 => p_tav_information12 ,
207 p_tav_information13 => p_tav_information13 ,
208 p_tav_information14 => p_tav_information14 ,
209 p_tav_information15 => p_tav_information15 ,
210 p_tav_information16 => p_tav_information16 ,
211 p_tav_information17 => p_tav_information17 ,
212 p_tav_information18 => p_tav_information18 ,
213 p_tav_information19 => p_tav_information19 ,
214 p_tav_information20 => p_tav_information20 ,
215 p_inventory_item_id => p_inventory_item_id ,
216 p_organization_id => p_organization_id ,
217 p_rco_id => p_rco_id ,
218 p_version_code => p_version_code ,
219 p_business_group_id => p_business_group_id ,
220 p_activity_version_id => l_activity_version_id ,
221 p_object_version_number => l_object_version_number ,
222 p_data_source => p_data_source
223 ,p_competency_update_level => p_competency_update_level ,
224 p_eres_enabled => p_eres_enabled
225
226 );
227 --
228 -- Set all output arguments
229 --
230 p_activity_version_id := l_activity_version_id;
231 p_object_version_number := l_object_version_number;
232
233 -- Modified for the Bug 7238412
234 if not p_validate then
235 ota_avt_ins.ins_tl
236 (p_effective_date => l_effective_date
237 ,p_language_code => USERENV('LANG')
238 ,p_activity_version_id => p_activity_version_id
239 ,p_version_name => l_version_name
240 ,p_description => p_description
241 ,p_intended_audience => p_intended_audience
242 ,p_objectives => p_objectives
243 ,p_keywords => p_keywords
244 );
245 end if;
246
247
248
249 --
250 --
251 begin
252 ota_activity_version_bk1.create_activity_version_a
253 (
254 p_effective_date => l_effective_date ,
255 p_activity_id => p_activity_id ,
256 p_superseded_by_act_version_id => p_superseded_by_act_version_id ,
257 p_developer_organization_id => p_developer_organization_id ,
258 p_controlling_person_id => p_controlling_person_id ,
259 p_version_name => l_version_name ,
260 p_comments => p_comments ,
261 p_description => p_description ,
262 p_duration => p_duration ,
263 p_duration_units => p_duration_units ,
264 p_end_date => p_end_date ,
265 p_intended_audience => p_intended_audience ,
266 p_language_id => p_language_id ,
267 p_maximum_attendees => p_maximum_attendees ,
268 p_minimum_attendees => p_minimum_attendees ,
269 p_objectives => p_objectives ,
270 p_start_date => p_start_date ,
271 p_success_criteria => p_success_criteria ,
272 p_user_status => p_user_status ,
273 p_vendor_id => p_vendor_id ,
274 p_actual_cost => p_actual_cost ,
275 p_budget_cost => p_budget_cost ,
276 p_budget_currency_code => p_budget_currency_code ,
277 p_expenses_allowed => p_expenses_allowed ,
278 p_professional_credit_type => p_professional_credit_type ,
279 p_professional_credits => p_professional_credits ,
280 p_maximum_internal_attendees => p_maximum_internal_attendees ,
281 p_tav_information_category => p_tav_information_category ,
282 p_tav_information1 => p_tav_information1 ,
283 p_tav_information2 => p_tav_information2 ,
284 p_tav_information3 => p_tav_information3 ,
285 p_tav_information4 => p_tav_information4 ,
286 p_tav_information5 => p_tav_information5 ,
287 p_tav_information6 => p_tav_information6 ,
288 p_tav_information7 => p_tav_information7 ,
289 p_tav_information8 => p_tav_information8 ,
290 p_tav_information9 => p_tav_information9 ,
291 p_tav_information10 => p_tav_information10 ,
292 p_tav_information11 => p_tav_information11 ,
293 p_tav_information12 => p_tav_information12 ,
294 p_tav_information13 => p_tav_information13 ,
295 p_tav_information14 => p_tav_information14 ,
296 p_tav_information15 => p_tav_information15 ,
297 p_tav_information16 => p_tav_information16 ,
298 p_tav_information17 => p_tav_information17 ,
299 p_tav_information18 => p_tav_information18 ,
300 p_tav_information19 => p_tav_information19 ,
301 p_tav_information20 => p_tav_information20 ,
302 p_inventory_item_id => p_inventory_item_id ,
303 p_organization_id => p_organization_id ,
304 p_rco_id => p_rco_id ,
305 p_version_code => p_version_code ,
306 p_business_group_id => p_business_group_id ,
307 p_object_version_number => l_object_version_number ,
308 p_activity_version_id => l_activity_version_id,
309 p_data_source => p_data_source
310 ,p_competency_update_level => p_competency_update_level
311
312 );
313 exception
314 when hr_api.cannot_find_prog_unit then
315 hr_api.cannot_find_prog_unit_error
316 (p_module_name => 'CREATE_ACTIVITY_VERSION'
317 ,p_hook_type => 'AP'
318 );
319 end;
320
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 hr_utility.set_location(' Leaving:'||l_proc, 70);
329 exception
330 when hr_api.validate_enabled then
331 --
332 -- As the Validate_Enabled exception has been raised
333 -- we must rollback to the savepoint
334 --
335 rollback to CREATE_ACTIVITY_VERSION;
336 --
337 -- Only set output warning arguments
338 -- (Any key or derived arguments must be set to null
339 -- when validation only mode is being used.)
340 --
341 p_activity_version_id := null;
342 p_object_version_number := null;
343 hr_utility.set_location(' Leaving:'||l_proc, 80);
344 when others then
345 --
346 -- A validation or unexpected error has occured
347 --
348 rollback to CREATE_ACTIVITY_VERSION;
349 p_activity_version_id := null;
350 p_object_version_number := null;
351 hr_utility.set_location(' Leaving:'||l_proc, 90);
352 raise;
353 end create_activity_version;
354 -- ----------------------------------------------------------------------------
355 -- |-------------------------< UPDATE_ACTIVITY_VERSION >-------------------------|
356 -- ----------------------------------------------------------------------------
357 --
358 procedure update_activity_version
359 (
360 p_effective_date in date ,
361 p_activity_version_id in number,
362 p_activity_id in number ,
363 p_superseded_by_act_version_id in number ,
364 p_developer_organization_id in number ,
365 p_controlling_person_id in number ,
366 p_object_version_number in out nocopy number,
367 p_version_name in varchar2 ,
368 p_comments in varchar2 ,
369 p_description in varchar2 ,
370 p_duration in number ,
371 p_duration_units in varchar2 ,
372 p_end_date in date ,
373 p_intended_audience in varchar2 ,
374 p_language_id in number ,
375 p_maximum_attendees in number ,
376 p_minimum_attendees in number ,
377 p_objectives in varchar2 ,
378 p_start_date in date ,
379 p_success_criteria in varchar2 ,
380 p_user_status in varchar2 ,
381 p_vendor_id in number ,
382 p_actual_cost in number ,
383 p_budget_cost in number ,
384 p_budget_currency_code in varchar2 ,
385 p_expenses_allowed in varchar2 ,
386 p_professional_credit_type in varchar2 ,
387 p_professional_credits in number ,
388 p_maximum_internal_attendees in number ,
389 p_tav_information_category in varchar2 ,
390 p_tav_information1 in varchar2 ,
391 p_tav_information2 in varchar2 ,
392 p_tav_information3 in varchar2 ,
393 p_tav_information4 in varchar2 ,
394 p_tav_information5 in varchar2 ,
395 p_tav_information6 in varchar2 ,
396 p_tav_information7 in varchar2 ,
397 p_tav_information8 in varchar2 ,
398 p_tav_information9 in varchar2 ,
399 p_tav_information10 in varchar2 ,
400 p_tav_information11 in varchar2 ,
401 p_tav_information12 in varchar2 ,
402 p_tav_information13 in varchar2 ,
403 p_tav_information14 in varchar2 ,
404 p_tav_information15 in varchar2 ,
405 p_tav_information16 in varchar2 ,
406 p_tav_information17 in varchar2 ,
407 p_tav_information18 in varchar2 ,
408 p_tav_information19 in varchar2 ,
409 p_tav_information20 in varchar2 ,
410 p_inventory_item_id in number ,
411 p_organization_id in number ,
412 p_rco_id in number ,
413 p_version_code in varchar2 ,
414 p_keywords in varchar2 ,
415 p_business_group_id in number ,
416 p_validate in boolean ,
417 p_data_source in varchar2
418 ,p_competency_update_level in varchar2 ,
419 p_eres_enabled in varchar2
420 ) is
421 --
422 -- Declare cursors and local variables
423 --
424 l_proc varchar2(72) := g_package||' Update Activity Version';
425 l_object_version_number number := p_object_version_number;
426 l_effective_date date;
427 l_version_name ota_activity_versions_tl.version_name%type;
428 begin
429 hr_utility.set_location('Entering:'|| l_proc, 10);
430 --
431 -- Issue a savepoint
432 --
433 savepoint UPDATE_ACTIVITY_VERSION;
434 l_effective_date := trunc(p_effective_date);
435 l_version_name := rtrim(p_version_name);
436 --
437 --
438 begin
439 ota_activity_version_bk2.update_activity_version_b
440 (
441 p_effective_date => l_effective_date ,
442 p_activity_id => p_activity_id ,
443 p_superseded_by_act_version_id => p_superseded_by_act_version_id ,
444 p_developer_organization_id => p_developer_organization_id ,
445 p_controlling_person_id => p_controlling_person_id ,
446 p_version_name => l_version_name ,
447 p_comments => p_comments ,
448 p_description => p_description ,
449 p_duration => p_duration ,
450 p_duration_units => p_duration_units ,
451 p_end_date => p_end_date ,
452 p_intended_audience => p_intended_audience ,
453 p_language_id => p_language_id ,
454 p_maximum_attendees => p_maximum_attendees ,
455 p_minimum_attendees => p_minimum_attendees ,
456 p_objectives => p_objectives ,
457 p_start_date => p_start_date ,
458 p_success_criteria => p_success_criteria ,
459 p_user_status => p_user_status ,
460 p_vendor_id => p_vendor_id ,
461 p_actual_cost => p_actual_cost ,
462 p_budget_cost => p_budget_cost ,
463 p_budget_currency_code => p_budget_currency_code ,
464 p_expenses_allowed => p_expenses_allowed ,
465 p_professional_credit_type => p_professional_credit_type ,
466 p_professional_credits => p_professional_credits ,
467 p_maximum_internal_attendees => p_maximum_internal_attendees ,
468 p_tav_information_category => p_tav_information_category ,
469 p_tav_information1 => p_tav_information1 ,
470 p_tav_information2 => p_tav_information2 ,
471 p_tav_information3 => p_tav_information3 ,
472 p_tav_information4 => p_tav_information4 ,
473 p_tav_information5 => p_tav_information5 ,
474 p_tav_information6 => p_tav_information6 ,
475 p_tav_information7 => p_tav_information7 ,
476 p_tav_information8 => p_tav_information8 ,
477 p_tav_information9 => p_tav_information9 ,
478 p_tav_information10 => p_tav_information10 ,
479 p_tav_information11 => p_tav_information11 ,
480 p_tav_information12 => p_tav_information12 ,
481 p_tav_information13 => p_tav_information13 ,
482 p_tav_information14 => p_tav_information14 ,
483 p_tav_information15 => p_tav_information15 ,
484 p_tav_information16 => p_tav_information16 ,
485 p_tav_information17 => p_tav_information17 ,
486 p_tav_information18 => p_tav_information18 ,
487 p_tav_information19 => p_tav_information19 ,
488 p_tav_information20 => p_tav_information20 ,
489 p_inventory_item_id => p_inventory_item_id ,
490 p_organization_id => p_organization_id ,
491 p_rco_id => p_rco_id ,
492 p_version_code => p_version_code ,
493 p_business_group_id => p_business_group_id ,
494 p_object_version_number => l_object_version_number ,
495 p_activity_version_id => p_activity_version_id,
496 p_data_source => p_data_source
497 ,p_competency_update_level => p_competency_update_level
498
499 );
500 exception
501 when hr_api.cannot_find_prog_unit then
502 hr_api.cannot_find_prog_unit_error
503 (p_module_name => 'UPDATE_ACTIVITY_VERSION'
504 ,p_hook_type => 'BP'
505 );
506 end;
507
508 --
509 -- Process Logic
510 --
511 ota_tav_upd.upd
512 (
513 p_activity_version_id => p_activity_version_id ,
514 p_activity_id => p_activity_id ,
515 p_superseded_by_act_version_id => p_superseded_by_act_version_id ,
516 p_developer_organization_id => p_developer_organization_id ,
517 p_controlling_person_id => p_controlling_person_id ,
518 p_object_version_number => p_object_version_number ,
519 p_version_name => l_version_name ,
520 p_comments => p_comments ,
521 p_description => p_description ,
522 p_duration => p_duration ,
523 p_duration_units => p_duration_units ,
524 p_end_date => p_end_date ,
525 p_intended_audience => p_intended_audience ,
526 p_language_id => p_language_id ,
527 p_maximum_attendees => p_maximum_attendees ,
528 p_minimum_attendees => p_minimum_attendees ,
529 p_objectives => p_objectives ,
530 p_start_date => p_start_date ,
531 p_success_criteria => p_success_criteria ,
532 p_user_status => p_user_status ,
533 p_vendor_id => p_vendor_id ,
534 p_actual_cost => p_actual_cost ,
535 p_budget_cost => p_budget_cost ,
536 p_budget_currency_code => p_budget_currency_code ,
537 p_expenses_allowed => p_expenses_allowed ,
538 p_professional_credit_type => p_professional_credit_type ,
539 p_professional_credits => p_professional_credits ,
540 p_maximum_internal_attendees => p_maximum_internal_attendees ,
541 p_tav_information_category => p_tav_information_category ,
542 p_tav_information1 => p_tav_information1 ,
543 p_tav_information2 => p_tav_information2 ,
544 p_tav_information3 => p_tav_information3 ,
545 p_tav_information4 => p_tav_information4 ,
546 p_tav_information5 => p_tav_information5 ,
547 p_tav_information6 => p_tav_information6 ,
548 p_tav_information7 => p_tav_information7 ,
549 p_tav_information8 => p_tav_information8 ,
550 p_tav_information9 => p_tav_information9 ,
551 p_tav_information10 => p_tav_information10 ,
552 p_tav_information11 => p_tav_information11 ,
553 p_tav_information12 => p_tav_information12 ,
554 p_tav_information13 => p_tav_information13 ,
555 p_tav_information14 => p_tav_information14 ,
556 p_tav_information15 => p_tav_information15 ,
557 p_tav_information16 => p_tav_information16 ,
558 p_tav_information17 => p_tav_information17 ,
559 p_tav_information18 => p_tav_information18 ,
560 p_tav_information19 => p_tav_information19 ,
561 p_tav_information20 => p_tav_information20 ,
562 p_inventory_item_id => p_inventory_item_id ,
563 p_organization_id => p_organization_id ,
564 p_rco_id => p_rco_id ,
565 p_version_code => p_version_code ,
566 p_business_group_id => p_business_group_id ,
567 p_validate => p_validate ,
568 p_data_source => p_data_source
569 ,p_competency_update_level => p_competency_update_level ,
570 p_eres_enabled => p_eres_enabled
571
572 );
573 ota_avt_upd.upd_tl
574 (p_effective_date => l_effective_date
575 ,p_language_code => USERENV('LANG')
576 ,p_activity_version_id => p_activity_version_id
577 ,p_version_name => l_version_name
578 ,p_description => p_description
579 ,p_intended_audience => p_intended_audience
580 ,p_objectives => p_objectives
581 ,p_keywords => p_keywords
582 );
583
584 --
585 --
586 begin
587 ota_activity_version_bk2.update_activity_version_a
588 (
589 p_effective_date => l_effective_date ,
590 p_activity_id => p_activity_id ,
591 p_superseded_by_act_version_id => p_superseded_by_act_version_id ,
592 p_developer_organization_id => p_developer_organization_id ,
593 p_controlling_person_id => p_controlling_person_id ,
594 p_version_name => l_version_name ,
595 p_comments => p_comments ,
596 p_description => p_description ,
597 p_duration => p_duration ,
598 p_duration_units => p_duration_units ,
599 p_end_date => p_end_date ,
600 p_intended_audience => p_intended_audience ,
601 p_language_id => p_language_id ,
602 p_maximum_attendees => p_maximum_attendees ,
603 p_minimum_attendees => p_minimum_attendees ,
604 p_objectives => p_objectives ,
605 p_start_date => p_start_date ,
606 p_success_criteria => p_success_criteria ,
607 p_user_status => p_user_status ,
608 p_vendor_id => p_vendor_id ,
609 p_actual_cost => p_actual_cost ,
610 p_budget_cost => p_budget_cost ,
611 p_budget_currency_code => p_budget_currency_code ,
612 p_expenses_allowed => p_expenses_allowed ,
613 p_professional_credit_type => p_professional_credit_type ,
614 p_professional_credits => p_professional_credits ,
615 p_maximum_internal_attendees => p_maximum_internal_attendees ,
616 p_tav_information_category => p_tav_information_category ,
617 p_tav_information1 => p_tav_information1 ,
618 p_tav_information2 => p_tav_information2 ,
619 p_tav_information3 => p_tav_information3 ,
620 p_tav_information4 => p_tav_information4 ,
621 p_tav_information5 => p_tav_information5 ,
622 p_tav_information6 => p_tav_information6 ,
623 p_tav_information7 => p_tav_information7 ,
624 p_tav_information8 => p_tav_information8 ,
625 p_tav_information9 => p_tav_information9 ,
626 p_tav_information10 => p_tav_information10 ,
627 p_tav_information11 => p_tav_information11 ,
628 p_tav_information12 => p_tav_information12 ,
629 p_tav_information13 => p_tav_information13 ,
630 p_tav_information14 => p_tav_information14 ,
631 p_tav_information15 => p_tav_information15 ,
632 p_tav_information16 => p_tav_information16 ,
633 p_tav_information17 => p_tav_information17 ,
634 p_tav_information18 => p_tav_information18 ,
635 p_tav_information19 => p_tav_information19 ,
636 p_tav_information20 => p_tav_information20 ,
637 p_inventory_item_id => p_inventory_item_id ,
638 p_organization_id => p_organization_id ,
639 p_rco_id => p_rco_id ,
640 p_version_code => p_version_code ,
641 p_business_group_id => p_business_group_id ,
642 p_object_version_number => l_object_version_number ,
643 p_activity_version_id => p_activity_version_id,
644 p_data_source => p_data_source
645 ,p_competency_update_level => p_competency_update_level
646
647
648 );
649 exception
650 when hr_api.cannot_find_prog_unit then
651 hr_api.cannot_find_prog_unit_error
652 (p_module_name => 'UPDATE_ACTIVITY_VERSION'
653 ,p_hook_type => 'AP'
654 );
655 end;
656
657 --
658 --
659 -- When in validation only mode raise the Validate_Enabled exception
660 --
661 if p_validate then
662 raise hr_api.validate_enabled;
663 end if;
664 --
665 -- Set all output arguments
666 --
667 hr_utility.set_location(' Leaving:'||l_proc, 70);
668 exception
669 when hr_api.validate_enabled then
670 --
671 -- As the Validate_Enabled exception has been raised
672 -- we must rollback to the savepoint
673 --
674 rollback to UPDATE_ACTIVITY_VERSION;
675 --
676 -- Only set output warning arguments
677 -- (Any key or derived arguments must be set to null
678 -- when validation only mode is being used.)
679 --
680 p_object_version_number := null;
681 hr_utility.set_location(' Leaving:'||l_proc, 80);
682 when others then
683 --
684 -- A validation or unexpected error has occured
685 --
686 rollback to UPDATE_ACTIVITY_VERSION;
687 p_object_version_number := l_object_version_number;
688 hr_utility.set_location(' Leaving:'||l_proc, 90);
689 raise;
690 end update_activity_version;
691 --
692 -- ----------------------------------------------------------------------------
693 -- |-------------------------< DELETE_ACTIVITY_VERSION >-------------------|
694 -- ----------------------------------------------------------------------------
695 --
696 procedure delete_activity_version
697 (
698 p_activity_version_id in number,
699 p_object_version_number in number,
700 p_validate in boolean
701 ) is
702 --
703 -- Declare cursors and local variables
704 --
705
706 CURSOR cur_act_cat is
707 select
708 aci.category_usage_id,
709 aci.primary_flag,
710 aci.activity_category,
711 aci.object_version_number
712 From
713 ota_act_cat_inclusions aci
714 where
715 aci.activity_version_id = p_activity_version_id;
716 CURSOR c_prereq_courses is
717 select
718 cpr.activity_version_id,
719 cpr.prerequisite_course_id,
720 cpr.object_version_number
721 From
722 ota_course_prerequisites cpr
723 where
724 cpr.activity_version_id = p_activity_version_id
725 or cpr.prerequisite_course_id = p_activity_version_id;
726 --
727
728 --
729 l_proc varchar2(72) := g_package||' Delete Activity Version';
730 l_tmp_ovn ota_act_cat_inclusions.object_version_number%type;
731 --
732 --
733 begin
734 hr_utility.set_location('Entering:'|| l_proc, 10);
735 --
736 -- Issue a savepoint
737 --
738 savepoint DELETE_ACTIVITY_VERSION;
739 --
740 -- Truncate the time portion from all IN date parameters
741 --
742 begin
743 ota_activity_version_bk3.delete_activity_version_b
744 (p_activity_version_id => p_activity_version_id
745 ,p_object_version_number => p_object_version_number
746 );
747 exception
748 when hr_api.cannot_find_prog_unit then
749 hr_api.cannot_find_prog_unit_error
750 (p_module_name => 'DELETE_ACTIVITY_VERSION'
751 ,p_hook_type => 'BP'
752 );
753 end ;
754 --
755 -- Process Logic
756 --
757 ota_tav_shd.lck
758 (p_activity_version_id => p_activity_version_id
759 ,p_object_version_number => p_object_version_number
760 );
761
762 --OPEN cur_act_cat;
763 FOR act_cat in cur_act_cat
764 LOOP
765 l_tmp_ovn := act_cat.object_version_number;
766
767 IF act_cat.primary_flag = 'Y' THEN
768 ota_activity_category_api.update_act_cat_inclusion
769 (p_validate => false
770 ,p_effective_date => sysdate
771 ,p_category_usage_id => act_cat.category_usage_id
772 ,p_activity_version_id => p_activity_version_id
773 ,p_primary_flag => 'N'
774 ,p_activity_category => act_cat.activity_category
775 ,p_object_version_number => l_tmp_ovn
776 );
777 END IF;
778 ota_activity_category_api.delete_act_cat_inclusion
779 (p_category_usage_id => act_cat.category_usage_id
780 ,p_activity_version_id => p_activity_version_id
781 ,p_object_version_number => l_tmp_ovn
782 );
783
784 END LOOP;
785
786 --Delete the prereq courses
787 FOR prereq_courses in c_prereq_courses
788 LOOP
789 ota_course_prerequisite_api.delete_course_prerequisite
790 (p_activity_version_id => prereq_courses.activity_version_id
791 ,p_prerequisite_course_id => prereq_courses.prerequisite_course_id
792 ,p_object_version_number => prereq_courses.object_version_number);
793 END LOOP;
794
795 ota_avt_del.del_tl
796 (p_activity_version_id => p_activity_version_id
797 );
798 ota_tav_del.del
799 (
800 p_activity_version_id => p_activity_version_id ,
801 p_object_version_number => p_object_version_number ,
802 p_validate => p_validate
803 );
804
805 --
806 -- When in validation only mode raise the Validate_Enabled exception
807 --
808
809 begin
810 ota_activity_version_bk3.delete_activity_version_a
811 (p_activity_version_id => p_activity_version_id ,
812 p_object_version_number => p_object_version_number
813 );
814 exception
815 when hr_api.cannot_find_prog_unit then
816 hr_api.cannot_find_prog_unit_error
817 (p_module_name => 'DELETE_ACTIVITY_VERSION'
818 ,p_hook_type => 'AP'
819 );
820 end;
821 --
822 --
823 if p_validate then
824 raise hr_api.validate_enabled;
825 end if;
826 --
827 -- Set all output arguments
828 --
829 --
830 hr_utility.set_location(' Leaving:'||l_proc, 170);
831 exception
832 when hr_api.validate_enabled then
833 --
834 -- As the Validate_Enabled exception has been raised
835 -- we must rollback to the savepoint
836 --
837 rollback to DELETE_ACTIVITY_VERSION;
838 --
839 -- Only set output warning arguments
840 -- (Any key or derived arguments must be set to null
841 -- when validation only mode is being used.)
842 --
843 hr_utility.set_location(' Leaving:'||l_proc, 180);
844 when others then
845 --
846 -- A validation or unexpected error has occured
847 --
848 rollback to DELETE_ACTIVITY_VERSION;
849 hr_utility.set_location(' Leaving:'||l_proc, 190);
850 raise;
851 end delete_activity_version;
852 --
853 end ota_activity_version_api;
854