33: savepoint create_balance_attribute_swi;
34: --
35: -- Initialise Multiple Message Detection
36: --
37: hr_multi_message.enable_message_list;
38: --
39: -- Remember IN OUT parameter IN values
40: --
41: --
69: -- Derive the API return status value based on whether
70: -- messages of any type exist in the Multiple Message List.
71: -- Also disable Multiple Message Detection.
72: --
73: p_return_status := hr_multi_message.get_return_status_disable;
74: hr_utility.set_location(' Leaving:' || l_proc,20);
75: --
76: exception
77: when hr_multi_message.error_message_exist then
73: p_return_status := hr_multi_message.get_return_status_disable;
74: hr_utility.set_location(' Leaving:' || l_proc,20);
75: --
76: exception
77: when hr_multi_message.error_message_exist then
78: --
79: -- Catch the Multiple Message List exception which
80: -- indicates API processing has been aborted because
81: -- at least one message exists in the list.
84: --
85: -- Reset IN OUT parameters and set OUT parameters
86: --
87: p_balance_attribute_id := null;
88: p_return_status := hr_multi_message.get_return_status_disable;
89: hr_utility.set_location(' Leaving:' || l_proc, 30);
90: when others then
91: --
92: -- When Multiple Message Detection is enabled catch
95: -- Multiple Message List. Otherwise re-raise the
96: -- error.
97: --
98: rollback to create_balance_attribute_swi;
99: if hr_multi_message.unexpected_error_add(l_proc) then
100: hr_utility.set_location(' Leaving:' || l_proc,40);
101: raise;
102: end if;
103: --
103: --
104: -- Reset IN OUT and set OUT parameters
105: --
106: p_balance_attribute_id := null;
107: p_return_status := hr_multi_message.get_return_status_disable;
108: hr_utility.set_location(' Leaving:' || l_proc,50);
109: end create_balance_attribute;
110: -- ----------------------------------------------------------------------------
111: -- |-----------------------< delete_balance_attribute >-----------------------|
133: savepoint delete_balance_attribute_swi;
134: --
135: -- Initialise Multiple Message Detection
136: --
137: hr_multi_message.enable_message_list;
138: --
139: -- Remember IN OUT parameter IN values
140: --
141: --
167: -- Derive the API return status value based on whether
168: -- messages of any type exist in the Multiple Message List.
169: -- Also disable Multiple Message Detection.
170: --
171: p_return_status := hr_multi_message.get_return_status_disable;
172: hr_utility.set_location(' Leaving:' || l_proc,20);
173: --
174: exception
175: when hr_multi_message.error_message_exist then
171: p_return_status := hr_multi_message.get_return_status_disable;
172: hr_utility.set_location(' Leaving:' || l_proc,20);
173: --
174: exception
175: when hr_multi_message.error_message_exist then
176: --
177: -- Catch the Multiple Message List exception which
178: -- indicates API processing has been aborted because
179: -- at least one message exists in the list.
181: rollback to delete_balance_attribute_swi;
182: --
183: -- Reset IN OUT parameters and set OUT parameters
184: --
185: p_return_status := hr_multi_message.get_return_status_disable;
186: hr_utility.set_location(' Leaving:' || l_proc, 30);
187: when others then
188: --
189: -- When Multiple Message Detection is enabled catch
192: -- Multiple Message List. Otherwise re-raise the
193: -- error.
194: --
195: rollback to delete_balance_attribute_swi;
196: if hr_multi_message.unexpected_error_add(l_proc) then
197: hr_utility.set_location(' Leaving:' || l_proc,40);
198: raise;
199: end if;
200: --
199: end if;
200: --
201: -- Reset IN OUT and set OUT parameters
202: --
203: p_return_status := hr_multi_message.get_return_status_disable;
204: hr_utility.set_location(' Leaving:' || l_proc,50);
205: end delete_balance_attribute;
206: end pay_balance_attribute_swi;