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