30: savepoint delete_level_codes_swi;
31: --
32: -- Initialise Multiple Message Detection
33: --
34: hr_multi_message.enable_message_list;
35: --
36: -- Remember IN OUT parameter IN values
37: --
38: --
63: -- Derive the API return status value based on whether
64: -- messages of any type exist in the Multiple Message List.
65: -- Also disable Multiple Message Detection.
66: --
67: p_return_status := hr_multi_message.get_return_status_disable;
68: hr_utility.set_location(' Leaving:' || l_proc,20);
69: --
70: exception
71: when hr_multi_message.error_message_exist then
67: p_return_status := hr_multi_message.get_return_status_disable;
68: hr_utility.set_location(' Leaving:' || l_proc,20);
69: --
70: exception
71: when hr_multi_message.error_message_exist then
72: --
73: -- Catch the Multiple Message List exception which
74: -- indicates API processing has been aborted because
75: -- at least one message exists in the list.
77: rollback to delete_level_codes_swi;
78: --
79: -- Reset IN OUT parameters and set OUT parameters
80: --
81: p_return_status := hr_multi_message.get_return_status_disable;
82: hr_utility.set_location(' Leaving:' || l_proc, 30);
83: when others then
84: --
85: -- When Multiple Message Detection is enabled catch
88: -- Multiple Message List. Otherwise re-raise the
89: -- error.
90: --
91: rollback to delete_level_codes_swi;
92: if hr_multi_message.unexpected_error_add(l_proc) then
93: hr_utility.set_location(' Leaving:' || l_proc,40);
94: raise;
95: end if;
96: --
95: end if;
96: --
97: -- Reset IN OUT and set OUT parameters
98: --
99: p_return_status := hr_multi_message.get_return_status_disable;
100: hr_utility.set_location(' Leaving:' || l_proc,50);
101: end delete_level_codes;
102: -- ----------------------------------------------------------------------------
103: -- |--------------------------< insert_level_codes >--------------------------|
129: savepoint insert_level_codes_swi;
130: --
131: -- Initialise Multiple Message Detection
132: --
133: hr_multi_message.enable_message_list;
134: --
135: -- Remember IN OUT parameter IN values
136: --
137: --
171: -- Derive the API return status value based on whether
172: -- messages of any type exist in the Multiple Message List.
173: -- Also disable Multiple Message Detection.
174: --
175: p_return_status := hr_multi_message.get_return_status_disable;
176: hr_utility.set_location(' Leaving:' || l_proc,20);
177: --
178: exception
179: when hr_multi_message.error_message_exist then
175: p_return_status := hr_multi_message.get_return_status_disable;
176: hr_utility.set_location(' Leaving:' || l_proc,20);
177: --
178: exception
179: when hr_multi_message.error_message_exist then
180: --
181: -- Catch the Multiple Message List exception which
182: -- indicates API processing has been aborted because
183: -- at least one message exists in the list.
187: -- Reset IN OUT parameters and set OUT parameters
188: --
189: p_level_code_id := null;
190: p_object_version_number := null;
191: p_return_status := hr_multi_message.get_return_status_disable;
192: hr_utility.set_location(' Leaving:' || l_proc, 30);
193: when others then
194: --
195: -- When Multiple Message Detection is enabled catch
198: -- Multiple Message List. Otherwise re-raise the
199: -- error.
200: --
201: rollback to insert_level_codes_swi;
202: if hr_multi_message.unexpected_error_add(l_proc) then
203: hr_utility.set_location(' Leaving:' || l_proc,40);
204: raise;
205: end if;
206: --
207: -- Reset IN OUT and set OUT parameters
208: --
209: p_level_code_id := null;
210: p_object_version_number := null;
211: p_return_status := hr_multi_message.get_return_status_disable;
212: hr_utility.set_location(' Leaving:' || l_proc,50);
213: end insert_level_codes;
214: -- ----------------------------------------------------------------------------
215: -- |--------------------------< update_level_codes >--------------------------|
242: savepoint update_level_codes_swi;
243: --
244: -- Initialise Multiple Message Detection
245: --
246: hr_multi_message.enable_message_list;
247: --
248: -- Remember IN OUT parameter IN values
249: --
250: l_object_version_number := p_object_version_number;
281: -- Derive the API return status value based on whether
282: -- messages of any type exist in the Multiple Message List.
283: -- Also disable Multiple Message Detection.
284: --
285: p_return_status := hr_multi_message.get_return_status_disable;
286: hr_utility.set_location(' Leaving:' || l_proc,20);
287: --
288: exception
289: when hr_multi_message.error_message_exist then
285: p_return_status := hr_multi_message.get_return_status_disable;
286: hr_utility.set_location(' Leaving:' || l_proc,20);
287: --
288: exception
289: when hr_multi_message.error_message_exist then
290: --
291: -- Catch the Multiple Message List exception which
292: -- indicates API processing has been aborted because
293: -- at least one message exists in the list.
296: --
297: -- Reset IN OUT parameters and set OUT parameters
298: --
299: p_object_version_number := l_object_version_number;
300: p_return_status := hr_multi_message.get_return_status_disable;
301: hr_utility.set_location(' Leaving:' || l_proc, 30);
302: when others then
303: --
304: -- When Multiple Message Detection is enabled catch
307: -- Multiple Message List. Otherwise re-raise the
308: -- error.
309: --
310: rollback to update_level_codes_swi;
311: if hr_multi_message.unexpected_error_add(l_proc) then
312: hr_utility.set_location(' Leaving:' || l_proc,40);
313: raise;
314: end if;
315: --
315: --
316: -- Reset IN OUT and set OUT parameters
317: --
318: p_object_version_number := l_object_version_number;
319: p_return_status := hr_multi_message.get_return_status_disable;
320: hr_utility.set_location(' Leaving:' || l_proc,50);
321: end update_level_codes;
322: end pqh_de_level_codes_swi;