[Home] [Help]
PACKAGE BODY: APPS.OTA_BOOKING_STATUS_TYPE_SWI
Source
1 Package Body ota_booking_status_type_swi As
2 /* $Header: otbstswi.pkb 120.0 2005/05/29 07:04 appldev noship $ */
3 --
4 -- Package variables
5 --
6 g_package varchar2(33) := 'ota_booking_status_type_swi.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |----------------------< create_booking_status_type >----------------------|
10 -- ----------------------------------------------------------------------------
11 PROCEDURE create_booking_status_type
12 (p_validate in number default hr_api.g_false_num
13 ,p_effective_date in date
14 ,p_business_group_id in number
15 ,p_active_flag in varchar2 default null
16 ,p_default_flag in varchar2 default null
17 ,p_name in varchar2 default null
18 ,p_type in varchar2 default null
19 ,p_place_used_flag in varchar2 default null
20 ,p_comments in varchar2 default null
21 ,p_description in varchar2 default null
22 ,p_bst_information_category in varchar2 default null
23 ,p_bst_information1 in varchar2 default null
24 ,p_bst_information2 in varchar2 default null
25 ,p_bst_information3 in varchar2 default null
26 ,p_bst_information4 in varchar2 default null
27 ,p_bst_information5 in varchar2 default null
28 ,p_bst_information6 in varchar2 default null
29 ,p_bst_information7 in varchar2 default null
30 ,p_bst_information8 in varchar2 default null
31 ,p_bst_information9 in varchar2 default null
32 ,p_bst_information10 in varchar2 default null
33 ,p_bst_information11 in varchar2 default null
34 ,p_bst_information12 in varchar2 default null
35 ,p_bst_information13 in varchar2 default null
36 ,p_bst_information14 in varchar2 default null
37 ,p_bst_information15 in varchar2 default null
38 ,p_bst_information16 in varchar2 default null
39 ,p_bst_information17 in varchar2 default null
40 ,p_bst_information18 in varchar2 default null
41 ,p_bst_information19 in varchar2 default null
42 ,p_bst_information20 in varchar2 default null
43 ,p_object_version_number out nocopy number
44 ,p_booking_status_type_id in number
45 -- ,p_data_source in varchar2 default null
46 ,p_return_status out nocopy varchar2
47 ) is
48 --
49 -- Variables for API Boolean parameters
50 l_validate boolean;
51 --
52 -- Variables for IN/OUT parameters
53 --
54 -- Other variables
55 l_booking_status_type_id number;
56 l_proc varchar2(72) := g_package ||'create_booking_status_type';
57 Begin
58 hr_utility.set_location(' Entering:' || l_proc,10);
59 --
60 -- Issue a savepoint
61 --
62 savepoint create_booking_status_type_swi;
63 --
64 -- Initialise Multiple Message Detection
65 --
66 hr_multi_message.enable_message_list;
67 --
68 -- Remember IN OUT parameter IN values
69 --
70 --
71 -- Convert constant values to their corresponding boolean value
72 --
73 l_validate :=
74 hr_api.constant_to_boolean
75 (p_constant_value => p_validate);
76 --
77 -- Register Surrogate ID or user key values
78 --
79 ota_bst_api.set_base_key_value
80 (p_booking_status_type_id => p_booking_status_type_id
81 );
82 --
83 -- Call API
84 --
85 ota_booking_status_type_api.create_booking_status_type
86 (p_validate => l_validate
87 ,p_effective_date => p_effective_date
88 ,p_business_group_id => p_business_group_id
89 ,p_active_flag => p_active_flag
90 ,p_default_flag => p_default_flag
91 ,p_name => p_name
92 ,p_type => p_type
93 ,p_place_used_flag => p_place_used_flag
94 ,p_comments => p_comments
95 ,p_description => p_description
96 ,p_bst_information_category => p_bst_information_category
97 ,p_bst_information1 => p_bst_information1
98 ,p_bst_information2 => p_bst_information2
99 ,p_bst_information3 => p_bst_information3
100 ,p_bst_information4 => p_bst_information4
101 ,p_bst_information5 => p_bst_information5
102 ,p_bst_information6 => p_bst_information6
103 ,p_bst_information7 => p_bst_information7
104 ,p_bst_information8 => p_bst_information8
105 ,p_bst_information9 => p_bst_information9
106 ,p_bst_information10 => p_bst_information10
107 ,p_bst_information11 => p_bst_information11
108 ,p_bst_information12 => p_bst_information12
109 ,p_bst_information13 => p_bst_information13
110 ,p_bst_information14 => p_bst_information14
111 ,p_bst_information15 => p_bst_information15
112 ,p_bst_information16 => p_bst_information16
113 ,p_bst_information17 => p_bst_information17
114 ,p_bst_information18 => p_bst_information18
115 ,p_bst_information19 => p_bst_information19
116 ,p_bst_information20 => p_bst_information20
117 ,p_object_version_number => p_object_version_number
118 ,p_booking_status_type_id => l_booking_status_type_id
119 -- ,p_data_source => p_data_source
120 );
121 --
122 -- Convert API warning boolean parameter values to specific
123 -- messages and add them to Multiple Message List
124 --
125 --
126 -- Convert API non-warning boolean parameter values
127 --
128 --
129 -- Derive the API return status value based on whether
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 --
139 -- Catch the Multiple Message List exception which
140 -- indicates API processing has been aborted because
141 -- at least one message exists in the list.
142 --
143 rollback to create_booking_status_type_swi;
144 --
145 -- Reset IN OUT parameters and set OUT parameters
146 --
147 p_object_version_number := null;
148 p_return_status := hr_multi_message.get_return_status_disable;
149 hr_utility.set_location(' Leaving:' || l_proc, 30);
150 when others then
151 --
152 -- When Multiple Message Detection is enabled catch
153 -- any Application specific or other unexpected
154 -- exceptions. Adding appropriate details to the
155 -- Multiple Message List. Otherwise re-raise the
156 -- error.
157 --
158 rollback to create_booking_status_type_swi;
159 if hr_multi_message.unexpected_error_add(l_proc) then
160 hr_utility.set_location(' Leaving:' || l_proc,40);
161 raise;
162 end if;
163 --
164 -- Reset IN OUT and set OUT parameters
165 --
166 p_object_version_number := null;
167 p_return_status := hr_multi_message.get_return_status_disable;
168 hr_utility.set_location(' Leaving:' || l_proc,50);
169 end create_booking_status_type;
170 -- ----------------------------------------------------------------------------
171 -- |----------------------< update_booking_status_type >----------------------|
172 -- ----------------------------------------------------------------------------
173 PROCEDURE update_booking_status_type
174 (p_validate in number default hr_api.g_false_num
175 ,p_effective_date in date
176 ,p_business_group_id in number
177 ,p_active_flag in varchar2 default hr_api.g_varchar2
178 ,p_default_flag in varchar2 default hr_api.g_varchar2
179 ,p_name in varchar2 default hr_api.g_varchar2
180 ,p_type in varchar2 default hr_api.g_varchar2
181 ,p_place_used_flag in varchar2 default hr_api.g_varchar2
182 ,p_comments in varchar2 default hr_api.g_varchar2
183 ,p_description in varchar2 default hr_api.g_varchar2
184 ,p_bst_information_category in varchar2 default hr_api.g_varchar2
185 ,p_bst_information1 in varchar2 default hr_api.g_varchar2
186 ,p_bst_information2 in varchar2 default hr_api.g_varchar2
187 ,p_bst_information3 in varchar2 default hr_api.g_varchar2
188 ,p_bst_information4 in varchar2 default hr_api.g_varchar2
189 ,p_bst_information5 in varchar2 default hr_api.g_varchar2
190 ,p_bst_information6 in varchar2 default hr_api.g_varchar2
191 ,p_bst_information7 in varchar2 default hr_api.g_varchar2
192 ,p_bst_information8 in varchar2 default hr_api.g_varchar2
193 ,p_bst_information9 in varchar2 default hr_api.g_varchar2
194 ,p_bst_information10 in varchar2 default hr_api.g_varchar2
195 ,p_bst_information11 in varchar2 default hr_api.g_varchar2
196 ,p_bst_information12 in varchar2 default hr_api.g_varchar2
197 ,p_bst_information13 in varchar2 default hr_api.g_varchar2
198 ,p_bst_information14 in varchar2 default hr_api.g_varchar2
199 ,p_bst_information15 in varchar2 default hr_api.g_varchar2
200 ,p_bst_information16 in varchar2 default hr_api.g_varchar2
201 ,p_bst_information17 in varchar2 default hr_api.g_varchar2
202 ,p_bst_information18 in varchar2 default hr_api.g_varchar2
203 ,p_bst_information19 in varchar2 default hr_api.g_varchar2
204 ,p_bst_information20 in varchar2 default hr_api.g_varchar2
205 ,p_booking_status_type_id in number default hr_api.g_number
206 ,p_object_version_number in out nocopy number
207 -- ,p_data_source in varchar2 default hr_api.g_varchar2
208 ,p_return_status out nocopy varchar2
209 ) is
210 --
211 -- Variables for API Boolean parameters
212 l_validate boolean;
213 --
214 -- Variables for IN/OUT parameters
215 l_object_version_number number;
216 --
217 -- Other variables
218 l_proc varchar2(72) := g_package ||'update_booking_status_type';
219 Begin
220 hr_utility.set_location(' Entering:' || l_proc,10);
221 --
222 -- Issue a savepoint
223 --
224 savepoint update_booking_status_type_swi;
225 --
226 -- Initialise Multiple Message Detection
227 --
228 hr_multi_message.enable_message_list;
229 --
230 -- Remember IN OUT parameter IN values
231 --
232 l_object_version_number := p_object_version_number;
233 --
234 -- Convert constant values to their corresponding boolean value
235 --
236 l_validate :=
237 hr_api.constant_to_boolean
238 (p_constant_value => p_validate);
239 --
240 -- Register Surrogate ID or user key values
241 --
242 --
243 -- Call API
244 --
245 ota_booking_status_type_api.update_booking_status_type
246 (p_validate => l_validate
247 ,p_effective_date => p_effective_date
248 ,p_business_group_id => p_business_group_id
249 ,p_active_flag => p_active_flag
250 ,p_default_flag => p_default_flag
251 ,p_name => p_name
252 ,p_type => p_type
253 ,p_place_used_flag => p_place_used_flag
254 ,p_comments => p_comments
255 ,p_description => p_description
256 ,p_bst_information_category => p_bst_information_category
257 ,p_bst_information1 => p_bst_information1
258 ,p_bst_information2 => p_bst_information2
259 ,p_bst_information3 => p_bst_information3
260 ,p_bst_information4 => p_bst_information4
261 ,p_bst_information5 => p_bst_information5
262 ,p_bst_information6 => p_bst_information6
263 ,p_bst_information7 => p_bst_information7
264 ,p_bst_information8 => p_bst_information8
265 ,p_bst_information9 => p_bst_information9
266 ,p_bst_information10 => p_bst_information10
267 ,p_bst_information11 => p_bst_information11
268 ,p_bst_information12 => p_bst_information12
269 ,p_bst_information13 => p_bst_information13
270 ,p_bst_information14 => p_bst_information14
271 ,p_bst_information15 => p_bst_information15
272 ,p_bst_information16 => p_bst_information16
273 ,p_bst_information17 => p_bst_information17
274 ,p_bst_information18 => p_bst_information18
275 ,p_bst_information19 => p_bst_information19
276 ,p_bst_information20 => p_bst_information20
277 ,p_booking_status_type_id => p_booking_status_type_id
278 ,p_object_version_number => p_object_version_number
279 -- ,p_data_source => p_data_source
280 );
281 --
282 -- Convert API warning boolean parameter values to specific
283 -- messages and add them to Multiple Message List
284 --
285 --
286 -- Convert API non-warning boolean parameter values
287 --
288 --
289 -- Derive the API return status value based on whether
290 -- messages of any type exist in the Multiple Message List.
291 -- Also disable Multiple Message Detection.
292 --
293 p_return_status := hr_multi_message.get_return_status_disable;
294 hr_utility.set_location(' Leaving:' || l_proc,20);
295 --
296 exception
297 when hr_multi_message.error_message_exist then
298 --
299 -- Catch the Multiple Message List exception which
300 -- indicates API processing has been aborted because
301 -- at least one message exists in the list.
302 --
303 rollback to update_booking_status_type_swi;
304 --
305 -- Reset IN OUT parameters and set OUT parameters
306 --
307 p_object_version_number := l_object_version_number;
308 p_return_status := hr_multi_message.get_return_status_disable;
309 hr_utility.set_location(' Leaving:' || l_proc, 30);
310 when others then
311 --
312 -- When Multiple Message Detection is enabled catch
313 -- any Application specific or other unexpected
314 -- exceptions. Adding appropriate details to the
315 -- Multiple Message List. Otherwise re-raise the
316 -- error.
317 --
318 rollback to update_booking_status_type_swi;
319 if hr_multi_message.unexpected_error_add(l_proc) then
320 hr_utility.set_location(' Leaving:' || l_proc,40);
321 raise;
322 end if;
323 --
324 -- Reset IN OUT and set OUT parameters
325 --
326 p_object_version_number := l_object_version_number;
327 p_return_status := hr_multi_message.get_return_status_disable;
328 hr_utility.set_location(' Leaving:' || l_proc,50);
329 end update_booking_status_type;
330 -- ----------------------------------------------------------------------------
331 -- |----------------------< delete_booking_status_type >----------------------|
332 -- ----------------------------------------------------------------------------
333 PROCEDURE delete_booking_status_type
334 (p_validate in number default hr_api.g_false_num
335 ,p_booking_status_type_id in number
336 ,p_object_version_number in number
337 ,p_return_status out nocopy varchar2
338 ) is
339 --
340 -- Variables for API Boolean parameters
341 l_validate boolean;
342 --
343 -- Variables for IN/OUT parameters
344 --
345 -- Other variables
346 l_proc varchar2(72) := g_package ||'delete_booking_status_type';
347 Begin
348 hr_utility.set_location(' Entering:' || l_proc,10);
349 --
350 -- Issue a savepoint
351 --
352 savepoint delete_booking_status_type_swi;
353 --
354 -- Initialise Multiple Message Detection
355 --
356 hr_multi_message.enable_message_list;
357 --
358 -- Remember IN OUT parameter IN values
359 --
360 --
361 -- Convert constant values to their corresponding boolean value
362 --
363 l_validate :=
364 hr_api.constant_to_boolean
365 (p_constant_value => p_validate);
366 --
367 -- Register Surrogate ID or user key values
368 --
369 --
370 -- Call API
371 --
372 ota_booking_status_type_api.delete_booking_status_type
373 (p_validate => l_validate
374 ,p_booking_status_type_id => p_booking_status_type_id
375 ,p_object_version_number => p_object_version_number
376 );
377 --
378 -- Convert API warning boolean parameter values to specific
379 -- messages and add them to Multiple Message List
380 --
381 --
382 -- Convert API non-warning boolean parameter values
383 --
384 --
385 -- Derive the API return status value based on whether
386 -- messages of any type exist in the Multiple Message List.
387 -- Also disable Multiple Message Detection.
388 --
389 p_return_status := hr_multi_message.get_return_status_disable;
390 hr_utility.set_location(' Leaving:' || l_proc,20);
391 --
392 exception
393 when hr_multi_message.error_message_exist then
394 --
395 -- Catch the Multiple Message List exception which
396 -- indicates API processing has been aborted because
397 -- at least one message exists in the list.
398 --
399 rollback to delete_booking_status_type_swi;
400 --
401 -- Reset IN OUT parameters and set OUT parameters
402 --
403 p_return_status := hr_multi_message.get_return_status_disable;
404 hr_utility.set_location(' Leaving:' || l_proc, 30);
405 when others then
406 --
407 -- When Multiple Message Detection is enabled catch
408 -- any Application specific or other unexpected
409 -- exceptions. Adding appropriate details to the
410 -- Multiple Message List. Otherwise re-raise the
411 -- error.
412 --
413 rollback to delete_booking_status_type_swi;
414 if hr_multi_message.unexpected_error_add(l_proc) then
415 hr_utility.set_location(' Leaving:' || l_proc,40);
416 raise;
417 end if;
418 --
419 -- Reset IN OUT and set OUT parameters
420 --
421 p_return_status := hr_multi_message.get_return_status_disable;
422 hr_utility.set_location(' Leaving:' || l_proc,50);
423 end delete_booking_status_type;
424 end ota_booking_status_type_swi;