54: --
55: -- Other variables
56: l_proc varchar2(72) := g_package ||'create_succession_plan';
57: Begin
58: hr_utility.set_location(' Entering:' || l_proc,10);
59: --
60: -- Issue a savepoint
61: --
62: savepoint create_succession_plan_swi;
130: -- messages of any type exist in the Multiple Message List.
131: -- Also disable Multiple Message Detection.
132: --
133: p_return_status := hr_multi_message.get_return_status_disable;
134: hr_utility.set_location(' Leaving:' || l_proc,20);
135: --
136: exception
137: when hr_multi_message.error_message_exist then
138: --
146: --
147: p_succession_plan_id := null;
148: p_object_version_number := null;
149: p_return_status := hr_multi_message.get_return_status_disable;
150: hr_utility.set_location(' Leaving:' || l_proc, 30);
151: when others then
152: --
153: -- When Multiple Message Detection is enabled catch
154: -- any Application specific or other unexpected
157: -- error.
158: --
159: rollback to create_succession_plan_swi;
160: if hr_multi_message.unexpected_error_add(l_proc) then
161: hr_utility.set_location(' Leaving:' || l_proc,40);
162: raise;
163: end if;
164: --
165: -- Reset IN OUT and set OUT parameters
166: --
167: p_succession_plan_id := null;
168: p_object_version_number := null;
169: p_return_status := hr_multi_message.get_return_status_disable;
170: hr_utility.set_location(' Leaving:' || l_proc,50);
171: end create_succession_plan;
172: -- ----------------------------------------------------------------------------
173: -- |------------------------< delete_succession_plan >------------------------|
174: -- ----------------------------------------------------------------------------
186: --
187: -- Other variables
188: l_proc varchar2(72) := g_package ||'delete_succession_plan';
189: Begin
190: hr_utility.set_location(' Entering:' || l_proc,10);
191: --
192: -- Issue a savepoint
193: --
194: savepoint delete_succession_plan_swi;
228: -- messages of any type exist in the Multiple Message List.
229: -- Also disable Multiple Message Detection.
230: --
231: p_return_status := hr_multi_message.get_return_status_disable;
232: hr_utility.set_location(' Leaving:' || l_proc,20);
233: --
234: exception
235: when hr_multi_message.error_message_exist then
236: --
242: --
243: -- Reset IN OUT parameters and set OUT parameters
244: --
245: p_return_status := hr_multi_message.get_return_status_disable;
246: hr_utility.set_location(' Leaving:' || l_proc, 30);
247: when others then
248: --
249: -- When Multiple Message Detection is enabled catch
250: -- any Application specific or other unexpected
253: -- error.
254: --
255: rollback to delete_succession_plan_swi;
256: if hr_multi_message.unexpected_error_add(l_proc) then
257: hr_utility.set_location(' Leaving:' || l_proc,40);
258: raise;
259: end if;
260: --
261: -- Reset IN OUT and set OUT parameters
260: --
261: -- Reset IN OUT and set OUT parameters
262: --
263: p_return_status := hr_multi_message.get_return_status_disable;
264: hr_utility.set_location(' Leaving:' || l_proc,50);
265: end delete_succession_plan;
266: -- ----------------------------------------------------------------------------
267: -- |------------------------< update_succession_plan >------------------------|
268: -- ----------------------------------------------------------------------------
313: --
314: -- Other variables
315: l_proc varchar2(72) := g_package ||'update_succession_plan';
316: Begin
317: hr_utility.set_location(' Entering:' || l_proc,10);
318: --
319: -- Issue a savepoint
320: --
321: savepoint update_succession_plan_swi;
388: -- messages of any type exist in the Multiple Message List.
389: -- Also disable Multiple Message Detection.
390: --
391: p_return_status := hr_multi_message.get_return_status_disable;
392: hr_utility.set_location(' Leaving:' || l_proc,20);
393: --
394: exception
395: when hr_multi_message.error_message_exist then
396: --
403: -- Reset IN OUT parameters and set OUT parameters
404: --
405: p_object_version_number := l_object_version_number;
406: p_return_status := hr_multi_message.get_return_status_disable;
407: hr_utility.set_location(' Leaving:' || l_proc, 30);
408: when others then
409: --
410: -- When Multiple Message Detection is enabled catch
411: -- any Application specific or other unexpected
414: -- error.
415: --
416: rollback to update_succession_plan_swi;
417: if hr_multi_message.unexpected_error_add(l_proc) then
418: hr_utility.set_location(' Leaving:' || l_proc,40);
419: raise;
420: end if;
421: --
422: -- Reset IN OUT and set OUT parameters
422: -- Reset IN OUT and set OUT parameters
423: --
424: p_object_version_number := l_object_version_number;
425: p_return_status := hr_multi_message.get_return_status_disable;
426: hr_utility.set_location(' Leaving:' || l_proc,50);
427: end update_succession_plan;
428: end per_succession_plan_swi;