32: savepoint delete_eff_report_approval_swi;
33: --
34: -- Initialise Multiple Message Detection
35: --
36: hr_multi_message.enable_message_list;
37: --
38: -- Remember IN OUT parameter IN values
39: --
40: l_object_version_number := p_object_version_number;
74: -- Derive the API return status value based on whether
75: -- messages of any type exist in the Multiple Message List.
76: -- Also disable Multiple Message Detection.
77: --
78: p_return_status := hr_multi_message.get_return_status_disable;
79: hr_utility.set_location(' Leaving:' || l_proc,20);
80: --
81: exception
82: when hr_multi_message.error_message_exist then
78: p_return_status := hr_multi_message.get_return_status_disable;
79: hr_utility.set_location(' Leaving:' || l_proc,20);
80: --
81: exception
82: when hr_multi_message.error_message_exist then
83: --
84: -- Catch the Multiple Message List exception which
85: -- indicates API processing has been aborted because
86: -- at least one message exists in the list.
90: -- Reset IN OUT parameters and set OUT parameters
91: --
92: p_object_version_number := l_object_version_number;
93: p_return_status := null;
94: p_return_status := hr_multi_message.get_return_status_disable;
95: hr_utility.set_location(' Leaving:' || l_proc, 30);
96: when others then
97: --
98: -- When Multiple Message Detection is enabled catch
101: -- Multiple Message List. Otherwise re-raise the
102: -- error.
103: --
104: rollback to delete_eff_report_approval_swi;
105: if hr_multi_message.unexpected_error_add(l_proc) then
106: hr_utility.set_location(' Leaving:' || l_proc,40);
107: raise;
108: end if;
109: --
110: -- Reset IN OUT and set OUT parameters
111: --
112: p_object_version_number := l_object_version_number;
113: p_return_status := null;
114: p_return_status := hr_multi_message.get_return_status_disable;
115: hr_utility.set_location(' Leaving:' || l_proc,50);
116: end delete_eff_report_approvals;
117: -- ----------------------------------------------------------------------------
118: -- |----------------------< insert_eff_report_approvals >---------------------|
189: savepoint insert_eff_report_approval_swi;
190: --
191: -- Initialise Multiple Message Detection
192: --
193: hr_multi_message.enable_message_list;
194: --
195: -- Remember IN OUT parameter IN values
196: --
197: --
282: -- Derive the API return status value based on whether
283: -- messages of any type exist in the Multiple Message List.
284: -- Also disable Multiple Message Detection.
285: --
286: p_return_status := hr_multi_message.get_return_status_disable;
287: hr_utility.set_location(' Leaving:' || l_proc,20);
288: --
289: exception
290: when hr_multi_message.error_message_exist then
286: p_return_status := hr_multi_message.get_return_status_disable;
287: hr_utility.set_location(' Leaving:' || l_proc,20);
288: --
289: exception
290: when hr_multi_message.error_message_exist then
291: --
292: -- Catch the Multiple Message List exception which
293: -- indicates API processing has been aborted because
294: -- at least one message exists in the list.
299: --
300: p_effort_report_approval_id := null;
301: p_object_version_number := null;
302: p_return_status := null;
303: p_return_status := hr_multi_message.get_return_status_disable;
304: hr_utility.set_location(' Leaving:' || l_proc, 30);
305: when others then
306: --
307: -- When Multiple Message Detection is enabled catch
310: -- Multiple Message List. Otherwise re-raise the
311: -- error.
312: --
313: rollback to insert_eff_report_approval_swi;
314: if hr_multi_message.unexpected_error_add(l_proc) then
315: hr_utility.set_location(' Leaving:' || l_proc,40);
316: raise;
317: end if;
318: --
320: --
321: p_effort_report_approval_id := null;
322: p_object_version_number := null;
323: p_return_status := null;
324: p_return_status := hr_multi_message.get_return_status_disable;
325: hr_utility.set_location(' Leaving:' || l_proc,50);
326: end insert_eff_report_approvals;
327: -- ----------------------------------------------------------------------------
328: -- |----------------------< update_eff_report_approvals >---------------------|
400: savepoint update_eff_report_approval_swi;
401: --
402: -- Initialise Multiple Message Detection
403: --
404: hr_multi_message.enable_message_list;
405: --
406: -- Remember IN OUT parameter IN values
407: --
408: l_object_version_number := p_object_version_number;
491: -- Derive the API return status value based on whether
492: -- messages of any type exist in the Multiple Message List.
493: -- Also disable Multiple Message Detection.
494: --
495: p_return_status := hr_multi_message.get_return_status_disable;
496: hr_utility.set_location(' Leaving:' || l_proc,20);
497: --
498: exception
499: when hr_multi_message.error_message_exist then
495: p_return_status := hr_multi_message.get_return_status_disable;
496: hr_utility.set_location(' Leaving:' || l_proc,20);
497: --
498: exception
499: when hr_multi_message.error_message_exist then
500: --
501: -- Catch the Multiple Message List exception which
502: -- indicates API processing has been aborted because
503: -- at least one message exists in the list.
507: -- Reset IN OUT parameters and set OUT parameters
508: --
509: p_object_version_number := l_object_version_number;
510: p_return_status := null;
511: p_return_status := hr_multi_message.get_return_status_disable;
512: hr_utility.set_location(' Leaving:' || l_proc, 30);
513: when others then
514: --
515: -- When Multiple Message Detection is enabled catch
518: -- Multiple Message List. Otherwise re-raise the
519: -- error.
520: --
521: rollback to update_eff_report_approval_swi;
522: if hr_multi_message.unexpected_error_add(l_proc) then
523: hr_utility.set_location(' Leaving:' || l_proc,40);
524: raise;
525: end if;
526: --
527: -- Reset IN OUT and set OUT parameters
528: --
529: p_object_version_number := l_object_version_number;
530: p_return_status := null;
531: p_return_status := hr_multi_message.get_return_status_disable;
532: hr_utility.set_location(' Leaving:' || l_proc,50);
533: end update_eff_report_approvals;
534: end psp_eff_report_approvals_swi;