73: savepoint create_or_update_phone_swi;
74: --
75: -- Initialise Multiple Message Detection
76: --
77: hr_multi_message.enable_message_list;
78: --
79: -- Remember IN OUT parameter IN values
80: --
81: l_phone_id := p_phone_id;
149: -- Derive the API return status value based on whether
150: -- messages of any type exist in the Multiple Message List.
151: -- Also disable Multiple Message Detection.
152: --
153: p_return_status := hr_multi_message.get_return_status_disable;
154: hr_utility.set_location(' Leaving:' || l_proc,20);
155: --
156: exception
157: when hr_multi_message.error_message_exist then
153: p_return_status := hr_multi_message.get_return_status_disable;
154: hr_utility.set_location(' Leaving:' || l_proc,20);
155: --
156: exception
157: when hr_multi_message.error_message_exist then
158: --
159: -- Catch the Multiple Message List exception which
160: -- indicates API processing has been aborted because
161: -- at least one error message exists in the list.
165: -- Reset IN OUT paramters and set OUT parameters
166: --
167: p_phone_id := l_phone_id;
168: p_object_version_number := l_object_version_number;
169: p_return_status := hr_multi_message.get_return_status_disable;
170: hr_utility.set_location(' Leaving:' || l_proc,30);
171: when others then
172: --
173: -- When Multiple Message Detection is enabled catch
176: -- Multiple Message List. Otherwise re-raise
177: -- the error.
178: --
179: rollback to create_or_update_phone_swi;
180: if hr_multi_message.unexpected_error_add(l_proc) then
181: hr_utility.set_location(' Leaving:' || l_proc, 40);
182: raise;
183: end if;
184: --
185: -- Reset IN OUT parameters and set OUT parameters
186: --
187: p_phone_id := l_phone_id;
188: p_object_version_number := l_object_version_number;
189: p_return_status := hr_multi_message.get_return_status_disable;
190: hr_utility.set_location(' Leaving: ' || l_proc, 50);
191: end create_or_update_phone;
192: -- ----------------------------------------------------------------------------
193: -- |-----------------------------< create_phone >-----------------------------|
255: savepoint create_phone_swi;
256: --
257: -- Initialise Multiple Message Detection
258: --
259: hr_multi_message.enable_message_list;
260: --
261: -- Remember IN OUT parameter IN values
262: --
263: --
331: -- Derive the API return status value based on whether
332: -- messages of any type exist in the Multiple Message List.
333: -- Also disable Multiple Message Detection.
334: --
335: p_return_status := hr_multi_message.get_return_status_disable;
336: hr_utility.set_location(' Leaving:' || l_proc,20);
337: --
338: exception
339: when hr_multi_message.error_message_exist then
335: p_return_status := hr_multi_message.get_return_status_disable;
336: hr_utility.set_location(' Leaving:' || l_proc,20);
337: --
338: exception
339: when hr_multi_message.error_message_exist then
340: --
341: -- Catch the Multiple Message List exception which
342: -- indicates API processing has been aborted because
343: -- at least one error message exists in the list.
346: --
347: -- Reset IN OUT paramters and set OUT parameters
348: --
349: p_object_version_number := null;
350: p_return_status := hr_multi_message.get_return_status_disable;
351: hr_utility.set_location(' Leaving:' || l_proc,30);
352: when others then
353: --
354: -- When Multiple Message Detection is enabled catch
357: -- Multiple Message List. Otherwise re-raise
358: -- the error.
359: --
360: rollback to create_phone_swi;
361: if hr_multi_message.unexpected_error_add(l_proc) then
362: hr_utility.set_location(' Leaving:' || l_proc, 40);
363: raise;
364: end if;
365: --
365: --
366: -- Reset IN OUT parameters and set OUT parameters
367: --
368: p_object_version_number := null;
369: p_return_status := hr_multi_message.get_return_status_disable;
370: hr_utility.set_location(' Leaving: ' || l_proc, 50);
371: end create_phone;
372: -- ----------------------------------------------------------------------------
373: -- |-----------------------------< delete_phone >-----------------------------|
394: savepoint delete_phone_swi;
395: --
396: -- Initialise Multiple Message Detection
397: --
398: hr_multi_message.enable_message_list;
399: --
400: -- Remember IN OUT parameter IN values
401: --
402: --
427: -- Derive the API return status value based on whether
428: -- messages of any type exist in the Multiple Message List.
429: -- Also disable Multiple Message Detection.
430: --
431: p_return_status := hr_multi_message.get_return_status_disable;
432: hr_utility.set_location(' Leaving:' || l_proc,20);
433: --
434: exception
435: when hr_multi_message.error_message_exist then
431: p_return_status := hr_multi_message.get_return_status_disable;
432: hr_utility.set_location(' Leaving:' || l_proc,20);
433: --
434: exception
435: when hr_multi_message.error_message_exist then
436: --
437: -- Catch the Multiple Message List exception which
438: -- indicates API processing has been aborted because
439: -- at least one error message exists in the list.
441: rollback to delete_phone_swi;
442: --
443: -- Reset IN OUT paramters and set OUT parameters
444: --
445: p_return_status := hr_multi_message.get_return_status_disable;
446: hr_utility.set_location(' Leaving:' || l_proc,30);
447: when others then
448: --
449: -- When Multiple Message Detection is enabled catch
452: -- Multiple Message List. Otherwise re-raise
453: -- the error.
454: --
455: rollback to delete_phone_swi;
456: if hr_multi_message.unexpected_error_add(l_proc) then
457: hr_utility.set_location(' Leaving:' || l_proc, 40);
458: raise;
459: end if;
460: --
459: end if;
460: --
461: -- Reset IN OUT parameters and set OUT parameters
462: --
463: p_return_status := hr_multi_message.get_return_status_disable;
464: hr_utility.set_location(' Leaving: ' || l_proc, 50);
465: end delete_phone;
466: -- ----------------------------------------------------------------------------
467: -- |-----------------------------< update_phone >-----------------------------|
527: savepoint update_phone_swi;
528: --
529: -- Initialise Multiple Message Detection
530: --
531: hr_multi_message.enable_message_list;
532: --
533: -- Remember IN OUT parameter IN values
534: --
535: l_object_version_number := p_object_version_number;
599: -- Derive the API return status value based on whether
600: -- messages of any type exist in the Multiple Message List.
601: -- Also disable Multiple Message Detection.
602: --
603: p_return_status := hr_multi_message.get_return_status_disable;
604: hr_utility.set_location(' Leaving:' || l_proc,20);
605: --
606: exception
607: when hr_multi_message.error_message_exist then
603: p_return_status := hr_multi_message.get_return_status_disable;
604: hr_utility.set_location(' Leaving:' || l_proc,20);
605: --
606: exception
607: when hr_multi_message.error_message_exist then
608: --
609: -- Catch the Multiple Message List exception which
610: -- indicates API processing has been aborted because
611: -- at least one error message exists in the list.
614: --
615: -- Reset IN OUT paramters and set OUT parameters
616: --
617: p_object_version_number := l_object_version_number;
618: p_return_status := hr_multi_message.get_return_status_disable;
619: hr_utility.set_location(' Leaving:' || l_proc,30);
620: when others then
621: --
622: -- When Multiple Message Detection is enabled catch
625: -- Multiple Message List. Otherwise re-raise
626: -- the error.
627: --
628: rollback to update_phone_swi;
629: if hr_multi_message.unexpected_error_add(l_proc) then
630: hr_utility.set_location(' Leaving:' || l_proc, 40);
631: raise;
632: end if;
633: --
633: --
634: -- Reset IN OUT parameters and set OUT parameters
635: --
636: p_object_version_number := l_object_version_number;
637: p_return_status := hr_multi_message.get_return_status_disable;
638: hr_utility.set_location(' Leaving: ' || l_proc, 50);
639: end update_phone;
640: end hr_phone_swi;