[Home] [Help]
PACKAGE BODY: APPS.HR_DE_ORGANIZATION_LINKS_API
Source
1 Package Body hr_de_organization_links_api as
2 /* $Header: hrordapi.pkb 115.4 2002/12/16 10:38:03 hjonnala noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' hr_de_organization_links_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |-----------------------------< create_link >------------------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_link
13 (p_validate in boolean default false
14 ,p_effective_date in date
15 ,p_parent_organization_id in number
16 ,p_child_organization_id in number
17 ,p_org_link_type in varchar2
18 ,p_org_link_information_categor in varchar2 default null
19 ,p_org_link_information1 in varchar2 default null
20 ,p_org_link_information2 in varchar2 default null
21 ,p_org_link_information3 in varchar2 default null
22 ,p_org_link_information4 in varchar2 default null
23 ,p_org_link_information5 in varchar2 default null
24 ,p_org_link_information6 in varchar2 default null
25 ,p_org_link_information7 in varchar2 default null
26 ,p_org_link_information8 in varchar2 default null
27 ,p_org_link_information9 in varchar2 default null
28 ,p_org_link_information10 in varchar2 default null
29 ,p_org_link_information11 in varchar2 default null
30 ,p_org_link_information12 in varchar2 default null
31 ,p_org_link_information13 in varchar2 default null
32 ,p_org_link_information14 in varchar2 default null
33 ,p_org_link_information15 in varchar2 default null
34 ,p_org_link_information16 in varchar2 default null
35 ,p_org_link_information17 in varchar2 default null
36 ,p_org_link_information18 in varchar2 default null
37 ,p_org_link_information19 in varchar2 default null
38 ,p_org_link_information20 in varchar2 default null
39 ,p_org_link_information21 in varchar2 default null
40 ,p_org_link_information22 in varchar2 default null
41 ,p_org_link_information23 in varchar2 default null
42 ,p_org_link_information24 in varchar2 default null
43 ,p_org_link_information25 in varchar2 default null
44 ,p_org_link_information26 in varchar2 default null
45 ,p_org_link_information27 in varchar2 default null
46 ,p_org_link_information28 in varchar2 default null
47 ,p_org_link_information29 in varchar2 default null
48 ,p_org_link_information30 in varchar2 default null
49 ,p_attribute_category in varchar2 default null
50 ,p_attribute1 in varchar2 default null
51 ,p_attribute2 in varchar2 default null
52 ,p_attribute3 in varchar2 default null
53 ,p_attribute4 in varchar2 default null
54 ,p_attribute5 in varchar2 default null
55 ,p_attribute6 in varchar2 default null
56 ,p_attribute7 in varchar2 default null
57 ,p_attribute8 in varchar2 default null
58 ,p_attribute9 in varchar2 default null
59 ,p_attribute10 in varchar2 default null
60 ,p_attribute11 in varchar2 default null
61 ,p_attribute12 in varchar2 default null
62 ,p_attribute13 in varchar2 default null
63 ,p_attribute14 in varchar2 default null
64 ,p_attribute15 in varchar2 default null
65 ,p_attribute16 in varchar2 default null
66 ,p_attribute17 in varchar2 default null
67 ,p_attribute18 in varchar2 default null
68 ,p_attribute19 in varchar2 default null
69 ,p_attribute20 in varchar2 default null
70 ,p_attribute21 in varchar2 default null
71 ,p_attribute22 in varchar2 default null
72 ,p_attribute23 in varchar2 default null
73 ,p_attribute24 in varchar2 default null
74 ,p_attribute25 in varchar2 default null
75 ,p_attribute26 in varchar2 default null
76 ,p_attribute27 in varchar2 default null
77 ,p_attribute28 in varchar2 default null
78 ,p_attribute29 in varchar2 default null
79 ,p_attribute30 in varchar2 default null
80 ,p_organization_link_id out nocopy number
81 ,p_object_version_number out nocopy number
82 ) is
83 --
84 -- Declare cursors
85 --
86 cursor csr_get_derived_details(p_parent_organization_id number) is
87 select org.business_group_id
88 from hr_organization_units org
89 where org.organization_id = p_parent_organization_id;
90 --
91 -- Declare local variables
92 --
93 l_proc varchar2(72) := g_package||'create_link';
94 l_business_group_id hr_de_organization_links.business_group_id%TYPE;
95 l_organization_link_id hr_de_organization_links.organization_link_id%TYPE;
96 l_object_version_number hr_de_organization_links.object_version_number%TYPE;
97 begin
98 hr_utility.set_location('Entering:'|| l_proc, 10);
99 --
100 -- Issue a savepoint
101 --
102 savepoint create_link;
103 --
104 -- Pre process logic
105 --
106 -- Derive the business group.
107 --
108 open csr_get_derived_details(p_parent_organization_id);
109 fetch csr_get_derived_details into l_business_group_id;
110 if csr_get_derived_details%NOTFOUND then
111 close csr_get_derived_details;
112 hr_utility.set_message(801,'XXX');
113 hr_utility.raise_error;
114 end if;
115 close csr_get_derived_details;
116 --
117 -- Call Before Process User Hook
118 --
119 begin
120 hr_de_organization_links_bk1.create_link_b
121 (p_effective_date => trunc(p_effective_date)
122 ,p_parent_organization_id => p_parent_organization_id
123 ,p_child_organization_id => p_child_organization_id
124 ,p_business_group_id => l_business_group_id
125 ,p_org_link_type => p_org_link_type
126 ,p_org_link_information_categor => p_org_link_information_categor
127 ,p_org_link_information1 => p_org_link_information1
128 ,p_org_link_information2 => p_org_link_information2
129 ,p_org_link_information3 => p_org_link_information3
130 ,p_org_link_information4 => p_org_link_information4
131 ,p_org_link_information5 => p_org_link_information5
132 ,p_org_link_information6 => p_org_link_information6
133 ,p_org_link_information7 => p_org_link_information7
134 ,p_org_link_information8 => p_org_link_information8
135 ,p_org_link_information9 => p_org_link_information9
136 ,p_org_link_information10 => p_org_link_information10
137 ,p_org_link_information11 => p_org_link_information11
138 ,p_org_link_information12 => p_org_link_information12
139 ,p_org_link_information13 => p_org_link_information13
140 ,p_org_link_information14 => p_org_link_information14
141 ,p_org_link_information15 => p_org_link_information15
142 ,p_org_link_information16 => p_org_link_information16
143 ,p_org_link_information17 => p_org_link_information17
144 ,p_org_link_information18 => p_org_link_information18
145 ,p_org_link_information19 => p_org_link_information19
146 ,p_org_link_information20 => p_org_link_information20
147 ,p_org_link_information21 => p_org_link_information21
148 ,p_org_link_information22 => p_org_link_information22
149 ,p_org_link_information23 => p_org_link_information23
150 ,p_org_link_information24 => p_org_link_information24
151 ,p_org_link_information25 => p_org_link_information25
152 ,p_org_link_information26 => p_org_link_information26
153 ,p_org_link_information27 => p_org_link_information27
154 ,p_org_link_information28 => p_org_link_information28
155 ,p_org_link_information29 => p_org_link_information29
156 ,p_org_link_information30 => p_org_link_information30
157 ,p_attribute_category => p_attribute_category
158 ,p_attribute1 => p_attribute1
159 ,p_attribute2 => p_attribute2
160 ,p_attribute3 => p_attribute3
161 ,p_attribute4 => p_attribute4
162 ,p_attribute5 => p_attribute5
163 ,p_attribute6 => p_attribute6
164 ,p_attribute7 => p_attribute7
165 ,p_attribute8 => p_attribute8
166 ,p_attribute9 => p_attribute9
167 ,p_attribute10 => p_attribute10
168 ,p_attribute11 => p_attribute11
169 ,p_attribute12 => p_attribute12
170 ,p_attribute13 => p_attribute13
171 ,p_attribute14 => p_attribute14
172 ,p_attribute15 => p_attribute15
173 ,p_attribute16 => p_attribute16
174 ,p_attribute17 => p_attribute17
175 ,p_attribute18 => p_attribute18
176 ,p_attribute19 => p_attribute19
177 ,p_attribute20 => p_attribute20
178 ,p_attribute21 => p_attribute21
179 ,p_attribute22 => p_attribute22
180 ,p_attribute23 => p_attribute23
181 ,p_attribute24 => p_attribute24
182 ,p_attribute25 => p_attribute25
183 ,p_attribute26 => p_attribute26
184 ,p_attribute27 => p_attribute27
185 ,p_attribute28 => p_attribute28
186 ,p_attribute29 => p_attribute29
187 ,p_attribute30 => p_attribute30);
188 exception
189 when hr_api.cannot_find_prog_unit then
190 hr_api.cannot_find_prog_unit_error
191 (p_module_name => 'create_link'
192 ,p_hook_type => 'BP'
193 );
194 end;
195 --
196 -- Process Logic
197 --
198 hr_ord_ins.ins
199 (p_effective_date => trunc(p_effective_date)
200 ,p_parent_organization_id => p_parent_organization_id
201 ,p_child_organization_id => p_child_organization_id
202 ,p_business_group_id => l_business_group_id
203 ,p_org_link_type => p_org_link_type
204 ,p_org_link_information_categor => p_org_link_information_categor
205 ,p_org_link_information1 => p_org_link_information1
206 ,p_org_link_information2 => p_org_link_information2
207 ,p_org_link_information3 => p_org_link_information3
208 ,p_org_link_information4 => p_org_link_information4
209 ,p_org_link_information5 => p_org_link_information5
210 ,p_org_link_information6 => p_org_link_information6
211 ,p_org_link_information7 => p_org_link_information7
212 ,p_org_link_information8 => p_org_link_information8
213 ,p_org_link_information9 => p_org_link_information9
214 ,p_org_link_information10 => p_org_link_information10
215 ,p_org_link_information11 => p_org_link_information11
216 ,p_org_link_information12 => p_org_link_information12
217 ,p_org_link_information13 => p_org_link_information13
218 ,p_org_link_information14 => p_org_link_information14
219 ,p_org_link_information15 => p_org_link_information15
220 ,p_org_link_information16 => p_org_link_information16
221 ,p_org_link_information17 => p_org_link_information17
222 ,p_org_link_information18 => p_org_link_information18
223 ,p_org_link_information19 => p_org_link_information19
224 ,p_org_link_information20 => p_org_link_information20
225 ,p_org_link_information21 => p_org_link_information21
226 ,p_org_link_information22 => p_org_link_information22
227 ,p_org_link_information23 => p_org_link_information23
228 ,p_org_link_information24 => p_org_link_information24
229 ,p_org_link_information25 => p_org_link_information25
230 ,p_org_link_information26 => p_org_link_information26
231 ,p_org_link_information27 => p_org_link_information27
232 ,p_org_link_information28 => p_org_link_information28
233 ,p_org_link_information29 => p_org_link_information29
234 ,p_org_link_information30 => p_org_link_information30
235 ,p_attribute_category => p_attribute_category
236 ,p_attribute1 => p_attribute1
237 ,p_attribute2 => p_attribute2
238 ,p_attribute3 => p_attribute3
239 ,p_attribute4 => p_attribute4
240 ,p_attribute5 => p_attribute5
241 ,p_attribute6 => p_attribute6
242 ,p_attribute7 => p_attribute7
243 ,p_attribute8 => p_attribute8
244 ,p_attribute9 => p_attribute9
245 ,p_attribute10 => p_attribute10
246 ,p_attribute11 => p_attribute11
247 ,p_attribute12 => p_attribute12
248 ,p_attribute13 => p_attribute13
249 ,p_attribute14 => p_attribute14
250 ,p_attribute15 => p_attribute15
251 ,p_attribute16 => p_attribute16
252 ,p_attribute17 => p_attribute17
253 ,p_attribute18 => p_attribute18
254 ,p_attribute19 => p_attribute19
255 ,p_attribute20 => p_attribute20
256 ,p_attribute21 => p_attribute21
257 ,p_attribute22 => p_attribute22
258 ,p_attribute23 => p_attribute23
259 ,p_attribute24 => p_attribute24
260 ,p_attribute25 => p_attribute25
261 ,p_attribute26 => p_attribute26
262 ,p_attribute27 => p_attribute27
263 ,p_attribute28 => p_attribute28
264 ,p_attribute29 => p_attribute29
265 ,p_attribute30 => p_attribute30
266 ,p_organization_link_id => l_organization_link_id
267 ,p_object_version_number => l_object_version_number);
268 --
269 -- Call After Process User Hook
270 --
271 begin
272 hr_de_organization_links_bk1.create_link_a
273 (p_effective_date => trunc(p_effective_date)
274 ,p_parent_organization_id => p_parent_organization_id
275 ,p_child_organization_id => p_child_organization_id
276 ,p_business_group_id => l_business_group_id
277 ,p_org_link_type => p_org_link_type
278 ,p_org_link_information_categor => p_org_link_information_categor
279 ,p_org_link_information1 => p_org_link_information1
280 ,p_org_link_information2 => p_org_link_information2
281 ,p_org_link_information3 => p_org_link_information3
282 ,p_org_link_information4 => p_org_link_information4
283 ,p_org_link_information5 => p_org_link_information5
284 ,p_org_link_information6 => p_org_link_information6
285 ,p_org_link_information7 => p_org_link_information7
286 ,p_org_link_information8 => p_org_link_information8
287 ,p_org_link_information9 => p_org_link_information9
288 ,p_org_link_information10 => p_org_link_information10
289 ,p_org_link_information11 => p_org_link_information11
290 ,p_org_link_information12 => p_org_link_information12
291 ,p_org_link_information13 => p_org_link_information13
292 ,p_org_link_information14 => p_org_link_information14
293 ,p_org_link_information15 => p_org_link_information15
294 ,p_org_link_information16 => p_org_link_information16
298 ,p_org_link_information20 => p_org_link_information20
295 ,p_org_link_information17 => p_org_link_information17
296 ,p_org_link_information18 => p_org_link_information18
297 ,p_org_link_information19 => p_org_link_information19
299 ,p_org_link_information21 => p_org_link_information21
300 ,p_org_link_information22 => p_org_link_information22
301 ,p_org_link_information23 => p_org_link_information23
302 ,p_org_link_information24 => p_org_link_information24
303 ,p_org_link_information25 => p_org_link_information25
304 ,p_org_link_information26 => p_org_link_information26
305 ,p_org_link_information27 => p_org_link_information27
306 ,p_org_link_information28 => p_org_link_information28
307 ,p_org_link_information29 => p_org_link_information29
308 ,p_org_link_information30 => p_org_link_information30
309 ,p_attribute_category => p_attribute_category
310 ,p_attribute1 => p_attribute1
311 ,p_attribute2 => p_attribute2
312 ,p_attribute3 => p_attribute3
313 ,p_attribute4 => p_attribute4
314 ,p_attribute5 => p_attribute5
315 ,p_attribute6 => p_attribute6
316 ,p_attribute7 => p_attribute7
317 ,p_attribute8 => p_attribute8
318 ,p_attribute9 => p_attribute9
319 ,p_attribute10 => p_attribute10
320 ,p_attribute11 => p_attribute11
321 ,p_attribute12 => p_attribute12
322 ,p_attribute13 => p_attribute13
323 ,p_attribute14 => p_attribute14
324 ,p_attribute15 => p_attribute15
325 ,p_attribute16 => p_attribute16
326 ,p_attribute17 => p_attribute17
327 ,p_attribute18 => p_attribute18
328 ,p_attribute19 => p_attribute19
329 ,p_attribute20 => p_attribute20
330 ,p_attribute21 => p_attribute21
331 ,p_attribute22 => p_attribute22
332 ,p_attribute23 => p_attribute23
333 ,p_attribute24 => p_attribute24
334 ,p_attribute25 => p_attribute25
335 ,p_attribute26 => p_attribute26
336 ,p_attribute27 => p_attribute27
337 ,p_attribute28 => p_attribute28
338 ,p_attribute29 => p_attribute29
339 ,p_attribute30 => p_attribute30
340 ,p_organization_link_id => l_organization_link_id
341 ,p_object_version_number => l_object_version_number);
342 exception
343 when hr_api.cannot_find_prog_unit then
344 hr_api.cannot_find_prog_unit_error
345 (p_module_name => 'create_link'
346 ,p_hook_type => 'AP'
347 );
348 end;
349 --
350 -- When in validation only mode raise the Validate_Enabled exception
351 --
352 if p_validate then
353 raise hr_api.validate_enabled;
354 end if;
355 --
356 -- Set all output arguments
357 --
358 p_organization_link_id := l_organization_link_id;
359 p_object_version_number := l_object_version_number;
360 --
361 hr_utility.set_location(' Leaving:'||l_proc, 70);
362 exception
363 when hr_api.validate_enabled then
364 --
365 -- As the Validate_Enabled exception has been raised
366 -- we must rollback to the savepoint
367 --
368 rollback to create_link;
369 --
370 -- Only set output warning arguments
371 -- (Any key or derived arguments must be set to null
372 -- when validation only mode is being used.)
373 --
374 p_organization_link_id := null;
375 p_object_version_number := null;
376 hr_utility.set_location(' Leaving:'||l_proc, 80);
377 when others then
378 --
379 -- A validation or unexpected error has occured
380 --
381 rollback to create_link;
382 -- Set OUT parameters.
383 --
384 p_organization_link_id := null;
385 p_object_version_number := null;
386 hr_utility.set_location(' Leaving:'||l_proc, 90);
387 raise;
388 end create_link;
389 --
390 -- ----------------------------------------------------------------------------
391 -- |-----------------------------< update_link >------------------------------|
392 -- ----------------------------------------------------------------------------
393 --
394 procedure update_link
395 (p_validate in boolean default false
396 ,p_effective_date in date
397 ,p_organization_link_id in number
398 ,p_org_link_information_categor in varchar2 default hr_api.g_varchar2
399 ,p_org_link_information1 in varchar2 default hr_api.g_varchar2
400 ,p_org_link_information2 in varchar2 default hr_api.g_varchar2
401 ,p_org_link_information3 in varchar2 default hr_api.g_varchar2
402 ,p_org_link_information4 in varchar2 default hr_api.g_varchar2
403 ,p_org_link_information5 in varchar2 default hr_api.g_varchar2
404 ,p_org_link_information6 in varchar2 default hr_api.g_varchar2
405 ,p_org_link_information7 in varchar2 default hr_api.g_varchar2
406 ,p_org_link_information8 in varchar2 default hr_api.g_varchar2
410 ,p_org_link_information12 in varchar2 default hr_api.g_varchar2
407 ,p_org_link_information9 in varchar2 default hr_api.g_varchar2
408 ,p_org_link_information10 in varchar2 default hr_api.g_varchar2
409 ,p_org_link_information11 in varchar2 default hr_api.g_varchar2
411 ,p_org_link_information13 in varchar2 default hr_api.g_varchar2
412 ,p_org_link_information14 in varchar2 default hr_api.g_varchar2
413 ,p_org_link_information15 in varchar2 default hr_api.g_varchar2
414 ,p_org_link_information16 in varchar2 default hr_api.g_varchar2
415 ,p_org_link_information17 in varchar2 default hr_api.g_varchar2
416 ,p_org_link_information18 in varchar2 default hr_api.g_varchar2
417 ,p_org_link_information19 in varchar2 default hr_api.g_varchar2
418 ,p_org_link_information20 in varchar2 default hr_api.g_varchar2
419 ,p_org_link_information21 in varchar2 default hr_api.g_varchar2
420 ,p_org_link_information22 in varchar2 default hr_api.g_varchar2
421 ,p_org_link_information23 in varchar2 default hr_api.g_varchar2
422 ,p_org_link_information24 in varchar2 default hr_api.g_varchar2
423 ,p_org_link_information25 in varchar2 default hr_api.g_varchar2
424 ,p_org_link_information26 in varchar2 default hr_api.g_varchar2
425 ,p_org_link_information27 in varchar2 default hr_api.g_varchar2
426 ,p_org_link_information28 in varchar2 default hr_api.g_varchar2
427 ,p_org_link_information29 in varchar2 default hr_api.g_varchar2
428 ,p_org_link_information30 in varchar2 default hr_api.g_varchar2
429 ,p_attribute_category in varchar2 default hr_api.g_varchar2
430 ,p_attribute1 in varchar2 default hr_api.g_varchar2
431 ,p_attribute2 in varchar2 default hr_api.g_varchar2
432 ,p_attribute3 in varchar2 default hr_api.g_varchar2
433 ,p_attribute4 in varchar2 default hr_api.g_varchar2
434 ,p_attribute5 in varchar2 default hr_api.g_varchar2
435 ,p_attribute6 in varchar2 default hr_api.g_varchar2
436 ,p_attribute7 in varchar2 default hr_api.g_varchar2
437 ,p_attribute8 in varchar2 default hr_api.g_varchar2
438 ,p_attribute9 in varchar2 default hr_api.g_varchar2
439 ,p_attribute10 in varchar2 default hr_api.g_varchar2
440 ,p_attribute11 in varchar2 default hr_api.g_varchar2
441 ,p_attribute12 in varchar2 default hr_api.g_varchar2
442 ,p_attribute13 in varchar2 default hr_api.g_varchar2
443 ,p_attribute14 in varchar2 default hr_api.g_varchar2
444 ,p_attribute15 in varchar2 default hr_api.g_varchar2
445 ,p_attribute16 in varchar2 default hr_api.g_varchar2
446 ,p_attribute17 in varchar2 default hr_api.g_varchar2
447 ,p_attribute18 in varchar2 default hr_api.g_varchar2
448 ,p_attribute19 in varchar2 default hr_api.g_varchar2
449 ,p_attribute20 in varchar2 default hr_api.g_varchar2
450 ,p_attribute21 in varchar2 default hr_api.g_varchar2
451 ,p_attribute22 in varchar2 default hr_api.g_varchar2
452 ,p_attribute23 in varchar2 default hr_api.g_varchar2
453 ,p_attribute24 in varchar2 default hr_api.g_varchar2
454 ,p_attribute25 in varchar2 default hr_api.g_varchar2
455 ,p_attribute26 in varchar2 default hr_api.g_varchar2
456 ,p_attribute27 in varchar2 default hr_api.g_varchar2
457 ,p_attribute28 in varchar2 default hr_api.g_varchar2
458 ,p_attribute29 in varchar2 default hr_api.g_varchar2
459 ,p_attribute30 in varchar2 default hr_api.g_varchar2
460 ,p_object_version_number in out nocopy number
461 ) is
462 --
463 -- Declare local variables
464 --
465 l_proc varchar2(72) := g_package||'update_link';
466 l_object_version_number hr_de_organization_links.object_version_number%TYPE := p_object_version_number;
467 l_temp_ovn number := p_object_version_number;
468 begin
469 hr_utility.set_location('Entering:'|| l_proc, 10);
470 --
471 -- Issue a savepoint
472 --
473 savepoint update_link;
474 --
475 -- Call Before Process User Hook
476 --
477 begin
478 hr_de_organization_links_bk2.update_link_b
479 (p_effective_date => trunc(p_effective_date)
480 ,p_organization_link_id => p_organization_link_id
481 ,p_org_link_information_categor => p_org_link_information_categor
482 ,p_org_link_information1 => p_org_link_information1
483 ,p_org_link_information2 => p_org_link_information2
484 ,p_org_link_information3 => p_org_link_information3
485 ,p_org_link_information4 => p_org_link_information4
486 ,p_org_link_information5 => p_org_link_information5
487 ,p_org_link_information6 => p_org_link_information6
488 ,p_org_link_information7 => p_org_link_information7
489 ,p_org_link_information8 => p_org_link_information8
490 ,p_org_link_information9 => p_org_link_information9
491 ,p_org_link_information10 => p_org_link_information10
492 ,p_org_link_information11 => p_org_link_information11
496 ,p_org_link_information15 => p_org_link_information15
493 ,p_org_link_information12 => p_org_link_information12
494 ,p_org_link_information13 => p_org_link_information13
495 ,p_org_link_information14 => p_org_link_information14
497 ,p_org_link_information16 => p_org_link_information16
498 ,p_org_link_information17 => p_org_link_information17
499 ,p_org_link_information18 => p_org_link_information18
500 ,p_org_link_information19 => p_org_link_information19
501 ,p_org_link_information20 => p_org_link_information20
502 ,p_org_link_information21 => p_org_link_information21
503 ,p_org_link_information22 => p_org_link_information22
504 ,p_org_link_information23 => p_org_link_information23
505 ,p_org_link_information24 => p_org_link_information24
506 ,p_org_link_information25 => p_org_link_information25
507 ,p_org_link_information26 => p_org_link_information26
508 ,p_org_link_information27 => p_org_link_information27
509 ,p_org_link_information28 => p_org_link_information28
510 ,p_org_link_information29 => p_org_link_information29
511 ,p_org_link_information30 => p_org_link_information30
512 ,p_attribute_category => p_attribute_category
513 ,p_attribute1 => p_attribute1
514 ,p_attribute2 => p_attribute2
515 ,p_attribute3 => p_attribute3
516 ,p_attribute4 => p_attribute4
517 ,p_attribute5 => p_attribute5
518 ,p_attribute6 => p_attribute6
519 ,p_attribute7 => p_attribute7
520 ,p_attribute8 => p_attribute8
521 ,p_attribute9 => p_attribute9
522 ,p_attribute10 => p_attribute10
523 ,p_attribute11 => p_attribute11
524 ,p_attribute12 => p_attribute12
525 ,p_attribute13 => p_attribute13
526 ,p_attribute14 => p_attribute14
527 ,p_attribute15 => p_attribute15
528 ,p_attribute16 => p_attribute16
529 ,p_attribute17 => p_attribute17
530 ,p_attribute18 => p_attribute18
531 ,p_attribute19 => p_attribute19
532 ,p_attribute20 => p_attribute20
533 ,p_attribute21 => p_attribute21
534 ,p_attribute22 => p_attribute22
535 ,p_attribute23 => p_attribute23
536 ,p_attribute24 => p_attribute24
537 ,p_attribute25 => p_attribute25
538 ,p_attribute26 => p_attribute26
539 ,p_attribute27 => p_attribute27
540 ,p_attribute28 => p_attribute28
541 ,p_attribute29 => p_attribute29
542 ,p_attribute30 => p_attribute30
543 ,p_object_version_number => l_object_version_number);
544 exception
545 when hr_api.cannot_find_prog_unit then
546 hr_api.cannot_find_prog_unit_error
547 (p_module_name => 'update_link'
548 ,p_hook_type => 'BP'
549 );
550 end;
551 --
552 -- Process Logic
553 --
554 hr_ord_upd.upd
555 (p_effective_date => trunc(p_effective_date)
556 ,p_organization_link_id => p_organization_link_id
557 ,p_org_link_information_categor => p_org_link_information_categor
558 ,p_org_link_information1 => p_org_link_information1
559 ,p_org_link_information2 => p_org_link_information2
560 ,p_org_link_information3 => p_org_link_information3
561 ,p_org_link_information4 => p_org_link_information4
562 ,p_org_link_information5 => p_org_link_information5
563 ,p_org_link_information6 => p_org_link_information6
564 ,p_org_link_information7 => p_org_link_information7
565 ,p_org_link_information8 => p_org_link_information8
566 ,p_org_link_information9 => p_org_link_information9
567 ,p_org_link_information10 => p_org_link_information10
568 ,p_org_link_information11 => p_org_link_information11
569 ,p_org_link_information12 => p_org_link_information12
570 ,p_org_link_information13 => p_org_link_information13
571 ,p_org_link_information14 => p_org_link_information14
572 ,p_org_link_information15 => p_org_link_information15
573 ,p_org_link_information16 => p_org_link_information16
574 ,p_org_link_information17 => p_org_link_information17
575 ,p_org_link_information18 => p_org_link_information18
576 ,p_org_link_information19 => p_org_link_information19
577 ,p_org_link_information20 => p_org_link_information20
578 ,p_org_link_information21 => p_org_link_information21
579 ,p_org_link_information22 => p_org_link_information22
580 ,p_org_link_information23 => p_org_link_information23
581 ,p_org_link_information24 => p_org_link_information24
582 ,p_org_link_information25 => p_org_link_information25
583 ,p_org_link_information26 => p_org_link_information26
584 ,p_org_link_information27 => p_org_link_information27
585 ,p_org_link_information28 => p_org_link_information28
586 ,p_org_link_information29 => p_org_link_information29
587 ,p_org_link_information30 => p_org_link_information30
588 ,p_attribute_category => p_attribute_category
592 ,p_attribute4 => p_attribute4
589 ,p_attribute1 => p_attribute1
590 ,p_attribute2 => p_attribute2
591 ,p_attribute3 => p_attribute3
593 ,p_attribute5 => p_attribute5
594 ,p_attribute6 => p_attribute6
595 ,p_attribute7 => p_attribute7
596 ,p_attribute8 => p_attribute8
597 ,p_attribute9 => p_attribute9
598 ,p_attribute10 => p_attribute10
599 ,p_attribute11 => p_attribute11
600 ,p_attribute12 => p_attribute12
601 ,p_attribute13 => p_attribute13
602 ,p_attribute14 => p_attribute14
603 ,p_attribute15 => p_attribute15
604 ,p_attribute16 => p_attribute16
605 ,p_attribute17 => p_attribute17
606 ,p_attribute18 => p_attribute18
607 ,p_attribute19 => p_attribute19
608 ,p_attribute20 => p_attribute20
609 ,p_attribute21 => p_attribute21
610 ,p_attribute22 => p_attribute22
611 ,p_attribute23 => p_attribute23
612 ,p_attribute24 => p_attribute24
613 ,p_attribute25 => p_attribute25
614 ,p_attribute26 => p_attribute26
615 ,p_attribute27 => p_attribute27
616 ,p_attribute28 => p_attribute28
617 ,p_attribute29 => p_attribute29
618 ,p_attribute30 => p_attribute30
619 ,p_object_version_number => l_object_version_number);
620 --
621 -- Call After Process User Hook
622 --
623 begin
624 hr_de_organization_links_bk2.update_link_a
625 (p_effective_date => trunc(p_effective_date)
626 ,p_organization_link_id => p_organization_link_id
627 ,p_org_link_information_categor => p_org_link_information_categor
628 ,p_org_link_information1 => p_org_link_information1
629 ,p_org_link_information2 => p_org_link_information2
630 ,p_org_link_information3 => p_org_link_information3
631 ,p_org_link_information4 => p_org_link_information4
632 ,p_org_link_information5 => p_org_link_information5
633 ,p_org_link_information6 => p_org_link_information6
634 ,p_org_link_information7 => p_org_link_information7
635 ,p_org_link_information8 => p_org_link_information8
636 ,p_org_link_information9 => p_org_link_information9
637 ,p_org_link_information10 => p_org_link_information10
638 ,p_org_link_information11 => p_org_link_information11
639 ,p_org_link_information12 => p_org_link_information12
640 ,p_org_link_information13 => p_org_link_information13
641 ,p_org_link_information14 => p_org_link_information14
642 ,p_org_link_information15 => p_org_link_information15
643 ,p_org_link_information16 => p_org_link_information16
644 ,p_org_link_information17 => p_org_link_information17
645 ,p_org_link_information18 => p_org_link_information18
646 ,p_org_link_information19 => p_org_link_information19
647 ,p_org_link_information20 => p_org_link_information20
648 ,p_org_link_information21 => p_org_link_information21
649 ,p_org_link_information22 => p_org_link_information22
650 ,p_org_link_information23 => p_org_link_information23
651 ,p_org_link_information24 => p_org_link_information24
652 ,p_org_link_information25 => p_org_link_information25
653 ,p_org_link_information26 => p_org_link_information26
654 ,p_org_link_information27 => p_org_link_information27
655 ,p_org_link_information28 => p_org_link_information28
656 ,p_org_link_information29 => p_org_link_information29
657 ,p_org_link_information30 => p_org_link_information30
658 ,p_attribute_category => p_attribute_category
659 ,p_attribute1 => p_attribute1
660 ,p_attribute2 => p_attribute2
661 ,p_attribute3 => p_attribute3
662 ,p_attribute4 => p_attribute4
663 ,p_attribute5 => p_attribute5
664 ,p_attribute6 => p_attribute6
665 ,p_attribute7 => p_attribute7
666 ,p_attribute8 => p_attribute8
667 ,p_attribute9 => p_attribute9
668 ,p_attribute10 => p_attribute10
669 ,p_attribute11 => p_attribute11
670 ,p_attribute12 => p_attribute12
671 ,p_attribute13 => p_attribute13
672 ,p_attribute14 => p_attribute14
673 ,p_attribute15 => p_attribute15
674 ,p_attribute16 => p_attribute16
675 ,p_attribute17 => p_attribute17
676 ,p_attribute18 => p_attribute18
677 ,p_attribute19 => p_attribute19
678 ,p_attribute20 => p_attribute20
679 ,p_attribute21 => p_attribute21
680 ,p_attribute22 => p_attribute22
681 ,p_attribute23 => p_attribute23
682 ,p_attribute24 => p_attribute24
683 ,p_attribute25 => p_attribute25
684 ,p_attribute26 => p_attribute26
688 ,p_attribute30 => p_attribute30
685 ,p_attribute27 => p_attribute27
686 ,p_attribute28 => p_attribute28
687 ,p_attribute29 => p_attribute29
689 ,p_object_version_number => l_object_version_number);
690 exception
691 when hr_api.cannot_find_prog_unit then
692 hr_api.cannot_find_prog_unit_error
693 (p_module_name => 'update_link'
694 ,p_hook_type => 'AP'
695 );
696 end;
697 --
698 -- When in validation only mode raise the Validate_Enabled exception
699 --
700 if p_validate then
701 raise hr_api.validate_enabled;
702 end if;
703 --
704 -- Set all output arguments
705 --
706 p_object_version_number := l_object_version_number;
707 --
708 hr_utility.set_location(' Leaving:'||l_proc, 70);
709 exception
710 when hr_api.validate_enabled then
711 --
712 -- As the Validate_Enabled exception has been raised
713 -- we must rollback to the savepoint
714 --
715 rollback to update_link;
716 --
717 -- Only set output warning arguments
718 -- (Any key or derived arguments must be set to null
719 -- when validation only mode is being used.)
720 --
721 p_object_version_number := l_temp_ovn;
722 hr_utility.set_location(' Leaving:'||l_proc, 80);
723 when others then
724 --
725 -- A validation or unexpected error has occured
726 --
727 rollback to update_link;
728 -- Reset IN OUT parameters.
729 p_object_version_number := l_temp_ovn;
730 hr_utility.set_location(' Leaving:'||l_proc, 90);
731 raise;
732 end update_link;
733 --
734 -- ----------------------------------------------------------------------------
735 -- |-----------------------------< delete_link >------------------------------|
736 -- ----------------------------------------------------------------------------
737 --
738 procedure delete_link
739 (p_validate in boolean default false
740 ,p_organization_link_id in number
741 ,p_object_version_number in number
742 ) is
743 --
744 -- Declare local variables
745 --
746 l_proc varchar2(72) := g_package||'delete_link';
747 begin
748 hr_utility.set_location('Entering:'|| l_proc, 10);
749 --
750 -- Issue a savepoint
751 --
752 savepoint delete_link;
753 --
754 -- Call Before Process User Hook
755 --
756 begin
757 hr_de_organization_links_bk3.delete_link_b
758 (p_organization_link_id => p_organization_link_id
759 ,p_object_version_number => p_object_version_number);
760 exception
761 when hr_api.cannot_find_prog_unit then
762 hr_api.cannot_find_prog_unit_error
763 (p_module_name => 'delete_link'
764 ,p_hook_type => 'BP'
765 );
766 end;
767 --
768 -- Process Logic
769 --
770 hr_ord_del.del
771 (p_organization_link_id => p_organization_link_id
772 ,p_object_version_number => p_object_version_number);
773 --
774 begin
775 hr_de_organization_links_bk3.delete_link_a
776 (p_organization_link_id => p_organization_link_id
777 ,p_object_version_number => p_object_version_number);
778 exception
779 when hr_api.cannot_find_prog_unit then
780 hr_api.cannot_find_prog_unit_error
781 (p_module_name => 'delete_link'
782 ,p_hook_type => 'AP'
783 );
784 end;
785 --
786 -- When in validation only mode raise the Validate_Enabled exception
787 --
791 --
788 if p_validate then
789 raise hr_api.validate_enabled;
790 end if;
792 hr_utility.set_location(' Leaving:'||l_proc, 70);
793 exception
794 when hr_api.validate_enabled then
795 --
796 -- As the Validate_Enabled exception has been raised
797 -- we must rollback to the savepoint
798 --
799 rollback to delete_link;
800 --
801 -- Only set output warning arguments
802 -- (Any key or derived arguments must be set to null
803 -- when validation only mode is being used.)
804 --
805 hr_utility.set_location(' Leaving:'||l_proc, 80);
806 when others then
807 --
808 -- A validation or unexpected error has occured
809 --
810 rollback to delete_link;
811 hr_utility.set_location(' Leaving:'||l_proc, 90);
812 raise;
813 end delete_link;
814 --
815 -- ----------------------------------------------------------------------------
816 -- |--------------------------------< lck >-----------------------------------|
817 -- ----------------------------------------------------------------------------
818 --
819 procedure lck
820 (p_organization_link_id in number
821 ,p_object_version_number in number
822 ) is
823 --
824 -- Declare local variables
825 --
826 l_proc varchar2(72) := g_package||'lck';
827 begin
828 hr_utility.set_location('Entering:'|| l_proc, 10);
829 --
830 -- Lock the record.
831 --
832 hr_ord_shd.lck
833 (p_organization_link_id => p_organization_link_id
834 ,p_object_version_number => p_object_version_number);
835 --
836 hr_utility.set_location(' Leaving:'||l_proc, 70);
837 end lck;
838 --
839 end hr_de_organization_links_api;