[Home] [Help]
PACKAGE BODY: APPS.BEN_ACRS_PTIP_CVG_API
Source
4 -- Package Variables
1 Package Body ben_acrs_ptip_cvg_api as
2 /* $Header: beapcapi.pkb 120.0 2005/05/28 00:24:13 appldev noship $ */
3 --
5 --
6 g_package varchar2(33) := ' ben_acrs_ptip_cvg_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_acrs_ptip_cvg >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_acrs_ptip_cvg
13 (p_validate in boolean default false
14 ,p_acrs_ptip_cvg_id out nocopy number
15 ,p_effective_start_date out nocopy date
16 ,p_effective_end_date out nocopy date
17 ,p_mx_cvg_alwd_amt in number default null
18 ,p_mn_cvg_alwd_amt in number default null
19 ,p_business_group_id in number default null
20 ,p_apc_attribute_category in varchar2 default null
21 ,p_apc_attribute1 in varchar2 default null
22 ,p_apc_attribute2 in varchar2 default null
23 ,p_apc_attribute3 in varchar2 default null
24 ,p_apc_attribute4 in varchar2 default null
25 ,p_apc_attribute5 in varchar2 default null
26 ,p_apc_attribute6 in varchar2 default null
27 ,p_apc_attribute7 in varchar2 default null
28 ,p_apc_attribute8 in varchar2 default null
29 ,p_apc_attribute9 in varchar2 default null
30 ,p_apc_attribute10 in varchar2 default null
31 ,p_apc_attribute11 in varchar2 default null
32 ,p_apc_attribute12 in varchar2 default null
33 ,p_apc_attribute13 in varchar2 default null
34 ,p_apc_attribute14 in varchar2 default null
35 ,p_apc_attribute15 in varchar2 default null
36 ,p_apc_attribute16 in varchar2 default null
37 ,p_apc_attribute17 in varchar2 default null
38 ,p_apc_attribute18 in varchar2 default null
39 ,p_apc_attribute19 in varchar2 default null
40 ,p_apc_attribute20 in varchar2 default null
41 ,p_apc_attribute21 in varchar2 default null
42 ,p_apc_attribute22 in varchar2 default null
43 ,p_apc_attribute23 in varchar2 default null
44 ,p_apc_attribute24 in varchar2 default null
45 ,p_apc_attribute25 in varchar2 default null
46 ,p_apc_attribute26 in varchar2 default null
47 ,p_apc_attribute27 in varchar2 default null
48 ,p_apc_attribute28 in varchar2 default null
49 ,p_apc_attribute29 in varchar2 default null
50 ,p_apc_attribute30 in varchar2 default null
51 ,p_object_version_number out nocopy number
52 ,p_name in varchar2 default null
53 ,p_pgm_id in number default null
54 ,p_effective_date in date
55 ) is
56 --
57 -- Declare cursors and local variables
58 --
59 l_acrs_ptip_cvg_id ben_acrs_ptip_cvg_f.acrs_ptip_cvg_id%TYPE;
60 l_effective_start_date ben_acrs_ptip_cvg_f.effective_start_date%TYPE;
61 l_effective_end_date ben_acrs_ptip_cvg_f.effective_end_date%TYPE;
62 l_proc varchar2(72) := g_package||'create_acrs_ptip_cvg';
63 l_object_version_number ben_acrs_ptip_cvg_f.object_version_number%TYPE;
64 --
65 begin
66 --
67 hr_utility.set_location('Entering:'|| l_proc, 10);
68 --
69 -- Issue a savepoint if operating in validation only mode
70 --
71 savepoint create_acrs_ptip_cvg;
72 --
73 hr_utility.set_location(l_proc, 20);
74 --
75 -- Process Logic
76 --
77 begin
78 --
79 -- Start of API User Hook for the before hook of create_acrs_ptip_cvg
80 --
81 ben_acrs_ptip_cvg_bk1.create_acrs_ptip_cvg_b
82 (
83 p_mx_cvg_alwd_amt => p_mx_cvg_alwd_amt
84 ,p_mn_cvg_alwd_amt => p_mn_cvg_alwd_amt
85 ,p_business_group_id => p_business_group_id
86 ,p_apc_attribute_category => p_apc_attribute_category
87 ,p_apc_attribute1 => p_apc_attribute1
88 ,p_apc_attribute2 => p_apc_attribute2
89 ,p_apc_attribute3 => p_apc_attribute3
90 ,p_apc_attribute4 => p_apc_attribute4
91 ,p_apc_attribute5 => p_apc_attribute5
92 ,p_apc_attribute6 => p_apc_attribute6
93 ,p_apc_attribute7 => p_apc_attribute7
94 ,p_apc_attribute8 => p_apc_attribute8
95 ,p_apc_attribute9 => p_apc_attribute9
96 ,p_apc_attribute10 => p_apc_attribute10
97 ,p_apc_attribute11 => p_apc_attribute11
98 ,p_apc_attribute12 => p_apc_attribute12
99 ,p_apc_attribute13 => p_apc_attribute13
100 ,p_apc_attribute14 => p_apc_attribute14
101 ,p_apc_attribute15 => p_apc_attribute15
102 ,p_apc_attribute16 => p_apc_attribute16
103 ,p_apc_attribute17 => p_apc_attribute17
104 ,p_apc_attribute18 => p_apc_attribute18
105 ,p_apc_attribute19 => p_apc_attribute19
106 ,p_apc_attribute20 => p_apc_attribute20
107 ,p_apc_attribute21 => p_apc_attribute21
108 ,p_apc_attribute22 => p_apc_attribute22
109 ,p_apc_attribute23 => p_apc_attribute23
110 ,p_apc_attribute24 => p_apc_attribute24
111 ,p_apc_attribute25 => p_apc_attribute25
115 ,p_apc_attribute29 => p_apc_attribute29
112 ,p_apc_attribute26 => p_apc_attribute26
113 ,p_apc_attribute27 => p_apc_attribute27
114 ,p_apc_attribute28 => p_apc_attribute28
116 ,p_apc_attribute30 => p_apc_attribute30
117 ,p_name => p_name
118 ,p_pgm_id => p_pgm_id
119 ,p_effective_date => trunc(p_effective_date)
120 );
121 exception
122 when hr_api.cannot_find_prog_unit then
123 hr_api.cannot_find_prog_unit_error
124 (
125 p_module_name => 'CREATE_acrs_ptip_cvg'
126 ,p_hook_type => 'BP'
127 );
128 --
129 -- End of API User Hook for the before hook of create_acrs_ptip_cvg
130 --
131 end;
132 --
133 ben_apc_ins.ins
134 (
135 p_acrs_ptip_cvg_id => l_acrs_ptip_cvg_id
136 ,p_effective_start_date => l_effective_start_date
137 ,p_effective_end_date => l_effective_end_date
138 ,p_mx_cvg_alwd_amt => p_mx_cvg_alwd_amt
139 ,p_mn_cvg_alwd_amt => p_mn_cvg_alwd_amt
140 ,p_business_group_id => p_business_group_id
141 ,p_apc_attribute_category => p_apc_attribute_category
142 ,p_apc_attribute1 => p_apc_attribute1
143 ,p_apc_attribute2 => p_apc_attribute2
144 ,p_apc_attribute3 => p_apc_attribute3
145 ,p_apc_attribute4 => p_apc_attribute4
146 ,p_apc_attribute5 => p_apc_attribute5
147 ,p_apc_attribute6 => p_apc_attribute6
148 ,p_apc_attribute7 => p_apc_attribute7
149 ,p_apc_attribute8 => p_apc_attribute8
150 ,p_apc_attribute9 => p_apc_attribute9
151 ,p_apc_attribute10 => p_apc_attribute10
152 ,p_apc_attribute11 => p_apc_attribute11
153 ,p_apc_attribute12 => p_apc_attribute12
154 ,p_apc_attribute13 => p_apc_attribute13
155 ,p_apc_attribute14 => p_apc_attribute14
156 ,p_apc_attribute15 => p_apc_attribute15
157 ,p_apc_attribute16 => p_apc_attribute16
158 ,p_apc_attribute17 => p_apc_attribute17
159 ,p_apc_attribute18 => p_apc_attribute18
160 ,p_apc_attribute19 => p_apc_attribute19
161 ,p_apc_attribute20 => p_apc_attribute20
162 ,p_apc_attribute21 => p_apc_attribute21
163 ,p_apc_attribute22 => p_apc_attribute22
164 ,p_apc_attribute23 => p_apc_attribute23
165 ,p_apc_attribute24 => p_apc_attribute24
166 ,p_apc_attribute25 => p_apc_attribute25
167 ,p_apc_attribute26 => p_apc_attribute26
168 ,p_apc_attribute27 => p_apc_attribute27
169 ,p_apc_attribute28 => p_apc_attribute28
170 ,p_apc_attribute29 => p_apc_attribute29
171 ,p_apc_attribute30 => p_apc_attribute30
172 ,p_object_version_number => l_object_version_number
173 ,p_name => p_name
174 ,p_pgm_id => p_pgm_id
175 ,p_effective_date => trunc(p_effective_date)
176 );
177 --
178 begin
179 --
180 -- Start of API User Hook for the after hook of create_acrs_ptip_cvg
181 --
182 ben_acrs_ptip_cvg_bk1.create_acrs_ptip_cvg_a
183 (
184 p_acrs_ptip_cvg_id => l_acrs_ptip_cvg_id
185 ,p_effective_start_date => l_effective_start_date
186 ,p_effective_end_date => l_effective_end_date
187 ,p_mx_cvg_alwd_amt => p_mx_cvg_alwd_amt
188 ,p_mn_cvg_alwd_amt => p_mn_cvg_alwd_amt
189 ,p_business_group_id => p_business_group_id
190 ,p_apc_attribute_category => p_apc_attribute_category
191 ,p_apc_attribute1 => p_apc_attribute1
192 ,p_apc_attribute2 => p_apc_attribute2
193 ,p_apc_attribute3 => p_apc_attribute3
194 ,p_apc_attribute4 => p_apc_attribute4
195 ,p_apc_attribute5 => p_apc_attribute5
196 ,p_apc_attribute6 => p_apc_attribute6
197 ,p_apc_attribute7 => p_apc_attribute7
198 ,p_apc_attribute8 => p_apc_attribute8
199 ,p_apc_attribute9 => p_apc_attribute9
200 ,p_apc_attribute10 => p_apc_attribute10
201 ,p_apc_attribute11 => p_apc_attribute11
202 ,p_apc_attribute12 => p_apc_attribute12
203 ,p_apc_attribute13 => p_apc_attribute13
204 ,p_apc_attribute14 => p_apc_attribute14
205 ,p_apc_attribute15 => p_apc_attribute15
206 ,p_apc_attribute16 => p_apc_attribute16
207 ,p_apc_attribute17 => p_apc_attribute17
208 ,p_apc_attribute18 => p_apc_attribute18
209 ,p_apc_attribute19 => p_apc_attribute19
210 ,p_apc_attribute20 => p_apc_attribute20
211 ,p_apc_attribute21 => p_apc_attribute21
212 ,p_apc_attribute22 => p_apc_attribute22
213 ,p_apc_attribute23 => p_apc_attribute23
214 ,p_apc_attribute24 => p_apc_attribute24
215 ,p_apc_attribute25 => p_apc_attribute25
216 ,p_apc_attribute26 => p_apc_attribute26
217 ,p_apc_attribute27 => p_apc_attribute27
218 ,p_apc_attribute28 => p_apc_attribute28
219 ,p_apc_attribute29 => p_apc_attribute29
223 ,p_pgm_id => p_pgm_id
220 ,p_apc_attribute30 => p_apc_attribute30
221 ,p_object_version_number => l_object_version_number
222 ,p_name => p_name
224 ,p_effective_date => trunc(p_effective_date)
225 );
226 exception
227 when hr_api.cannot_find_prog_unit then
228 hr_api.cannot_find_prog_unit_error
229 (p_module_name => 'CREATE_acrs_ptip_cvg'
230 ,p_hook_type => 'AP'
231 );
232 --
233 -- End of API User Hook for the after hook of create_acrs_ptip_cvg
234 --
235 end;
236 --
237 hr_utility.set_location(l_proc, 60);
238 --
239 -- When in validation only mode raise the Validate_Enabled exception
240 --
241 if p_validate then
242 raise hr_api.validate_enabled;
243 end if;
244 --
245 -- Set all output arguments
246 --
247 p_acrs_ptip_cvg_id := l_acrs_ptip_cvg_id;
248 p_effective_start_date := l_effective_start_date;
249 p_effective_end_date := l_effective_end_date;
250 p_object_version_number := l_object_version_number;
251 --
252 hr_utility.set_location(' Leaving:'||l_proc, 70);
253 --
254 exception
255 --
256 when hr_api.validate_enabled then
257 --
258 -- As the Validate_Enabled exception has been raised
259 -- we must rollback to the savepoint
260 --
261 ROLLBACK TO create_acrs_ptip_cvg;
262 --
263 -- Only set output warning arguments
264 -- (Any key or derived arguments must be set to null
265 -- when validation only mode is being used.)
266 --
267 p_acrs_ptip_cvg_id := null;
268 p_effective_start_date := null;
269 p_effective_end_date := null;
270 p_object_version_number := null;
271 hr_utility.set_location(' Leaving:'||l_proc, 80);
272 --
273 when others then
274 --
275 -- A validation or unexpected error has occured
276 --
277 ROLLBACK TO create_acrs_ptip_cvg;
278 raise;
279 --
280 end create_acrs_ptip_cvg;
281 -- ----------------------------------------------------------------------------
282 -- |------------------------< update_acrs_ptip_cvg >--- ------------------|
283 -- ----------------------------------------------------------------------------
284 --
285 procedure update_acrs_ptip_cvg
286 (p_validate in boolean default false
287 ,p_acrs_ptip_cvg_id in number
288 ,p_effective_start_date out nocopy date
289 ,p_effective_end_date out nocopy date
290 ,p_mx_cvg_alwd_amt in number default hr_api.g_number
291 ,p_mn_cvg_alwd_amt in number default hr_api.g_number
292 ,p_business_group_id in number default hr_api.g_number
293 ,p_apc_attribute_category in varchar2 default hr_api.g_varchar2
294 ,p_apc_attribute1 in varchar2 default hr_api.g_varchar2
295 ,p_apc_attribute2 in varchar2 default hr_api.g_varchar2
296 ,p_apc_attribute3 in varchar2 default hr_api.g_varchar2
297 ,p_apc_attribute4 in varchar2 default hr_api.g_varchar2
298 ,p_apc_attribute5 in varchar2 default hr_api.g_varchar2
299 ,p_apc_attribute6 in varchar2 default hr_api.g_varchar2
300 ,p_apc_attribute7 in varchar2 default hr_api.g_varchar2
301 ,p_apc_attribute8 in varchar2 default hr_api.g_varchar2
302 ,p_apc_attribute9 in varchar2 default hr_api.g_varchar2
303 ,p_apc_attribute10 in varchar2 default hr_api.g_varchar2
304 ,p_apc_attribute11 in varchar2 default hr_api.g_varchar2
305 ,p_apc_attribute12 in varchar2 default hr_api.g_varchar2
306 ,p_apc_attribute13 in varchar2 default hr_api.g_varchar2
307 ,p_apc_attribute14 in varchar2 default hr_api.g_varchar2
308 ,p_apc_attribute15 in varchar2 default hr_api.g_varchar2
309 ,p_apc_attribute16 in varchar2 default hr_api.g_varchar2
310 ,p_apc_attribute17 in varchar2 default hr_api.g_varchar2
311 ,p_apc_attribute18 in varchar2 default hr_api.g_varchar2
312 ,p_apc_attribute19 in varchar2 default hr_api.g_varchar2
313 ,p_apc_attribute20 in varchar2 default hr_api.g_varchar2
314 ,p_apc_attribute21 in varchar2 default hr_api.g_varchar2
315 ,p_apc_attribute22 in varchar2 default hr_api.g_varchar2
316 ,p_apc_attribute23 in varchar2 default hr_api.g_varchar2
317 ,p_apc_attribute24 in varchar2 default hr_api.g_varchar2
318 ,p_apc_attribute25 in varchar2 default hr_api.g_varchar2
319 ,p_apc_attribute26 in varchar2 default hr_api.g_varchar2
320 ,p_apc_attribute27 in varchar2 default hr_api.g_varchar2
321 ,p_apc_attribute28 in varchar2 default hr_api.g_varchar2
322 ,p_apc_attribute29 in varchar2 default hr_api.g_varchar2
323 ,p_apc_attribute30 in varchar2 default hr_api.g_varchar2
324 ,p_object_version_number in out nocopy number
325 ,p_name in varchar2 default hr_api.g_varchar2
326 ,p_pgm_id in number default hr_api.g_number
327 ,p_effective_date in date
328 ,p_datetrack_mode in varchar2
329 ) is
330 --
331 -- Declare cursors and local variables
332 --
333 l_proc varchar2(72) := g_package||'update_acrs_ptip_cvg';
334 l_object_version_number ben_acrs_ptip_cvg_f.object_version_number%TYPE;
335 l_effective_start_date ben_acrs_ptip_cvg_f.effective_start_date%TYPE;
339 --
336 l_effective_end_date ben_acrs_ptip_cvg_f.effective_end_date%TYPE;
337 --
338 begin
340 hr_utility.set_location('Entering:'|| l_proc, 10);
341 --
342 -- Issue a savepoint if operating in validation only mode
343 --
344 savepoint update_acrs_ptip_cvg;
345 --
346 hr_utility.set_location(l_proc, 20);
347 --
348 -- Process Logic
349 --
350 l_object_version_number := p_object_version_number;
351 --
352 begin
353 --
354 -- Start of API User Hook for the before hook of update_acrs_ptip_cvg
355 --
356 ben_acrs_ptip_cvg_bk2.update_acrs_ptip_cvg_b
357 (
358 p_acrs_ptip_cvg_id => p_acrs_ptip_cvg_id
359 ,p_mx_cvg_alwd_amt => p_mx_cvg_alwd_amt
360 ,p_mn_cvg_alwd_amt => p_mn_cvg_alwd_amt
361 ,p_business_group_id => p_business_group_id
362 ,p_apc_attribute_category => p_apc_attribute_category
363 ,p_apc_attribute1 => p_apc_attribute1
364 ,p_apc_attribute2 => p_apc_attribute2
365 ,p_apc_attribute3 => p_apc_attribute3
366 ,p_apc_attribute4 => p_apc_attribute4
367 ,p_apc_attribute5 => p_apc_attribute5
368 ,p_apc_attribute6 => p_apc_attribute6
369 ,p_apc_attribute7 => p_apc_attribute7
370 ,p_apc_attribute8 => p_apc_attribute8
371 ,p_apc_attribute9 => p_apc_attribute9
372 ,p_apc_attribute10 => p_apc_attribute10
373 ,p_apc_attribute11 => p_apc_attribute11
374 ,p_apc_attribute12 => p_apc_attribute12
375 ,p_apc_attribute13 => p_apc_attribute13
376 ,p_apc_attribute14 => p_apc_attribute14
377 ,p_apc_attribute15 => p_apc_attribute15
378 ,p_apc_attribute16 => p_apc_attribute16
379 ,p_apc_attribute17 => p_apc_attribute17
380 ,p_apc_attribute18 => p_apc_attribute18
381 ,p_apc_attribute19 => p_apc_attribute19
382 ,p_apc_attribute20 => p_apc_attribute20
383 ,p_apc_attribute21 => p_apc_attribute21
384 ,p_apc_attribute22 => p_apc_attribute22
385 ,p_apc_attribute23 => p_apc_attribute23
386 ,p_apc_attribute24 => p_apc_attribute24
387 ,p_apc_attribute25 => p_apc_attribute25
388 ,p_apc_attribute26 => p_apc_attribute26
389 ,p_apc_attribute27 => p_apc_attribute27
390 ,p_apc_attribute28 => p_apc_attribute28
391 ,p_apc_attribute29 => p_apc_attribute29
392 ,p_apc_attribute30 => p_apc_attribute30
393 ,p_object_version_number => p_object_version_number
394 ,p_name => p_name
395 ,p_pgm_id => p_pgm_id
396 ,p_effective_date => trunc(p_effective_date)
397 ,p_datetrack_mode => p_datetrack_mode
398 );
399 exception
400 when hr_api.cannot_find_prog_unit then
401 hr_api.cannot_find_prog_unit_error
402 (p_module_name => 'UPDATE_acrs_ptip_cvg'
403 ,p_hook_type => 'BP'
404 );
405 --
406 -- End of API User Hook for the before hook of update_acrs_ptip_cvg
407 --
408 end;
409 --
410 ben_apc_upd.upd
411 (
412 p_acrs_ptip_cvg_id => p_acrs_ptip_cvg_id
413 ,p_effective_start_date => l_effective_start_date
414 ,p_effective_end_date => l_effective_end_date
415 ,p_mx_cvg_alwd_amt => p_mx_cvg_alwd_amt
416 ,p_mn_cvg_alwd_amt => p_mn_cvg_alwd_amt
417 ,p_business_group_id => p_business_group_id
418 ,p_apc_attribute_category => p_apc_attribute_category
419 ,p_apc_attribute1 => p_apc_attribute1
420 ,p_apc_attribute2 => p_apc_attribute2
421 ,p_apc_attribute3 => p_apc_attribute3
422 ,p_apc_attribute4 => p_apc_attribute4
423 ,p_apc_attribute5 => p_apc_attribute5
424 ,p_apc_attribute6 => p_apc_attribute6
425 ,p_apc_attribute7 => p_apc_attribute7
426 ,p_apc_attribute8 => p_apc_attribute8
427 ,p_apc_attribute9 => p_apc_attribute9
428 ,p_apc_attribute10 => p_apc_attribute10
429 ,p_apc_attribute11 => p_apc_attribute11
430 ,p_apc_attribute12 => p_apc_attribute12
431 ,p_apc_attribute13 => p_apc_attribute13
432 ,p_apc_attribute14 => p_apc_attribute14
433 ,p_apc_attribute15 => p_apc_attribute15
434 ,p_apc_attribute16 => p_apc_attribute16
435 ,p_apc_attribute17 => p_apc_attribute17
436 ,p_apc_attribute18 => p_apc_attribute18
437 ,p_apc_attribute19 => p_apc_attribute19
438 ,p_apc_attribute20 => p_apc_attribute20
439 ,p_apc_attribute21 => p_apc_attribute21
440 ,p_apc_attribute22 => p_apc_attribute22
441 ,p_apc_attribute23 => p_apc_attribute23
442 ,p_apc_attribute24 => p_apc_attribute24
443 ,p_apc_attribute25 => p_apc_attribute25
444 ,p_apc_attribute26 => p_apc_attribute26
445 ,p_apc_attribute27 => p_apc_attribute27
446 ,p_apc_attribute28 => p_apc_attribute28
447 ,p_apc_attribute29 => p_apc_attribute29
448 ,p_apc_attribute30 => p_apc_attribute30
452 ,p_effective_date => trunc(p_effective_date)
449 ,p_object_version_number => l_object_version_number
450 ,p_name => p_name
451 ,p_pgm_id => p_pgm_id
453 ,p_datetrack_mode => p_datetrack_mode
454 );
455 --
456 begin
457 --
458 -- Start of API User Hook for the after hook of update_acrs_ptip_cvg
459 --
460 ben_acrs_ptip_cvg_bk2.update_acrs_ptip_cvg_a
461 (
462 p_acrs_ptip_cvg_id => p_acrs_ptip_cvg_id
463 ,p_effective_start_date => l_effective_start_date
464 ,p_effective_end_date => l_effective_end_date
465 ,p_mx_cvg_alwd_amt => p_mx_cvg_alwd_amt
466 ,p_mn_cvg_alwd_amt => p_mn_cvg_alwd_amt
467 ,p_business_group_id => p_business_group_id
468 ,p_apc_attribute_category => p_apc_attribute_category
469 ,p_apc_attribute1 => p_apc_attribute1
470 ,p_apc_attribute2 => p_apc_attribute2
471 ,p_apc_attribute3 => p_apc_attribute3
472 ,p_apc_attribute4 => p_apc_attribute4
473 ,p_apc_attribute5 => p_apc_attribute5
474 ,p_apc_attribute6 => p_apc_attribute6
475 ,p_apc_attribute7 => p_apc_attribute7
476 ,p_apc_attribute8 => p_apc_attribute8
477 ,p_apc_attribute9 => p_apc_attribute9
478 ,p_apc_attribute10 => p_apc_attribute10
479 ,p_apc_attribute11 => p_apc_attribute11
480 ,p_apc_attribute12 => p_apc_attribute12
481 ,p_apc_attribute13 => p_apc_attribute13
482 ,p_apc_attribute14 => p_apc_attribute14
483 ,p_apc_attribute15 => p_apc_attribute15
484 ,p_apc_attribute16 => p_apc_attribute16
485 ,p_apc_attribute17 => p_apc_attribute17
486 ,p_apc_attribute18 => p_apc_attribute18
487 ,p_apc_attribute19 => p_apc_attribute19
488 ,p_apc_attribute20 => p_apc_attribute20
489 ,p_apc_attribute21 => p_apc_attribute21
490 ,p_apc_attribute22 => p_apc_attribute22
491 ,p_apc_attribute23 => p_apc_attribute23
492 ,p_apc_attribute24 => p_apc_attribute24
493 ,p_apc_attribute25 => p_apc_attribute25
494 ,p_apc_attribute26 => p_apc_attribute26
495 ,p_apc_attribute27 => p_apc_attribute27
496 ,p_apc_attribute28 => p_apc_attribute28
497 ,p_apc_attribute29 => p_apc_attribute29
498 ,p_apc_attribute30 => p_apc_attribute30
499 ,p_object_version_number => l_object_version_number
500 ,p_name => p_name
501 ,p_pgm_id => p_pgm_id
502 ,p_effective_date => trunc(p_effective_date)
503 ,p_datetrack_mode => p_datetrack_mode
504 );
505 exception
506 when hr_api.cannot_find_prog_unit then
507 hr_api.cannot_find_prog_unit_error
508 (p_module_name => 'UPDATE_acrs_ptip_cvg'
509 ,p_hook_type => 'AP'
510 );
511 --
512 -- End of API User Hook for the after hook of update_acrs_ptip_cvg
513 --
514 end;
515 --
516 hr_utility.set_location(l_proc, 60);
517 --
518 -- When in validation only mode raise the Validate_Enabled exception
519 --
520 if p_validate then
521 raise hr_api.validate_enabled;
522 end if;
523 --
524 -- Set all output arguments
525 --
526 p_object_version_number := l_object_version_number;
527 p_effective_start_date := l_effective_start_date;
528 p_effective_end_date := l_effective_end_date;
529 --
530 hr_utility.set_location(' Leaving:'||l_proc, 70);
531 --
532 exception
533 --
534 when hr_api.validate_enabled then
535 --
536 -- As the Validate_Enabled exception has been raised
537 -- we must rollback to the savepoint
538 --
539 ROLLBACK TO update_acrs_ptip_cvg;
540 --
541 -- Only set output warning arguments
542 -- (Any key or derived arguments must be set to null
543 -- when validation only mode is being used.)
544 --
545 hr_utility.set_location(' Leaving:'||l_proc, 80);
546 --
547 when others then
548 --
549 -- A validation or unexpected error has occured
550 --
551 ROLLBACK TO update_acrs_ptip_cvg;
552 /* Inserted for nocopy changes */
553 p_object_version_number := l_object_version_number;
554 p_effective_start_date := null;
555 p_effective_end_date := null;
556
557 raise;
558 --
559 end update_acrs_ptip_cvg;
560 -- ----------------------------------------------------------------------------
561 -- |------------------------< delete_acrs_ptip_cvg >----------------------|
562 -- ----------------------------------------------------------------------------
563 --
564 procedure delete_acrs_ptip_cvg
565 (p_validate in boolean default false
566 ,p_acrs_ptip_cvg_id in number
567 ,p_effective_start_date out nocopy date
568 ,p_effective_end_date out nocopy date
569 ,p_object_version_number in out nocopy number
570 ,p_effective_date in date
571 ,p_datetrack_mode in varchar2
572 ) is
573 --
574 -- Declare cursors and local variables
575 --
579 l_effective_end_date ben_acrs_ptip_cvg_f.effective_end_date%TYPE;
576 l_proc varchar2(72) := g_package||'update_acrs_ptip_cvg';
577 l_object_version_number ben_acrs_ptip_cvg_f.object_version_number%TYPE;
578 l_effective_start_date ben_acrs_ptip_cvg_f.effective_start_date%TYPE;
580 --
581 begin
582 --
583 hr_utility.set_location('Entering:'|| l_proc, 10);
584 --
585 -- Issue a savepoint if operating in validation only mode
586 --
587 savepoint delete_acrs_ptip_cvg;
588 --
589 hr_utility.set_location(l_proc, 20);
590 --
591 -- Process Logic
592 --
593 l_object_version_number := p_object_version_number;
594 --
595 --
596 begin
597 --
598 -- Start of API User Hook for the before hook of delete_acrs_ptip_cvg
599 --
600 ben_acrs_ptip_cvg_bk3.delete_acrs_ptip_cvg_b
601 (
602 p_acrs_ptip_cvg_id => p_acrs_ptip_cvg_id
603 ,p_object_version_number => p_object_version_number
604 ,p_effective_date => trunc(p_effective_date)
605 ,p_datetrack_mode => p_datetrack_mode
606 );
607 exception
608 when hr_api.cannot_find_prog_unit then
609 hr_api.cannot_find_prog_unit_error
610 (p_module_name => 'DELETE_acrs_ptip_cvg'
611 ,p_hook_type => 'BP'
612 );
613 --
614 -- End of API User Hook for the before hook of delete_acrs_ptip_cvg
615 --
616 end;
617 --
618 ben_apc_del.del
619 (
620 p_acrs_ptip_cvg_id => p_acrs_ptip_cvg_id
621 ,p_effective_start_date => l_effective_start_date
622 ,p_effective_end_date => l_effective_end_date
623 ,p_object_version_number => l_object_version_number
624 ,p_effective_date => p_effective_date
625 ,p_datetrack_mode => p_datetrack_mode
626 );
627 --
628 begin
629 --
630 -- Start of API User Hook for the after hook of delete_acrs_ptip_cvg
631 --
632 ben_acrs_ptip_cvg_bk3.delete_acrs_ptip_cvg_a
633 (
634 p_acrs_ptip_cvg_id => p_acrs_ptip_cvg_id
635 ,p_effective_start_date => l_effective_start_date
636 ,p_effective_end_date => l_effective_end_date
637 ,p_object_version_number => l_object_version_number
638 ,p_effective_date => trunc(p_effective_date)
639 ,p_datetrack_mode => p_datetrack_mode
640 );
641 exception
642 when hr_api.cannot_find_prog_unit then
643 hr_api.cannot_find_prog_unit_error
644 (p_module_name => 'DELETE_acrs_ptip_cvg'
645 ,p_hook_type => 'AP'
646 );
647 --
648 -- End of API User Hook for the after hook of delete_acrs_ptip_cvg
649 --
650 end;
651 --
652 hr_utility.set_location(l_proc, 60);
653 --
654 -- When in validation only mode raise the Validate_Enabled exception
655 --
656 if p_validate then
657 raise hr_api.validate_enabled;
658 end if;
659 --
660 hr_utility.set_location(' Leaving:'||l_proc, 70);
661 --
662 exception
663 --
664 when hr_api.validate_enabled then
665 --
666 -- As the Validate_Enabled exception has been raised
667 -- we must rollback to the savepoint
668 --
669 ROLLBACK TO delete_acrs_ptip_cvg;
670 --
671 -- Only set output warning arguments
672 -- (Any key or derived arguments must be set to null
673 -- when validation only mode is being used.)
674 --
675 p_effective_start_date := null;
676 p_effective_end_date := null;
677 --
678 when others then
679 --
680 -- A validation or unexpected error has occured
681 --
682 ROLLBACK TO delete_acrs_ptip_cvg;
683 /* Inserted for nocopy changes */
684 p_object_version_number := l_object_version_number;
685 p_effective_start_date := null;
686 p_effective_end_date := null;
687
688 raise;
689 --
690 end delete_acrs_ptip_cvg;
691 --
692 -- ----------------------------------------------------------------------------
693 -- |-------------------------------< lck >------------------------------------|
694 -- ----------------------------------------------------------------------------
695 --
696 procedure lck
697 (
698 p_acrs_ptip_cvg_id in number
699 ,p_object_version_number in number
700 ,p_effective_date in date
701 ,p_datetrack_mode in varchar2
702 ,p_validation_start_date out nocopy date
703 ,p_validation_end_date out nocopy date
704 ) is
705 --
706 --
707 -- Declare cursors and local variables
708 --
709 l_proc varchar2(72) := g_package||'lck';
710 l_validation_start_date date;
711 l_validation_end_date date;
712 --
713 begin
714 --
715 hr_utility.set_location('Entering:'|| l_proc, 10);
716 --
717 ben_apc_shd.lck
718 (
719 p_acrs_ptip_cvg_id => p_acrs_ptip_cvg_id
720 ,p_validation_start_date => l_validation_start_date
721 ,p_validation_end_date => l_validation_end_date
722 ,p_object_version_number => p_object_version_number
723 ,p_effective_date => p_effective_date
724 ,p_datetrack_mode => p_datetrack_mode
725 );
726 --
727 hr_utility.set_location(' Leaving:'||l_proc, 70);
728 --
729 end lck;
731 end ben_acrs_ptip_cvg_api;
730 --