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