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