39: savepoint create_document_swi;
40: --
41: -- Initialise Multiple Message Detection
42: --
43: hr_multi_message.enable_message_list;
44: --
45: -- Remember IN OUT parameter IN values
46: --
47: --
83: -- Derive the API return status value based on whether
84: -- messages of any type exist in the Multiple Message List.
85: -- Also disable Multiple Message Detection.
86: --
87: p_return_status := hr_multi_message.get_return_status_disable;
88: hr_utility.set_location(' Leaving:' || l_proc,20);
89: --
90: exception
91: when hr_multi_message.error_message_exist then
87: p_return_status := hr_multi_message.get_return_status_disable;
88: hr_utility.set_location(' Leaving:' || l_proc,20);
89: --
90: exception
91: when hr_multi_message.error_message_exist then
92: --
93: -- Catch the Multiple Message List exception which
94: -- indicates API processing has been aborted because
95: -- at least one message exists in the list.
98: --
99: -- Reset IN OUT parameters and set OUT parameters
100: --
101: p_object_version_number := null;
102: p_return_status := hr_multi_message.get_return_status_disable;
103: hr_utility.set_location(' Leaving:' || l_proc, 30);
104: when others then
105: --
106: -- When Multiple Message Detection is enabled catch
109: -- Multiple Message List. Otherwise re-raise the
110: -- error.
111: --
112: rollback to create_document_swi;
113: if hr_multi_message.unexpected_error_add(l_proc) then
114: hr_utility.set_location(' Leaving:' || l_proc,40);
115: raise;
116: end if;
117: --
117: --
118: -- Reset IN OUT and set OUT parameters
119: --
120: p_object_version_number := null;
121: p_return_status := hr_multi_message.get_return_status_disable;
122: hr_utility.set_location(' Leaving:' || l_proc,50);
123: end create_document;
124: -- ----------------------------------------------------------------------------
125: -- |----------------------------< delete_document >---------------------------|
153: savepoint delete_document_swi;
154: --
155: -- Initialise Multiple Message Detection
156: --
157: hr_multi_message.enable_message_list;
158: --
159: -- Remember IN OUT parameter IN values
160: --
161: --
191: -- Derive the API return status value based on whether
192: -- messages of any type exist in the Multiple Message List.
193: -- Also disable Multiple Message Detection.
194: --
195: p_return_status := hr_multi_message.get_return_status_disable;
196: hr_utility.set_location(' Leaving:' || l_proc,20);
197: --
198:
199: --
197: --
198:
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.
207: rollback to delete_document_swi;
208: --
209: -- Reset IN OUT parameters and set OUT parameters
210: --
211: p_return_status := hr_multi_message.get_return_status_disable;
212: hr_utility.set_location(' Leaving:' || l_proc, 30);
213: when others then
214: --
215: -- When Multiple Message Detection is enabled catch
218: -- Multiple Message List. Otherwise re-raise the
219: -- error.
220: --
221: rollback to delete_document_swi;
222: if hr_multi_message.unexpected_error_add(l_proc) then
223: hr_utility.set_location(' Leaving:' || l_proc,40);
224: raise;
225: end if;
226: --
225: end if;
226: --
227: -- Reset IN OUT and set OUT parameters
228: --
229: p_return_status := hr_multi_message.get_return_status_disable;
230: hr_utility.set_location(' Leaving:' || l_proc,50);
231:
232:
233: end delete_document;
268: savepoint update_document_swi;
269: --
270: -- Initialise Multiple Message Detection
271: --
272: hr_multi_message.enable_message_list;
273: --
274: -- Remember IN OUT parameter IN values
275: --
276: l_object_version_number := p_object_version_number;
312: -- Derive the API return status value based on whether
313: -- messages of any type exist in the Multiple Message List.
314: -- Also disable Multiple Message Detection.
315: --
316: p_return_status := hr_multi_message.get_return_status_disable;
317: hr_utility.set_location(' Leaving:' || l_proc,20);
318: --
319: exception
320: when hr_multi_message.error_message_exist then
316: p_return_status := hr_multi_message.get_return_status_disable;
317: hr_utility.set_location(' Leaving:' || l_proc,20);
318: --
319: exception
320: when hr_multi_message.error_message_exist then
321: --
322: -- Catch the Multiple Message List exception which
323: -- indicates API processing has been aborted because
324: -- at least one message exists in the list.
327: --
328: -- Reset IN OUT parameters and set OUT parameters
329: --
330: p_object_version_number := l_object_version_number;
331: p_return_status := hr_multi_message.get_return_status_disable;
332: hr_utility.set_location(' Leaving:' || l_proc, 30);
333: when others then
334: --
335: -- When Multiple Message Detection is enabled catch
338: -- Multiple Message List. Otherwise re-raise the
339: -- error.
340: --
341: rollback to update_document_swi;
342: if hr_multi_message.unexpected_error_add(l_proc) then
343: hr_utility.set_location(' Leaving:' || l_proc,40);
344: raise;
345: end if;
346: --
346: --
347: -- Reset IN OUT and set OUT parameters
348: --
349: p_object_version_number := l_object_version_number;
350: p_return_status := hr_multi_message.get_return_status_disable;
351: hr_utility.set_location(' Leaving:' || l_proc,50);
352: end update_document;
353: end irc_document_swi;