[Home] [Help]
PACKAGE BODY: APPS.PER_TASKS_IN_CHECKLIST_SWI
Source
1 Package Body per_tasks_in_checklist_swi As
2 /* $Header: pectkswi.pkb 120.1 2005/10/14 12:00 tpapired noship $ */
3 --
4 -- Package variables
5 --
6 g_package varchar2(33) := 'per_tasks_in_checklist_swi.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |--------------------------< create_task_in_ckl >--------------------------|
10 -- ----------------------------------------------------------------------------
11 PROCEDURE create_task_in_ckl
12 (p_validate in number default hr_api.g_false_num
13 ,p_effective_date in date
14 ,p_checklist_id in number
15 ,p_checklist_task_name in varchar2
16 ,p_eligibility_object_id in number default null
17 ,p_eligibility_profile_id in number default null
18 ,p_ame_attribute_identifier in varchar2 default null
19 ,p_description in varchar2 default null
20 ,p_task_sequence in number default null
21 ,p_mandatory in varchar2 default null
22 ,p_target_duration in number default null
23 ,p_target_duration_uom in varchar2 default null
24 ,p_action_url in varchar2 default null
25 ,p_attribute_category in varchar2 default null
26 ,p_attribute1 in varchar2 default null
27 ,p_attribute2 in varchar2 default null
28 ,p_attribute3 in varchar2 default null
29 ,p_attribute4 in varchar2 default null
30 ,p_attribute5 in varchar2 default null
31 ,p_attribute6 in varchar2 default null
32 ,p_attribute7 in varchar2 default null
33 ,p_attribute8 in varchar2 default null
34 ,p_attribute9 in varchar2 default null
35 ,p_attribute10 in varchar2 default null
36 ,p_attribute11 in varchar2 default null
37 ,p_attribute12 in varchar2 default null
38 ,p_attribute13 in varchar2 default null
39 ,p_attribute14 in varchar2 default null
40 ,p_attribute15 in varchar2 default null
41 ,p_attribute16 in varchar2 default null
42 ,p_attribute17 in varchar2 default null
43 ,p_attribute18 in varchar2 default null
44 ,p_attribute19 in varchar2 default null
45 ,p_attribute20 in varchar2 default null
46 ,p_information_category in varchar2 default null
47 ,p_information1 in varchar2 default null
48 ,p_information2 in varchar2 default null
49 ,p_information3 in varchar2 default null
50 ,p_information4 in varchar2 default null
51 ,p_information5 in varchar2 default null
52 ,p_information6 in varchar2 default null
53 ,p_information7 in varchar2 default null
54 ,p_information8 in varchar2 default null
55 ,p_information9 in varchar2 default null
56 ,p_information10 in varchar2 default null
57 ,p_information11 in varchar2 default null
58 ,p_information12 in varchar2 default null
59 ,p_information13 in varchar2 default null
60 ,p_information14 in varchar2 default null
61 ,p_information15 in varchar2 default null
62 ,p_information16 in varchar2 default null
63 ,p_information17 in varchar2 default null
64 ,p_information18 in varchar2 default null
65 ,p_information19 in varchar2 default null
66 ,p_information20 in varchar2 default null
67 ,p_task_in_checklist_id in number
68 ,p_object_version_number out nocopy number
69 ,p_return_status out nocopy varchar2
70 ) is
71 --
72 -- Variables for API Boolean parameters
73 l_validate boolean;
74 --
75 -- Variables for IN/OUT parameters
76 --
77 -- Other variables
78 l_task_in_checklist_id number;
79 l_proc varchar2(72) := g_package ||'create_task_in_ckl';
80 Begin
81 hr_utility.set_location(' Entering:' || l_proc,10);
82 --
83 -- Issue a savepoint
84 --
85 savepoint create_task_in_ckl_swi;
86 --
87 -- Initialise Multiple Message Detection
88 --
89 hr_multi_message.enable_message_list;
90 --
91 -- Remember IN OUT parameter IN values
92 --
93 --
94 -- Convert constant values to their corresponding boolean value
95 --
96 l_validate :=
97 hr_api.constant_to_boolean
98 (p_constant_value => p_validate);
99 --
100 -- Register Surrogate ID or user key values
101 --
102 hr_utility.set_location(' Entering:' || l_proc,11);
103 per_ctk_ins.set_base_key_value
104 (p_task_in_checklist_id => p_task_in_checklist_id
105 );
106 hr_utility.set_location(' Entering:' || l_proc,12);
107 --
108 -- Call API
109 --
110 per_tasks_in_checklist_api.create_task_in_ckl
111 (p_validate => l_validate
112 ,p_effective_date => p_effective_date
113 ,p_checklist_id => p_checklist_id
114 ,p_checklist_task_name => p_checklist_task_name
115 ,p_eligibility_object_id => p_eligibility_object_id
116 ,p_eligibility_profile_id => p_eligibility_profile_id
117 ,p_ame_attribute_identifier => p_ame_attribute_identifier
118 ,p_description => p_description
119 ,p_task_sequence => p_task_sequence
120 ,p_mandatory => p_mandatory
121 ,p_target_duration => p_target_duration
122 ,p_target_duration_uom => p_target_duration_uom
123 ,p_action_url => p_action_url
124 ,p_attribute_category => p_attribute_category
125 ,p_attribute1 => p_attribute1
126 ,p_attribute2 => p_attribute2
127 ,p_attribute3 => p_attribute3
128 ,p_attribute4 => p_attribute4
129 ,p_attribute5 => p_attribute5
130 ,p_attribute6 => p_attribute6
131 ,p_attribute7 => p_attribute7
132 ,p_attribute8 => p_attribute8
133 ,p_attribute9 => p_attribute9
134 ,p_attribute10 => p_attribute10
135 ,p_attribute11 => p_attribute11
136 ,p_attribute12 => p_attribute12
137 ,p_attribute13 => p_attribute13
138 ,p_attribute14 => p_attribute14
139 ,p_attribute15 => p_attribute15
140 ,p_attribute16 => p_attribute16
141 ,p_attribute17 => p_attribute17
142 ,p_attribute18 => p_attribute18
143 ,p_attribute19 => p_attribute19
144 ,p_attribute20 => p_attribute20
145 ,p_information_category => p_information_category
146 ,p_information1 => p_information1
147 ,p_information2 => p_information2
148 ,p_information3 => p_information3
149 ,p_information4 => p_information4
150 ,p_information5 => p_information5
151 ,p_information6 => p_information6
152 ,p_information7 => p_information7
153 ,p_information8 => p_information8
154 ,p_information9 => p_information9
155 ,p_information10 => p_information10
156 ,p_information11 => p_information11
157 ,p_information12 => p_information12
158 ,p_information13 => p_information13
159 ,p_information14 => p_information14
160 ,p_information15 => p_information15
161 ,p_information16 => p_information16
162 ,p_information17 => p_information17
163 ,p_information18 => p_information18
164 ,p_information19 => p_information19
165 ,p_information20 => p_information20
166 ,p_task_in_checklist_id => l_task_in_checklist_id
167 ,p_object_version_number => p_object_version_number
168 );
169 hr_utility.set_location(' Entering:' || l_proc,15);
170 --
171 -- Convert API warning boolean parameter values to specific
172 -- messages and add them to Multiple Message List
173 --
174 --
175 -- Convert API non-warning boolean parameter values
176 --
177 --
178 -- Derive the API return status value based on whether
179 -- messages of any type exist in the Multiple Message List.
180 -- Also disable Multiple Message Detection.
181 --
182 p_return_status := hr_multi_message.get_return_status_disable;
183 hr_utility.set_location(' Leaving:' || l_proc,20);
184 --
185 exception
186 when hr_multi_message.error_message_exist then
187 --
188 -- Catch the Multiple Message List exception which
189 -- indicates API processing has been aborted because
190 -- at least one message exists in the list.
191 --
192 rollback to create_task_in_ckl_swi;
193 --
194 -- Reset IN OUT parameters and set OUT parameters
195 --
196 p_object_version_number := null;
197 p_return_status := hr_multi_message.get_return_status_disable;
198 hr_utility.set_location(' Leaving:' || l_proc, 30);
199 when others then
200 --
201 -- When Multiple Message Detection is enabled catch
202 -- any Application specific or other unexpected
203 -- exceptions. Adding appropriate details to the
204 -- Multiple Message List. Otherwise re-raise the
205 -- error.
206 --
207 rollback to create_task_in_ckl_swi;
208 if hr_multi_message.unexpected_error_add(l_proc) then
209 hr_utility.set_location(' Leaving:' || l_proc,40);
210 raise;
211 end if;
212 --
213 -- Reset IN OUT and set OUT parameters
214 --
215 p_object_version_number := null;
216 p_return_status := hr_multi_message.get_return_status_disable;
217 hr_utility.set_location(' Leaving:' || l_proc,50);
218 end create_task_in_ckl;
219 -- ----------------------------------------------------------------------------
220 -- |--------------------------< update_task_in_ckl >--------------------------|
221 -- ----------------------------------------------------------------------------
222 PROCEDURE update_task_in_ckl
223 (p_validate in number default hr_api.g_false_num
224 ,p_effective_date in date
225 ,p_task_in_checklist_id in number
226 ,p_checklist_id in number
227 ,p_checklist_task_name in varchar2
228 ,p_eligibility_object_id in number default hr_api.g_number
229 ,p_eligibility_profile_id in number default hr_api.g_number
230 ,p_ame_attribute_identifier in varchar2 default hr_api.g_varchar2
231 ,p_description in varchar2 default hr_api.g_varchar2
232 ,p_task_sequence in number default hr_api.g_number
233 ,p_mandatory in varchar2 default hr_api.g_varchar2
234 ,p_target_duration in number default hr_api.g_number
235 ,p_target_duration_uom in varchar2 default hr_api.g_varchar2
236 ,p_action_url in varchar2 default hr_api.g_varchar2
237 ,p_attribute_category in varchar2 default hr_api.g_varchar2
238 ,p_attribute1 in varchar2 default hr_api.g_varchar2
239 ,p_attribute2 in varchar2 default hr_api.g_varchar2
240 ,p_attribute3 in varchar2 default hr_api.g_varchar2
241 ,p_attribute4 in varchar2 default hr_api.g_varchar2
242 ,p_attribute5 in varchar2 default hr_api.g_varchar2
243 ,p_attribute6 in varchar2 default hr_api.g_varchar2
244 ,p_attribute7 in varchar2 default hr_api.g_varchar2
245 ,p_attribute8 in varchar2 default hr_api.g_varchar2
246 ,p_attribute9 in varchar2 default hr_api.g_varchar2
247 ,p_attribute10 in varchar2 default hr_api.g_varchar2
248 ,p_attribute11 in varchar2 default hr_api.g_varchar2
249 ,p_attribute12 in varchar2 default hr_api.g_varchar2
250 ,p_attribute13 in varchar2 default hr_api.g_varchar2
251 ,p_attribute14 in varchar2 default hr_api.g_varchar2
252 ,p_attribute15 in varchar2 default hr_api.g_varchar2
253 ,p_attribute16 in varchar2 default hr_api.g_varchar2
254 ,p_attribute17 in varchar2 default hr_api.g_varchar2
255 ,p_attribute18 in varchar2 default hr_api.g_varchar2
256 ,p_attribute19 in varchar2 default hr_api.g_varchar2
257 ,p_attribute20 in varchar2 default hr_api.g_varchar2
258 ,p_information_category in varchar2 default hr_api.g_varchar2
259 ,p_information1 in varchar2 default hr_api.g_varchar2
260 ,p_information2 in varchar2 default hr_api.g_varchar2
261 ,p_information3 in varchar2 default hr_api.g_varchar2
262 ,p_information4 in varchar2 default hr_api.g_varchar2
263 ,p_information5 in varchar2 default hr_api.g_varchar2
264 ,p_information6 in varchar2 default hr_api.g_varchar2
265 ,p_information7 in varchar2 default hr_api.g_varchar2
266 ,p_information8 in varchar2 default hr_api.g_varchar2
267 ,p_information9 in varchar2 default hr_api.g_varchar2
268 ,p_information10 in varchar2 default hr_api.g_varchar2
269 ,p_information11 in varchar2 default hr_api.g_varchar2
270 ,p_information12 in varchar2 default hr_api.g_varchar2
271 ,p_information13 in varchar2 default hr_api.g_varchar2
272 ,p_information14 in varchar2 default hr_api.g_varchar2
273 ,p_information15 in varchar2 default hr_api.g_varchar2
274 ,p_information16 in varchar2 default hr_api.g_varchar2
275 ,p_information17 in varchar2 default hr_api.g_varchar2
276 ,p_information18 in varchar2 default hr_api.g_varchar2
277 ,p_information19 in varchar2 default hr_api.g_varchar2
278 ,p_information20 in varchar2 default hr_api.g_varchar2
279 ,p_object_version_number in out nocopy number
280 ,p_return_status out nocopy varchar2
281 ) is
282 --
283 -- Variables for API Boolean parameters
284 l_validate boolean;
285 --
286 -- Variables for IN/OUT parameters
287 l_object_version_number number;
288 --
289 -- Other variables
290 l_proc varchar2(72) := g_package ||'update_task_in_ckl';
291 Begin
292 hr_utility.set_location(' Entering:' || l_proc,10);
293 --
294 -- Issue a savepoint
295 --
296 savepoint update_task_in_ckl_swi;
297 --
298 -- Initialise Multiple Message Detection
299 --
300 hr_multi_message.enable_message_list;
301 --
302 -- Remember IN OUT parameter IN values
303 --
304 l_object_version_number := p_object_version_number;
305 --
306 -- Convert constant values to their corresponding boolean value
307 --
308 l_validate :=
309 hr_api.constant_to_boolean
310 (p_constant_value => p_validate);
311 --
312 -- Register Surrogate ID or user key values
313 --
314 --
315 -- Call API
316 --
317 per_tasks_in_checklist_api.update_task_in_ckl
318 (p_validate => l_validate
319 ,p_effective_date => p_effective_date
320 ,p_task_in_checklist_id => p_task_in_checklist_id
321 ,p_checklist_id => p_checklist_id
322 ,p_checklist_task_name => p_checklist_task_name
323 ,p_eligibility_object_id => p_eligibility_object_id
324 ,p_eligibility_profile_id => p_eligibility_profile_id
325 ,p_ame_attribute_identifier => p_ame_attribute_identifier
326 ,p_description => p_description
327 ,p_task_sequence => p_task_sequence
328 ,p_mandatory => p_mandatory
329 ,p_target_duration => p_target_duration
330 ,p_target_duration_uom => p_target_duration_uom
331 ,p_action_url => p_action_url
332 ,p_attribute_category => p_attribute_category
333 ,p_attribute1 => p_attribute1
334 ,p_attribute2 => p_attribute2
335 ,p_attribute3 => p_attribute3
336 ,p_attribute4 => p_attribute4
337 ,p_attribute5 => p_attribute5
338 ,p_attribute6 => p_attribute6
339 ,p_attribute7 => p_attribute7
340 ,p_attribute8 => p_attribute8
341 ,p_attribute9 => p_attribute9
342 ,p_attribute10 => p_attribute10
343 ,p_attribute11 => p_attribute11
344 ,p_attribute12 => p_attribute12
345 ,p_attribute13 => p_attribute13
346 ,p_attribute14 => p_attribute14
347 ,p_attribute15 => p_attribute15
348 ,p_attribute16 => p_attribute16
349 ,p_attribute17 => p_attribute17
350 ,p_attribute18 => p_attribute18
351 ,p_attribute19 => p_attribute19
352 ,p_attribute20 => p_attribute20
353 ,p_information_category => p_information_category
354 ,p_information1 => p_information1
355 ,p_information2 => p_information2
356 ,p_information3 => p_information3
357 ,p_information4 => p_information4
358 ,p_information5 => p_information5
359 ,p_information6 => p_information6
360 ,p_information7 => p_information7
361 ,p_information8 => p_information8
362 ,p_information9 => p_information9
363 ,p_information10 => p_information10
364 ,p_information11 => p_information11
365 ,p_information12 => p_information12
366 ,p_information13 => p_information13
367 ,p_information14 => p_information14
368 ,p_information15 => p_information15
369 ,p_information16 => p_information16
370 ,p_information17 => p_information17
371 ,p_information18 => p_information18
372 ,p_information19 => p_information19
373 ,p_information20 => p_information20
374 ,p_object_version_number => p_object_version_number
375 );
376 --
377 -- Convert API warning boolean parameter values to specific
378 -- messages and add them to Multiple Message List
379 --
380 --
381 -- Convert API non-warning boolean parameter values
382 --
383 --
384 -- Derive the API return status value based on whether
385 -- messages of any type exist in the Multiple Message List.
386 -- Also disable Multiple Message Detection.
387 --
388 p_return_status := hr_multi_message.get_return_status_disable;
389 hr_utility.set_location(' Leaving:' || l_proc,20);
390 --
391 exception
392 when hr_multi_message.error_message_exist then
393 --
394 -- Catch the Multiple Message List exception which
395 -- indicates API processing has been aborted because
396 -- at least one message exists in the list.
397 --
398 rollback to update_task_in_ckl_swi;
399 --
400 -- Reset IN OUT parameters and set OUT parameters
401 --
402 p_object_version_number := l_object_version_number;
403 p_return_status := hr_multi_message.get_return_status_disable;
404 hr_utility.set_location(' Leaving:' || l_proc, 30);
405 when others then
406 --
407 -- When Multiple Message Detection is enabled catch
408 -- any Application specific or other unexpected
409 -- exceptions. Adding appropriate details to the
410 -- Multiple Message List. Otherwise re-raise the
411 -- error.
412 --
413 rollback to update_task_in_ckl_swi;
414 if hr_multi_message.unexpected_error_add(l_proc) then
415 hr_utility.set_location(' Leaving:' || l_proc,40);
416 raise;
417 end if;
418 --
419 -- Reset IN OUT and set OUT parameters
420 --
421 p_object_version_number := l_object_version_number;
422 p_return_status := hr_multi_message.get_return_status_disable;
423 hr_utility.set_location(' Leaving:' || l_proc,50);
424 end update_task_in_ckl;
425 -- ----------------------------------------------------------------------------
426 -- |--------------------------< delete_task_in_ckl >--------------------------|
427 -- ----------------------------------------------------------------------------
428 PROCEDURE delete_task_in_ckl
429 (p_validate in number default hr_api.g_false_num
430 ,p_task_in_checklist_id in number
431 ,p_object_version_number in number
432 ,p_return_status out nocopy varchar2
433 ) is
434 --
435 -- Variables for API Boolean parameters
436 l_validate boolean;
437 --
438 -- Variables for IN/OUT parameters
439 --
440 -- Other variables
441 l_proc varchar2(72) := g_package ||'delete_task_in_ckl';
442 Begin
443 hr_utility.set_location(' Entering:' || l_proc,10);
444 --
445 -- Issue a savepoint
446 --
447 savepoint delete_task_in_ckl_swi;
448 --
449 -- Initialise Multiple Message Detection
450 --
451 hr_multi_message.enable_message_list;
452 --
453 -- Remember IN OUT parameter IN values
454 --
455 --
456 -- Convert constant values to their corresponding boolean value
457 --
458 l_validate :=
459 hr_api.constant_to_boolean
460 (p_constant_value => p_validate);
461 --
462 -- Register Surrogate ID or user key values
463 --
464 --
465 -- Call API
466 --
467 per_tasks_in_checklist_api.delete_task_in_ckl
468 (p_validate => l_validate
469 ,p_task_in_checklist_id => p_task_in_checklist_id
470 ,p_object_version_number => p_object_version_number
471 );
472 --
473 -- Convert API warning boolean parameter values to specific
474 -- messages and add them to Multiple Message List
475 --
476 --
477 -- Convert API non-warning boolean parameter values
478 --
479 --
480 -- Derive the API return status value based on whether
481 -- messages of any type exist in the Multiple Message List.
482 -- Also disable Multiple Message Detection.
483 --
484 p_return_status := hr_multi_message.get_return_status_disable;
485 hr_utility.set_location(' Leaving:' || l_proc,20);
486 --
487 exception
488 when hr_multi_message.error_message_exist then
489 --
490 -- Catch the Multiple Message List exception which
491 -- indicates API processing has been aborted because
492 -- at least one message exists in the list.
493 --
494 rollback to delete_task_in_ckl_swi;
495 --
496 -- Reset IN OUT parameters and set OUT parameters
497 --
498 p_return_status := hr_multi_message.get_return_status_disable;
499 hr_utility.set_location(' Leaving:' || l_proc, 30);
500 when others then
501 --
502 -- When Multiple Message Detection is enabled catch
503 -- any Application specific or other unexpected
504 -- exceptions. Adding appropriate details to the
505 -- Multiple Message List. Otherwise re-raise the
506 -- error.
507 --
508 rollback to delete_task_in_ckl_swi;
509 if hr_multi_message.unexpected_error_add(l_proc) then
510 hr_utility.set_location(' Leaving:' || l_proc,40);
511 raise;
512 end if;
513 --
514 -- Reset IN OUT and set OUT parameters
515 --
516 p_return_status := hr_multi_message.get_return_status_disable;
517 hr_utility.set_location(' Leaving:' || l_proc,50);
518 end delete_task_in_ckl;
519 end per_tasks_in_checklist_swi;