34: -- Other variables
35: l_proc varchar2(72) := g_package ||'create_forum_message';
36: l_forum_message_id number;
37: Begin
38: hr_utility.set_location(' Entering:' || l_proc,10);
39: --
40: -- Issue a savepoint
41: --
42: savepoint create_forum_message_swi;
93: -- messages of any type exist in the Multiple Message List.
94: -- Also disable Multiple Message Detection.
95: --
96: p_return_status := hr_multi_message.get_return_status_disable;
97: hr_utility.set_location(' Leaving:' || l_proc,20);
98: --
99: exception
100: when hr_multi_message.error_message_exist then
101: --
109: --
110: l_forum_message_id := null;
111: p_object_version_number := null;
112: p_return_status := hr_multi_message.get_return_status_disable;
113: hr_utility.set_location(' Leaving:' || l_proc, 30);
114: when others then
115: --
116: -- When Multiple Message Detection is enabled catch
117: -- any Application specific or other unexpected
120: -- error.
121: --
122: rollback to create_forum_message_swi;
123: if hr_multi_message.unexpected_error_add(l_proc) then
124: hr_utility.set_location(' Leaving:' || l_proc,40);
125: raise;
126: end if;
127: --
128: -- Reset IN OUT and set OUT parameters
129: --
130: l_forum_message_id := null;
131: p_object_version_number := null;
132: p_return_status := hr_multi_message.get_return_status_disable;
133: hr_utility.set_location(' Leaving:' || l_proc,50);
134: end create_forum_message;
135: -- ----------------------------------------------------------------------------
136: -- |-------------------------< update_forum_message >-------------------------|
137: -- ----------------------------------------------------------------------------
163: l_forum_message_id number;
164: l_object_version_number number := p_object_version_number;
165:
166: Begin
167: hr_utility.set_location(' Entering:' || l_proc,10);
168: --
169: -- Issue a savepoint
170: --
171: savepoint update_forum_message_swi;
216: --
217: p_return_status := hr_multi_message.get_return_status_disable;
218: p_object_version_number := l_object_version_number;
219:
220: hr_utility.set_location(' Leaving:' || l_proc,20);
221: --
222: exception
223: when hr_multi_message.error_message_exist then
224: --
232: --
233: l_forum_message_id := null;
234: p_object_version_number := null;
235: p_return_status := hr_multi_message.get_return_status_disable;
236: hr_utility.set_location(' Leaving:' || l_proc, 30);
237: when others then
238: --
239: -- When Multiple Message Detection is enabled catch
240: -- any Application specific or other unexpected
243: -- error.
244: --
245: rollback to update_forum_message_swi;
246: if hr_multi_message.unexpected_error_add(l_proc) then
247: hr_utility.set_location(' Leaving:' || l_proc,40);
248: raise;
249: end if;
250: --
251: -- Reset IN OUT and set OUT parameters
252: --
253: l_forum_message_id := null;
254: p_object_version_number := null;
255: p_return_status := hr_multi_message.get_return_status_disable;
256: hr_utility.set_location(' Leaving:' || l_proc,50);
257: end update_forum_message;
258: -- ----------------------------------------------------------------------------
259: -- |-------------------------< delete_forum_message >-------------------------|
260: -- ----------------------------------------------------------------------------
272: --
273: -- Other variables
274: l_proc varchar2(72) := g_package ||'delete_forum_message';
275: Begin
276: hr_utility.set_location(' Entering:' || l_proc,10);
277: --
278: -- Issue a savepoint
279: --
280: savepoint delete_forum_message_swi;
314: -- messages of any type exist in the Multiple Message List.
315: -- Also disable Multiple Message Detection.
316: --
317: p_return_status := hr_multi_message.get_return_status_disable;
318: hr_utility.set_location(' Leaving:' || l_proc,20);
319: --
320: exception
321: when hr_multi_message.error_message_exist then
322: --
328: --
329: -- Reset IN OUT parameters and set OUT parameters
330: --
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
336: -- any Application specific or other unexpected
339: -- error.
340: --
341: rollback to delete_forum_message_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: --
347: -- Reset IN OUT and set OUT parameters
346: --
347: -- Reset IN OUT and set OUT parameters
348: --
349: p_return_status := hr_multi_message.get_return_status_disable;
350: hr_utility.set_location(' Leaving:' || l_proc,50);
351: end delete_forum_message;
352: end ota_forum_message_swi;