33: --
34: -- Other variables
35: l_proc varchar2(72) := g_package ||'create_pos_structure_version';
36: Begin
37: hr_utility.set_location(' Entering:' || l_proc,10);
38: --
39: -- Issue a savepoint
40: --
41: savepoint create_posstructureversion_swi;
91: -- messages of any type exist in the Multiple Message List.
92: -- Also disable Multiple Message Detection.
93: --
94: p_return_status := hr_multi_message.get_return_status_disable;
95: hr_utility.set_location(' Leaving:' || l_proc,20);
96: --
97: exception
98: when hr_multi_message.error_message_exist then
99: --
107: --
108: p_pos_structure_version_id := null;
109: p_object_version_number := null;
110: p_return_status := hr_multi_message.get_return_status_disable;
111: hr_utility.set_location(' Leaving:' || l_proc, 30);
112: when others then
113: --
114: -- When Multiple Message Detection is enabled catch
115: -- any Application specific or other unexpected
118: -- error.
119: --
120: rollback to create_posstructureversion_swi;
121: if hr_multi_message.unexpected_error_add(l_proc) then
122: hr_utility.set_location(' Leaving:' || l_proc,40);
123: raise;
124: end if;
125: --
126: -- Reset IN OUT and set OUT parameters
127: --
128: p_pos_structure_version_id := null;
129: p_object_version_number := null;
130: p_return_status := hr_multi_message.get_return_status_disable;
131: hr_utility.set_location(' Leaving:' || l_proc,50);
132: end create_pos_structure_version;
133: -- ----------------------------------------------------------------------------
134: -- |---------------------< delete_pos_structure_version >---------------------|
135: -- ----------------------------------------------------------------------------
147: --
148: -- Other variables
149: l_proc varchar2(72) := g_package ||'delete_pos_structure_version';
150: Begin
151: hr_utility.set_location(' Entering:' || l_proc,10);
152: --
153: -- Issue a savepoint
154: --
155: savepoint delete_posstructureversion_swi;
189: -- messages of any type exist in the Multiple Message List.
190: -- Also disable Multiple Message Detection.
191: --
192: p_return_status := hr_multi_message.get_return_status_disable;
193: hr_utility.set_location(' Leaving:' || l_proc,20);
194: --
195: exception
196: when hr_multi_message.error_message_exist then
197: --
203: --
204: -- Reset IN OUT parameters and set OUT parameters
205: --
206: p_return_status := hr_multi_message.get_return_status_disable;
207: hr_utility.set_location(' Leaving:' || l_proc, 30);
208: when others then
209: --
210: -- When Multiple Message Detection is enabled catch
211: -- any Application specific or other unexpected
214: -- error.
215: --
216: rollback to delete_posstructureversion_swi;
217: if hr_multi_message.unexpected_error_add(l_proc) then
218: hr_utility.set_location(' Leaving:' || l_proc,40);
219: raise;
220: end if;
221: --
222: -- Reset IN OUT and set OUT parameters
221: --
222: -- Reset IN OUT and set OUT parameters
223: --
224: p_return_status := hr_multi_message.get_return_status_disable;
225: hr_utility.set_location(' Leaving:' || l_proc,50);
226: end delete_pos_structure_version;
227: -- ----------------------------------------------------------------------------
228: -- |---------------------< update_pos_structure_version >---------------------|
229: -- ----------------------------------------------------------------------------
252: --
253: -- Other variables
254: l_proc varchar2(72) := g_package ||'update_pos_structure_version';
255: Begin
256: hr_utility.set_location(' Entering:' || l_proc,10);
257: --
258: -- Issue a savepoint
259: --
260: savepoint update_posstructureversion_swi;
310: -- messages of any type exist in the Multiple Message List.
311: -- Also disable Multiple Message Detection.
312: --
313: p_return_status := hr_multi_message.get_return_status_disable;
314: hr_utility.set_location(' Leaving:' || l_proc,20);
315: --
316: exception
317: when hr_multi_message.error_message_exist then
318: --
325: -- Reset IN OUT parameters and set OUT parameters
326: --
327: p_object_version_number := l_object_version_number;
328: p_return_status := hr_multi_message.get_return_status_disable;
329: hr_utility.set_location(' Leaving:' || l_proc, 30);
330: when others then
331: --
332: -- When Multiple Message Detection is enabled catch
333: -- any Application specific or other unexpected
336: -- error.
337: --
338: rollback to update_posstructureversion_swi;
339: if hr_multi_message.unexpected_error_add(l_proc) then
340: hr_utility.set_location(' Leaving:' || l_proc,40);
341: raise;
342: end if;
343: --
344: -- Reset IN OUT and set OUT parameters
344: -- Reset IN OUT and set OUT parameters
345: --
346: p_object_version_number := l_object_version_number;
347: p_return_status := hr_multi_message.get_return_status_disable;
348: hr_utility.set_location(' Leaving:' || l_proc,50);
349: end update_pos_structure_version;
350: end per_pos_structure_version_swi;