[Home] [Help]
PACKAGE BODY: APPS.PQH_ATTRIBUTE_RANGES_API
Source
1 Package Body pqh_ATTRIBUTE_RANGES_api as
2 /* $Header: pqrngapi.pkb 115.8 2002/12/06 18:08:24 rpasapul noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' pqh_ATTRIBUTE_RANGES_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_ATTRIBUTE_RANGE >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_ATTRIBUTE_RANGE
13 (p_validate in boolean default false
14 ,p_attribute_range_id out nocopy number
15 ,p_approver_flag in varchar2 default null
16 ,p_enable_flag in varchar2 default 'Y'
17 ,p_delete_flag in varchar2 default null
18 ,p_assignment_id in number default null
19 ,p_attribute_id in number default null
20 ,p_from_char in varchar2 default null
21 ,p_from_date in date default null
22 ,p_from_number in number default null
23 ,p_position_id in number default null
24 ,p_range_name in varchar2
25 ,p_routing_category_id in number
26 ,p_routing_list_member_id in number default null
27 ,p_to_char in varchar2 default null
28 ,p_to_date in date default null
29 ,p_to_number in number default null
30 ,p_object_version_number out nocopy number
31 ,p_effective_date in date
32 ) is
33 --
34 -- Declare cursors and local variables
35 --
36 l_attribute_range_id pqh_attribute_ranges.attribute_range_id%TYPE;
37 l_proc varchar2(72) := g_package||'create_ATTRIBUTE_RANGE';
38 l_object_version_number pqh_attribute_ranges.object_version_number%TYPE;
39 --
40 begin
41 --
42 hr_utility.set_location('Entering:'|| l_proc, 10);
43 --
44 -- Issue a savepoint if operating in validation only mode
45 --
46 savepoint create_ATTRIBUTE_RANGE;
47 --
48 hr_utility.set_location(l_proc, 20);
49 --
50 -- Process Logic
51 --
52 begin
53 --
54 -- Start of API User Hook for the before hook of create_ATTRIBUTE_RANGE
55 --
56 pqh_ATTRIBUTE_RANGES_bk1.create_ATTRIBUTE_RANGE_b
57 (
58 p_approver_flag => p_approver_flag
59 ,p_enable_flag => p_enable_flag
60 ,p_delete_flag => p_delete_flag
61 ,p_assignment_id => p_assignment_id
62 ,p_attribute_id => p_attribute_id
63 ,p_from_char => p_from_char
64 ,p_from_date => p_from_date
65 ,p_from_number => p_from_number
66 ,p_position_id => p_position_id
67 ,p_range_name => p_range_name
68 ,p_routing_category_id => p_routing_category_id
69 ,p_routing_list_member_id => p_routing_list_member_id
70 ,p_to_char => p_to_char
71 ,p_to_date => p_to_date
72 ,p_to_number => p_to_number
73 ,p_effective_date => trunc(p_effective_date)
74 );
75 exception
76 when hr_api.cannot_find_prog_unit then
77 hr_api.cannot_find_prog_unit_error
78 (
79 p_module_name => 'CREATE_ATTRIBUTE_RANGE'
80 ,p_hook_type => 'BP'
81 );
82 --
83 -- End of API User Hook for the before hook of create_ATTRIBUTE_RANGE
84 --
85 end;
86 --
87 pqh_rng_ins.ins
88 (
89 p_attribute_range_id => l_attribute_range_id
90 ,p_approver_flag => p_approver_flag
91 ,p_enable_flag => p_enable_flag
92 ,p_delete_flag => p_delete_flag
93 ,p_assignment_id => p_assignment_id
94 ,p_attribute_id => p_attribute_id
95 ,p_from_char => p_from_char
96 ,p_from_date => p_from_date
97 ,p_from_number => p_from_number
98 ,p_position_id => p_position_id
99 ,p_range_name => p_range_name
100 ,p_routing_category_id => p_routing_category_id
101 ,p_routing_list_member_id => p_routing_list_member_id
102 ,p_to_char => p_to_char
103 ,p_to_date => p_to_date
104 ,p_to_number => p_to_number
105 ,p_object_version_number => l_object_version_number
106 ,p_effective_date => trunc(p_effective_date)
107 );
108 --
109 begin
110 --
111 -- Start of API User Hook for the after hook of create_ATTRIBUTE_RANGE
112 --
113 pqh_ATTRIBUTE_RANGES_bk1.create_ATTRIBUTE_RANGE_a
114 (
115 p_attribute_range_id => l_attribute_range_id
116 ,p_approver_flag => p_approver_flag
117 ,p_enable_flag => p_enable_flag
118 ,p_delete_flag => p_delete_flag
119 ,p_assignment_id => p_assignment_id
120 ,p_attribute_id => p_attribute_id
121 ,p_from_char => p_from_char
122 ,p_from_date => p_from_date
123 ,p_from_number => p_from_number
124 ,p_position_id => p_position_id
125 ,p_range_name => p_range_name
126 ,p_routing_category_id => p_routing_category_id
127 ,p_routing_list_member_id => p_routing_list_member_id
128 ,p_to_char => p_to_char
129 ,p_to_date => p_to_date
130 ,p_to_number => p_to_number
131 ,p_object_version_number => l_object_version_number
132 ,p_effective_date => trunc(p_effective_date)
133 );
134 exception
135 when hr_api.cannot_find_prog_unit then
136 hr_api.cannot_find_prog_unit_error
137 (p_module_name => 'CREATE_ATTRIBUTE_RANGE'
138 ,p_hook_type => 'AP'
139 );
140 --
141 -- End of API User Hook for the after hook of create_ATTRIBUTE_RANGE
142 --
143 end;
144 --
145 hr_utility.set_location(l_proc, 60);
146 --
147 -- When in validation only mode raise the Validate_Enabled exception
148 --
149 if p_validate then
150 raise hr_api.validate_enabled;
151 end if;
152 --
153 -- Set all output arguments
154 --
155 p_attribute_range_id := l_attribute_range_id;
156 p_object_version_number := l_object_version_number;
157 --
158 hr_utility.set_location(' Leaving:'||l_proc, 70);
159 --
160 exception
161 --
162 when hr_api.validate_enabled then
163 --
164 -- As the Validate_Enabled exception has been raised
165 -- we must rollback to the savepoint
166 --
167 ROLLBACK TO create_ATTRIBUTE_RANGE;
168 --
169 -- Only set output warning arguments
170 -- (Any key or derived arguments must be set to null
171 -- when validation only mode is being used.)
172 --
173 p_attribute_range_id := null;
174 p_object_version_number := null;
175 hr_utility.set_location(' Leaving:'||l_proc, 80);
176 --
177 when others then
178 p_attribute_range_id := null;
179 p_object_version_number := null;
180 --
181 -- A validation or unexpected error has occured
182 --
183 ROLLBACK TO create_ATTRIBUTE_RANGE;
184 raise;
185 --
186 end create_ATTRIBUTE_RANGE;
187 -- ----------------------------------------------------------------------------
188 -- |------------------------< update_ATTRIBUTE_RANGE >--- ------------------|
189 -- ----------------------------------------------------------------------------
190 --
191 procedure update_ATTRIBUTE_RANGE
192 (p_validate in boolean default false
193 ,p_attribute_range_id in number
194 ,p_approver_flag in varchar2 default hr_api.g_varchar2
195 ,p_enable_flag in varchar2 default hr_api.g_varchar2
196 ,p_delete_flag in varchar2 default hr_api.g_varchar2
197 ,p_assignment_id in number default hr_api.g_number
198 ,p_attribute_id in number default hr_api.g_number
199 ,p_from_char in varchar2 default hr_api.g_varchar2
200 ,p_from_date in date default hr_api.g_date
201 ,p_from_number in number default hr_api.g_number
202 ,p_position_id in number default hr_api.g_number
203 ,p_range_name in varchar2 default hr_api.g_varchar2
204 ,p_routing_category_id in number default hr_api.g_number
205 ,p_routing_list_member_id in number default hr_api.g_number
206 ,p_to_char in varchar2 default hr_api.g_varchar2
207 ,p_to_date in date default hr_api.g_date
208 ,p_to_number in number default hr_api.g_number
209 ,p_object_version_number in out nocopy number
210 ,p_effective_date in date
211 ) is
212 --
213 -- Declare cursors and local variables
214 --
215 l_proc varchar2(72) := g_package||'update_ATTRIBUTE_RANGE';
216 l_object_version_number pqh_attribute_ranges.object_version_number%TYPE;
217 --
218 begin
219 --
220 hr_utility.set_location('Entering:'|| l_proc, 10);
221 --
222 -- Issue a savepoint if operating in validation only mode
223 --
224 savepoint update_ATTRIBUTE_RANGE;
225 --
226 hr_utility.set_location(l_proc, 20);
227 --
228 -- Process Logic
229 --
230 l_object_version_number := p_object_version_number;
231 --
232 begin
233 --
234 -- Start of API User Hook for the before hook of update_ATTRIBUTE_RANGE
235 --
236 pqh_ATTRIBUTE_RANGES_bk2.update_ATTRIBUTE_RANGE_b
237 (
238 p_attribute_range_id => p_attribute_range_id
239 ,p_approver_flag => p_approver_flag
240 ,p_enable_flag => p_enable_flag
241 ,p_delete_flag => p_delete_flag
242 ,p_assignment_id => p_assignment_id
243 ,p_attribute_id => p_attribute_id
244 ,p_from_char => p_from_char
245 ,p_from_date => p_from_date
246 ,p_from_number => p_from_number
247 ,p_position_id => p_position_id
248 ,p_range_name => p_range_name
249 ,p_routing_category_id => p_routing_category_id
250 ,p_routing_list_member_id => p_routing_list_member_id
251 ,p_to_char => p_to_char
252 ,p_to_date => p_to_date
253 ,p_to_number => p_to_number
254 ,p_object_version_number => p_object_version_number
255 ,p_effective_date => trunc(p_effective_date)
256 );
257 exception
258 when hr_api.cannot_find_prog_unit then
259 hr_api.cannot_find_prog_unit_error
260 (p_module_name => 'UPDATE_ATTRIBUTE_RANGE'
261 ,p_hook_type => 'BP'
262 );
263 --
264 -- End of API User Hook for the before hook of update_ATTRIBUTE_RANGE
265 --
266 end;
267 --
268 pqh_rng_upd.upd
269 (
270 p_attribute_range_id => p_attribute_range_id
271 ,p_approver_flag => p_approver_flag
272 ,p_enable_flag => p_enable_flag
273 ,p_delete_flag => p_delete_flag
274 ,p_assignment_id => p_assignment_id
275 ,p_attribute_id => p_attribute_id
276 ,p_from_char => p_from_char
277 ,p_from_date => p_from_date
278 ,p_from_number => p_from_number
279 ,p_position_id => p_position_id
280 ,p_range_name => p_range_name
281 ,p_routing_category_id => p_routing_category_id
282 ,p_routing_list_member_id => p_routing_list_member_id
283 ,p_to_char => p_to_char
284 ,p_to_date => p_to_date
285 ,p_to_number => p_to_number
286 ,p_object_version_number => l_object_version_number
287 ,p_effective_date => trunc(p_effective_date)
288 );
289 --
290 begin
291 --
292 -- Start of API User Hook for the after hook of update_ATTRIBUTE_RANGE
293 --
294 pqh_ATTRIBUTE_RANGES_bk2.update_ATTRIBUTE_RANGE_a
295 (
296 p_attribute_range_id => p_attribute_range_id
297 ,p_approver_flag => p_approver_flag
298 ,p_enable_flag => p_enable_flag
299 ,p_delete_flag => p_delete_flag
300 ,p_assignment_id => p_assignment_id
304 ,p_from_number => p_from_number
301 ,p_attribute_id => p_attribute_id
302 ,p_from_char => p_from_char
303 ,p_from_date => p_from_date
305 ,p_position_id => p_position_id
306 ,p_range_name => p_range_name
307 ,p_routing_category_id => p_routing_category_id
308 ,p_routing_list_member_id => p_routing_list_member_id
309 ,p_to_char => p_to_char
310 ,p_to_date => p_to_date
311 ,p_to_number => p_to_number
312 ,p_object_version_number => l_object_version_number
313 ,p_effective_date => trunc(p_effective_date)
314 );
315 exception
316 when hr_api.cannot_find_prog_unit then
317 hr_api.cannot_find_prog_unit_error
318 (p_module_name => 'UPDATE_ATTRIBUTE_RANGE'
319 ,p_hook_type => 'AP'
320 );
321 --
322 -- End of API User Hook for the after hook of update_ATTRIBUTE_RANGE
323 --
324 end;
325 --
326 hr_utility.set_location(l_proc, 60);
327 --
328 -- When in validation only mode raise the Validate_Enabled exception
329 --
330 if p_validate then
331 raise hr_api.validate_enabled;
332 end if;
333 --
334 -- Set all output arguments
335 --
336 p_object_version_number := l_object_version_number;
337 --
338 hr_utility.set_location(' Leaving:'||l_proc, 70);
339 --
340 exception
341 --
342 when hr_api.validate_enabled then
343 --
344 -- As the Validate_Enabled exception has been raised
345 -- we must rollback to the savepoint
346 --
347 ROLLBACK TO update_ATTRIBUTE_RANGE;
348 --
349 -- Only set output warning arguments
350 -- (Any key or derived arguments must be set to null
351 -- when validation only mode is being used.)
352 --
353 hr_utility.set_location(' Leaving:'||l_proc, 80);
354 --
355 when others then
356 p_object_version_number := l_object_version_number;
357 --
358 -- A validation or unexpected error has occured
359 --
360 ROLLBACK TO update_ATTRIBUTE_RANGE;
361 raise;
362 --
363 end update_ATTRIBUTE_RANGE;
364 -- ----------------------------------------------------------------------------
365 -- |------------------------< delete_ATTRIBUTE_RANGE >----------------------|
366 -- ----------------------------------------------------------------------------
367 --
368 procedure delete_ATTRIBUTE_RANGE
369 (p_validate in boolean default false
370 ,p_attribute_range_id in number
371 ,p_object_version_number in number
372 ,p_effective_date in date
373 ) is
374 --
375 -- Declare cursors and local variables
376 --
377 l_proc varchar2(72) := g_package||'delete_ATTRIBUTE_RANGE';
378 l_object_version_number pqh_attribute_ranges.object_version_number%TYPE;
379 --
380 begin
381 --
382 hr_utility.set_location('Entering:'|| l_proc, 10);
383 --
384 -- Issue a savepoint if operating in validation only mode
385 --
386 savepoint delete_ATTRIBUTE_RANGE;
387 --
388 hr_utility.set_location(l_proc, 20);
389 --
390 -- Process Logic
391 --
392 l_object_version_number := p_object_version_number;
393 --
394 --
395 begin
396 --
397 -- Start of API User Hook for the before hook of delete_ATTRIBUTE_RANGE
398 --
399 pqh_ATTRIBUTE_RANGES_bk3.delete_ATTRIBUTE_RANGE_b
400 (
401 p_attribute_range_id => p_attribute_range_id
402 ,p_object_version_number => p_object_version_number
403 ,p_effective_date => trunc(p_effective_date)
404 );
405 exception
406 when hr_api.cannot_find_prog_unit then
407 hr_api.cannot_find_prog_unit_error
408 (p_module_name => 'DELETE_ATTRIBUTE_RANGE'
409 ,p_hook_type => 'BP'
410 );
411 --
412 -- End of API User Hook for the before hook of delete_ATTRIBUTE_RANGE
413 --
414 end;
415 --
416 pqh_rng_del.del
417 (
418 p_attribute_range_id => p_attribute_range_id
419 ,p_object_version_number => l_object_version_number
420 ,p_effective_date => p_effective_date
421 );
422 --
423 begin
424 --
425 -- Start of API User Hook for the after hook of delete_ATTRIBUTE_RANGE
426 --
427 pqh_ATTRIBUTE_RANGES_bk3.delete_ATTRIBUTE_RANGE_a
428 (
429 p_attribute_range_id => p_attribute_range_id
430 ,p_object_version_number => l_object_version_number
431 ,p_effective_date => trunc(p_effective_date)
432 );
433 exception
434 when hr_api.cannot_find_prog_unit then
435 hr_api.cannot_find_prog_unit_error
436 (p_module_name => 'DELETE_ATTRIBUTE_RANGE'
437 ,p_hook_type => 'AP'
438 );
439 --
440 -- End of API User Hook for the after hook of delete_ATTRIBUTE_RANGE
441 --
442 end;
443 --
444 hr_utility.set_location(l_proc, 60);
445 --
446 -- When in validation only mode raise the Validate_Enabled exception
447 --
448 if p_validate then
449 raise hr_api.validate_enabled;
450 end if;
451 --
452 hr_utility.set_location(' Leaving:'||l_proc, 70);
453 --
454 exception
455 --
456 when hr_api.validate_enabled then
457 --
458 -- As the Validate_Enabled exception has been raised
459 -- we must rollback to the savepoint
460 --
461 ROLLBACK TO delete_ATTRIBUTE_RANGE;
462 --
463 -- Only set output warning arguments
464 -- (Any key or derived arguments must be set to null
465 -- when validation only mode is being used.)
466 --
467 --
468 when others then
469 --
470 -- A validation or unexpected error has occured
471 --
472 ROLLBACK TO delete_ATTRIBUTE_RANGE;
473 raise;
474 --
475 end delete_ATTRIBUTE_RANGE;
476 --
477 -- ----------------------------------------------------------------------------
478 -- |-------------------------------< lck >------------------------------------|
479 -- ----------------------------------------------------------------------------
480 --
481 procedure lck
482 (
483 p_attribute_range_id in number
484 ,p_object_version_number in number
485 ) is
486 --
487 --
488 -- Declare cursors and local variables
489 --
490 l_proc varchar2(72) := g_package||'lck';
491 --
492 begin
493 --
494 hr_utility.set_location('Entering:'|| l_proc, 10);
495 --
496 pqh_rng_shd.lck
497 (
498 p_attribute_range_id => p_attribute_range_id
499 ,p_object_version_number => p_object_version_number
500 );
501 --
502 hr_utility.set_location(' Leaving:'||l_proc, 70);
503 --
504 end lck;
505 --
506 end pqh_ATTRIBUTE_RANGES_api;