[Home] [Help]
PACKAGE BODY: APPS.HR_LOCATION_EXTRA_INFO_API
Source
1 Package Body hr_location_extra_info_api as
2 /* $Header: hrleiapi.pkb 115.4 2003/09/12 03:02:27 smparame ship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' hr_location_extra_info_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |----------------------< create_location_extra_info >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_location_extra_info
13 (p_validate in boolean default false
14 ,p_location_id in number
15 ,p_information_type in varchar2
16 ,p_lei_attribute_category in varchar2 default null
17 ,p_lei_attribute1 in varchar2 default null
18 ,p_lei_attribute2 in varchar2 default null
19 ,p_lei_attribute3 in varchar2 default null
20 ,p_lei_attribute4 in varchar2 default null
21 ,p_lei_attribute5 in varchar2 default null
22 ,p_lei_attribute6 in varchar2 default null
23 ,p_lei_attribute7 in varchar2 default null
24 ,p_lei_attribute8 in varchar2 default null
25 ,p_lei_attribute9 in varchar2 default null
26 ,p_lei_attribute10 in varchar2 default null
27 ,p_lei_attribute11 in varchar2 default null
28 ,p_lei_attribute12 in varchar2 default null
29 ,p_lei_attribute13 in varchar2 default null
30 ,p_lei_attribute14 in varchar2 default null
31 ,p_lei_attribute15 in varchar2 default null
32 ,p_lei_attribute16 in varchar2 default null
33 ,p_lei_attribute17 in varchar2 default null
34 ,p_lei_attribute18 in varchar2 default null
35 ,p_lei_attribute19 in varchar2 default null
36 ,p_lei_attribute20 in varchar2 default null
37 ,p_lei_information_category in varchar2 default null
38 ,p_lei_information1 in varchar2 default null
39 ,p_lei_information2 in varchar2 default null
40 ,p_lei_information3 in varchar2 default null
41 ,p_lei_information4 in varchar2 default null
42 ,p_lei_information5 in varchar2 default null
43 ,p_lei_information6 in varchar2 default null
44 ,p_lei_information7 in varchar2 default null
45 ,p_lei_information8 in varchar2 default null
46 ,p_lei_information9 in varchar2 default null
47 ,p_lei_information10 in varchar2 default null
48 ,p_lei_information11 in varchar2 default null
49 ,p_lei_information12 in varchar2 default null
50 ,p_lei_information13 in varchar2 default null
51 ,p_lei_information14 in varchar2 default null
52 ,p_lei_information15 in varchar2 default null
53 ,p_lei_information16 in varchar2 default null
54 ,p_lei_information17 in varchar2 default null
55 ,p_lei_information18 in varchar2 default null
56 ,p_lei_information19 in varchar2 default null
57 ,p_lei_information20 in varchar2 default null
58 ,p_lei_information21 in varchar2 default null
59 ,p_lei_information22 in varchar2 default null
60 ,p_lei_information23 in varchar2 default null
61 ,p_lei_information24 in varchar2 default null
62 ,p_lei_information25 in varchar2 default null
63 ,p_lei_information26 in varchar2 default null
64 ,p_lei_information27 in varchar2 default null
65 ,p_lei_information28 in varchar2 default null
66 ,p_lei_information29 in varchar2 default null
67 ,p_lei_information30 in varchar2 default null
68 ,p_location_extra_info_id out nocopy number
69 ,p_object_version_number out nocopy number
70 ) is
71 --
72 -- Declare cursors and local variables
73 --
74 l_proc varchar2(72) := g_package||'create_location_extra_info';
75 l_object_version_number hr_location_extra_info.object_version_number%type;
76 l_location_extra_info_id hr_location_extra_info.location_extra_info_id%type;
77 -- Bug fix 3132479 . Local variable to store information category.
78 l_lei_information_category hr_location_extra_info.lei_information_category%type;
79 --
80 begin
81 hr_utility.set_location('Entering:'|| l_proc, 5);
82 --
83 -- Issue a savepoint if operating in validation only mode.
84 --
85 savepoint create_location_extra_info;
86
87 -- Bug Fix 3132479
88 -- If the information category is passed as null then
89 -- information type passed is assigned to it.
90
91 if p_lei_information_category is null then
92 l_lei_information_category := p_information_type;
93 else
94 l_lei_information_category := p_lei_information_category;
95 end if;
96
97 --
98 -- Call Before Process User Hook
99 --
100 begin
101 hr_location_extra_info_bk1.create_location_extra_info_b
102 (p_information_type => p_information_type,
103 p_location_id => p_location_id,
104 p_lei_attribute_category => p_lei_attribute_category,
105 p_lei_attribute1 => p_lei_attribute1,
106 p_lei_attribute2 => p_lei_attribute2,
107 p_lei_attribute3 => p_lei_attribute3,
108 p_lei_attribute4 => p_lei_attribute4,
109 p_lei_attribute5 => p_lei_attribute5,
110 p_lei_attribute6 => p_lei_attribute6,
111 p_lei_attribute7 => p_lei_attribute7,
112 p_lei_attribute8 => p_lei_attribute8,
113 p_lei_attribute9 => p_lei_attribute9,
114 p_lei_attribute10 => p_lei_attribute10,
115 p_lei_attribute11 => p_lei_attribute11,
116 p_lei_attribute12 => p_lei_attribute12,
117 p_lei_attribute13 => p_lei_attribute13,
118 p_lei_attribute14 => p_lei_attribute14,
119 p_lei_attribute15 => p_lei_attribute15,
120 p_lei_attribute16 => p_lei_attribute16,
121 p_lei_attribute17 => p_lei_attribute17,
122 p_lei_attribute18 => p_lei_attribute18,
123 p_lei_attribute19 => p_lei_attribute19,
124 p_lei_attribute20 => p_lei_attribute20,
125 p_lei_information_category => l_lei_information_category,
126 p_lei_information1 => p_lei_information1,
127 p_lei_information2 => p_lei_information2,
128 p_lei_information3 => p_lei_information3,
129 p_lei_information4 => p_lei_information4,
130 p_lei_information5 => p_lei_information5,
131 p_lei_information6 => p_lei_information6,
132 p_lei_information7 => p_lei_information7,
133 p_lei_information8 => p_lei_information8,
134 p_lei_information9 => p_lei_information9,
135 p_lei_information10 => p_lei_information10,
136 p_lei_information11 => p_lei_information11,
137 p_lei_information12 => p_lei_information12,
138 p_lei_information13 => p_lei_information13,
139 p_lei_information14 => p_lei_information14,
140 p_lei_information15 => p_lei_information15,
141 p_lei_information16 => p_lei_information16,
142 p_lei_information17 => p_lei_information17,
143 p_lei_information18 => p_lei_information18,
144 p_lei_information19 => p_lei_information19,
145 p_lei_information20 => p_lei_information20,
146 p_lei_information21 => p_lei_information21,
147 p_lei_information22 => p_lei_information22,
148 p_lei_information23 => p_lei_information23,
149 p_lei_information24 => p_lei_information24,
150 p_lei_information25 => p_lei_information25,
151 p_lei_information26 => p_lei_information26,
152 p_lei_information27 => p_lei_information27,
153 p_lei_information28 => p_lei_information28,
154 p_lei_information29 => p_lei_information29,
155 p_lei_information30 => p_lei_information30
156 );
157 exception
158 when hr_api.cannot_find_prog_unit then
159 hr_api.cannot_find_prog_unit_error
160 (p_module_name => 'CREATE_LOCATION_EXTRA_INFO',
161 p_hook_type => 'BP'
162 );
163 end;
164 --
165 -- End of Before Process User Hook call
166 --
167 --
168 hr_utility.set_location(l_proc, 7);
169 --
170 -- Process Logic
171 --
172 hr_lei_ins.ins
173 (p_location_extra_info_id => l_location_extra_info_id
174 ,p_location_id => p_location_id
175 ,p_information_type => p_information_type
176 ,p_lei_attribute_category => p_lei_attribute_category
177 ,p_lei_attribute1 => p_lei_attribute1
178 ,p_lei_attribute2 => p_lei_attribute2
179 ,p_lei_attribute3 => p_lei_attribute3
180 ,p_lei_attribute4 => p_lei_attribute4
181 ,p_lei_attribute5 => p_lei_attribute5
182 ,p_lei_attribute6 => p_lei_attribute6
183 ,p_lei_attribute7 => p_lei_attribute7
184 ,p_lei_attribute8 => p_lei_attribute8
185 ,p_lei_attribute9 => p_lei_attribute9
186 ,p_lei_attribute10 => p_lei_attribute10
187 ,p_lei_attribute11 => p_lei_attribute11
188 ,p_lei_attribute12 => p_lei_attribute12
189 ,p_lei_attribute13 => p_lei_attribute13
190 ,p_lei_attribute14 => p_lei_attribute14
191 ,p_lei_attribute15 => p_lei_attribute15
192 ,p_lei_attribute16 => p_lei_attribute16
193 ,p_lei_attribute17 => p_lei_attribute17
194 ,p_lei_attribute18 => p_lei_attribute18
195 ,p_lei_attribute19 => p_lei_attribute19
196 ,p_lei_attribute20 => p_lei_attribute20
197 ,p_lei_information_category => l_lei_information_category
198 ,p_lei_information1 => p_lei_information1
199 ,p_lei_information2 => p_lei_information2
200 ,p_lei_information3 => p_lei_information3
201 ,p_lei_information4 => p_lei_information4
202 ,p_lei_information5 => p_lei_information5
203 ,p_lei_information6 => p_lei_information6
204 ,p_lei_information7 => p_lei_information7
205 ,p_lei_information8 => p_lei_information8
206 ,p_lei_information9 => p_lei_information9
207 ,p_lei_information10 => p_lei_information10
208 ,p_lei_information11 => p_lei_information11
209 ,p_lei_information12 => p_lei_information12
210 ,p_lei_information13 => p_lei_information13
211 ,p_lei_information14 => p_lei_information14
212 ,p_lei_information15 => p_lei_information15
213 ,p_lei_information16 => p_lei_information16
214 ,p_lei_information17 => p_lei_information17
215 ,p_lei_information18 => p_lei_information18
216 ,p_lei_information19 => p_lei_information19
217 ,p_lei_information20 => p_lei_information20
218 ,p_lei_information21 => p_lei_information21
219 ,p_lei_information22 => p_lei_information22
220 ,p_lei_information23 => p_lei_information23
221 ,p_lei_information24 => p_lei_information24
222 ,p_lei_information25 => p_lei_information25
223 ,p_lei_information26 => p_lei_information26
224 ,p_lei_information27 => p_lei_information27
225 ,p_lei_information28 => p_lei_information28
226 ,p_lei_information29 => p_lei_information29
227 ,p_lei_information30 => p_lei_information30
228 ,p_object_version_number => l_object_version_number
229 ,p_validate => false
230 );
231 p_object_version_number := l_object_version_number;
232 p_location_extra_info_id := l_location_extra_info_id;
233 --
234 hr_utility.set_location(l_proc, 8);
235 --
236 --
237 -- Call After Process User Hook
238 --
239 begin
240 hr_location_extra_info_bk1.create_location_extra_info_a
241 (p_location_extra_info_id => l_location_extra_info_id,
242 p_information_type => p_information_type,
243 p_location_id => p_location_id,
244 p_lei_attribute_category => p_lei_attribute_category,
245 p_lei_attribute1 => p_lei_attribute1,
246 p_lei_attribute2 => p_lei_attribute2,
247 p_lei_attribute3 => p_lei_attribute3,
248 p_lei_attribute4 => p_lei_attribute4,
249 p_lei_attribute5 => p_lei_attribute5,
250 p_lei_attribute6 => p_lei_attribute6,
251 p_lei_attribute7 => p_lei_attribute7,
252 p_lei_attribute8 => p_lei_attribute8,
253 p_lei_attribute9 => p_lei_attribute9,
254 p_lei_attribute10 => p_lei_attribute10,
255 p_lei_attribute11 => p_lei_attribute11,
256 p_lei_attribute12 => p_lei_attribute12,
257 p_lei_attribute13 => p_lei_attribute13,
258 p_lei_attribute14 => p_lei_attribute14,
259 p_lei_attribute15 => p_lei_attribute15,
260 p_lei_attribute16 => p_lei_attribute16,
261 p_lei_attribute17 => p_lei_attribute17,
262 p_lei_attribute18 => p_lei_attribute18,
263 p_lei_attribute19 => p_lei_attribute19,
264 p_lei_attribute20 => p_lei_attribute20,
265 p_lei_information_category => l_lei_information_category,
266 p_lei_information1 => p_lei_information1,
267 p_lei_information2 => p_lei_information2,
268 p_lei_information3 => p_lei_information3,
269 p_lei_information4 => p_lei_information4,
270 p_lei_information5 => p_lei_information5,
271 p_lei_information6 => p_lei_information6,
272 p_lei_information7 => p_lei_information7,
273 p_lei_information8 => p_lei_information8,
274 p_lei_information9 => p_lei_information9,
275 p_lei_information10 => p_lei_information10,
276 p_lei_information11 => p_lei_information11,
277 p_lei_information12 => p_lei_information12,
278 p_lei_information13 => p_lei_information13,
279 p_lei_information14 => p_lei_information14,
280 p_lei_information15 => p_lei_information15,
281 p_lei_information16 => p_lei_information16,
282 p_lei_information17 => p_lei_information17,
283 p_lei_information18 => p_lei_information18,
284 p_lei_information19 => p_lei_information19,
285 p_lei_information20 => p_lei_information20,
286 p_lei_information21 => p_lei_information21,
287 p_lei_information22 => p_lei_information22,
288 p_lei_information23 => p_lei_information23,
289 p_lei_information24 => p_lei_information24,
290 p_lei_information25 => p_lei_information25,
291 p_lei_information26 => p_lei_information26,
292 p_lei_information27 => p_lei_information27,
293 p_lei_information28 => p_lei_information28,
294 p_lei_information29 => p_lei_information29,
295 p_lei_information30 => p_lei_information30,
296 p_object_version_number => l_object_version_number
297 );
298 exception
299 when hr_api.cannot_find_prog_unit then
300 -- Set OUT parameters to null
301 p_location_extra_info_id := null;
302 p_object_version_number := null;
303
304 hr_api.cannot_find_prog_unit_error
305 (p_module_name => 'CREATE_LOCATION_EXTRA_INFO',
306 p_hook_type => 'AP'
307 );
308 end;
309 --
310 -- When in validation only mode raise the Validate_Enabled exception
311 --
312 if p_validate then
313 raise hr_api.validate_enabled;
314 end if;
315 --
316 hr_utility.set_location(' Leaving:'||l_proc, 11);
317 exception
318 when hr_api.validate_enabled then
319 --
320 -- As the Validate_Enabled exception has been raised
321 -- we must rollback to the savepoint
322 --
323 ROLLBACK TO create_location_extra_info;
324 --
325 -- Only set output warning arguments
326 -- (Any key or derived arguments must be set to null
327 -- when validation only mode is being used.)
328 --
329 p_location_extra_info_id := null;
330 p_object_version_number := null;
331 --
332 hr_utility.set_location(' Leaving:'||l_proc, 12);
333 --
334 when others then
335 --
336 -- A validation or unexpected error has occurred
337 --
338 -- Added as part of the fix to bug 632479
339 --
340 ROLLBACK TO create_location_extra_info;
341 --
342 -- Set OUT parameters to null
343 p_location_extra_info_id := null;
344 p_object_version_number := null;
345 raise;
346 --
347 end create_location_extra_info;
348 --
349 -- ----------------------------------------------------------------------------
350 -- |----------------------< update_location_extra_info >----------------------|
351 -- ----------------------------------------------------------------------------
352 --
353 procedure update_location_extra_info
354 (p_validate in boolean default false
355 ,p_location_extra_info_id in number
356 ,p_object_version_number in out nocopy number
357 ,p_lei_attribute_category in varchar2 default hr_api.g_varchar2
358 ,p_lei_attribute1 in varchar2 default hr_api.g_varchar2
359 ,p_lei_attribute2 in varchar2 default hr_api.g_varchar2
360 ,p_lei_attribute3 in varchar2 default hr_api.g_varchar2
361 ,p_lei_attribute4 in varchar2 default hr_api.g_varchar2
362 ,p_lei_attribute5 in varchar2 default hr_api.g_varchar2
363 ,p_lei_attribute6 in varchar2 default hr_api.g_varchar2
364 ,p_lei_attribute7 in varchar2 default hr_api.g_varchar2
365 ,p_lei_attribute8 in varchar2 default hr_api.g_varchar2
366 ,p_lei_attribute9 in varchar2 default hr_api.g_varchar2
367 ,p_lei_attribute10 in varchar2 default hr_api.g_varchar2
368 ,p_lei_attribute11 in varchar2 default hr_api.g_varchar2
369 ,p_lei_attribute12 in varchar2 default hr_api.g_varchar2
370 ,p_lei_attribute13 in varchar2 default hr_api.g_varchar2
371 ,p_lei_attribute14 in varchar2 default hr_api.g_varchar2
372 ,p_lei_attribute15 in varchar2 default hr_api.g_varchar2
373 ,p_lei_attribute16 in varchar2 default hr_api.g_varchar2
374 ,p_lei_attribute17 in varchar2 default hr_api.g_varchar2
375 ,p_lei_attribute18 in varchar2 default hr_api.g_varchar2
376 ,p_lei_attribute19 in varchar2 default hr_api.g_varchar2
377 ,p_lei_attribute20 in varchar2 default hr_api.g_varchar2
378 ,p_lei_information_category in varchar2 default hr_api.g_varchar2
379 ,p_lei_information1 in varchar2 default hr_api.g_varchar2
380 ,p_lei_information2 in varchar2 default hr_api.g_varchar2
381 ,p_lei_information3 in varchar2 default hr_api.g_varchar2
382 ,p_lei_information4 in varchar2 default hr_api.g_varchar2
383 ,p_lei_information5 in varchar2 default hr_api.g_varchar2
384 ,p_lei_information6 in varchar2 default hr_api.g_varchar2
385 ,p_lei_information7 in varchar2 default hr_api.g_varchar2
386 ,p_lei_information8 in varchar2 default hr_api.g_varchar2
387 ,p_lei_information9 in varchar2 default hr_api.g_varchar2
388 ,p_lei_information10 in varchar2 default hr_api.g_varchar2
389 ,p_lei_information11 in varchar2 default hr_api.g_varchar2
390 ,p_lei_information12 in varchar2 default hr_api.g_varchar2
391 ,p_lei_information13 in varchar2 default hr_api.g_varchar2
392 ,p_lei_information14 in varchar2 default hr_api.g_varchar2
393 ,p_lei_information15 in varchar2 default hr_api.g_varchar2
394 ,p_lei_information16 in varchar2 default hr_api.g_varchar2
395 ,p_lei_information17 in varchar2 default hr_api.g_varchar2
396 ,p_lei_information18 in varchar2 default hr_api.g_varchar2
397 ,p_lei_information19 in varchar2 default hr_api.g_varchar2
398 ,p_lei_information20 in varchar2 default hr_api.g_varchar2
399 ,p_lei_information21 in varchar2 default hr_api.g_varchar2
400 ,p_lei_information22 in varchar2 default hr_api.g_varchar2
401 ,p_lei_information23 in varchar2 default hr_api.g_varchar2
402 ,p_lei_information24 in varchar2 default hr_api.g_varchar2
403 ,p_lei_information25 in varchar2 default hr_api.g_varchar2
404 ,p_lei_information26 in varchar2 default hr_api.g_varchar2
405 ,p_lei_information27 in varchar2 default hr_api.g_varchar2
406 ,p_lei_information28 in varchar2 default hr_api.g_varchar2
407 ,p_lei_information29 in varchar2 default hr_api.g_varchar2
408 ,p_lei_information30 in varchar2 default hr_api.g_varchar2
409 ) is
410 --
411 -- Declare cursors and local variables
412 --
413 l_proc varchar2(72) := g_package||'update_location_extra_info';
414 l_object_version_number hr_location_extra_info.object_version_number%TYPE;
415 l_temp_ovn hr_location_extra_info.object_version_number%TYPE;
416 --
417 begin
418 hr_utility.set_location('Entering:'|| l_proc, 5);
419 --
420 -- Issue a savepoint if operating in validation only mode.
421 --
422 savepoint update_location_extra_info;
423
424 l_temp_ovn := p_object_version_number;
425 --
426 -- Call Before Process User Hook
427 --
428 begin
429 hr_location_extra_info_bk2.update_location_extra_info_b
430 (p_location_extra_info_id => p_location_extra_info_id,
431 p_lei_attribute_category => p_lei_attribute_category,
432 p_lei_attribute1 => p_lei_attribute1,
433 p_lei_attribute2 => p_lei_attribute2,
434 p_lei_attribute3 => p_lei_attribute3,
435 p_lei_attribute4 => p_lei_attribute4,
436 p_lei_attribute5 => p_lei_attribute5,
437 p_lei_attribute6 => p_lei_attribute6,
438 p_lei_attribute7 => p_lei_attribute7,
439 p_lei_attribute8 => p_lei_attribute8,
440 p_lei_attribute9 => p_lei_attribute9,
441 p_lei_attribute10 => p_lei_attribute10,
442 p_lei_attribute11 => p_lei_attribute11,
443 p_lei_attribute12 => p_lei_attribute12,
444 p_lei_attribute13 => p_lei_attribute13,
445 p_lei_attribute14 => p_lei_attribute14,
446 p_lei_attribute15 => p_lei_attribute15,
447 p_lei_attribute16 => p_lei_attribute16,
448 p_lei_attribute17 => p_lei_attribute17,
449 p_lei_attribute18 => p_lei_attribute18,
450 p_lei_attribute19 => p_lei_attribute19,
451 p_lei_attribute20 => p_lei_attribute20,
452 p_lei_information_category => p_lei_information_category,
453 p_lei_information1 => p_lei_information1,
454 p_lei_information2 => p_lei_information2,
455 p_lei_information3 => p_lei_information3,
456 p_lei_information4 => p_lei_information4,
457 p_lei_information5 => p_lei_information5,
458 p_lei_information6 => p_lei_information6,
459 p_lei_information7 => p_lei_information7,
460 p_lei_information8 => p_lei_information8,
461 p_lei_information9 => p_lei_information9,
462 p_lei_information10 => p_lei_information10,
463 p_lei_information11 => p_lei_information11,
464 p_lei_information12 => p_lei_information12,
465 p_lei_information13 => p_lei_information13,
466 p_lei_information14 => p_lei_information14,
467 p_lei_information15 => p_lei_information15,
468 p_lei_information16 => p_lei_information16,
469 p_lei_information17 => p_lei_information17,
470 p_lei_information18 => p_lei_information18,
471 p_lei_information19 => p_lei_information19,
472 p_lei_information20 => p_lei_information20,
473 p_lei_information21 => p_lei_information21,
474 p_lei_information22 => p_lei_information22,
475 p_lei_information23 => p_lei_information23,
476 p_lei_information24 => p_lei_information24,
477 p_lei_information25 => p_lei_information25,
478 p_lei_information26 => p_lei_information26,
479 p_lei_information27 => p_lei_information27,
480 p_lei_information28 => p_lei_information28,
481 p_lei_information29 => p_lei_information29,
482 p_lei_information30 => p_lei_information30,
483 p_object_version_number => p_object_version_number
484 );
485 exception
486 when hr_api.cannot_find_prog_unit then
487 -- Reset OUT parameters
488 p_object_version_number := l_temp_ovn;
489 hr_api.cannot_find_prog_unit_error
490 (p_module_name => 'UPDATE_LOCATION_EXTRA_INFO',
491 p_hook_type => 'BP'
492 );
493 end;
494 --
495 -- End of Before Process User Hook call
496 --
497 --
498 hr_utility.set_location(l_proc, 7);
499 --
500 -- Store the original ovn in case we rollback when p_validate is true
501 --
502 l_object_version_number := p_object_version_number;
503 --
504 -- Process Logic - Update location Extra Info details
505 --
506 hr_lei_upd.upd
507 (p_location_extra_info_id => p_location_extra_info_id
508 ,p_lei_attribute_category => p_lei_attribute_category
509 ,p_lei_attribute1 => p_lei_attribute1
510 ,p_lei_attribute2 => p_lei_attribute2
511 ,p_lei_attribute3 => p_lei_attribute3
512 ,p_lei_attribute4 => p_lei_attribute4
513 ,p_lei_attribute5 => p_lei_attribute5
514 ,p_lei_attribute6 => p_lei_attribute6
515 ,p_lei_attribute7 => p_lei_attribute7
516 ,p_lei_attribute8 => p_lei_attribute8
517 ,p_lei_attribute9 => p_lei_attribute9
518 ,p_lei_attribute10 => p_lei_attribute10
519 ,p_lei_attribute11 => p_lei_attribute11
520 ,p_lei_attribute12 => p_lei_attribute12
521 ,p_lei_attribute13 => p_lei_attribute13
522 ,p_lei_attribute14 => p_lei_attribute14
523 ,p_lei_attribute15 => p_lei_attribute15
524 ,p_lei_attribute16 => p_lei_attribute16
525 ,p_lei_attribute17 => p_lei_attribute17
526 ,p_lei_attribute18 => p_lei_attribute18
527 ,p_lei_attribute19 => p_lei_attribute19
528 ,p_lei_attribute20 => p_lei_attribute20
529 ,p_lei_information_category => p_lei_information_category
530 ,p_lei_information1 => p_lei_information1
531 ,p_lei_information2 => p_lei_information2
532 ,p_lei_information3 => p_lei_information3
533 ,p_lei_information4 => p_lei_information4
534 ,p_lei_information5 => p_lei_information5
535 ,p_lei_information6 => p_lei_information6
536 ,p_lei_information7 => p_lei_information7
537 ,p_lei_information8 => p_lei_information8
538 ,p_lei_information9 => p_lei_information9
539 ,p_lei_information10 => p_lei_information10
540 ,p_lei_information11 => p_lei_information11
541 ,p_lei_information12 => p_lei_information12
542 ,p_lei_information13 => p_lei_information13
543 ,p_lei_information14 => p_lei_information14
544 ,p_lei_information15 => p_lei_information15
545 ,p_lei_information16 => p_lei_information16
546 ,p_lei_information17 => p_lei_information17
547 ,p_lei_information18 => p_lei_information18
548 ,p_lei_information19 => p_lei_information19
549 ,p_lei_information20 => p_lei_information20
550 ,p_lei_information21 => p_lei_information21
551 ,p_lei_information22 => p_lei_information22
552 ,p_lei_information23 => p_lei_information23
553 ,p_lei_information24 => p_lei_information24
554 ,p_lei_information25 => p_lei_information25
555 ,p_lei_information26 => p_lei_information26
556 ,p_lei_information27 => p_lei_information27
557 ,p_lei_information28 => p_lei_information28
558 ,p_lei_information29 => p_lei_information29
559 ,p_lei_information30 => p_lei_information30
560 ,p_object_version_number => p_object_version_number
561 ,p_validate => false
562 );
563 --
564 hr_utility.set_location(l_proc, 8);
565 --
566 --
567 -- Call After Process User Hook
568 --
569 begin
570 hr_location_extra_info_bk2.update_location_extra_info_a
571 (p_location_extra_info_id => p_location_extra_info_id,
572 p_lei_attribute_category => p_lei_attribute_category,
573 p_lei_attribute1 => p_lei_attribute1,
574 p_lei_attribute2 => p_lei_attribute2,
575 p_lei_attribute3 => p_lei_attribute3,
576 p_lei_attribute4 => p_lei_attribute4,
577 p_lei_attribute5 => p_lei_attribute5,
578 p_lei_attribute6 => p_lei_attribute6,
579 p_lei_attribute7 => p_lei_attribute7,
580 p_lei_attribute8 => p_lei_attribute8,
581 p_lei_attribute9 => p_lei_attribute9,
582 p_lei_attribute10 => p_lei_attribute10,
583 p_lei_attribute11 => p_lei_attribute11,
584 p_lei_attribute12 => p_lei_attribute12,
585 p_lei_attribute13 => p_lei_attribute13,
586 p_lei_attribute14 => p_lei_attribute14,
587 p_lei_attribute15 => p_lei_attribute15,
588 p_lei_attribute16 => p_lei_attribute16,
589 p_lei_attribute17 => p_lei_attribute17,
590 p_lei_attribute18 => p_lei_attribute18,
591 p_lei_attribute19 => p_lei_attribute19,
592 p_lei_attribute20 => p_lei_attribute20,
593 p_lei_information_category => p_lei_information_category,
594 p_lei_information1 => p_lei_information1,
595 p_lei_information2 => p_lei_information2,
596 p_lei_information3 => p_lei_information3,
597 p_lei_information4 => p_lei_information4,
598 p_lei_information5 => p_lei_information5,
599 p_lei_information6 => p_lei_information6,
600 p_lei_information7 => p_lei_information7,
601 p_lei_information8 => p_lei_information8,
602 p_lei_information9 => p_lei_information9,
603 p_lei_information10 => p_lei_information10,
604 p_lei_information11 => p_lei_information11,
605 p_lei_information12 => p_lei_information12,
606 p_lei_information13 => p_lei_information13,
607 p_lei_information14 => p_lei_information14,
608 p_lei_information15 => p_lei_information15,
609 p_lei_information16 => p_lei_information16,
610 p_lei_information17 => p_lei_information17,
611 p_lei_information18 => p_lei_information18,
612 p_lei_information19 => p_lei_information19,
613 p_lei_information20 => p_lei_information20,
614 p_lei_information21 => p_lei_information21,
615 p_lei_information22 => p_lei_information22,
616 p_lei_information23 => p_lei_information23,
617 p_lei_information24 => p_lei_information24,
618 p_lei_information25 => p_lei_information25,
619 p_lei_information26 => p_lei_information26,
620 p_lei_information27 => p_lei_information27,
621 p_lei_information28 => p_lei_information28,
622 p_lei_information29 => p_lei_information29,
623 p_lei_information30 => p_lei_information30,
624 p_object_version_number => p_object_version_number
625 );
626 exception
627 when hr_api.cannot_find_prog_unit then
628 -- Reset OUT parameters
629 p_object_version_number := l_temp_ovn;
630 hr_api.cannot_find_prog_unit_error
631 (p_module_name => 'UPDATE_LOCATION_EXTRA_INFO',
632 p_hook_type => 'AP'
633 );
634 end;
635 --
636 -- When in validation only mode raise the Validate_Enabled exception
637 --
638 if p_validate then
639 raise hr_api.validate_enabled;
640 end if;
641 --
642 hr_utility.set_location(' Leaving:'||l_proc, 11);
643 exception
644 when hr_api.validate_enabled then
645 --
646 -- As the Validate_Enabled exception has been raised
647 -- we must rollback to the savepoint
648 --
649 ROLLBACK TO update_location_extra_info;
650 --
651 -- Only set output warning arguments
652 -- (Any key or derived arguments must be set to null
653 -- when validation only mode is being used.)
654 --
655 p_object_version_number := l_object_version_number;
656 --
657 hr_utility.set_location(' Leaving:'||l_proc, 12);
658 --
659 when others then
660 --
661 -- A validation or unexpected error has occurred
662 --
663 -- Added as part of the fix to bug 632479
664 --
665 ROLLBACK TO update_location_extra_info;
666 -- Reset OUT parameters
667 p_object_version_number := l_temp_ovn;
668 --
669 raise;
670 --
671 end update_location_extra_info;
672 --
673 --
674 -- ----------------------------------------------------------------------------
675 -- |----------------------< delete_location_extra_info >----------------------|
676 -- ----------------------------------------------------------------------------
677 --
678 procedure delete_location_extra_info
679 (p_validate in boolean default false
680 ,p_location_extra_info_id in number
681 ,p_object_version_number in number
682 ) is
683 --
684 -- Declare cursors and local variables
685 --
686 l_proc varchar2(72) := g_package||'delete_location_extra_info';
687 --
688 begin
689 hr_utility.set_location('Entering:'|| l_proc, 5);
690 --
691 -- Issue a savepoint if operating in validation only mode.
692 --
693 savepoint delete_location_extra_info;
694 --
695 -- Call Before Process User Hook
696 --
697 begin
698 hr_location_extra_info_bk3.delete_location_extra_info_b
699 (p_location_extra_info_id => p_location_extra_info_id,
700 p_object_version_number => p_object_version_number
701 );
702 exception
703 when hr_api.cannot_find_prog_unit then
704 hr_api.cannot_find_prog_unit_error
705 (p_module_name => 'DELETE_LOCATION_EXTRA_INFO',
706 p_hook_type => 'BP'
707 );
708 end;
709 --
710 --
711 hr_utility.set_location(l_proc, 7);
712 --
713 -- Process Logic - Delete location Extra Info details
714 --
715 hr_lei_del.del
716 (p_location_extra_info_id => p_location_extra_info_id
717 ,p_object_version_number => p_object_version_number
718 ,p_validate => false
719 );
720 --
721 hr_utility.set_location(l_proc, 8);
722 --
723 --
724 -- Call After Process User Hook
725 --
726 begin
727 hr_location_extra_info_bk3.delete_location_extra_info_a
728 (p_location_extra_info_id => p_location_extra_info_id,
729 p_object_version_number => p_object_version_number
730 );
731 exception
732 when hr_api.cannot_find_prog_unit then
733 hr_api.cannot_find_prog_unit_error
734 (p_module_name => 'DELETE_LOCATION_EXTRA_INFO',
735 p_hook_type => 'AP'
736 );
737 end;
738 --
739 -- When in validation only mode raise the Validate_Enabled exception
740 --
741 if p_validate then
742 raise hr_api.validate_enabled;
743 end if;
744 --
745 hr_utility.set_location(' Leaving:'||l_proc, 11);
746 exception
747 when hr_api.validate_enabled then
748 --
749 -- As the Validate_Enabled exception has been raised
750 -- we must rollback to the savepoint
751 --
752 ROLLBACK TO delete_location_extra_info;
753 --
754 hr_utility.set_location(' Leaving:'||l_proc, 12);
755 --
756 when others then
757 --
758 -- A validation or unexpected error has occurred
759 --
760 -- Added as part of the fix to bug 632479
761 --
762 ROLLBACK TO delete_location_extra_info;
763 --
764 raise;
765 --
766 end delete_location_extra_info;
767 --
768 end hr_location_extra_info_api;