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