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: --
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
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.
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
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: --
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 >--------------------------|
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;
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
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.
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
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: --
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 >--------------------------|
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: --
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
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.
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
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: --
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;