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