[Home] [Help]
PACKAGE BODY: APPS.PQH_ASSIGN_ACCOMMODATIONS_API
Source
1 Package Body pqh_assign_accommodations_api as
2 /* $Header: pqasaapi.pkb 115.2 2002/11/26 22:34:16 rpasapul noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' PQH_ASSIGN_ACCOMMODATIONS_API.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |-----------------------<create_assign_accommodation>-----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_assign_accommodation
13 (p_validate in boolean default false
14 ,p_effective_date in date
15 ,p_business_group_id in number
16 ,p_assignment_id in number
17 ,p_accommodation_given in varchar2
18 ,p_temporary_assignment in varchar2 default null
19 ,p_accommodation_id in number default null
20 ,p_acceptance_date in date default null
21 ,p_moving_date in date default null
22 ,p_refusal_date in date default null
23 ,p_comments in varchar2 default null
24 ,p_indemnity_entitlement in varchar2 default null
25 ,p_indemnity_amount in number default null
26 ,p_type_of_payment in varchar2 default null
27 ,p_information_category in varchar2 default null
28 ,p_information1 in varchar2 default null
29 ,p_information2 in varchar2 default null
30 ,p_information3 in varchar2 default null
31 ,p_information4 in varchar2 default null
32 ,p_information5 in varchar2 default null
33 ,p_information6 in varchar2 default null
34 ,p_information7 in varchar2 default null
35 ,p_information8 in varchar2 default null
36 ,p_information9 in varchar2 default null
37 ,p_information10 in varchar2 default null
38 ,p_information11 in varchar2 default null
39 ,p_information12 in varchar2 default null
40 ,p_information13 in varchar2 default null
41 ,p_information14 in varchar2 default null
42 ,p_information15 in varchar2 default null
43 ,p_information16 in varchar2 default null
44 ,p_information17 in varchar2 default null
45 ,p_information18 in varchar2 default null
46 ,p_information19 in varchar2 default null
47 ,p_information20 in varchar2 default null
48 ,p_information21 in varchar2 default null
49 ,p_information22 in varchar2 default null
50 ,p_information23 in varchar2 default null
51 ,p_information24 in varchar2 default null
52 ,p_information25 in varchar2 default null
53 ,p_information26 in varchar2 default null
54 ,p_information27 in varchar2 default null
55 ,p_information28 in varchar2 default null
56 ,p_information29 in varchar2 default null
57 ,p_information30 in varchar2 default null
58 ,p_attribute_category in varchar2 default null
59 ,p_attribute1 in varchar2 default null
60 ,p_attribute2 in varchar2 default null
61 ,p_attribute3 in varchar2 default null
62 ,p_attribute4 in varchar2 default null
63 ,p_attribute5 in varchar2 default null
64 ,p_attribute6 in varchar2 default null
65 ,p_attribute7 in varchar2 default null
66 ,p_attribute8 in varchar2 default null
67 ,p_attribute9 in varchar2 default null
68 ,p_attribute10 in varchar2 default null
69 ,p_attribute11 in varchar2 default null
70 ,p_attribute12 in varchar2 default null
71 ,p_attribute13 in varchar2 default null
72 ,p_attribute14 in varchar2 default null
73 ,p_attribute15 in varchar2 default null
74 ,p_attribute16 in varchar2 default null
75 ,p_attribute17 in varchar2 default null
76 ,p_attribute18 in varchar2 default null
77 ,p_attribute19 in varchar2 default null
78 ,p_attribute20 in varchar2 default null
79 ,p_attribute21 in varchar2 default null
80 ,p_attribute22 in varchar2 default null
81 ,p_attribute23 in varchar2 default null
82 ,p_attribute24 in varchar2 default null
83 ,p_attribute25 in varchar2 default null
84 ,p_attribute26 in varchar2 default null
85 ,p_attribute27 in varchar2 default null
86 ,p_attribute28 in varchar2 default null
87 ,p_attribute29 in varchar2 default null
88 ,p_attribute30 in varchar2 default null
89 ,p_reason_for_no_acco in varchar2 default null
90 ,p_indemnity_currency in varchar2 default null
91 ,p_assignment_acco_id out nocopy number
92 ,p_object_version_number out nocopy number
93 ,p_effective_start_date out nocopy date
94 ,p_effective_end_date out nocopy date
95 ) is
96 --
97 -- Declare cursors and local variables
98 --
99
100 l_proc varchar2(72) := g_package||'CREATE_ASSIGN_ACCOMMODATION';
101
102 l_assignment_acco_id pqh_assign_accommodations_f.assignment_acco_id%TYPE;
103 l_object_version_number pqh_assign_accommodations_f.object_version_number%TYPE;
104 l_effective_start_date pqh_assign_accommodations_f.effective_start_date%TYPE;
105 l_effective_end_date pqh_assign_accommodations_f.effective_end_date%TYPE;
106 --
107 begin
108 hr_utility.set_location('Entering:'|| l_proc, 10);
109 --
110 -- Issue a savepoint
111 --
112 savepoint CREATE_ASSIGN_ACCOMMODATION;
113 --
114 -- Truncate the time portion from all IN date parameters
115 --
116
117 --
118 -- Call Before Process User Hook
119 --
120 begin
121 PQH_ASSIGN_ACCOMMODATIONS_BK1.create_assign_accommodation_b
122 (p_effective_date => p_effective_date
123 ,p_business_group_id => p_business_group_id
124 ,p_assignment_id => p_assignment_id
125 ,p_accommodation_given => p_accommodation_given
126 ,p_temporary_assignment => p_temporary_assignment
127 ,p_accommodation_id => p_accommodation_id
128 ,p_acceptance_date => p_acceptance_date
129 ,p_moving_date => p_moving_date
130 ,p_refusal_date => p_refusal_date
131 ,p_comments => p_comments
132 ,p_indemnity_entitlement => p_indemnity_entitlement
133 ,p_indemnity_amount => p_indemnity_amount
134 ,p_type_of_payment => p_type_of_payment
135 ,p_information_category => p_information_category
136 ,p_information1 => p_information1
137 ,p_information2 => p_information2
138 ,p_information3 => p_information3
139 ,p_information4 => p_information4
140 ,p_information5 => p_information5
141 ,p_information6 => p_information6
142 ,p_information7 => p_information7
143 ,p_information8 => p_information8
144 ,p_information9 => p_information9
145 ,p_information10 => p_information10
146 ,p_information11 => p_information11
147 ,p_information12 => p_information12
148 ,p_information13 => p_information13
149 ,p_information14 => p_information14
150 ,p_information15 => p_information15
151 ,p_information16 => p_information16
152 ,p_information17 => p_information17
153 ,p_information18 => p_information18
154 ,p_information19 => p_information19
155 ,p_information20 => p_information20
156 ,p_information21 => p_information21
157 ,p_information22 => p_information22
158 ,p_information23 => p_information23
159 ,p_information24 => p_information24
160 ,p_information25 => p_information25
161 ,p_information26 => p_information26
162 ,p_information27 => p_information27
163 ,p_information28 => p_information28
164 ,p_information29 => p_information29
165 ,p_information30 => p_information30
166 ,p_attribute_category => p_attribute_category
167 ,p_attribute1 => p_attribute1
168 ,p_attribute2 => p_attribute2
169 ,p_attribute3 => p_attribute3
170 ,p_attribute4 => p_attribute4
171 ,p_attribute5 => p_attribute5
172 ,p_attribute6 => p_attribute6
173 ,p_attribute7 => p_attribute7
174 ,p_attribute8 => p_attribute8
175 ,p_attribute9 => p_attribute9
176 ,p_attribute10 => p_attribute10
177 ,p_attribute11 => p_attribute11
178 ,p_attribute12 => p_attribute12
179 ,p_attribute13 => p_attribute13
180 ,p_attribute14 => p_attribute14
181 ,p_attribute15 => p_attribute15
182 ,p_attribute16 => p_attribute16
183 ,p_attribute17 => p_attribute17
184 ,p_attribute18 => p_attribute18
185 ,p_attribute19 => p_attribute19
186 ,p_attribute20 => p_attribute20
187 ,p_attribute21 => p_attribute21
188 ,p_attribute22 => p_attribute22
189 ,p_attribute23 => p_attribute23
190 ,p_attribute24 => p_attribute24
191 ,p_attribute25 => p_attribute25
192 ,p_attribute26 => p_attribute26
193 ,p_attribute27 => p_attribute27
194 ,p_attribute28 => p_attribute28
195 ,p_attribute29 => p_attribute29
196 ,p_attribute30 => p_attribute30
197 ,p_reason_for_no_acco => p_reason_for_no_acco
198 ,p_indemnity_currency => p_indemnity_currency
199 );
200 exception
201 when hr_api.cannot_find_prog_unit then
202 hr_api.cannot_find_prog_unit_error
203 (p_module_name => 'CREATE_ASSIGN_ACCOMMODATION'
204 ,p_hook_type => 'BP'
205 );
206 end create_assign_accommodation;
207 --
208 -- Validation in addition to Row Handlers
209 --
210
211
212
213 --
214 -- Process Logic
215 --
216 pqh_asa_ins.ins
217 (p_effective_date => p_effective_date
218 ,p_business_group_id => p_business_group_id
219 ,p_assignment_id => p_assignment_id
220 ,p_accommodation_given => p_accommodation_given
221 ,p_temporary_assignment => p_temporary_assignment
222 ,p_accommodation_id => p_accommodation_id
223 ,p_acceptance_date => p_acceptance_date
224 ,p_moving_date => p_moving_date
225 ,p_refusal_date => p_refusal_date
226 ,p_comments => p_comments
227 ,p_indemnity_entitlement => p_indemnity_entitlement
228 ,p_indemnity_amount => p_indemnity_amount
229 ,p_type_of_payment => p_type_of_payment
230 ,p_information_category => p_information_category
231 ,p_information1 => p_information1
232 ,p_information2 => p_information2
233 ,p_information3 => p_information3
234 ,p_information4 => p_information4
235 ,p_information5 => p_information5
236 ,p_information6 => p_information6
237 ,p_information7 => p_information7
238 ,p_information8 => p_information8
239 ,p_information9 => p_information9
240 ,p_information10 => p_information10
241 ,p_information11 => p_information11
242 ,p_information12 => p_information12
243 ,p_information13 => p_information13
244 ,p_information14 => p_information14
245 ,p_information15 => p_information15
246 ,p_information16 => p_information16
247 ,p_information17 => p_information17
248 ,p_information18 => p_information18
249 ,p_information19 => p_information19
250 ,p_information20 => p_information20
251 ,p_information21 => p_information21
252 ,p_information22 => p_information22
253 ,p_information23 => p_information23
254 ,p_information24 => p_information24
255 ,p_information25 => p_information25
256 ,p_information26 => p_information26
257 ,p_information27 => p_information27
258 ,p_information28 => p_information28
259 ,p_information29 => p_information29
260 ,p_information30 => p_information30
261 ,p_attribute_category => p_attribute_category
262 ,p_attribute1 => p_attribute1
263 ,p_attribute2 => p_attribute2
264 ,p_attribute3 => p_attribute3
265 ,p_attribute4 => p_attribute4
266 ,p_attribute5 => p_attribute5
267 ,p_attribute6 => p_attribute6
268 ,p_attribute7 => p_attribute7
269 ,p_attribute8 => p_attribute8
270 ,p_attribute9 => p_attribute9
271 ,p_attribute10 => p_attribute10
272 ,p_attribute11 => p_attribute11
273 ,p_attribute12 => p_attribute12
274 ,p_attribute13 => p_attribute13
275 ,p_attribute14 => p_attribute14
276 ,p_attribute15 => p_attribute15
277 ,p_attribute16 => p_attribute16
278 ,p_attribute17 => p_attribute17
279 ,p_attribute18 => p_attribute18
280 ,p_attribute19 => p_attribute19
281 ,p_attribute20 => p_attribute20
282 ,p_attribute21 => p_attribute21
283 ,p_attribute22 => p_attribute22
284 ,p_attribute23 => p_attribute23
285 ,p_attribute24 => p_attribute24
286 ,p_attribute25 => p_attribute25
287 ,p_attribute26 => p_attribute26
288 ,p_attribute27 => p_attribute27
289 ,p_attribute28 => p_attribute28
290 ,p_attribute29 => p_attribute29
291 ,p_attribute30 => p_attribute30
292 ,p_reason_for_no_acco => p_reason_for_no_acco
293 ,p_indemnity_currency => p_indemnity_currency
294 ,p_assignment_acco_id => l_assignment_acco_id
295 ,p_object_version_number => l_object_version_number
296 ,p_effective_start_date => l_effective_start_date
297 ,p_effective_end_date => l_effective_end_date
298 );
299
300
301 --
302 -- Call After Process User Hook
303 --
304 begin
305 PQH_ASSIGN_ACCOMMODATIONS_BK1.create_assign_accommodation_a
306 (p_effective_date => p_effective_date
307 ,p_business_group_id => p_business_group_id
308 ,p_assignment_id => p_assignment_id
309 ,p_accommodation_given => p_accommodation_given
310 ,p_temporary_assignment => p_temporary_assignment
311 ,p_accommodation_id => p_accommodation_id
312 ,p_acceptance_date => p_acceptance_date
313 ,p_moving_date => p_moving_date
314 ,p_refusal_date => p_refusal_date
315 ,p_comments => p_comments
316 ,p_indemnity_entitlement => p_indemnity_entitlement
317 ,p_indemnity_amount => p_indemnity_amount
318 ,p_type_of_payment => p_type_of_payment
319 ,p_information_category => p_information_category
320 ,p_information1 => p_information1
321 ,p_information2 => p_information2
322 ,p_information3 => p_information3
323 ,p_information4 => p_information4
324 ,p_information5 => p_information5
325 ,p_information6 => p_information6
326 ,p_information7 => p_information7
327 ,p_information8 => p_information8
328 ,p_information9 => p_information9
329 ,p_information10 => p_information10
330 ,p_information11 => p_information11
331 ,p_information12 => p_information12
332 ,p_information13 => p_information13
333 ,p_information14 => p_information14
334 ,p_information15 => p_information15
335 ,p_information16 => p_information16
336 ,p_information17 => p_information17
337 ,p_information18 => p_information18
338 ,p_information19 => p_information19
339 ,p_information20 => p_information20
340 ,p_information21 => p_information21
341 ,p_information22 => p_information22
342 ,p_information23 => p_information23
343 ,p_information24 => p_information24
344 ,p_information25 => p_information25
345 ,p_information26 => p_information26
346 ,p_information27 => p_information27
347 ,p_information28 => p_information28
348 ,p_information29 => p_information29
349 ,p_information30 => p_information30
350 ,p_attribute_category => p_attribute_category
351 ,p_attribute1 => p_attribute1
352 ,p_attribute2 => p_attribute2
353 ,p_attribute3 => p_attribute3
354 ,p_attribute4 => p_attribute4
355 ,p_attribute5 => p_attribute5
356 ,p_attribute6 => p_attribute6
357 ,p_attribute7 => p_attribute7
358 ,p_attribute8 => p_attribute8
359 ,p_attribute9 => p_attribute9
360 ,p_attribute10 => p_attribute10
361 ,p_attribute11 => p_attribute11
362 ,p_attribute12 => p_attribute12
363 ,p_attribute13 => p_attribute13
364 ,p_attribute14 => p_attribute14
365 ,p_attribute15 => p_attribute15
366 ,p_attribute16 => p_attribute16
367 ,p_attribute17 => p_attribute17
368 ,p_attribute18 => p_attribute18
369 ,p_attribute19 => p_attribute19
370 ,p_attribute20 => p_attribute20
371 ,p_attribute21 => p_attribute21
372 ,p_attribute22 => p_attribute22
373 ,p_attribute23 => p_attribute23
374 ,p_attribute24 => p_attribute24
375 ,p_attribute25 => p_attribute25
376 ,p_attribute26 => p_attribute26
377 ,p_attribute27 => p_attribute27
378 ,p_attribute28 => p_attribute28
379 ,p_attribute29 => p_attribute29
380 ,p_attribute30 => p_attribute30
381 ,p_reason_for_no_acco => p_reason_for_no_acco
382 ,p_indemnity_currency => p_indemnity_currency
383 ,p_assignment_acco_id => l_assignment_acco_id
384 ,p_object_version_number => l_object_version_number
385 ,p_effective_start_date => l_effective_start_date
386 ,p_effective_end_date => l_effective_end_date
387 );
388 exception
389 when hr_api.cannot_find_prog_unit then
390 hr_api.cannot_find_prog_unit_error
391 (p_module_name => 'CREATE_ASSIGN_ACCOMMODATION'
392 ,p_hook_type => 'AP'
393 );
394 end;
395 --
396 -- When in validation only mode raise the Validate_Enabled exception
397 --
398 if p_validate then
399 raise hr_api.validate_enabled;
400 end if;
401 --
402 -- Set all output arguments
403 --
404 p_assignment_acco_id := l_assignment_acco_id;
405 p_object_version_number := l_object_version_number;
406 p_effective_start_date := l_effective_start_date;
407 p_effective_end_date := l_effective_end_date;
408 --
409 hr_utility.set_location(' Leaving:'||l_proc, 70);
410 exception
411 when hr_api.validate_enabled then
412 --
413 -- As the Validate_Enabled exception has been raised
414 -- we must rollback to the savepoint
415 --
416 rollback to CREATE_ASSIGN_ACCOMMODATION;
417 --
418 -- Only set output warning arguments
419 -- (Any key or derived arguments must be set to null
420 -- when validation only mode is being used.)
421 --
422 p_assignment_acco_id := null;
423 p_object_version_number := null;
424 p_effective_start_date := null;
425 p_effective_end_date := null;
426 hr_utility.set_location(' Leaving:'||l_proc, 80);
427 when others then
428 p_assignment_acco_id := null;
429 p_object_version_number := null;
430 p_effective_start_date := null;
431 p_effective_end_date := null;
432
433 --
434 -- A validation or unexpected error has occured
435 --
436 rollback to CREATE_ASSIGN_ACCOMMODATION;
437 hr_utility.set_location(' Leaving:'||l_proc, 90);
438 raise;
439 end create_assign_accommodation;
440 --
441 --
442 -- ----------------------------------------------------------------------------
443 -- |-----------------------<update_assign_accommodation>----------------------|
444 -- ----------------------------------------------------------------------------
445 --
446 procedure update_assign_accommodation
447 (p_validate in boolean default false
448 ,p_effective_date in date
449 ,p_datetrack_mode in varchar2
450 ,p_assignment_acco_id in number
451 ,p_object_version_number in out nocopy number
452 ,p_business_group_id in number default hr_api.g_number
453 ,p_assignment_id in number default hr_api.g_number
454 ,p_accommodation_given in varchar2 default hr_api.g_varchar2
455 ,p_temporary_assignment in varchar2 default hr_api.g_varchar2
456 ,p_accommodation_id in number default hr_api.g_number
457 ,p_acceptance_date in date default hr_api.g_date
458 ,p_moving_date in date default hr_api.g_date
459 ,p_refusal_date in date default hr_api.g_date
460 ,p_comments in varchar2 default hr_api.g_varchar2
461 ,p_indemnity_entitlement in varchar2 default hr_api.g_varchar2
462 ,p_indemnity_amount in number default hr_api.g_number
463 ,p_type_of_payment in varchar2 default hr_api.g_varchar2
464 ,p_information_category in varchar2 default hr_api.g_varchar2
465 ,p_information1 in varchar2 default hr_api.g_varchar2
466 ,p_information2 in varchar2 default hr_api.g_varchar2
467 ,p_information3 in varchar2 default hr_api.g_varchar2
468 ,p_information4 in varchar2 default hr_api.g_varchar2
469 ,p_information5 in varchar2 default hr_api.g_varchar2
470 ,p_information6 in varchar2 default hr_api.g_varchar2
471 ,p_information7 in varchar2 default hr_api.g_varchar2
472 ,p_information8 in varchar2 default hr_api.g_varchar2
473 ,p_information9 in varchar2 default hr_api.g_varchar2
474 ,p_information10 in varchar2 default hr_api.g_varchar2
475 ,p_information11 in varchar2 default hr_api.g_varchar2
476 ,p_information12 in varchar2 default hr_api.g_varchar2
477 ,p_information13 in varchar2 default hr_api.g_varchar2
478 ,p_information14 in varchar2 default hr_api.g_varchar2
479 ,p_information15 in varchar2 default hr_api.g_varchar2
480 ,p_information16 in varchar2 default hr_api.g_varchar2
481 ,p_information17 in varchar2 default hr_api.g_varchar2
482 ,p_information18 in varchar2 default hr_api.g_varchar2
483 ,p_information19 in varchar2 default hr_api.g_varchar2
484 ,p_information20 in varchar2 default hr_api.g_varchar2
485 ,p_information21 in varchar2 default hr_api.g_varchar2
486 ,p_information22 in varchar2 default hr_api.g_varchar2
487 ,p_information23 in varchar2 default hr_api.g_varchar2
488 ,p_information24 in varchar2 default hr_api.g_varchar2
489 ,p_information25 in varchar2 default hr_api.g_varchar2
490 ,p_information26 in varchar2 default hr_api.g_varchar2
491 ,p_information27 in varchar2 default hr_api.g_varchar2
492 ,p_information28 in varchar2 default hr_api.g_varchar2
493 ,p_information29 in varchar2 default hr_api.g_varchar2
494 ,p_information30 in varchar2 default hr_api.g_varchar2
495 ,p_attribute_category in varchar2 default hr_api.g_varchar2
496 ,p_attribute1 in varchar2 default hr_api.g_varchar2
497 ,p_attribute2 in varchar2 default hr_api.g_varchar2
498 ,p_attribute3 in varchar2 default hr_api.g_varchar2
499 ,p_attribute4 in varchar2 default hr_api.g_varchar2
500 ,p_attribute5 in varchar2 default hr_api.g_varchar2
501 ,p_attribute6 in varchar2 default hr_api.g_varchar2
502 ,p_attribute7 in varchar2 default hr_api.g_varchar2
503 ,p_attribute8 in varchar2 default hr_api.g_varchar2
504 ,p_attribute9 in varchar2 default hr_api.g_varchar2
505 ,p_attribute10 in varchar2 default hr_api.g_varchar2
506 ,p_attribute11 in varchar2 default hr_api.g_varchar2
507 ,p_attribute12 in varchar2 default hr_api.g_varchar2
508 ,p_attribute13 in varchar2 default hr_api.g_varchar2
509 ,p_attribute14 in varchar2 default hr_api.g_varchar2
510 ,p_attribute15 in varchar2 default hr_api.g_varchar2
511 ,p_attribute16 in varchar2 default hr_api.g_varchar2
512 ,p_attribute17 in varchar2 default hr_api.g_varchar2
513 ,p_attribute18 in varchar2 default hr_api.g_varchar2
514 ,p_attribute19 in varchar2 default hr_api.g_varchar2
515 ,p_attribute20 in varchar2 default hr_api.g_varchar2
516 ,p_attribute21 in varchar2 default hr_api.g_varchar2
517 ,p_attribute22 in varchar2 default hr_api.g_varchar2
518 ,p_attribute23 in varchar2 default hr_api.g_varchar2
519 ,p_attribute24 in varchar2 default hr_api.g_varchar2
520 ,p_attribute25 in varchar2 default hr_api.g_varchar2
521 ,p_attribute26 in varchar2 default hr_api.g_varchar2
522 ,p_attribute27 in varchar2 default hr_api.g_varchar2
523 ,p_attribute28 in varchar2 default hr_api.g_varchar2
524 ,p_attribute29 in varchar2 default hr_api.g_varchar2
525 ,p_attribute30 in varchar2 default hr_api.g_varchar2
526 ,p_reason_for_no_acco in varchar2 default hr_api.g_varchar2
527 ,p_indemnity_currency in varchar2 default hr_api.g_varchar2
528 ,p_effective_start_date out nocopy date
529 ,p_effective_end_date out nocopy date
530 ) is
531 --
532 -- Declare cursors and local variables
533 --
534
535 l_proc varchar2(72) := g_package||'UPDATE_ASSIGN_ACCOMMODATION';
536
537 l_effective_start_date pqh_assign_accommodations_f.effective_start_date%TYPE;
538 l_effective_end_date pqh_assign_accommodations_f.effective_end_date%TYPE;
539 l_object_version_number number := p_object_version_number;
540 --
541 begin
542 hr_utility.set_location('Entering:'|| l_proc, 10);
543 --
544 -- Issue a savepoint
545 --
546 savepoint UPDATE_ASSIGN_ACCOMMODATION;
547 --
548 -- Truncate the time portion from all IN date parameters
549 --
550
551 --
552 -- Call Before Process User Hook
553 --
554 begin
555 PQH_ASSIGN_ACCOMMODATIONS_BK2.update_assign_accommodation_b
556 (p_effective_date => p_effective_date
557 ,p_datetrack_mode => p_datetrack_mode
558 ,p_assignment_acco_id => p_assignment_acco_id
559 ,p_object_version_number => p_object_version_number
560 ,p_business_group_id => p_business_group_id
561 ,p_assignment_id => p_assignment_id
562 ,p_accommodation_given => p_accommodation_given
563 ,p_temporary_assignment => p_temporary_assignment
564 ,p_accommodation_id => p_accommodation_id
565 ,p_acceptance_date => p_acceptance_date
566 ,p_moving_date => p_moving_date
567 ,p_refusal_date => p_refusal_date
568 ,p_comments => p_comments
569 ,p_indemnity_entitlement => p_indemnity_entitlement
570 ,p_indemnity_amount => p_indemnity_amount
571 ,p_type_of_payment => p_type_of_payment
572 ,p_information_category => p_information_category
573 ,p_information1 => p_information1
574 ,p_information2 => p_information2
575 ,p_information3 => p_information3
576 ,p_information4 => p_information4
577 ,p_information5 => p_information5
578 ,p_information6 => p_information6
579 ,p_information7 => p_information7
580 ,p_information8 => p_information8
581 ,p_information9 => p_information9
582 ,p_information10 => p_information10
583 ,p_information11 => p_information11
584 ,p_information12 => p_information12
585 ,p_information13 => p_information13
586 ,p_information14 => p_information14
587 ,p_information15 => p_information15
588 ,p_information16 => p_information16
589 ,p_information17 => p_information17
590 ,p_information18 => p_information18
591 ,p_information19 => p_information19
592 ,p_information20 => p_information20
593 ,p_information21 => p_information21
594 ,p_information22 => p_information22
595 ,p_information23 => p_information23
596 ,p_information24 => p_information24
597 ,p_information25 => p_information25
598 ,p_information26 => p_information26
599 ,p_information27 => p_information27
600 ,p_information28 => p_information28
601 ,p_information29 => p_information29
602 ,p_information30 => p_information30
603 ,p_attribute_category => p_attribute_category
604 ,p_attribute1 => p_attribute1
605 ,p_attribute2 => p_attribute2
606 ,p_attribute3 => p_attribute3
607 ,p_attribute4 => p_attribute4
608 ,p_attribute5 => p_attribute5
609 ,p_attribute6 => p_attribute6
610 ,p_attribute7 => p_attribute7
611 ,p_attribute8 => p_attribute8
612 ,p_attribute9 => p_attribute9
613 ,p_attribute10 => p_attribute10
614 ,p_attribute11 => p_attribute11
615 ,p_attribute12 => p_attribute12
616 ,p_attribute13 => p_attribute13
617 ,p_attribute14 => p_attribute14
618 ,p_attribute15 => p_attribute15
619 ,p_attribute16 => p_attribute16
620 ,p_attribute17 => p_attribute17
621 ,p_attribute18 => p_attribute18
622 ,p_attribute19 => p_attribute19
623 ,p_attribute20 => p_attribute20
624 ,p_attribute21 => p_attribute21
625 ,p_attribute22 => p_attribute22
626 ,p_attribute23 => p_attribute23
627 ,p_attribute24 => p_attribute24
628 ,p_attribute25 => p_attribute25
629 ,p_attribute26 => p_attribute26
630 ,p_attribute27 => p_attribute27
631 ,p_attribute28 => p_attribute28
632 ,p_attribute29 => p_attribute29
633 ,p_attribute30 => p_attribute30
634 ,p_reason_for_no_acco => p_reason_for_no_acco
635 ,p_indemnity_currency => p_indemnity_currency
636 );
637 exception
638 when hr_api.cannot_find_prog_unit then
639 hr_api.cannot_find_prog_unit_error
640 (p_module_name => 'UPDATE_ASSIGN_ACCOMMODATION'
641 ,p_hook_type => 'BP'
642 );
643 end;
644 --
645 -- Validation in addition to Row Handlers
646 --
647
648
649
650 --
651 -- Process Logic
652 --
653 pqh_asa_upd.upd
654 (p_effective_date => p_effective_date
655 ,p_datetrack_mode => p_datetrack_mode
656 ,p_assignment_acco_id => p_assignment_acco_id
657 ,p_object_version_number => p_object_version_number
658 ,p_business_group_id => p_business_group_id
659 ,p_assignment_id => p_assignment_id
660 ,p_accommodation_given => p_accommodation_given
661 ,p_temporary_assignment => p_temporary_assignment
662 ,p_accommodation_id => p_accommodation_id
663 ,p_acceptance_date => p_acceptance_date
664 ,p_moving_date => p_moving_date
665 ,p_refusal_date => p_refusal_date
666 ,p_comments => p_comments
667 ,p_indemnity_entitlement => p_indemnity_entitlement
668 ,p_indemnity_amount => p_indemnity_amount
669 ,p_type_of_payment => p_type_of_payment
670 ,p_information_category => p_information_category
671 ,p_information1 => p_information1
672 ,p_information2 => p_information2
673 ,p_information3 => p_information3
674 ,p_information4 => p_information4
675 ,p_information5 => p_information5
676 ,p_information6 => p_information6
677 ,p_information7 => p_information7
678 ,p_information8 => p_information8
679 ,p_information9 => p_information9
680 ,p_information10 => p_information10
681 ,p_information11 => p_information11
682 ,p_information12 => p_information12
683 ,p_information13 => p_information13
684 ,p_information14 => p_information14
685 ,p_information15 => p_information15
686 ,p_information16 => p_information16
687 ,p_information17 => p_information17
688 ,p_information18 => p_information18
689 ,p_information19 => p_information19
690 ,p_information20 => p_information20
691 ,p_information21 => p_information21
692 ,p_information22 => p_information22
693 ,p_information23 => p_information23
694 ,p_information24 => p_information24
695 ,p_information25 => p_information25
696 ,p_information26 => p_information26
697 ,p_information27 => p_information27
698 ,p_information28 => p_information28
699 ,p_information29 => p_information29
700 ,p_information30 => p_information30
701 ,p_attribute_category => p_attribute_category
702 ,p_attribute1 => p_attribute1
703 ,p_attribute2 => p_attribute2
704 ,p_attribute3 => p_attribute3
705 ,p_attribute4 => p_attribute4
706 ,p_attribute5 => p_attribute5
707 ,p_attribute6 => p_attribute6
708 ,p_attribute7 => p_attribute7
709 ,p_attribute8 => p_attribute8
710 ,p_attribute9 => p_attribute9
711 ,p_attribute10 => p_attribute10
712 ,p_attribute11 => p_attribute11
713 ,p_attribute12 => p_attribute12
714 ,p_attribute13 => p_attribute13
715 ,p_attribute14 => p_attribute14
716 ,p_attribute15 => p_attribute15
717 ,p_attribute16 => p_attribute16
718 ,p_attribute17 => p_attribute17
719 ,p_attribute18 => p_attribute18
720 ,p_attribute19 => p_attribute19
721 ,p_attribute20 => p_attribute20
722 ,p_attribute21 => p_attribute21
723 ,p_attribute22 => p_attribute22
724 ,p_attribute23 => p_attribute23
725 ,p_attribute24 => p_attribute24
726 ,p_attribute25 => p_attribute25
727 ,p_attribute26 => p_attribute26
728 ,p_attribute27 => p_attribute27
729 ,p_attribute28 => p_attribute28
730 ,p_attribute29 => p_attribute29
731 ,p_attribute30 => p_attribute30
732 ,p_reason_for_no_acco => p_reason_for_no_acco
733 ,p_indemnity_currency => p_indemnity_currency
734 ,p_effective_start_date => l_effective_start_date
735 ,p_effective_end_date => l_effective_end_date
736 );
737
738
739 --
740 -- Call After Process User Hook
741 --
742 begin
743 PQH_ASSIGN_ACCOMMODATIONS_BK2.update_assign_accommodation_a
744 (p_effective_date => p_effective_date
745 ,p_datetrack_mode => p_datetrack_mode
746 ,p_assignment_acco_id => p_assignment_acco_id
747 ,p_object_version_number => p_object_version_number
748 ,p_business_group_id => p_business_group_id
749 ,p_assignment_id => p_assignment_id
750 ,p_accommodation_given => p_accommodation_given
751 ,p_temporary_assignment => p_temporary_assignment
752 ,p_accommodation_id => p_accommodation_id
753 ,p_acceptance_date => p_acceptance_date
754 ,p_moving_date => p_moving_date
755 ,p_refusal_date => p_refusal_date
756 ,p_comments => p_comments
757 ,p_indemnity_entitlement => p_indemnity_entitlement
758 ,p_indemnity_amount => p_indemnity_amount
759 ,p_type_of_payment => p_type_of_payment
760 ,p_information_category => p_information_category
761 ,p_information1 => p_information1
762 ,p_information2 => p_information2
763 ,p_information3 => p_information3
764 ,p_information4 => p_information4
765 ,p_information5 => p_information5
766 ,p_information6 => p_information6
767 ,p_information7 => p_information7
768 ,p_information8 => p_information8
769 ,p_information9 => p_information9
770 ,p_information10 => p_information10
771 ,p_information11 => p_information11
772 ,p_information12 => p_information12
773 ,p_information13 => p_information13
774 ,p_information14 => p_information14
775 ,p_information15 => p_information15
776 ,p_information16 => p_information16
777 ,p_information17 => p_information17
778 ,p_information18 => p_information18
779 ,p_information19 => p_information19
780 ,p_information20 => p_information20
781 ,p_information21 => p_information21
782 ,p_information22 => p_information22
783 ,p_information23 => p_information23
784 ,p_information24 => p_information24
785 ,p_information25 => p_information25
786 ,p_information26 => p_information26
787 ,p_information27 => p_information27
788 ,p_information28 => p_information28
789 ,p_information29 => p_information29
790 ,p_information30 => p_information30
791 ,p_attribute_category => p_attribute_category
792 ,p_attribute1 => p_attribute1
793 ,p_attribute2 => p_attribute2
794 ,p_attribute3 => p_attribute3
795 ,p_attribute4 => p_attribute4
796 ,p_attribute5 => p_attribute5
797 ,p_attribute6 => p_attribute6
798 ,p_attribute7 => p_attribute7
799 ,p_attribute8 => p_attribute8
800 ,p_attribute9 => p_attribute9
801 ,p_attribute10 => p_attribute10
802 ,p_attribute11 => p_attribute11
803 ,p_attribute12 => p_attribute12
804 ,p_attribute13 => p_attribute13
805 ,p_attribute14 => p_attribute14
806 ,p_attribute15 => p_attribute15
807 ,p_attribute16 => p_attribute16
808 ,p_attribute17 => p_attribute17
809 ,p_attribute18 => p_attribute18
810 ,p_attribute19 => p_attribute19
811 ,p_attribute20 => p_attribute20
812 ,p_attribute21 => p_attribute21
813 ,p_attribute22 => p_attribute22
814 ,p_attribute23 => p_attribute23
815 ,p_attribute24 => p_attribute24
816 ,p_attribute25 => p_attribute25
817 ,p_attribute26 => p_attribute26
818 ,p_attribute27 => p_attribute27
819 ,p_attribute28 => p_attribute28
820 ,p_attribute29 => p_attribute29
821 ,p_attribute30 => p_attribute30
822 ,p_reason_for_no_acco => p_reason_for_no_acco
823 ,p_indemnity_currency => p_indemnity_currency
824 ,p_effective_start_date => l_effective_start_date
825 ,p_effective_end_date => l_effective_end_date
826 );
827 exception
828 when hr_api.cannot_find_prog_unit then
829 hr_api.cannot_find_prog_unit_error
830 (p_module_name => 'UPDATE_ASSIGN_ACCOMMODATION'
831 ,p_hook_type => 'AP'
832 );
833 end;
834 --
835 -- When in validation only mode raise the Validate_Enabled exception
836 --
837 if p_validate then
838 raise hr_api.validate_enabled;
839 end if;
840 --
841 -- Set all output arguments
842 --
843 p_object_version_number := p_object_version_number;
844 p_effective_start_date := l_effective_start_date;
845 p_effective_end_date := l_effective_end_date;
846 --
847 hr_utility.set_location(' Leaving:'||l_proc, 70);
848 exception
849 when hr_api.validate_enabled then
850 --
851 -- As the Validate_Enabled exception has been raised
852 -- we must rollback to the savepoint
853 --
854 rollback to UPDATE_ASSIGN_ACCOMMODATION;
855 --
856 -- Only set output warning arguments
857 -- (Any key or derived arguments must be set to null
858 -- when validation only mode is being used.)
859 --
860 p_object_version_number := l_object_version_number;
861 p_effective_start_date := null;
862 p_effective_end_date := null;
863
864 hr_utility.set_location(' Leaving:'||l_proc, 80);
865 when others then
866 p_object_version_number := l_object_version_number;
867 p_effective_start_date := null;
868 p_effective_end_date := null;
869 --
870 -- A validation or unexpected error has occured
871 --
872 rollback to UPDATE_ASSIGN_ACCOMMODATION;
873 hr_utility.set_location(' Leaving:'||l_proc, 90);
874 raise;
875 end update_assign_accommodation;
876 --
877 --
878 -- ----------------------------------------------------------------------------
879 -- |-----------------------<delete_assign_accommodation>----------------------|
880 -- ----------------------------------------------------------------------------
881 --
882 procedure delete_assign_accommodation
883 (p_validate in boolean default false
884 ,p_effective_date in date
885 ,p_datetrack_mode in varchar2
886 ,p_assignment_acco_id in number
887 ,p_object_version_number in out nocopy number
888 ,p_effective_start_date out nocopy date
889 ,p_effective_end_date out nocopy date
890 ) is
891 --
892 -- Declare cursors and local variables
893 --
894
895 l_proc varchar2(72) := g_package||'DELETE_SITUATION';
896 l_effective_start_date pqh_assign_accommodations_f.effective_start_date%TYPE;
897 l_effective_end_date pqh_assign_accommodations_f.effective_end_date%TYPE;
898 l_object_version_number number := p_object_version_number;
899
900 --
901 begin
902 hr_utility.set_location('Entering:'|| l_proc, 10);
903 --
904 -- Issue a savepoint
905 --
906 savepoint DELETE_ASSIGN_ACCOMMODATION;
907 --
908 -- Truncate the time portion from all IN date parameters
909 --
910
911 --
912 -- Call Before Process User Hook
913 --
914 begin
915 PQH_ASSIGN_ACCOMMODATIONS_BK3.delete_assign_accommodation_b
916 (p_effective_date => p_effective_date
917 ,p_datetrack_mode => p_datetrack_mode
918 ,p_assignment_acco_id => p_assignment_acco_id
919 ,p_object_version_number => p_object_version_number
920 );
921 exception
922 when hr_api.cannot_find_prog_unit then
923 hr_api.cannot_find_prog_unit_error
924 (p_module_name => 'DELETE_ASSIGN_ACCOMMODATION'
925 ,p_hook_type => 'BP'
926 );
927 end;
928 --
929 -- Validation in addition to Row Handlers
930 --
931
932
933
934 --
935 -- Process Logic
936 --
937 pqh_asa_del.del
938 (p_effective_date => p_effective_date
939 ,p_datetrack_mode => p_datetrack_mode
940 ,p_assignment_acco_id => p_assignment_acco_id
941 ,p_object_version_number => p_object_version_number
942 ,p_effective_start_date => l_effective_start_date
943 ,p_effective_end_date => l_effective_end_date
944 );
945
946
947 --
948 -- Call After Process User Hook
949 --
950 begin
951 PQH_ASSIGN_ACCOMMODATIONS_BK3.delete_assign_accommodation_a
952 (p_effective_date => p_effective_date
953 ,p_datetrack_mode => p_datetrack_mode
954 ,p_assignment_acco_id => p_assignment_acco_id
955 ,p_object_version_number => p_object_version_number
956 ,p_effective_start_date => l_effective_start_date
957 ,p_effective_end_date => l_effective_end_date
958 );
959 exception
960 when hr_api.cannot_find_prog_unit then
961 hr_api.cannot_find_prog_unit_error
962 (p_module_name => 'DELETE_ASSIGN_ACCOMMODATION'
963 ,p_hook_type => 'AP'
964 );
965 end;
966 --
967 -- When in validation only mode raise the Validate_Enabled exception
968 --
969 if p_validate then
970 raise hr_api.validate_enabled;
971 end if;
972 --
973 p_object_version_number := p_object_version_number;
974 p_effective_start_date := l_effective_start_date;
975 p_effective_end_date := l_effective_end_date;
976 --
977 --
978 hr_utility.set_location(' Leaving:'||l_proc, 70);
979 exception
980 when hr_api.validate_enabled then
981 --
982 -- As the Validate_Enabled exception has been raised
983 -- we must rollback to the savepoint
984 --
985 rollback to DELETE_ASSIGN_ACCOMMODATION;
986 --
987 -- Only set output warning arguments
988 -- (Any key or derived arguments must be set to null
989 -- when validation only mode is being used.)
990 --
991 p_object_version_number := l_object_version_number;
992 p_effective_start_date := null;
993 p_effective_end_date := null;
994 --
995 hr_utility.set_location(' Leaving:'||l_proc, 80);
996 when others then
997 p_object_version_number := l_object_version_number;
998 p_effective_start_date := null;
999 p_effective_end_date := null;
1000 --
1001 -- A validation or unexpected error has occured
1002 --
1003 rollback to DELETE_ASSIGN_ACCOMMODATION;
1004 hr_utility.set_location(' Leaving:'||l_proc, 90);
1005 raise;
1006 end delete_assign_accommodation;
1007 --
1008 end pqh_assign_accommodations_api;