[Home] [Help]
PACKAGE BODY: APPS.BEN_ENRT_RT_CTFN_API
Source
1 Package Body ben_enrt_rt_ctfn_api as
2 /* $Header: beercapi.pkb 115.2 2002/12/16 09:36:44 hnarayan noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' ben_enrt_rt_ctfn_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_enrt_rt_ctfn >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_enrt_rt_ctfn
13 (p_validate in boolean default false
14 ,p_enrt_rt_ctfn_id out nocopy number
15 ,p_enrt_ctfn_typ_cd in varchar2 default null
16 ,p_rqd_flag in varchar2 default 'N'
17 ,p_enrt_rt_id in number default null
18 ,p_business_group_id in number default null
19 ,p_erc_attribute_category in varchar2 default null
20 ,p_erc_attribute1 in varchar2 default null
21 ,p_erc_attribute2 in varchar2 default null
22 ,p_erc_attribute3 in varchar2 default null
23 ,p_erc_attribute4 in varchar2 default null
24 ,p_erc_attribute5 in varchar2 default null
25 ,p_erc_attribute6 in varchar2 default null
26 ,p_erc_attribute7 in varchar2 default null
27 ,p_erc_attribute8 in varchar2 default null
28 ,p_erc_attribute9 in varchar2 default null
29 ,p_erc_attribute10 in varchar2 default null
30 ,p_erc_attribute11 in varchar2 default null
31 ,p_erc_attribute12 in varchar2 default null
32 ,p_erc_attribute13 in varchar2 default null
33 ,p_erc_attribute14 in varchar2 default null
34 ,p_erc_attribute15 in varchar2 default null
35 ,p_erc_attribute16 in varchar2 default null
36 ,p_erc_attribute17 in varchar2 default null
37 ,p_erc_attribute18 in varchar2 default null
38 ,p_erc_attribute19 in varchar2 default null
39 ,p_erc_attribute20 in varchar2 default null
40 ,p_erc_attribute21 in varchar2 default null
41 ,p_erc_attribute22 in varchar2 default null
42 ,p_erc_attribute23 in varchar2 default null
43 ,p_erc_attribute24 in varchar2 default null
44 ,p_erc_attribute25 in varchar2 default null
45 ,p_erc_attribute26 in varchar2 default null
46 ,p_erc_attribute27 in varchar2 default null
47 ,p_erc_attribute28 in varchar2 default null
48 ,p_erc_attribute29 in varchar2 default null
49 ,p_erc_attribute30 in varchar2 default null
50 ,p_request_id in number default null
51 ,p_program_application_id in number default null
52 ,p_program_id in number default null
53 ,p_program_update_date in date 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_enrt_rt_ctfn_id ben_enrt_rt_ctfn.enrt_rt_ctfn_id%TYPE;
61 l_proc varchar2(72) := g_package||'create_enrt_rt_ctfn';
62 l_object_version_number ben_enrt_rt_ctfn.object_version_number%TYPE;
63 --
64 begin
65 --
66 hr_utility.set_location('Entering:'|| l_proc, 10);
67 --
68 -- Issue a savepoint if operating in validation only mode
69 --
70 savepoint create_enrt_rt_ctfn;
71 --
72 hr_utility.set_location(l_proc, 20);
73 --
74 -- Process Logic
75 --
76 begin
77 --
78 -- Start of API User Hook for the before hook of create_enrt_rt_ctfn
79 --
80 ben_enrt_rt_ctfn_bk1.create_enrt_rt_ctfn_b
81 (
82 p_enrt_ctfn_typ_cd => p_enrt_ctfn_typ_cd
83 ,p_rqd_flag => p_rqd_flag
84 ,p_enrt_rt_id => p_enrt_rt_id
85 ,p_business_group_id => p_business_group_id
86 ,p_erc_attribute_category => p_erc_attribute_category
87 ,p_erc_attribute1 => p_erc_attribute1
88 ,p_erc_attribute2 => p_erc_attribute2
89 ,p_erc_attribute3 => p_erc_attribute3
90 ,p_erc_attribute4 => p_erc_attribute4
91 ,p_erc_attribute5 => p_erc_attribute5
92 ,p_erc_attribute6 => p_erc_attribute6
93 ,p_erc_attribute7 => p_erc_attribute7
94 ,p_erc_attribute8 => p_erc_attribute8
95 ,p_erc_attribute9 => p_erc_attribute9
96 ,p_erc_attribute10 => p_erc_attribute10
97 ,p_erc_attribute11 => p_erc_attribute11
98 ,p_erc_attribute12 => p_erc_attribute12
99 ,p_erc_attribute13 => p_erc_attribute13
100 ,p_erc_attribute14 => p_erc_attribute14
101 ,p_erc_attribute15 => p_erc_attribute15
102 ,p_erc_attribute16 => p_erc_attribute16
103 ,p_erc_attribute17 => p_erc_attribute17
104 ,p_erc_attribute18 => p_erc_attribute18
105 ,p_erc_attribute19 => p_erc_attribute19
106 ,p_erc_attribute20 => p_erc_attribute20
107 ,p_erc_attribute21 => p_erc_attribute21
108 ,p_erc_attribute22 => p_erc_attribute22
109 ,p_erc_attribute23 => p_erc_attribute23
110 ,p_erc_attribute24 => p_erc_attribute24
111 ,p_erc_attribute25 => p_erc_attribute25
112 ,p_erc_attribute26 => p_erc_attribute26
113 ,p_erc_attribute27 => p_erc_attribute27
114 ,p_erc_attribute28 => p_erc_attribute28
115 ,p_erc_attribute29 => p_erc_attribute29
116 ,p_erc_attribute30 => p_erc_attribute30
117 ,p_request_id => p_request_id
118 ,p_program_application_id => p_program_application_id
119 ,p_program_id => p_program_id
120 ,p_program_update_date => p_program_update_date
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_enrt_rt_ctfn'
128 ,p_hook_type => 'BP'
129 );
130 --
131 -- End of API User Hook for the before hook of create_enrt_rt_ctfn
132 --
133 end;
134 --
135 ben_erc_ins.ins
136 (
137 p_enrt_rt_ctfn_id => l_enrt_rt_ctfn_id
138 ,p_enrt_ctfn_typ_cd => p_enrt_ctfn_typ_cd
139 ,p_rqd_flag => p_rqd_flag
140 ,p_enrt_rt_id => p_enrt_rt_id
141 ,p_business_group_id => p_business_group_id
142 ,p_erc_attribute_category => p_erc_attribute_category
143 ,p_erc_attribute1 => p_erc_attribute1
144 ,p_erc_attribute2 => p_erc_attribute2
145 ,p_erc_attribute3 => p_erc_attribute3
146 ,p_erc_attribute4 => p_erc_attribute4
147 ,p_erc_attribute5 => p_erc_attribute5
148 ,p_erc_attribute6 => p_erc_attribute6
149 ,p_erc_attribute7 => p_erc_attribute7
150 ,p_erc_attribute8 => p_erc_attribute8
151 ,p_erc_attribute9 => p_erc_attribute9
152 ,p_erc_attribute10 => p_erc_attribute10
153 ,p_erc_attribute11 => p_erc_attribute11
154 ,p_erc_attribute12 => p_erc_attribute12
155 ,p_erc_attribute13 => p_erc_attribute13
156 ,p_erc_attribute14 => p_erc_attribute14
157 ,p_erc_attribute15 => p_erc_attribute15
158 ,p_erc_attribute16 => p_erc_attribute16
159 ,p_erc_attribute17 => p_erc_attribute17
160 ,p_erc_attribute18 => p_erc_attribute18
161 ,p_erc_attribute19 => p_erc_attribute19
162 ,p_erc_attribute20 => p_erc_attribute20
163 ,p_erc_attribute21 => p_erc_attribute21
164 ,p_erc_attribute22 => p_erc_attribute22
165 ,p_erc_attribute23 => p_erc_attribute23
166 ,p_erc_attribute24 => p_erc_attribute24
167 ,p_erc_attribute25 => p_erc_attribute25
168 ,p_erc_attribute26 => p_erc_attribute26
169 ,p_erc_attribute27 => p_erc_attribute27
170 ,p_erc_attribute28 => p_erc_attribute28
171 ,p_erc_attribute29 => p_erc_attribute29
172 ,p_erc_attribute30 => p_erc_attribute30
173 ,p_request_id => p_request_id
174 ,p_program_application_id => p_program_application_id
175 ,p_program_id => p_program_id
176 ,p_program_update_date => p_program_update_date
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_enrt_rt_ctfn
184 --
185 ben_enrt_rt_ctfn_bk1.create_enrt_rt_ctfn_a
186 (
187 p_enrt_rt_ctfn_id => l_enrt_rt_ctfn_id
188 ,p_enrt_ctfn_typ_cd => p_enrt_ctfn_typ_cd
189 ,p_rqd_flag => p_rqd_flag
190 ,p_enrt_rt_id => p_enrt_rt_id
191 ,p_business_group_id => p_business_group_id
192 ,p_erc_attribute_category => p_erc_attribute_category
193 ,p_erc_attribute1 => p_erc_attribute1
194 ,p_erc_attribute2 => p_erc_attribute2
195 ,p_erc_attribute3 => p_erc_attribute3
196 ,p_erc_attribute4 => p_erc_attribute4
197 ,p_erc_attribute5 => p_erc_attribute5
198 ,p_erc_attribute6 => p_erc_attribute6
199 ,p_erc_attribute7 => p_erc_attribute7
200 ,p_erc_attribute8 => p_erc_attribute8
201 ,p_erc_attribute9 => p_erc_attribute9
202 ,p_erc_attribute10 => p_erc_attribute10
203 ,p_erc_attribute11 => p_erc_attribute11
204 ,p_erc_attribute12 => p_erc_attribute12
205 ,p_erc_attribute13 => p_erc_attribute13
206 ,p_erc_attribute14 => p_erc_attribute14
207 ,p_erc_attribute15 => p_erc_attribute15
208 ,p_erc_attribute16 => p_erc_attribute16
209 ,p_erc_attribute17 => p_erc_attribute17
210 ,p_erc_attribute18 => p_erc_attribute18
211 ,p_erc_attribute19 => p_erc_attribute19
215 ,p_erc_attribute23 => p_erc_attribute23
212 ,p_erc_attribute20 => p_erc_attribute20
213 ,p_erc_attribute21 => p_erc_attribute21
214 ,p_erc_attribute22 => p_erc_attribute22
216 ,p_erc_attribute24 => p_erc_attribute24
217 ,p_erc_attribute25 => p_erc_attribute25
218 ,p_erc_attribute26 => p_erc_attribute26
219 ,p_erc_attribute27 => p_erc_attribute27
220 ,p_erc_attribute28 => p_erc_attribute28
221 ,p_erc_attribute29 => p_erc_attribute29
222 ,p_erc_attribute30 => p_erc_attribute30
223 ,p_request_id => p_request_id
224 ,p_program_application_id => p_program_application_id
225 ,p_program_id => p_program_id
226 ,p_program_update_date => p_program_update_date
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_enrt_rt_ctfn'
234 ,p_hook_type => 'AP'
235 );
236 --
237 -- End of API User Hook for the after hook of create_enrt_rt_ctfn
238 --
239 end;
240 --
241 hr_utility.set_location(l_proc, 60);
242 --
243 -- When in validation only mode raise the Validate_Enabled exception
244 --
245 if p_validate then
246 raise hr_api.validate_enabled;
247 end if;
248 --
249 -- Set all output arguments
250 --
251 p_enrt_rt_ctfn_id := l_enrt_rt_ctfn_id;
252 p_object_version_number := l_object_version_number;
253 --
254 hr_utility.set_location(' Leaving:'||l_proc, 70);
255 --
256 exception
257 --
258 when hr_api.validate_enabled then
259 --
260 -- As the Validate_Enabled exception has been raised
261 -- we must rollback to the savepoint
262 --
263 ROLLBACK TO create_enrt_rt_ctfn;
264 --
265 -- Only set output warning arguments
266 -- (Any key or derived arguments must be set to null
267 -- when validation only mode is being used.)
268 --
272 --
269 p_enrt_rt_ctfn_id := null;
270 p_object_version_number := null;
271 hr_utility.set_location(' Leaving:'||l_proc, 80);
273 when others then
274 --
275 -- A validation or unexpected error has occured
276 --
277 ROLLBACK TO create_enrt_rt_ctfn;
278 p_enrt_rt_ctfn_id := null;
279 p_object_version_number := null;
280 raise;
281 --
282 end create_enrt_rt_ctfn;
283 -- ----------------------------------------------------------------------------
284 -- |------------------------< update_enrt_rt_ctfn >--- ------------------|
285 -- ----------------------------------------------------------------------------
286 --
287 procedure update_enrt_rt_ctfn
288 (p_validate in boolean default false
289 ,p_enrt_rt_ctfn_id in number
290 ,p_enrt_ctfn_typ_cd in varchar2 default hr_api.g_varchar2
291 ,p_rqd_flag in varchar2 default hr_api.g_varchar2
292 ,p_enrt_rt_id in number default hr_api.g_number
293 ,p_business_group_id in number default hr_api.g_number
294 ,p_erc_attribute_category in varchar2 default hr_api.g_varchar2
295 ,p_erc_attribute1 in varchar2 default hr_api.g_varchar2
296 ,p_erc_attribute2 in varchar2 default hr_api.g_varchar2
297 ,p_erc_attribute3 in varchar2 default hr_api.g_varchar2
298 ,p_erc_attribute4 in varchar2 default hr_api.g_varchar2
299 ,p_erc_attribute5 in varchar2 default hr_api.g_varchar2
300 ,p_erc_attribute6 in varchar2 default hr_api.g_varchar2
301 ,p_erc_attribute7 in varchar2 default hr_api.g_varchar2
302 ,p_erc_attribute8 in varchar2 default hr_api.g_varchar2
303 ,p_erc_attribute9 in varchar2 default hr_api.g_varchar2
304 ,p_erc_attribute10 in varchar2 default hr_api.g_varchar2
305 ,p_erc_attribute11 in varchar2 default hr_api.g_varchar2
306 ,p_erc_attribute12 in varchar2 default hr_api.g_varchar2
307 ,p_erc_attribute13 in varchar2 default hr_api.g_varchar2
308 ,p_erc_attribute14 in varchar2 default hr_api.g_varchar2
309 ,p_erc_attribute15 in varchar2 default hr_api.g_varchar2
310 ,p_erc_attribute16 in varchar2 default hr_api.g_varchar2
311 ,p_erc_attribute17 in varchar2 default hr_api.g_varchar2
312 ,p_erc_attribute18 in varchar2 default hr_api.g_varchar2
313 ,p_erc_attribute19 in varchar2 default hr_api.g_varchar2
317 ,p_erc_attribute23 in varchar2 default hr_api.g_varchar2
314 ,p_erc_attribute20 in varchar2 default hr_api.g_varchar2
315 ,p_erc_attribute21 in varchar2 default hr_api.g_varchar2
316 ,p_erc_attribute22 in varchar2 default hr_api.g_varchar2
318 ,p_erc_attribute24 in varchar2 default hr_api.g_varchar2
319 ,p_erc_attribute25 in varchar2 default hr_api.g_varchar2
320 ,p_erc_attribute26 in varchar2 default hr_api.g_varchar2
321 ,p_erc_attribute27 in varchar2 default hr_api.g_varchar2
322 ,p_erc_attribute28 in varchar2 default hr_api.g_varchar2
323 ,p_erc_attribute29 in varchar2 default hr_api.g_varchar2
324 ,p_erc_attribute30 in varchar2 default hr_api.g_varchar2
325 ,p_request_id in number default hr_api.g_number
326 ,p_program_application_id in number default hr_api.g_number
327 ,p_program_id in number default hr_api.g_number
328 ,p_program_update_date in date default hr_api.g_date
329 ,p_object_version_number in out nocopy number
330 ,p_effective_date in date
331 ) is
332 --
333 -- Declare cursors and local variables
334 --
335 l_proc varchar2(72) := g_package||'update_enrt_rt_ctfn';
336 l_object_version_number ben_enrt_rt_ctfn.object_version_number%TYPE;
337 --
338 begin
339 --
340 hr_utility.set_location('Entering:'|| l_proc, 10);
341 --
342 -- Issue a savepoint if operating in validation only mode
343 --
344 savepoint update_enrt_rt_ctfn;
345 --
346 hr_utility.set_location(l_proc, 20);
347 --
348 -- Process Logic
349 --
350 l_object_version_number := p_object_version_number;
351 --
352 begin
353 --
354 -- Start of API User Hook for the before hook of update_enrt_rt_ctfn
355 --
356 ben_enrt_rt_ctfn_bk2.update_enrt_rt_ctfn_b
357 (
358 p_enrt_rt_ctfn_id => p_enrt_rt_ctfn_id
359 ,p_enrt_ctfn_typ_cd => p_enrt_ctfn_typ_cd
360 ,p_rqd_flag => p_rqd_flag
361 ,p_enrt_rt_id => p_enrt_rt_id
362 ,p_business_group_id => p_business_group_id
363 ,p_erc_attribute_category => p_erc_attribute_category
364 ,p_erc_attribute1 => p_erc_attribute1
365 ,p_erc_attribute2 => p_erc_attribute2
369 ,p_erc_attribute6 => p_erc_attribute6
366 ,p_erc_attribute3 => p_erc_attribute3
367 ,p_erc_attribute4 => p_erc_attribute4
368 ,p_erc_attribute5 => p_erc_attribute5
370 ,p_erc_attribute7 => p_erc_attribute7
371 ,p_erc_attribute8 => p_erc_attribute8
372 ,p_erc_attribute9 => p_erc_attribute9
373 ,p_erc_attribute10 => p_erc_attribute10
374 ,p_erc_attribute11 => p_erc_attribute11
375 ,p_erc_attribute12 => p_erc_attribute12
376 ,p_erc_attribute13 => p_erc_attribute13
377 ,p_erc_attribute14 => p_erc_attribute14
378 ,p_erc_attribute15 => p_erc_attribute15
379 ,p_erc_attribute16 => p_erc_attribute16
380 ,p_erc_attribute17 => p_erc_attribute17
381 ,p_erc_attribute18 => p_erc_attribute18
382 ,p_erc_attribute19 => p_erc_attribute19
383 ,p_erc_attribute20 => p_erc_attribute20
384 ,p_erc_attribute21 => p_erc_attribute21
385 ,p_erc_attribute22 => p_erc_attribute22
386 ,p_erc_attribute23 => p_erc_attribute23
387 ,p_erc_attribute24 => p_erc_attribute24
388 ,p_erc_attribute25 => p_erc_attribute25
389 ,p_erc_attribute26 => p_erc_attribute26
390 ,p_erc_attribute27 => p_erc_attribute27
391 ,p_erc_attribute28 => p_erc_attribute28
392 ,p_erc_attribute29 => p_erc_attribute29
393 ,p_erc_attribute30 => p_erc_attribute30
394 ,p_request_id => p_request_id
395 ,p_program_application_id => p_program_application_id
396 ,p_program_id => p_program_id
397 ,p_program_update_date => p_program_update_date
398 ,p_object_version_number => p_object_version_number
399 ,p_effective_date => trunc(p_effective_date)
400 );
401 exception
402 when hr_api.cannot_find_prog_unit then
403 hr_api.cannot_find_prog_unit_error
404 (p_module_name => 'UPDATE_enrt_rt_ctfn'
405 ,p_hook_type => 'BP'
406 );
407 --
411 --
408 -- End of API User Hook for the before hook of update_enrt_rt_ctfn
409 --
410 end;
412 ben_erc_upd.upd
413 (
414 p_enrt_rt_ctfn_id => p_enrt_rt_ctfn_id
415 ,p_enrt_ctfn_typ_cd => p_enrt_ctfn_typ_cd
416 ,p_rqd_flag => p_rqd_flag
417 ,p_enrt_rt_id => p_enrt_rt_id
418 ,p_business_group_id => p_business_group_id
419 ,p_erc_attribute_category => p_erc_attribute_category
420 ,p_erc_attribute1 => p_erc_attribute1
421 ,p_erc_attribute2 => p_erc_attribute2
422 ,p_erc_attribute3 => p_erc_attribute3
423 ,p_erc_attribute4 => p_erc_attribute4
424 ,p_erc_attribute5 => p_erc_attribute5
425 ,p_erc_attribute6 => p_erc_attribute6
426 ,p_erc_attribute7 => p_erc_attribute7
427 ,p_erc_attribute8 => p_erc_attribute8
428 ,p_erc_attribute9 => p_erc_attribute9
429 ,p_erc_attribute10 => p_erc_attribute10
430 ,p_erc_attribute11 => p_erc_attribute11
431 ,p_erc_attribute12 => p_erc_attribute12
432 ,p_erc_attribute13 => p_erc_attribute13
433 ,p_erc_attribute14 => p_erc_attribute14
434 ,p_erc_attribute15 => p_erc_attribute15
435 ,p_erc_attribute16 => p_erc_attribute16
436 ,p_erc_attribute17 => p_erc_attribute17
437 ,p_erc_attribute18 => p_erc_attribute18
438 ,p_erc_attribute19 => p_erc_attribute19
439 ,p_erc_attribute20 => p_erc_attribute20
440 ,p_erc_attribute21 => p_erc_attribute21
441 ,p_erc_attribute22 => p_erc_attribute22
442 ,p_erc_attribute23 => p_erc_attribute23
443 ,p_erc_attribute24 => p_erc_attribute24
444 ,p_erc_attribute25 => p_erc_attribute25
445 ,p_erc_attribute26 => p_erc_attribute26
446 ,p_erc_attribute27 => p_erc_attribute27
447 ,p_erc_attribute28 => p_erc_attribute28
448 ,p_erc_attribute29 => p_erc_attribute29
449 ,p_erc_attribute30 => p_erc_attribute30
450 ,p_request_id => p_request_id
451 ,p_program_application_id => p_program_application_id
452 ,p_program_id => p_program_id
453 ,p_program_update_date => p_program_update_date
454 ,p_object_version_number => l_object_version_number
455 ,p_effective_date => trunc(p_effective_date)
456 );
457 --
458 begin
459 --
460 -- Start of API User Hook for the after hook of update_enrt_rt_ctfn
461 --
462 ben_enrt_rt_ctfn_bk2.update_enrt_rt_ctfn_a
463 (
464 p_enrt_rt_ctfn_id => p_enrt_rt_ctfn_id
465 ,p_enrt_ctfn_typ_cd => p_enrt_ctfn_typ_cd
466 ,p_rqd_flag => p_rqd_flag
467 ,p_enrt_rt_id => p_enrt_rt_id
468 ,p_business_group_id => p_business_group_id
469 ,p_erc_attribute_category => p_erc_attribute_category
470 ,p_erc_attribute1 => p_erc_attribute1
471 ,p_erc_attribute2 => p_erc_attribute2
472 ,p_erc_attribute3 => p_erc_attribute3
473 ,p_erc_attribute4 => p_erc_attribute4
474 ,p_erc_attribute5 => p_erc_attribute5
475 ,p_erc_attribute6 => p_erc_attribute6
476 ,p_erc_attribute7 => p_erc_attribute7
477 ,p_erc_attribute8 => p_erc_attribute8
478 ,p_erc_attribute9 => p_erc_attribute9
479 ,p_erc_attribute10 => p_erc_attribute10
480 ,p_erc_attribute11 => p_erc_attribute11
481 ,p_erc_attribute12 => p_erc_attribute12
482 ,p_erc_attribute13 => p_erc_attribute13
483 ,p_erc_attribute14 => p_erc_attribute14
484 ,p_erc_attribute15 => p_erc_attribute15
485 ,p_erc_attribute16 => p_erc_attribute16
486 ,p_erc_attribute17 => p_erc_attribute17
487 ,p_erc_attribute18 => p_erc_attribute18
488 ,p_erc_attribute19 => p_erc_attribute19
489 ,p_erc_attribute20 => p_erc_attribute20
490 ,p_erc_attribute21 => p_erc_attribute21
491 ,p_erc_attribute22 => p_erc_attribute22
492 ,p_erc_attribute23 => p_erc_attribute23
493 ,p_erc_attribute24 => p_erc_attribute24
494 ,p_erc_attribute25 => p_erc_attribute25
495 ,p_erc_attribute26 => p_erc_attribute26
496 ,p_erc_attribute27 => p_erc_attribute27
497 ,p_erc_attribute28 => p_erc_attribute28
498 ,p_erc_attribute29 => p_erc_attribute29
499 ,p_erc_attribute30 => p_erc_attribute30
500 ,p_request_id => p_request_id
501 ,p_program_application_id => p_program_application_id
502 ,p_program_id => p_program_id
503 ,p_program_update_date => p_program_update_date
504 ,p_object_version_number => l_object_version_number
505 ,p_effective_date => trunc(p_effective_date)
506 );
507 exception
508 when hr_api.cannot_find_prog_unit then
509 hr_api.cannot_find_prog_unit_error
510 (p_module_name => 'UPDATE_enrt_rt_ctfn'
511 ,p_hook_type => 'AP'
512 );
513 --
514 -- End of API User Hook for the after hook of update_enrt_rt_ctfn
515 --
516 end;
517 --
518 hr_utility.set_location(l_proc, 60);
522 if p_validate then
519 --
520 -- When in validation only mode raise the Validate_Enabled exception
521 --
523 raise hr_api.validate_enabled;
524 end if;
525 --
526 -- Set all output arguments
527 --
528 p_object_version_number := l_object_version_number;
529 --
530 hr_utility.set_location(' Leaving:'||l_proc, 70);
531 --
532 exception
533 --
534 when hr_api.validate_enabled then
535 --
536 -- As the Validate_Enabled exception has been raised
537 -- we must rollback to the savepoint
538 --
539 ROLLBACK TO update_enrt_rt_ctfn;
540 --
541 -- Only set output warning arguments
542 -- (Any key or derived arguments must be set to null
543 -- when validation only mode is being used.)
544 --
545 hr_utility.set_location(' Leaving:'||l_proc, 80);
546 --
547 when others then
548 --
549 -- A validation or unexpected error has occured
550 --
551 ROLLBACK TO update_enrt_rt_ctfn;
552 raise;
553 --
554 end update_enrt_rt_ctfn;
555 -- ----------------------------------------------------------------------------
556 -- |------------------------< delete_enrt_rt_ctfn >----------------------|
557 -- ----------------------------------------------------------------------------
558 --
559 procedure delete_enrt_rt_ctfn
560 (p_validate in boolean default false
561 ,p_enrt_rt_ctfn_id in number
562 ,p_object_version_number in out nocopy number
563 ,p_effective_date in date
564 ) is
565 --
566 -- Declare cursors and local variables
567 --
568 l_proc varchar2(72) := g_package||'update_enrt_rt_ctfn';
569 l_object_version_number ben_enrt_rt_ctfn.object_version_number%TYPE;
570 --
571 begin
572 --
573 hr_utility.set_location('Entering:'|| l_proc, 10);
574 --
575 -- Issue a savepoint if operating in validation only mode
576 --
577 savepoint delete_enrt_rt_ctfn;
578 --
579 hr_utility.set_location(l_proc, 20);
580 --
581 -- Process Logic
582 --
583 l_object_version_number := p_object_version_number;
584 --
585 --
586 begin
587 --
588 -- Start of API User Hook for the before hook of delete_enrt_rt_ctfn
589 --
590 ben_enrt_rt_ctfn_bk3.delete_enrt_rt_ctfn_b
591 (
592 p_enrt_rt_ctfn_id => p_enrt_rt_ctfn_id
593 ,p_object_version_number => p_object_version_number
594 ,p_effective_date => trunc(p_effective_date)
595 );
596 exception
597 when hr_api.cannot_find_prog_unit then
598 hr_api.cannot_find_prog_unit_error
599 (p_module_name => 'DELETE_enrt_rt_ctfn'
600 ,p_hook_type => 'BP'
601 );
602 --
603 -- End of API User Hook for the before hook of delete_enrt_rt_ctfn
604 --
605 end;
606 --
607 ben_erc_del.del
608 (
609 p_enrt_rt_ctfn_id => p_enrt_rt_ctfn_id
610 ,p_object_version_number => l_object_version_number
611 ,p_effective_date => p_effective_date
612 );
613 --
614 begin
615 --
616 -- Start of API User Hook for the after hook of delete_enrt_rt_ctfn
617 --
618 ben_enrt_rt_ctfn_bk3.delete_enrt_rt_ctfn_a
619 (
620 p_enrt_rt_ctfn_id => p_enrt_rt_ctfn_id
621 ,p_object_version_number => l_object_version_number
622 ,p_effective_date => trunc(p_effective_date)
623 );
624 exception
625 when hr_api.cannot_find_prog_unit then
626 hr_api.cannot_find_prog_unit_error
627 (p_module_name => 'DELETE_enrt_rt_ctfn'
628 ,p_hook_type => 'AP'
629 );
630 --
631 -- End of API User Hook for the after hook of delete_enrt_rt_ctfn
632 --
633 end;
634 --
635 hr_utility.set_location(l_proc, 60);
636 --
637 -- When in validation only mode raise the Validate_Enabled exception
638 --
639 if p_validate then
640 raise hr_api.validate_enabled;
641 end if;
642 --
643 hr_utility.set_location(' Leaving:'||l_proc, 70);
644 --
645 exception
646 --
647 when hr_api.validate_enabled then
648 --
649 -- As the Validate_Enabled exception has been raised
650 -- we must rollback to the savepoint
651 --
652 ROLLBACK TO delete_enrt_rt_ctfn;
653 --
654 -- Only set output warning arguments
655 -- (Any key or derived arguments must be set to null
656 -- when validation only mode is being used.)
657 --
658 --
659 when others then
660 --
661 -- A validation or unexpected error has occured
662 --
663 ROLLBACK TO delete_enrt_rt_ctfn;
664 raise;
665 --
666 end delete_enrt_rt_ctfn;
667 --
668 -- ----------------------------------------------------------------------------
669 -- |-------------------------------< lck >------------------------------------|
670 -- ----------------------------------------------------------------------------
671 --
672 procedure lck
673 (
674 p_enrt_rt_ctfn_id in number
675 ,p_object_version_number in number
676 ) is
677 --
678 --
679 -- Declare cursors and local variables
680 --
681 l_proc varchar2(72) := g_package||'lck';
682 --
683 begin
684 --
685 hr_utility.set_location('Entering:'|| l_proc, 10);
686 --
687 ben_erc_shd.lck
688 (
689 p_enrt_rt_ctfn_id => p_enrt_rt_ctfn_id
690 ,p_object_version_number => p_object_version_number
691 );
692 --
693 hr_utility.set_location(' Leaving:'||l_proc, 70);
694 --
695 end lck;
696 --
697 end ben_enrt_rt_ctfn_api;