36: savepoint create_ame_txn_type_swi;
37: --
38: -- Initialise Multiple Message Detection
39: --
40: hr_multi_message.enable_message_list;
41: --
42: -- Remember IN OUT parameter IN values
43: --
44: --
77: -- Derive the API return status value based on whether
78: -- messages of any type exist in the Multiple Message List.
79: -- Also disable Multiple Message Detection.
80: --
81: p_return_status := hr_multi_message.get_return_status_disable;
82: hr_utility.set_location(' Leaving:' || l_proc,20);
83: --
84: exception
85: when hr_multi_message.error_message_exist then
81: p_return_status := hr_multi_message.get_return_status_disable;
82: hr_utility.set_location(' Leaving:' || l_proc,20);
83: --
84: exception
85: when hr_multi_message.error_message_exist then
86: --
87: -- Catch the Multiple Message List exception which
88: -- indicates API processing has been aborted because
89: -- at least one message exists in the list.
94: --
95: p_object_version_number := null;
96: p_start_date := null;
97: p_end_date := null;
98: p_return_status := hr_multi_message.get_return_status_disable;
99: hr_utility.set_location(' Leaving:' || l_proc, 30);
100: when others then
101: --
102: -- When Multiple Message Detection is enabled catch
105: -- Multiple Message List. Otherwise re-raise the
106: -- error.
107: --
108: rollback to create_ame_txn_type_swi;
109: if hr_multi_message.unexpected_error_add(l_proc) then
110: hr_utility.set_location(' Leaving:' || l_proc,40);
111: raise;
112: end if;
113: --
115: --
116: p_object_version_number := null;
117: p_start_date := null;
118: p_end_date := null;
119: p_return_status := hr_multi_message.get_return_status_disable;
120: hr_utility.set_location(' Leaving:' || l_proc,50);
121: end create_ame_transaction_type;
122: -- ----------------------------------------------------------------------------
123: -- |----------------------< update_ame_transaction_type >---------------------|
149: savepoint update_ame_txn_type_swi;
150: --
151: -- Initialise Multiple Message Detection
152: --
153: hr_multi_message.enable_message_list;
154: --
155: -- Remember IN OUT parameter IN values
156: --
157: l_object_version_number := p_object_version_number;
186: -- Derive the API return status value based on whether
187: -- messages of any type exist in the Multiple Message List.
188: -- Also disable Multiple Message Detection.
189: --
190: p_return_status := hr_multi_message.get_return_status_disable;
191: hr_utility.set_location(' Leaving:' || l_proc,20);
192: --
193: exception
194: when hr_multi_message.error_message_exist then
190: p_return_status := hr_multi_message.get_return_status_disable;
191: hr_utility.set_location(' Leaving:' || l_proc,20);
192: --
193: exception
194: when hr_multi_message.error_message_exist then
195: --
196: -- Catch the Multiple Message List exception which
197: -- indicates API processing has been aborted because
198: -- at least one message exists in the list.
203: --
204: p_object_version_number := l_object_version_number;
205: p_start_date := null;
206: p_end_date := null;
207: p_return_status := hr_multi_message.get_return_status_disable;
208: hr_utility.set_location(' Leaving:' || l_proc, 30);
209: when others then
210: --
211: -- When Multiple Message Detection is enabled catch
214: -- Multiple Message List. Otherwise re-raise the
215: -- error.
216: --
217: rollback to update_ame_txn_type_swi;
218: if hr_multi_message.unexpected_error_add(l_proc) then
219: hr_utility.set_location(' Leaving:' || l_proc,40);
220: raise;
221: end if;
222: --
224: --
225: p_object_version_number := l_object_version_number;
226: p_start_date := null;
227: p_end_date := null;
228: p_return_status := hr_multi_message.get_return_status_disable;
229: hr_utility.set_location(' Leaving:' || l_proc,50);
230: end update_ame_transaction_type;
231: -- ----------------------------------------------------------------------------
232: -- |----------------------< delete_ame_transaction_type >---------------------|
256: savepoint delete_ame_txn_type_swi;
257: --
258: -- Initialise Multiple Message Detection
259: --
260: hr_multi_message.enable_message_list;
261: --
262: -- Remember IN OUT parameter IN values
263: --
264: l_object_version_number := p_object_version_number;
292: -- Derive the API return status value based on whether
293: -- messages of any type exist in the Multiple Message List.
294: -- Also disable Multiple Message Detection.
295: --
296: p_return_status := hr_multi_message.get_return_status_disable;
297: hr_utility.set_location(' Leaving:' || l_proc,20);
298: --
299: exception
300: when hr_multi_message.error_message_exist then
296: p_return_status := hr_multi_message.get_return_status_disable;
297: hr_utility.set_location(' Leaving:' || l_proc,20);
298: --
299: exception
300: when hr_multi_message.error_message_exist then
301: --
302: -- Catch the Multiple Message List exception which
303: -- indicates API processing has been aborted because
304: -- at least one message exists in the list.
309: --
310: p_object_version_number := l_object_version_number;
311: p_start_date := null;
312: p_end_date := null;
313: p_return_status := hr_multi_message.get_return_status_disable;
314: hr_utility.set_location(' Leaving:' || l_proc, 30);
315: when others then
316: --
317: -- When Multiple Message Detection is enabled catch
320: -- Multiple Message List. Otherwise re-raise the
321: -- error.
322: --
323: rollback to delete_ame_txn_type_swi;
324: if hr_multi_message.unexpected_error_add(l_proc) then
325: hr_utility.set_location(' Leaving:' || l_proc,40);
326: raise;
327: end if;
328: --
330: --
331: p_object_version_number := l_object_version_number;
332: p_start_date := null;
333: p_end_date := null;
334: p_return_status := hr_multi_message.get_return_status_disable;
335: hr_utility.set_location(' Leaving:' || l_proc,50);
336: end delete_ame_transaction_type;
337: end ame_trans_type_swi;