[Home] [Help]
PACKAGE BODY: APPS.HR_PERSON_EXTRA_INFO_API
Source
1 Package Body hr_person_extra_info_api as
2 /* $Header: pepeiapi.pkb 120.2 2010/05/27 06:06:48 sathkris noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' hr_person_extra_info_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |-----------------------< create_person_extra_info >------------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_person_extra_info
13 (p_validate in boolean default false
14 ,p_person_id in number
15 ,p_information_type in varchar2
16 ,p_pei_attribute_category in varchar2 default null
17 ,p_pei_attribute1 in varchar2 default null
18 ,p_pei_attribute2 in varchar2 default null
19 ,p_pei_attribute3 in varchar2 default null
20 ,p_pei_attribute4 in varchar2 default null
21 ,p_pei_attribute5 in varchar2 default null
22 ,p_pei_attribute6 in varchar2 default null
23 ,p_pei_attribute7 in varchar2 default null
24 ,p_pei_attribute8 in varchar2 default null
25 ,p_pei_attribute9 in varchar2 default null
26 ,p_pei_attribute10 in varchar2 default null
27 ,p_pei_attribute11 in varchar2 default null
28 ,p_pei_attribute12 in varchar2 default null
29 ,p_pei_attribute13 in varchar2 default null
30 ,p_pei_attribute14 in varchar2 default null
31 ,p_pei_attribute15 in varchar2 default null
32 ,p_pei_attribute16 in varchar2 default null
33 ,p_pei_attribute17 in varchar2 default null
34 ,p_pei_attribute18 in varchar2 default null
35 ,p_pei_attribute19 in varchar2 default null
36 ,p_pei_attribute20 in varchar2 default null
37 ,p_pei_information_category in varchar2 default null
38 ,p_pei_information1 in varchar2 default null
39 ,p_pei_information2 in varchar2 default null
40 ,p_pei_information3 in varchar2 default null
41 ,p_pei_information4 in varchar2 default null
42 ,p_pei_information5 in varchar2 default null
43 ,p_pei_information6 in varchar2 default null
44 ,p_pei_information7 in varchar2 default null
45 ,p_pei_information8 in varchar2 default null
46 ,p_pei_information9 in varchar2 default null
47 ,p_pei_information10 in varchar2 default null
48 ,p_pei_information11 in varchar2 default null
49 ,p_pei_information12 in varchar2 default null
50 ,p_pei_information13 in varchar2 default null
51 ,p_pei_information14 in varchar2 default null
52 ,p_pei_information15 in varchar2 default null
53 ,p_pei_information16 in varchar2 default null
54 ,p_pei_information17 in varchar2 default null
55 ,p_pei_information18 in varchar2 default null
56 ,p_pei_information19 in varchar2 default null
57 ,p_pei_information20 in varchar2 default null
58 ,p_pei_information21 in varchar2 default null
59 ,p_pei_information22 in varchar2 default null
60 ,p_pei_information23 in varchar2 default null
61 ,p_pei_information24 in varchar2 default null
62 ,p_pei_information25 in varchar2 default null
63 ,p_pei_information26 in varchar2 default null
64 ,p_pei_information27 in varchar2 default null
65 ,p_pei_information28 in varchar2 default null
66 ,p_pei_information29 in varchar2 default null
67 ,p_pei_information30 in varchar2 default null
68 ,p_person_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 /*********************************************************************
75 * Cursor added for the bug 4943224. *
76 * This Cursor Populate the Business group ID for the Person *
77 *********************************************************************/
78
79 cursor cur_per_person_id (p_person_id number )is
80 select business_group_id from per_all_people_f
81 where person_id = p_person_id;
82
83 l_proc varchar2(72) := g_package||'create_person_extra_info';
84 l_object_version_number per_people_extra_info.object_version_number%type;
85 l_person_extra_info_id per_people_extra_info.person_extra_info_id%type;
86 l_business_group_id per_all_people_f.business_group_id%type; --- for the bug 4943224
87 --
88 begin
89 hr_utility.set_location('Entering:'|| l_proc, 5);
90
91 /*---------------------- Start for bug 4943224 ------------------------------------*/
92 open cur_per_person_id (p_person_id);
93 fetch cur_per_person_id into l_business_group_id;
94 if cur_per_person_id%found then
95 hr_kflex_utility.set_profiles
96 ( p_business_group_id => l_business_group_id
97 ,p_person_id => p_person_id
98 );
99 -- fnd_profile.put('PER_PERSON_ID',p_person_id);
100 -- fnd_profile.put('PER_BUSINESS_GROUP_ID',l_business_group_id);
101 end if;
102 close cur_per_person_id;
103 /*---------------------- End for bug 4943224 ------------------------------------*/
104 --
105 -- Issue a savepoint
106 --
107 savepoint create_person_extra_info;
108 --
109 -- Call Before Process User Hook
110 --
111 begin
112 hr_person_extra_info_bk1.create_person_extra_info_b
113 (p_person_id => p_person_id,
114 p_information_type => p_information_type,
115 p_pei_attribute_category => p_pei_attribute_category,
116 p_pei_attribute1 => p_pei_attribute1,
117 p_pei_attribute2 => p_pei_attribute2,
118 p_pei_attribute3 => p_pei_attribute3,
119 p_pei_attribute4 => p_pei_attribute4,
120 p_pei_attribute5 => p_pei_attribute5,
121 p_pei_attribute6 => p_pei_attribute6,
122 p_pei_attribute7 => p_pei_attribute7,
123 p_pei_attribute8 => p_pei_attribute8,
124 p_pei_attribute9 => p_pei_attribute9,
125 p_pei_attribute10 => p_pei_attribute10,
126 p_pei_attribute11 => p_pei_attribute11,
127 p_pei_attribute12 => p_pei_attribute12,
128 p_pei_attribute13 => p_pei_attribute13,
129 p_pei_attribute14 => p_pei_attribute14,
130 p_pei_attribute15 => p_pei_attribute15,
131 p_pei_attribute16 => p_pei_attribute16,
132 p_pei_attribute17 => p_pei_attribute17,
133 p_pei_attribute18 => p_pei_attribute18,
134 p_pei_attribute19 => p_pei_attribute19,
135 p_pei_attribute20 => p_pei_attribute20,
136 p_pei_information_category => p_pei_information_category,
137 p_pei_information1 => p_pei_information1,
138 p_pei_information2 => p_pei_information2,
139 p_pei_information3 => p_pei_information3,
140 p_pei_information4 => p_pei_information4,
141 p_pei_information5 => p_pei_information5,
142 p_pei_information6 => p_pei_information6,
143 p_pei_information7 => p_pei_information7,
144 p_pei_information8 => p_pei_information8,
145 p_pei_information9 => p_pei_information9,
146 p_pei_information10 => p_pei_information10,
147 p_pei_information11 => p_pei_information11,
148 p_pei_information12 => p_pei_information12,
149 p_pei_information13 => p_pei_information13,
150 p_pei_information14 => p_pei_information14,
151 p_pei_information15 => p_pei_information15,
152 p_pei_information16 => p_pei_information16,
153 p_pei_information17 => p_pei_information17,
154 p_pei_information18 => p_pei_information18,
155 p_pei_information19 => p_pei_information19,
156 p_pei_information20 => p_pei_information20,
157 p_pei_information21 => p_pei_information21,
158 p_pei_information22 => p_pei_information22,
159 p_pei_information23 => p_pei_information23,
160 p_pei_information24 => p_pei_information24,
161 p_pei_information25 => p_pei_information25,
162 p_pei_information26 => p_pei_information26,
163 p_pei_information27 => p_pei_information27,
164 p_pei_information28 => p_pei_information28,
165 p_pei_information29 => p_pei_information29,
166 p_pei_information30 => p_pei_information30
167 );
168 exception
169 when hr_api.cannot_find_prog_unit then
170 hr_api.cannot_find_prog_unit_error
171 (p_module_name => 'CREATE_PERSON_EXTRA_INFO',
172 p_hook_type => 'BP'
173 );
174 end;
175 --
176 -- End of Before Process User Hook call
177 --
178 hr_utility.set_location(l_proc, 7);
179 --
180 -- Process Logic
181 --
182 pe_pei_ins.ins
183 (p_person_extra_info_id => l_person_extra_info_id
184 ,p_person_id => p_person_id
185 ,p_information_type => p_information_type
186 ,p_pei_attribute_category => p_pei_attribute_category
187 ,p_pei_attribute1 => p_pei_attribute1
188 ,p_pei_attribute2 => p_pei_attribute2
189 ,p_pei_attribute3 => p_pei_attribute3
190 ,p_pei_attribute4 => p_pei_attribute4
191 ,p_pei_attribute5 => p_pei_attribute5
192 ,p_pei_attribute6 => p_pei_attribute6
193 ,p_pei_attribute7 => p_pei_attribute7
194 ,p_pei_attribute8 => p_pei_attribute8
195 ,p_pei_attribute9 => p_pei_attribute9
196 ,p_pei_attribute10 => p_pei_attribute10
197 ,p_pei_attribute11 => p_pei_attribute11
198 ,p_pei_attribute12 => p_pei_attribute12
199 ,p_pei_attribute13 => p_pei_attribute13
200 ,p_pei_attribute14 => p_pei_attribute14
201 ,p_pei_attribute15 => p_pei_attribute15
202 ,p_pei_attribute16 => p_pei_attribute16
203 ,p_pei_attribute17 => p_pei_attribute17
204 ,p_pei_attribute18 => p_pei_attribute18
205 ,p_pei_attribute19 => p_pei_attribute19
206 ,p_pei_attribute20 => p_pei_attribute20
207 ,p_pei_information_category => p_pei_information_category
208 ,p_pei_information1 => p_pei_information1
209 ,p_pei_information2 => p_pei_information2
210 ,p_pei_information3 => p_pei_information3
211 ,p_pei_information4 => p_pei_information4
212 ,p_pei_information5 => p_pei_information5
213 ,p_pei_information6 => p_pei_information6
214 ,p_pei_information7 => p_pei_information7
215 ,p_pei_information8 => p_pei_information8
216 ,p_pei_information9 => p_pei_information9
217 ,p_pei_information10 => p_pei_information10
218 ,p_pei_information11 => p_pei_information11
219 ,p_pei_information12 => p_pei_information12
220 ,p_pei_information13 => p_pei_information13
221 ,p_pei_information14 => p_pei_information14
222 ,p_pei_information15 => p_pei_information15
223 ,p_pei_information16 => p_pei_information16
224 ,p_pei_information17 => p_pei_information17
225 ,p_pei_information18 => p_pei_information18
226 ,p_pei_information19 => p_pei_information19
227 ,p_pei_information20 => p_pei_information20
228 ,p_pei_information21 => p_pei_information21
229 ,p_pei_information22 => p_pei_information22
230 ,p_pei_information23 => p_pei_information23
231 ,p_pei_information24 => p_pei_information24
232 ,p_pei_information25 => p_pei_information25
233 ,p_pei_information26 => p_pei_information26
234 ,p_pei_information27 => p_pei_information27
235 ,p_pei_information28 => p_pei_information28
236 ,p_pei_information29 => p_pei_information29
237 ,p_pei_information30 => p_pei_information30
238 ,p_object_version_number => l_object_version_number
239 ,p_validate => false
240 );
241 p_object_version_number := l_object_version_number;
242 p_person_extra_info_id := l_person_extra_info_id;
243 --
244 hr_utility.set_location(l_proc, 8);
245 --
246 -- Call After Process User Hook
247 --
248 begin
249 hr_person_extra_info_bk1.create_person_extra_info_a
250 (p_person_extra_info_id => l_person_extra_info_id,
251 p_person_id => p_person_id,
252 p_information_type => p_information_type,
253 p_pei_attribute_category => p_pei_attribute_category,
254 p_pei_attribute1 => p_pei_attribute1,
255 p_pei_attribute2 => p_pei_attribute2,
256 p_pei_attribute3 => p_pei_attribute3,
257 p_pei_attribute4 => p_pei_attribute4,
258 p_pei_attribute5 => p_pei_attribute5,
259 p_pei_attribute6 => p_pei_attribute6,
260 p_pei_attribute7 => p_pei_attribute7,
261 p_pei_attribute8 => p_pei_attribute8,
262 p_pei_attribute9 => p_pei_attribute9,
263 p_pei_attribute10 => p_pei_attribute10,
264 p_pei_attribute11 => p_pei_attribute11,
265 p_pei_attribute12 => p_pei_attribute12,
266 p_pei_attribute13 => p_pei_attribute13,
267 p_pei_attribute14 => p_pei_attribute14,
268 p_pei_attribute15 => p_pei_attribute15,
269 p_pei_attribute16 => p_pei_attribute16,
270 p_pei_attribute17 => p_pei_attribute17,
271 p_pei_attribute18 => p_pei_attribute18,
272 p_pei_attribute19 => p_pei_attribute19,
273 p_pei_attribute20 => p_pei_attribute20,
274 p_pei_information_category => p_pei_information_category,
275 p_pei_information1 => p_pei_information1,
276 p_pei_information2 => p_pei_information2,
277 p_pei_information3 => p_pei_information3,
278 p_pei_information4 => p_pei_information4,
279 p_pei_information5 => p_pei_information5,
280 p_pei_information6 => p_pei_information6,
281 p_pei_information7 => p_pei_information7,
282 p_pei_information8 => p_pei_information8,
283 p_pei_information9 => p_pei_information9,
284 p_pei_information10 => p_pei_information10,
285 p_pei_information11 => p_pei_information11,
286 p_pei_information12 => p_pei_information12,
287 p_pei_information13 => p_pei_information13,
288 p_pei_information14 => p_pei_information14,
289 p_pei_information15 => p_pei_information15,
290 p_pei_information16 => p_pei_information16,
291 p_pei_information17 => p_pei_information17,
292 p_pei_information18 => p_pei_information18,
293 p_pei_information19 => p_pei_information19,
294 p_pei_information20 => p_pei_information20,
295 p_pei_information21 => p_pei_information21,
296 p_pei_information22 => p_pei_information22,
297 p_pei_information23 => p_pei_information23,
298 p_pei_information24 => p_pei_information24,
299 p_pei_information25 => p_pei_information25,
300 p_pei_information26 => p_pei_information26,
301 p_pei_information27 => p_pei_information27,
302 p_pei_information28 => p_pei_information28,
303 p_pei_information29 => p_pei_information29,
304 p_pei_information30 => p_pei_information30,
305 p_object_version_number => l_object_version_number
306 );
307 exception
308 when hr_api.cannot_find_prog_unit then
309 hr_api.cannot_find_prog_unit_error
310 (p_module_name => 'CREATE_PERSON_EXTRA_INFO',
311 p_hook_type => 'AP'
312 );
313 end;
314 --
315 -- End of After Process User Hook call
316 --
317 -- When in validation only mode raise the Validate_Enabled exception
318 --
319 if p_validate then
320 raise hr_api.validate_enabled;
321 end if;
322 --
323 hr_utility.set_location(' Leaving:'||l_proc, 11);
324 exception
325 when hr_api.validate_enabled then
326 --
327 -- As the Validate_Enabled exception has been raised
328 -- we must rollback to the savepoint
329 --
330 ROLLBACK TO create_person_extra_info;
331 --
332 -- Only set output warning arguments
333 -- (Any key or derived arguments must be set to null
334 -- when validation only mode is being used.)
335 --
336 p_person_extra_info_id := null;
337 p_object_version_number := null;
338 --
339 hr_utility.set_location(' Leaving:'||l_proc, 12);
340 --
341 when others then
342 --
343 -- A validation or unexpected error has occurred
344 --
345 -- Added as part of the fix to bug 632479
346 --
347 ROLLBACK TO create_person_extra_info;
348 --
349 -- set in out parameters and set out parameters
350 --
351 p_person_extra_info_id := null;
352 p_object_version_number := null;
353 --
354 raise;
355 --
356 end create_person_extra_info;
357 --
358 -- ----------------------------------------------------------------------------
359 -- |-----------------------< update_person_extra_info >------------------------|
360 -- ----------------------------------------------------------------------------
361 --
362 procedure update_person_extra_info
363 (p_validate in boolean default false
364 ,p_person_extra_info_id in number
365 ,p_object_version_number in out nocopy number
366 ,p_pei_attribute_category in varchar2 default hr_api.g_varchar2
367 ,p_pei_attribute1 in varchar2 default hr_api.g_varchar2
368 ,p_pei_attribute2 in varchar2 default hr_api.g_varchar2
369 ,p_pei_attribute3 in varchar2 default hr_api.g_varchar2
370 ,p_pei_attribute4 in varchar2 default hr_api.g_varchar2
371 ,p_pei_attribute5 in varchar2 default hr_api.g_varchar2
372 ,p_pei_attribute6 in varchar2 default hr_api.g_varchar2
373 ,p_pei_attribute7 in varchar2 default hr_api.g_varchar2
374 ,p_pei_attribute8 in varchar2 default hr_api.g_varchar2
375 ,p_pei_attribute9 in varchar2 default hr_api.g_varchar2
376 ,p_pei_attribute10 in varchar2 default hr_api.g_varchar2
377 ,p_pei_attribute11 in varchar2 default hr_api.g_varchar2
378 ,p_pei_attribute12 in varchar2 default hr_api.g_varchar2
379 ,p_pei_attribute13 in varchar2 default hr_api.g_varchar2
380 ,p_pei_attribute14 in varchar2 default hr_api.g_varchar2
381 ,p_pei_attribute15 in varchar2 default hr_api.g_varchar2
382 ,p_pei_attribute16 in varchar2 default hr_api.g_varchar2
383 ,p_pei_attribute17 in varchar2 default hr_api.g_varchar2
384 ,p_pei_attribute18 in varchar2 default hr_api.g_varchar2
385 ,p_pei_attribute19 in varchar2 default hr_api.g_varchar2
386 ,p_pei_attribute20 in varchar2 default hr_api.g_varchar2
387 ,p_pei_information_category in varchar2 default hr_api.g_varchar2
388 ,p_pei_information1 in varchar2 default hr_api.g_varchar2
389 ,p_pei_information2 in varchar2 default hr_api.g_varchar2
390 ,p_pei_information3 in varchar2 default hr_api.g_varchar2
391 ,p_pei_information4 in varchar2 default hr_api.g_varchar2
392 ,p_pei_information5 in varchar2 default hr_api.g_varchar2
393 ,p_pei_information6 in varchar2 default hr_api.g_varchar2
394 ,p_pei_information7 in varchar2 default hr_api.g_varchar2
395 ,p_pei_information8 in varchar2 default hr_api.g_varchar2
396 ,p_pei_information9 in varchar2 default hr_api.g_varchar2
397 ,p_pei_information10 in varchar2 default hr_api.g_varchar2
398 ,p_pei_information11 in varchar2 default hr_api.g_varchar2
399 ,p_pei_information12 in varchar2 default hr_api.g_varchar2
400 ,p_pei_information13 in varchar2 default hr_api.g_varchar2
401 ,p_pei_information14 in varchar2 default hr_api.g_varchar2
402 ,p_pei_information15 in varchar2 default hr_api.g_varchar2
403 ,p_pei_information16 in varchar2 default hr_api.g_varchar2
404 ,p_pei_information17 in varchar2 default hr_api.g_varchar2
405 ,p_pei_information18 in varchar2 default hr_api.g_varchar2
406 ,p_pei_information19 in varchar2 default hr_api.g_varchar2
407 ,p_pei_information20 in varchar2 default hr_api.g_varchar2
408 ,p_pei_information21 in varchar2 default hr_api.g_varchar2
409 ,p_pei_information22 in varchar2 default hr_api.g_varchar2
410 ,p_pei_information23 in varchar2 default hr_api.g_varchar2
411 ,p_pei_information24 in varchar2 default hr_api.g_varchar2
412 ,p_pei_information25 in varchar2 default hr_api.g_varchar2
413 ,p_pei_information26 in varchar2 default hr_api.g_varchar2
414 ,p_pei_information27 in varchar2 default hr_api.g_varchar2
415 ,p_pei_information28 in varchar2 default hr_api.g_varchar2
416 ,p_pei_information29 in varchar2 default hr_api.g_varchar2
417 ,p_pei_information30 in varchar2 default hr_api.g_varchar2
418 ) is
419 --
420 -- Declare cursors and local variables
421 --
422 l_proc varchar2(72) := g_package||'update_person_extra_info';
423 l_object_version_number per_phones.object_version_number%TYPE;
424 l_ovn per_phones.object_version_number%TYPE := p_object_version_number;
425 --
426 begin
427 hr_utility.set_location('Entering:'|| l_proc, 5);
428 --
429 -- Issue a savepoint
430 --
431 savepoint update_person_extra_info;
432 --
433 -- Call Before Process User Hook
434 --
435 begin
436 hr_person_extra_info_bk2.update_person_extra_info_b
437 (p_person_extra_info_id => p_person_extra_info_id,
438 p_pei_attribute_category => p_pei_attribute_category,
439 p_pei_attribute1 => p_pei_attribute1,
440 p_pei_attribute2 => p_pei_attribute2,
441 p_pei_attribute3 => p_pei_attribute3,
442 p_pei_attribute4 => p_pei_attribute4,
443 p_pei_attribute5 => p_pei_attribute5,
444 p_pei_attribute6 => p_pei_attribute6,
445 p_pei_attribute7 => p_pei_attribute7,
446 p_pei_attribute8 => p_pei_attribute8,
447 p_pei_attribute9 => p_pei_attribute9,
448 p_pei_attribute10 => p_pei_attribute10,
449 p_pei_attribute11 => p_pei_attribute11,
450 p_pei_attribute12 => p_pei_attribute12,
451 p_pei_attribute13 => p_pei_attribute13,
452 p_pei_attribute14 => p_pei_attribute14,
453 p_pei_attribute15 => p_pei_attribute15,
454 p_pei_attribute16 => p_pei_attribute16,
455 p_pei_attribute17 => p_pei_attribute17,
456 p_pei_attribute18 => p_pei_attribute18,
457 p_pei_attribute19 => p_pei_attribute19,
458 p_pei_attribute20 => p_pei_attribute20,
459 p_pei_information_category => p_pei_information_category,
460 p_pei_information1 => p_pei_information1,
461 p_pei_information2 => p_pei_information2,
462 p_pei_information3 => p_pei_information3,
463 p_pei_information4 => p_pei_information4,
464 p_pei_information5 => p_pei_information5,
465 p_pei_information6 => p_pei_information6,
466 p_pei_information7 => p_pei_information7,
467 p_pei_information8 => p_pei_information8,
468 p_pei_information9 => p_pei_information9,
469 p_pei_information10 => p_pei_information10,
470 p_pei_information11 => p_pei_information11,
471 p_pei_information12 => p_pei_information12,
472 p_pei_information13 => p_pei_information13,
473 p_pei_information14 => p_pei_information14,
474 p_pei_information15 => p_pei_information15,
475 p_pei_information16 => p_pei_information16,
476 p_pei_information17 => p_pei_information17,
477 p_pei_information18 => p_pei_information18,
478 p_pei_information19 => p_pei_information19,
479 p_pei_information20 => p_pei_information20,
480 p_pei_information21 => p_pei_information21,
481 p_pei_information22 => p_pei_information22,
482 p_pei_information23 => p_pei_information23,
483 p_pei_information24 => p_pei_information24,
484 p_pei_information25 => p_pei_information25,
485 p_pei_information26 => p_pei_information26,
486 p_pei_information27 => p_pei_information27,
487 p_pei_information28 => p_pei_information28,
488 p_pei_information29 => p_pei_information29,
489 p_pei_information30 => p_pei_information30,
490 p_object_version_number => p_object_version_number
491 );
492 exception
493 when hr_api.cannot_find_prog_unit then
494 hr_api.cannot_find_prog_unit_error
495 (p_module_name => 'UPDATE_PERSON_EXTRA_INFO',
496 p_hook_type => 'BP'
497 );
498 end;
499 --
500 -- End of Before Process User Hook call
501 --
502 --
503 hr_utility.set_location(l_proc, 7);
504 --
505 -- Store the original ovn in case we rollback when p_validate is true
506 --
507 l_object_version_number := p_object_version_number;
508 --
509 -- Process Logic - Update Person Extra Info details
510 --
511 pe_pei_upd.upd
512 (p_person_extra_info_id => p_person_extra_info_id
513 ,p_pei_attribute_category => p_pei_attribute_category
514 ,p_pei_attribute1 => p_pei_attribute1
515 ,p_pei_attribute2 => p_pei_attribute2
516 ,p_pei_attribute3 => p_pei_attribute3
517 ,p_pei_attribute4 => p_pei_attribute4
518 ,p_pei_attribute5 => p_pei_attribute5
519 ,p_pei_attribute6 => p_pei_attribute6
520 ,p_pei_attribute7 => p_pei_attribute7
521 ,p_pei_attribute8 => p_pei_attribute8
522 ,p_pei_attribute9 => p_pei_attribute9
523 ,p_pei_attribute10 => p_pei_attribute10
524 ,p_pei_attribute11 => p_pei_attribute11
525 ,p_pei_attribute12 => p_pei_attribute12
526 ,p_pei_attribute13 => p_pei_attribute13
527 ,p_pei_attribute14 => p_pei_attribute14
528 ,p_pei_attribute15 => p_pei_attribute15
529 ,p_pei_attribute16 => p_pei_attribute16
530 ,p_pei_attribute17 => p_pei_attribute17
531 ,p_pei_attribute18 => p_pei_attribute18
532 ,p_pei_attribute19 => p_pei_attribute19
533 ,p_pei_attribute20 => p_pei_attribute20
534 ,p_pei_information_category => p_pei_information_category
535 ,p_pei_information1 => p_pei_information1
536 ,p_pei_information2 => p_pei_information2
537 ,p_pei_information3 => p_pei_information3
538 ,p_pei_information4 => p_pei_information4
539 ,p_pei_information5 => p_pei_information5
540 ,p_pei_information6 => p_pei_information6
541 ,p_pei_information7 => p_pei_information7
542 ,p_pei_information8 => p_pei_information8
543 ,p_pei_information9 => p_pei_information9
544 ,p_pei_information10 => p_pei_information10
545 ,p_pei_information11 => p_pei_information11
546 ,p_pei_information12 => p_pei_information12
547 ,p_pei_information13 => p_pei_information13
548 ,p_pei_information14 => p_pei_information14
549 ,p_pei_information15 => p_pei_information15
550 ,p_pei_information16 => p_pei_information16
551 ,p_pei_information17 => p_pei_information17
552 ,p_pei_information18 => p_pei_information18
553 ,p_pei_information19 => p_pei_information19
554 ,p_pei_information20 => p_pei_information20
555 ,p_pei_information21 => p_pei_information21
556 ,p_pei_information22 => p_pei_information22
557 ,p_pei_information23 => p_pei_information23
558 ,p_pei_information24 => p_pei_information24
559 ,p_pei_information25 => p_pei_information25
560 ,p_pei_information26 => p_pei_information26
561 ,p_pei_information27 => p_pei_information27
562 ,p_pei_information28 => p_pei_information28
563 ,p_pei_information29 => p_pei_information29
564 ,p_pei_information30 => p_pei_information30
565 ,p_object_version_number => p_object_version_number
566 ,p_validate => false
567 );
568 --
569 hr_utility.set_location(l_proc, 8);
570 --
571 -- Call After Process User Hook
572 --
573 begin
574 hr_person_extra_info_bk2.update_person_extra_info_a
575 (p_person_extra_info_id => p_person_extra_info_id,
576 p_pei_attribute_category => p_pei_attribute_category,
577 p_pei_attribute1 => p_pei_attribute1,
578 p_pei_attribute2 => p_pei_attribute2,
579 p_pei_attribute3 => p_pei_attribute3,
580 p_pei_attribute4 => p_pei_attribute4,
581 p_pei_attribute5 => p_pei_attribute5,
582 p_pei_attribute6 => p_pei_attribute6,
583 p_pei_attribute7 => p_pei_attribute7,
584 p_pei_attribute8 => p_pei_attribute8,
585 p_pei_attribute9 => p_pei_attribute9,
586 p_pei_attribute10 => p_pei_attribute10,
587 p_pei_attribute11 => p_pei_attribute11,
588 p_pei_attribute12 => p_pei_attribute12,
589 p_pei_attribute13 => p_pei_attribute13,
590 p_pei_attribute14 => p_pei_attribute14,
591 p_pei_attribute15 => p_pei_attribute15,
592 p_pei_attribute16 => p_pei_attribute16,
593 p_pei_attribute17 => p_pei_attribute17,
594 p_pei_attribute18 => p_pei_attribute18,
595 p_pei_attribute19 => p_pei_attribute19,
596 p_pei_attribute20 => p_pei_attribute20,
597 p_pei_information_category => p_pei_information_category,
598 p_pei_information1 => p_pei_information1,
599 p_pei_information2 => p_pei_information2,
600 p_pei_information3 => p_pei_information3,
601 p_pei_information4 => p_pei_information4,
602 p_pei_information5 => p_pei_information5,
603 p_pei_information6 => p_pei_information6,
604 p_pei_information7 => p_pei_information7,
605 p_pei_information8 => p_pei_information8,
606 p_pei_information9 => p_pei_information9,
607 p_pei_information10 => p_pei_information10,
608 p_pei_information11 => p_pei_information11,
609 p_pei_information12 => p_pei_information12,
610 p_pei_information13 => p_pei_information13,
611 p_pei_information14 => p_pei_information14,
612 p_pei_information15 => p_pei_information15,
613 p_pei_information16 => p_pei_information16,
614 p_pei_information17 => p_pei_information17,
615 p_pei_information18 => p_pei_information18,
616 p_pei_information19 => p_pei_information19,
617 p_pei_information20 => p_pei_information20,
618 p_pei_information21 => p_pei_information21,
619 p_pei_information22 => p_pei_information22,
620 p_pei_information23 => p_pei_information23,
621 p_pei_information24 => p_pei_information24,
622 p_pei_information25 => p_pei_information25,
623 p_pei_information26 => p_pei_information26,
624 p_pei_information27 => p_pei_information27,
625 p_pei_information28 => p_pei_information28,
626 p_pei_information29 => p_pei_information29,
627 p_pei_information30 => p_pei_information30,
628 p_object_version_number => p_object_version_number
629 );
630 exception
631 when hr_api.cannot_find_prog_unit then
632 hr_api.cannot_find_prog_unit_error
633 (p_module_name => 'UPDATE_PERSON_EXTRA_INFO',
634 p_hook_type => 'AP'
635 );
636 end;
637 --
638 -- End of After Process User Hook call
639 --
640 -- When in validation only mode raise the Validate_Enabled exception
641 --
642 if p_validate then
643 raise hr_api.validate_enabled;
644 end if;
645 --
646 hr_utility.set_location(' Leaving:'||l_proc, 11);
647 exception
648 when hr_api.validate_enabled then
649 --
650 -- As the Validate_Enabled exception has been raised
651 -- we must rollback to the savepoint
652 --
653 ROLLBACK TO update_person_extra_info;
654 --
655 -- Only set output warning arguments
656 -- (Any key or derived arguments must be set to null
657 -- when validation only mode is being used.)
658 --
659 p_object_version_number := l_object_version_number;
660 --
661 hr_utility.set_location(' Leaving:'||l_proc, 12);
662 --
663 when others then
664 --
665 -- A validation or unexpected error has occurred
666 --
667 -- Added as part of the fix to bug 632479
668 --
669 ROLLBACK TO update_person_extra_info;
670 --
671 -- set in out parameters and set out parameters
672 --
673 p_object_version_number := l_ovn;
674 --
675 raise;
676 --
677 end update_person_extra_info;
678 --
679 --
680 -- ----------------------------------------------------------------------------
681 -- |-----------------------< delete_person_extra_info >------------------------|
682 -- ----------------------------------------------------------------------------
683 --
684 procedure delete_person_extra_info
685 (p_validate in boolean default false
686 ,p_person_extra_info_id in number
687 ,p_object_version_number in number
688 ) is
689 --
690 -- Declare cursors and local variables
691 --
692 l_proc varchar2(72) := g_package||'delete_person_extra_info';
693 --
694 begin
695 hr_utility.set_location('Entering:'|| l_proc, 5);
696 --
697 -- Issue a savepoint
698 --
699 savepoint delete_person_extra_info;
700 --
701 -- Call Before Process User Hook
702 --
703 begin
704 hr_person_extra_info_bk3.delete_person_extra_info_b
705 (p_person_extra_info_id => p_person_extra_info_id,
706 p_object_version_number => p_object_version_number
707 );
708 exception
709 when hr_api.cannot_find_prog_unit then
710 hr_api.cannot_find_prog_unit_error
711 (p_module_name => 'DELETE_PERSON_EXTRA_INFO',
712 p_hook_type => 'BP'
713 );
714 end;
715 --
716 -- End of Before Process User Hook call
717 --
718 hr_utility.set_location(l_proc, 7);
719 --
720 -- Process Logic - Delete Person Extra Info details
721 --
722 pe_pei_del.del
723 (p_person_extra_info_id => p_person_extra_info_id
724 ,p_object_version_number => p_object_version_number
725 ,p_validate => false
726 );
727 --
728 hr_utility.set_location(l_proc, 8);
729 --
730 -- Call Before Process User Hook
731 --
732 begin
733 hr_person_extra_info_bk3.delete_person_extra_info_a
734 (p_person_extra_info_id => p_person_extra_info_id,
735 p_object_version_number => p_object_version_number
736 );
737 exception
738 when hr_api.cannot_find_prog_unit then
739 hr_api.cannot_find_prog_unit_error
740 (p_module_name => 'DELETE_PERSON_EXTRA_INFO',
741 p_hook_type => 'AP'
742 );
743 end;
744 --
745 -- End of After Process User Hook call
746 --
747 -- When in validation only mode raise the Validate_Enabled exception
748 --
749 if p_validate then
750 raise hr_api.validate_enabled;
751 end if;
752 --
753 hr_utility.set_location(' Leaving:'||l_proc, 11);
754 exception
755 when hr_api.validate_enabled then
756 --
757 -- As the Validate_Enabled exception has been raised
758 -- we must rollback to the savepoint
759 --
760 ROLLBACK TO delete_person_extra_info;
761 --
762 hr_utility.set_location(' Leaving:'||l_proc, 12);
763 --
764 when others then
765 --
766 -- A validation or unexpected error has occurred
767 --
768 -- Added as part of the fix to bug 632479
769 --
770 ROLLBACK TO delete_person_extra_info;
771 --
772 raise;
773 --
774 end delete_person_extra_info;
775 --
776 end hr_person_extra_info_api;