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