94: savepoint create_vehicle_allocation_swi;
95: --
96: -- Initialise Multiple Message Detection
97: --
98: hr_multi_message.enable_message_list;
99: --
100: -- Remember IN OUT parameter IN values
101: --
102: --
193: -- Derive the API return status value based on whether
194: -- messages of any type exist in the Multiple Message List.
195: -- Also disable Multiple Message Detection.
196: --
197: p_return_status := hr_multi_message.get_return_status_disable;
198: hr_utility.set_location(' Leaving:' || l_proc,20);
199: --
200: exception
201: when hr_multi_message.error_message_exist then
197: p_return_status := hr_multi_message.get_return_status_disable;
198: hr_utility.set_location(' Leaving:' || l_proc,20);
199: --
200: exception
201: when hr_multi_message.error_message_exist then
202: --
203: -- Catch the Multiple Message List exception which
204: -- indicates API processing has been aborted because
205: -- at least one message exists in the list.
210: --
211: p_object_version_number := null;
212: p_effective_start_date := null;
213: p_effective_end_date := null;
214: p_return_status := hr_multi_message.get_return_status_disable;
215: hr_utility.set_location(' Leaving:' || l_proc, 30);
216: when others then
217: --
218: -- When Multiple Message Detection is enabled catch
221: -- Multiple Message List. Otherwise re-raise the
222: -- error.
223: --
224: rollback to create_vehicle_allocation_swi;
225: if hr_multi_message.unexpected_error_add(l_proc) then
226: hr_utility.set_location(' Leaving:' || l_proc,40);
227: raise;
228: end if;
229: --
231: --
232: p_object_version_number := null;
233: p_effective_start_date := null;
234: p_effective_end_date := null;
235: p_return_status := hr_multi_message.get_return_status_disable;
236: hr_utility.set_location(' Leaving:' || l_proc,50);
237: end create_vehicle_allocation;
238: -- ----------------------------------------------------------------------------
239: -- |-----------------------< delete_vehicle_allocation >----------------------|
265: savepoint delete_vehicle_allocation_swi;
266: --
267: -- Initialise Multiple Message Detection
268: --
269: hr_multi_message.enable_message_list;
270: --
271: -- Remember IN OUT parameter IN values
272: --
273: l_object_version_number := p_object_version_number;
303: -- Derive the API return status value based on whether
304: -- messages of any type exist in the Multiple Message List.
305: -- Also disable Multiple Message Detection.
306: --
307: p_return_status := hr_multi_message.get_return_status_disable;
308: hr_utility.set_location(' Leaving:' || l_proc,20);
309: --
310: exception
311: when hr_multi_message.error_message_exist then
307: p_return_status := hr_multi_message.get_return_status_disable;
308: hr_utility.set_location(' Leaving:' || l_proc,20);
309: --
310: exception
311: when hr_multi_message.error_message_exist then
312: --
313: -- Catch the Multiple Message List exception which
314: -- indicates API processing has been aborted because
315: -- at least one message exists in the list.
320: --
321: p_object_version_number := l_object_version_number;
322: p_effective_start_date := null;
323: p_effective_end_date := null;
324: p_return_status := hr_multi_message.get_return_status_disable;
325: hr_utility.set_location(' Leaving:' || l_proc, 30);
326: when others then
327: --
328: -- When Multiple Message Detection is enabled catch
331: -- Multiple Message List. Otherwise re-raise the
332: -- error.
333: --
334: rollback to delete_vehicle_allocation_swi;
335: if hr_multi_message.unexpected_error_add(l_proc) then
336: hr_utility.set_location(' Leaving:' || l_proc,40);
337: raise;
338: end if;
339: --
341: --
342: p_object_version_number := l_object_version_number;
343: p_effective_start_date := null;
344: p_effective_end_date := null;
345: p_return_status := hr_multi_message.get_return_status_disable;
346: hr_utility.set_location(' Leaving:' || l_proc,50);
347: raise;
348: end delete_vehicle_allocation;
349: -- ----------------------------------------------------------------------------
436: savepoint update_vehicle_allocation_swi;
437: --
438: -- Initialise Multiple Message Detection
439: --
440: hr_multi_message.enable_message_list;
441: --
442: -- Remember IN OUT parameter IN values
443: --
444: l_object_version_number := p_object_version_number;
534: -- Derive the API return status value based on whether
535: -- messages of any type exist in the Multiple Message List.
536: -- Also disable Multiple Message Detection.
537: --
538: p_return_status := hr_multi_message.get_return_status_disable;
539: hr_utility.set_location(' Leaving:' || l_proc,20);
540: --
541: exception
542: when hr_multi_message.error_message_exist then
538: p_return_status := hr_multi_message.get_return_status_disable;
539: hr_utility.set_location(' Leaving:' || l_proc,20);
540: --
541: exception
542: when hr_multi_message.error_message_exist then
543: --
544: -- Catch the Multiple Message List exception which
545: -- indicates API processing has been aborted because
546: -- at least one message exists in the list.
551: --
552: p_object_version_number := l_object_version_number;
553: p_effective_start_date := null;
554: p_effective_end_date := null;
555: p_return_status := hr_multi_message.get_return_status_disable;
556: hr_utility.set_location(' Leaving:' || l_proc, 30);
557: when others then
558: --
559: -- When Multiple Message Detection is enabled catch
562: -- Multiple Message List. Otherwise re-raise the
563: -- error.
564: --
565: rollback to update_vehicle_allocation_swi;
566: if hr_multi_message.unexpected_error_add(l_proc) then
567: hr_utility.set_location(' Leaving:' || l_proc,40);
568: raise;
569: end if;
570: --
572: --
573: p_object_version_number := l_object_version_number;
574: p_effective_start_date := null;
575: p_effective_end_date := null;
576: p_return_status := hr_multi_message.get_return_status_disable;
577: hr_utility.set_location(' Leaving:' || l_proc,50);
578: end update_vehicle_allocation;
579: end pqp_vehicle_allocations_swi;