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