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