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