32: savepoint create_time_def_usage_swi;
33: --
34: -- Initialise Multiple Message Detection
35: --
36: hr_multi_message.enable_message_list;
37: --
38: -- Remember IN OUT parameter IN values
39: --
40: --
71: -- Derive the API return status value based on whether
72: -- messages of any type exist in the Multiple Message List.
73: -- Also disable Multiple Message Detection.
74: --
75: p_return_status := hr_multi_message.get_return_status_disable;
76: hr_utility.set_location(' Leaving:' || l_proc,20);
77: --
78: exception
79: when hr_multi_message.error_message_exist then
75: p_return_status := hr_multi_message.get_return_status_disable;
76: hr_utility.set_location(' Leaving:' || l_proc,20);
77: --
78: exception
79: when hr_multi_message.error_message_exist then
80: --
81: -- Catch the Multiple Message List exception which
82: -- indicates API processing has been aborted because
83: -- at least one message exists in the list.
86: --
87: -- Reset IN OUT parameters and set OUT parameters
88: --
89: p_object_version_number := null;
90: p_return_status := hr_multi_message.get_return_status_disable;
91: hr_utility.set_location(' Leaving:' || l_proc, 30);
92: when others then
93: --
94: -- When Multiple Message Detection is enabled catch
97: -- Multiple Message List. Otherwise re-raise the
98: -- error.
99: --
100: rollback to create_time_def_usage_swi;
101: if hr_multi_message.unexpected_error_add(l_proc) then
102: hr_utility.set_location(' Leaving:' || l_proc,40);
103: raise;
104: end if;
105: --
105: --
106: -- Reset IN OUT and set OUT parameters
107: --
108: p_object_version_number := null;
109: p_return_status := hr_multi_message.get_return_status_disable;
110: hr_utility.set_location(' Leaving:' || l_proc,50);
111: end create_time_def_usage;
112: -- ----------------------------------------------------------------------------
113: -- |-------------------------< delete_time_def_usage >------------------------|
136: savepoint delete_time_def_usage_swi;
137: --
138: -- Initialise Multiple Message Detection
139: --
140: hr_multi_message.enable_message_list;
141: --
142: -- Remember IN OUT parameter IN values
143: --
144: --
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.
185: rollback to delete_time_def_usage_swi;
186: --
187: -- Reset IN OUT parameters and set OUT parameters
188: --
189: p_return_status := hr_multi_message.get_return_status_disable;
190: hr_utility.set_location(' Leaving:' || l_proc, 30);
191: when others then
192: --
193: -- When Multiple Message Detection is enabled catch
196: -- Multiple Message List. Otherwise re-raise the
197: -- error.
198: --
199: rollback to delete_time_def_usage_swi;
200: if hr_multi_message.unexpected_error_add(l_proc) then
201: hr_utility.set_location(' Leaving:' || l_proc,40);
202: raise;
203: end if;
204: --
203: end if;
204: --
205: -- Reset IN OUT and set OUT parameters
206: --
207: p_return_status := hr_multi_message.get_return_status_disable;
208: hr_utility.set_location(' Leaving:' || l_proc,50);
209: end delete_time_def_usage;
210: end pay_time_def_usage_swi;