[Home] [Help]
PACKAGE BODY: APPS.BEN_ELP_UPD
Source
1 Package Body ben_elp_upd as
2 /* $Header: beelprhi.pkb 120.5 2007/01/24 05:18:55 rgajula ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- | Private Global Definitions |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package varchar2(33) := ' ben_elp_upd.'; -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |----------------------------< dt_update_dml >-----------------------------|
12 -- ----------------------------------------------------------------------------
13 -- {Start Of Comments}
14 --
15 -- Description:
16 -- This procedure controls the execution of dml from the datetrack mode
17 -- of CORRECTION only. It is important to note that the object version
18 -- number is only increment by 1 because the datetrack correction is
19 -- soley for one datetracked row.
20 -- This procedure controls the actual dml update logic. The functions of this
21 -- procedure are as follows:
22 -- 1) Get the next object_version_number.
23 -- 2) To set and unset the g_api_dml status as required (as we are about to
24 -- perform dml).
25 -- 3) To update the specified row in the schema using the primary key in
26 -- the predicates.
27 -- 4) To trap any constraint violations that may have occurred.
28 -- 5) To raise any other errors.
29 --
30 -- Prerequisites:
31 -- This is an internal private procedure which must be called from the
32 -- update_dml procedure.
33 --
34 -- In Parameters:
35 -- A Pl/Sql record structre.
36 --
37 -- Post Success:
38 -- The specified row will be updated in the schema.
39 --
40 -- Post Failure:
41 -- On the update dml failure it is important to note that we always reset the
42 -- g_api_dml status to false.
43 -- If a check or unique integrity constraint violation is raised the
44 -- constraint_error procedure will be called.
45 -- If any other error is reported, the error will be raised after the
46 -- g_api_dml status is reset.
47 --
48 -- Developer Implementation Notes:
49 -- The update 'set' arguments list should be modified if any of your
50 -- attributes are not updateable.
51 --
52 -- Access Status:
53 -- Internal Row Handler Use Only.
54 --
55 -- {End Of Comments}
56 -- ----------------------------------------------------------------------------
57 Procedure dt_update_dml
58 (p_rec in out nocopy ben_elp_shd.g_rec_type,
59 p_effective_date in date,
60 p_datetrack_mode in varchar2,
61 p_validation_start_date in date,
62 p_validation_end_date in date) is
63 --
64 l_proc varchar2(72) := g_package||'dt_update_dml';
65 --
66 Begin
67 hr_utility.set_location('Entering:'||l_proc, 5);
68 --
69 If (p_datetrack_mode = 'CORRECTION') then
70 hr_utility.set_location(l_proc, 10);
71 --
72 -- Because we are updating a row we must get the next object
73 -- version number.
74 --
75 p_rec.object_version_number :=
76 dt_api.get_object_version_number
77 (p_base_table_name => 'ben_eligy_prfl_f',
78 p_base_key_column => 'eligy_prfl_id',
79 p_base_key_value => p_rec.eligy_prfl_id);
80 --
81 ben_elp_shd.g_api_dml := true; -- Set the api dml status
82 --
83 -- Update the ben_eligy_prfl_f Row
84 --
85 update ben_eligy_prfl_f
86 set
87 eligy_prfl_id = p_rec.eligy_prfl_id,
88 name = p_rec.name,
89 description = p_rec.description,
90 stat_cd = p_rec.stat_cd,
91 asmt_to_use_cd = p_rec.asmt_to_use_cd,
92 elig_enrld_plip_flag = p_rec.elig_enrld_plip_flag,
93 elig_cbr_quald_bnf_flag = p_rec.elig_cbr_quald_bnf_flag,
94 elig_enrld_ptip_flag = p_rec.elig_enrld_ptip_flag,
95 elig_dpnt_cvrd_plip_flag = p_rec.elig_dpnt_cvrd_plip_flag,
96 elig_dpnt_cvrd_ptip_flag = p_rec.elig_dpnt_cvrd_ptip_flag,
97 elig_dpnt_cvrd_pgm_flag = p_rec.elig_dpnt_cvrd_pgm_flag,
98 elig_job_flag = p_rec.elig_job_flag,
99 elig_hrly_slrd_flag = p_rec.elig_hrly_slrd_flag,
100 elig_pstl_cd_flag = p_rec.elig_pstl_cd_flag,
101 elig_lbr_mmbr_flag = p_rec.elig_lbr_mmbr_flag,
102 elig_lgl_enty_flag = p_rec.elig_lgl_enty_flag,
103 elig_benfts_grp_flag = p_rec.elig_benfts_grp_flag,
104 elig_wk_loc_flag = p_rec.elig_wk_loc_flag,
105 elig_brgng_unit_flag = p_rec.elig_brgng_unit_flag,
106 elig_age_flag = p_rec.elig_age_flag,
107 elig_los_flag = p_rec.elig_los_flag,
108 elig_per_typ_flag = p_rec.elig_per_typ_flag,
109 elig_fl_tm_pt_tm_flag = p_rec.elig_fl_tm_pt_tm_flag,
110 elig_ee_stat_flag = p_rec.elig_ee_stat_flag,
111 elig_grd_flag = p_rec.elig_grd_flag,
112 elig_pct_fl_tm_flag = p_rec.elig_pct_fl_tm_flag,
113 elig_asnt_set_flag = p_rec.elig_asnt_set_flag,
114 elig_hrs_wkd_flag = p_rec.elig_hrs_wkd_flag,
115 elig_comp_lvl_flag = p_rec.elig_comp_lvl_flag,
116 elig_org_unit_flag = p_rec.elig_org_unit_flag,
117 elig_loa_rsn_flag = p_rec.elig_loa_rsn_flag,
118 elig_pyrl_flag = p_rec.elig_pyrl_flag,
119 elig_schedd_hrs_flag = p_rec.elig_schedd_hrs_flag,
120 elig_py_bss_flag = p_rec.elig_py_bss_flag,
121 eligy_prfl_rl_flag = p_rec.eligy_prfl_rl_flag,
122 elig_cmbn_age_los_flag = p_rec.elig_cmbn_age_los_flag,
123 cntng_prtn_elig_prfl_flag = p_rec.cntng_prtn_elig_prfl_flag,
124 elig_prtt_pl_flag = p_rec.elig_prtt_pl_flag,
125 elig_ppl_grp_flag = p_rec.elig_ppl_grp_flag,
126 elig_svc_area_flag = p_rec.elig_svc_area_flag,
127 elig_ptip_prte_flag = p_rec.elig_ptip_prte_flag,
128 elig_no_othr_cvg_flag = p_rec.elig_no_othr_cvg_flag,
129 elig_enrld_pl_flag = p_rec.elig_enrld_pl_flag,
130 elig_enrld_oipl_flag = p_rec.elig_enrld_oipl_flag,
131 elig_enrld_pgm_flag = p_rec.elig_enrld_pgm_flag,
132 elig_dpnt_cvrd_pl_flag = p_rec.elig_dpnt_cvrd_pl_flag,
133 elig_lvg_rsn_flag = p_rec.elig_lvg_rsn_flag,
134 elig_optd_mdcr_flag = p_rec.elig_optd_mdcr_flag,
135 elig_tbco_use_flag = p_rec.elig_tbco_use_flag,
136 elig_dpnt_othr_ptip_flag = p_rec.elig_dpnt_othr_ptip_flag,
137 business_group_id = p_rec.business_group_id,
138 elp_attribute_category = p_rec.elp_attribute_category,
139 elp_attribute1 = p_rec.elp_attribute1,
140 elp_attribute2 = p_rec.elp_attribute2,
141 elp_attribute3 = p_rec.elp_attribute3,
142 elp_attribute4 = p_rec.elp_attribute4,
143 elp_attribute5 = p_rec.elp_attribute5,
144 elp_attribute6 = p_rec.elp_attribute6,
145 elp_attribute7 = p_rec.elp_attribute7,
146 elp_attribute8 = p_rec.elp_attribute8,
147 elp_attribute9 = p_rec.elp_attribute9,
148 elp_attribute10 = p_rec.elp_attribute10,
149 elp_attribute11 = p_rec.elp_attribute11,
150 elp_attribute12 = p_rec.elp_attribute12,
151 elp_attribute13 = p_rec.elp_attribute13,
152 elp_attribute14 = p_rec.elp_attribute14,
153 elp_attribute15 = p_rec.elp_attribute15,
154 elp_attribute16 = p_rec.elp_attribute16,
155 elp_attribute17 = p_rec.elp_attribute17,
156 elp_attribute18 = p_rec.elp_attribute18,
157 elp_attribute19 = p_rec.elp_attribute19,
158 elp_attribute20 = p_rec.elp_attribute20,
159 elp_attribute21 = p_rec.elp_attribute21,
160 elp_attribute22 = p_rec.elp_attribute22,
161 elp_attribute23 = p_rec.elp_attribute23,
162 elp_attribute24 = p_rec.elp_attribute24,
163 elp_attribute25 = p_rec.elp_attribute25,
164 elp_attribute26 = p_rec.elp_attribute26,
165 elp_attribute27 = p_rec.elp_attribute27,
166 elp_attribute28 = p_rec.elp_attribute28,
167 elp_attribute29 = p_rec.elp_attribute29,
168 elp_attribute30 = p_rec.elp_attribute30,
169 elig_mrtl_sts_flag = p_rec.elig_mrtl_sts_flag ,
170 elig_gndr_flag = p_rec.elig_gndr_flag ,
171 elig_dsblty_ctg_flag = p_rec.elig_dsblty_ctg_flag ,
172 elig_dsblty_rsn_flag = p_rec.elig_dsblty_rsn_flag ,
173 elig_dsblty_dgr_flag = p_rec.elig_dsblty_dgr_flag,
174 elig_suppl_role_flag = p_rec.elig_suppl_role_flag,
175 elig_qual_titl_flag = p_rec.elig_qual_titl_flag,
176 elig_pstn_flag = p_rec.elig_pstn_flag,
177 elig_prbtn_perd_flag = p_rec.elig_prbtn_perd_flag,
178 elig_sp_clng_prg_pt_flag = p_rec.elig_sp_clng_prg_pt_flag,
179 bnft_cagr_prtn_cd = p_rec.bnft_cagr_prtn_cd,
180 elig_dsbld_flag = p_rec.elig_dsbld_flag,
181 elig_ttl_cvg_vol_flag = p_rec.elig_ttl_cvg_vol_flag,
182 elig_ttl_prtt_flag = p_rec.elig_ttl_prtt_flag,
183 elig_comptncy_flag = p_rec.elig_comptncy_flag,
184 elig_hlth_cvg_flag = p_rec.elig_hlth_cvg_flag,
185 elig_anthr_pl_flag = p_rec.elig_anthr_pl_flag,
186 elig_qua_in_gr_flag = p_rec.elig_qua_in_gr_flag,
187 elig_perf_rtng_flag = p_rec.elig_perf_rtng_flag,
188 elig_crit_values_flag = p_rec.elig_crit_values_flag, /* RBC */
189 object_version_number = p_rec.object_version_number
190 where eligy_prfl_id = p_rec.eligy_prfl_id
191 and effective_start_date = p_validation_start_date
192 and effective_end_date = p_validation_end_date;
193 --
194 ben_elp_shd.g_api_dml := false; -- Unset the api dml status
195 --
196 -- Set the effective start and end dates
197 --
198 p_rec.effective_start_date := p_validation_start_date;
199 p_rec.effective_end_date := p_validation_end_date;
200 End If;
201 --
202 hr_utility.set_location(' Leaving:'||l_proc, 15);
203 Exception
204 When hr_api.check_integrity_violated Then
205 -- A check constraint has been violated
206 ben_elp_shd.g_api_dml := false; -- Unset the api dml status
207 ben_elp_shd.constraint_error
208 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
209 When hr_api.unique_integrity_violated Then
210 -- Unique integrity has been violated
211 ben_elp_shd.g_api_dml := false; -- Unset the api dml status
212 ben_elp_shd.constraint_error
213 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
214 When Others Then
215 ben_elp_shd.g_api_dml := false; -- Unset the api dml status
216 Raise;
217 End dt_update_dml;
218 --
219 -- ----------------------------------------------------------------------------
220 -- |------------------------------< update_dml >------------------------------|
221 -- ----------------------------------------------------------------------------
222 -- {Start Of Comments}
223 --
224 -- Description:
225 -- This procedure calls the dt_update_dml control logic which handles
226 -- the actual datetrack dml.
227 --
228 -- Prerequisites:
229 -- This is an internal private procedure which must be called from the upd
230 -- procedure.
231 --
232 -- In Parameters:
233 -- A Pl/Sql record structre.
234 --
235 -- Post Success:
236 -- Processing contines.
237 --
238 -- Post Failure:
239 -- No specific error handling is required within this procedure.
240 --
241 -- Developer Implementation Notes:
242 -- The update 'set' arguments list should be modified if any of your
243 -- attributes are not updateable.
244 --
245 -- Access Status:
246 -- Internal Row Handler Use Only.
247 --
248 -- {End Of Comments}
249 -- ----------------------------------------------------------------------------
250 Procedure update_dml
251 (p_rec in out nocopy ben_elp_shd.g_rec_type,
252 p_effective_date in date,
253 p_datetrack_mode in varchar2,
254 p_validation_start_date in date,
255 p_validation_end_date in date) is
256 --
257 l_proc varchar2(72) := g_package||'update_dml';
258 --
259 Begin
260 hr_utility.set_location('Entering:'||l_proc, 5);
261 --
262 dt_update_dml(p_rec => p_rec,
263 p_effective_date => p_effective_date,
264 p_datetrack_mode => p_datetrack_mode,
265 p_validation_start_date => p_validation_start_date,
266 p_validation_end_date => p_validation_end_date);
267 --
268 hr_utility.set_location(' Leaving:'||l_proc, 10);
269 End update_dml;
270 --
271 -- ----------------------------------------------------------------------------
272 -- |----------------------------< dt_pre_update >-----------------------------|
273 -- ----------------------------------------------------------------------------
274 -- {Start Of Comments}
275 --
276 -- Description:
277 -- The dt_pre_update procedure controls the execution
278 -- of dml for the datetrack modes of: UPDATE, UPDATE_OVERRIDE
279 -- and UPDATE_CHANGE_INSERT only. The execution required is as
280 -- follows:
281 --
282 -- 1) Providing the datetrack update mode is not 'CORRECTION'
283 -- then set the effective end date of the current row (this
284 -- will be the validation_start_date - 1).
285 -- 2) If the datetrack mode is 'UPDATE_OVERRIDE' then call the
286 -- corresponding delete_dml process to delete any future rows
287 -- where the effective_start_date is greater than or equal to
288 -- the validation_start_date.
289 -- 3) Call the insert_dml process to insert the new updated row
290 -- details..
291 --
292 -- Prerequisites:
293 -- This is an internal procedure which is called from the
294 -- pre_update procedure.
295 --
296 -- In Parameters:
297 --
298 -- Post Success:
299 -- Processing continues.
300 --
301 -- Post Failure:
302 -- If an error has occurred, an error message and exception will be raised
303 -- but not handled.
304 --
305 -- Developer Implementation Notes:
306 -- This is an internal procedure which is required by Datetrack. Don't
307 -- remove or modify.
308 --
309 -- Access Status:
310 -- Internal Row Handler Use Only.
311 --
312 -- {End Of Comments}
313 -- ----------------------------------------------------------------------------
314 Procedure dt_pre_update
315 (p_rec in out nocopy ben_elp_shd.g_rec_type,
316 p_effective_date in date,
317 p_datetrack_mode in varchar2,
318 p_validation_start_date in date,
319 p_validation_end_date in date) is
320 --
321 l_proc varchar2(72) := g_package||'dt_pre_update';
322 l_dummy_version_number number;
323 --
324 Begin
325 hr_utility.set_location('Entering:'||l_proc, 5);
326 If (p_datetrack_mode <> 'CORRECTION') then
327 hr_utility.set_location(l_proc, 10);
328 --
329 -- Update the current effective end date
330 --
331 ben_elp_shd.upd_effective_end_date
332 (p_effective_date => p_effective_date,
333 p_base_key_value => p_rec.eligy_prfl_id,
334 p_new_effective_end_date => (p_validation_start_date - 1),
335 p_validation_start_date => p_validation_start_date,
336 p_validation_end_date => p_validation_end_date,
337 p_object_version_number => l_dummy_version_number);
338 --
339 If (p_datetrack_mode = 'UPDATE_OVERRIDE') then
340 hr_utility.set_location(l_proc, 15);
341 --
342 -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
343 -- delete any future rows
344 --
345 ben_elp_del.delete_dml
346 (p_rec => p_rec,
347 p_effective_date => p_effective_date,
348 p_datetrack_mode => p_datetrack_mode,
349 p_validation_start_date => p_validation_start_date,
350 p_validation_end_date => p_validation_end_date);
351 End If;
352 hr_utility.set_location(l_proc, 20);
353 --
354 -- We must now insert the updated row
355 --
356 ben_elp_ins.insert_dml
357 (p_rec => p_rec,
358 p_effective_date => p_effective_date,
359 p_datetrack_mode => p_datetrack_mode,
360 p_validation_start_date => p_validation_start_date,
361 p_validation_end_date => p_validation_end_date);
362 End If;
363 hr_utility.set_location(' Leaving:'||l_proc, 20);
364 End dt_pre_update;
365 --
366 -- ----------------------------------------------------------------------------
367 -- |------------------------------< pre_update >------------------------------|
368 -- ----------------------------------------------------------------------------
369 -- {Start Of Comments}
370 --
371 -- Description:
372 -- This private procedure contains any processing which is required before
373 -- the update dml.
374 --
375 -- Prerequisites:
376 -- This is an internal procedure which is called from the upd procedure.
377 --
378 -- In Parameters:
379 -- A Pl/Sql record structre.
380 --
381 -- Post Success:
382 -- Processing continues.
383 --
384 -- Post Failure:
385 -- If an error has occurred, an error message and exception will be raised
386 -- but not handled.
387 --
388 -- Developer Implementation Notes:
389 -- Any pre-processing required before the update dml is issued should be
390 -- coded within this procedure. It is important to note that any 3rd party
391 -- maintenance should be reviewed before placing in this procedure. The call
392 -- to the dt_update_dml procedure should NOT be removed.
393 --
394 -- Access Status:
395 -- Internal Row Handler Use Only.
396 --
397 -- {End Of Comments}
398 -- ----------------------------------------------------------------------------
399 Procedure pre_update
400 (p_rec in out nocopy ben_elp_shd.g_rec_type,
401 p_effective_date in date,
402 p_datetrack_mode in varchar2,
403 p_validation_start_date in date,
404 p_validation_end_date in date) is
405 --
406 l_proc varchar2(72) := g_package||'pre_update';
407 --
408 Begin
409 hr_utility.set_location('Entering:'||l_proc, 5);
410 --
411 --
412 --
413 dt_pre_update
414 (p_rec => p_rec,
415 p_effective_date => p_effective_date,
416 p_datetrack_mode => p_datetrack_mode,
417 p_validation_start_date => p_validation_start_date,
418 p_validation_end_date => p_validation_end_date);
419 --
420 hr_utility.set_location(' Leaving:'||l_proc, 10);
421 End pre_update;
422 --
423 -- ----------------------------------------------------------------------------
424 -- |-----------------------------< post_update >------------------------------|
425 -- ----------------------------------------------------------------------------
426 -- {Start Of Comments}
427 --
428 -- Description:
429 -- This private procedure contains any processing which is required after the
430 -- update dml.
431 --
432 -- Prerequisites:
433 -- This is an internal procedure which is called from the upd procedure.
434 --
435 -- In Parameters:
436 -- A Pl/Sql record structre.
437 --
438 -- Post Success:
439 -- Processing continues.
440 --
441 -- Post Failure:
442 -- If an error has occurred, an error message and exception will be raised
443 -- but not handled.
444 --
445 -- Developer Implementation Notes:
446 -- Any post-processing required after the update dml is issued should be
447 -- coded within this procedure. It is important to note that any 3rd party
448 -- maintenance should be reviewed before placing in this procedure.
449 --
450 -- Access Status:
451 -- Internal Row Handler Use Only.
452 --
453 -- {End Of Comments}
454 -- ----------------------------------------------------------------------------
455 Procedure post_update
456 (p_rec in ben_elp_shd.g_rec_type,
457 p_effective_date in date,
458 p_datetrack_mode in varchar2,
459 p_validation_start_date in date,
460 p_validation_end_date in date) is
461 --
462 l_proc varchar2(72) := g_package||'post_update';
463 --
464 Begin
465 hr_utility.set_location('Entering:'||l_proc, 5);
466 --
467 --
468 -- Start of API User Hook for post_update.
469 --
470 begin
471 --
472 ben_elp_rku.after_update
473 (p_eligy_prfl_id =>p_rec.eligy_prfl_id
474 ,p_effective_start_date =>p_rec.effective_start_date
475 ,p_effective_end_date =>p_rec.effective_end_date
476 ,p_name =>p_rec.name
477 ,p_description =>p_rec.description
478 ,p_stat_cd =>p_rec.stat_cd
479 ,p_asmt_to_use_cd =>p_rec.asmt_to_use_cd
480 ,p_elig_enrld_plip_flag =>p_rec.elig_enrld_plip_flag
481 ,p_elig_cbr_quald_bnf_flag =>p_rec.elig_cbr_quald_bnf_flag
482 ,p_elig_enrld_ptip_flag =>p_rec.elig_enrld_ptip_flag
483 ,p_elig_dpnt_cvrd_plip_flag =>p_rec.elig_dpnt_cvrd_plip_flag
484 ,p_elig_dpnt_cvrd_ptip_flag =>p_rec.elig_dpnt_cvrd_ptip_flag
485 ,p_elig_dpnt_cvrd_pgm_flag =>p_rec.elig_dpnt_cvrd_pgm_flag
486 ,p_elig_job_flag =>p_rec.elig_job_flag
487 ,p_elig_hrly_slrd_flag =>p_rec.elig_hrly_slrd_flag
488 ,p_elig_pstl_cd_flag =>p_rec.elig_pstl_cd_flag
489 ,p_elig_lbr_mmbr_flag =>p_rec.elig_lbr_mmbr_flag
490 ,p_elig_lgl_enty_flag =>p_rec.elig_lgl_enty_flag
491 ,p_elig_benfts_grp_flag =>p_rec.elig_benfts_grp_flag
492 ,p_elig_wk_loc_flag =>p_rec.elig_wk_loc_flag
493 ,p_elig_brgng_unit_flag =>p_rec.elig_brgng_unit_flag
494 ,p_elig_age_flag =>p_rec.elig_age_flag
495 ,p_elig_los_flag =>p_rec.elig_los_flag
496 ,p_elig_per_typ_flag =>p_rec.elig_per_typ_flag
497 ,p_elig_fl_tm_pt_tm_flag =>p_rec.elig_fl_tm_pt_tm_flag
498 ,p_elig_ee_stat_flag =>p_rec.elig_ee_stat_flag
499 ,p_elig_grd_flag =>p_rec.elig_grd_flag
500 ,p_elig_pct_fl_tm_flag =>p_rec.elig_pct_fl_tm_flag
501 ,p_elig_asnt_set_flag =>p_rec.elig_asnt_set_flag
502 ,p_elig_hrs_wkd_flag =>p_rec.elig_hrs_wkd_flag
503 ,p_elig_comp_lvl_flag =>p_rec.elig_comp_lvl_flag
504 ,p_elig_org_unit_flag =>p_rec.elig_org_unit_flag
505 ,p_elig_loa_rsn_flag =>p_rec.elig_loa_rsn_flag
506 ,p_elig_pyrl_flag =>p_rec.elig_pyrl_flag
507 ,p_elig_schedd_hrs_flag =>p_rec.elig_schedd_hrs_flag
508 ,p_elig_py_bss_flag =>p_rec.elig_py_bss_flag
509 ,p_eligy_prfl_rl_flag =>p_rec.eligy_prfl_rl_flag
510 ,p_elig_cmbn_age_los_flag =>p_rec.elig_cmbn_age_los_flag
511 ,p_cntng_prtn_elig_prfl_flag=>p_rec.cntng_prtn_elig_prfl_flag
512 ,p_elig_prtt_pl_flag =>p_rec.elig_prtt_pl_flag
513 ,p_elig_ppl_grp_flag =>p_rec.elig_ppl_grp_flag
514 ,p_elig_svc_area_flag =>p_rec.elig_svc_area_flag
515 ,p_elig_ptip_prte_flag =>p_rec.elig_ptip_prte_flag
516 ,p_elig_no_othr_cvg_flag =>p_rec.elig_no_othr_cvg_flag
517 ,p_elig_enrld_pl_flag =>p_rec.elig_enrld_pl_flag
518 ,p_elig_enrld_oipl_flag =>p_rec.elig_enrld_oipl_flag
519 ,p_elig_enrld_pgm_flag =>p_rec.elig_enrld_pgm_flag
520 ,p_elig_dpnt_cvrd_pl_flag =>p_rec.elig_dpnt_cvrd_pl_flag
521 ,p_elig_lvg_rsn_flag =>p_rec.elig_lvg_rsn_flag
522 ,p_elig_optd_mdcr_flag =>p_rec.elig_optd_mdcr_flag
523 ,p_elig_tbco_use_flag =>p_rec.elig_tbco_use_flag
524 ,p_elig_dpnt_othr_ptip_flag =>p_rec.elig_dpnt_othr_ptip_flag
525 ,p_business_group_id =>p_rec.business_group_id
526 ,p_elp_attribute_category =>p_rec.elp_attribute_category
527 ,p_elp_attribute1 =>p_rec.elp_attribute1
528 ,p_elp_attribute2 =>p_rec.elp_attribute2
529 ,p_elp_attribute3 =>p_rec.elp_attribute3
530 ,p_elp_attribute4 =>p_rec.elp_attribute4
531 ,p_elp_attribute5 =>p_rec.elp_attribute5
532 ,p_elp_attribute6 =>p_rec.elp_attribute6
533 ,p_elp_attribute7 =>p_rec.elp_attribute7
534 ,p_elp_attribute8 =>p_rec.elp_attribute8
535 ,p_elp_attribute9 =>p_rec.elp_attribute9
536 ,p_elp_attribute10 =>p_rec.elp_attribute10
537 ,p_elp_attribute11 =>p_rec.elp_attribute11
538 ,p_elp_attribute12 =>p_rec.elp_attribute12
539 ,p_elp_attribute13 =>p_rec.elp_attribute13
540 ,p_elp_attribute14 =>p_rec.elp_attribute14
541 ,p_elp_attribute15 =>p_rec.elp_attribute15
542 ,p_elp_attribute16 =>p_rec.elp_attribute16
543 ,p_elp_attribute17 =>p_rec.elp_attribute17
544 ,p_elp_attribute18 =>p_rec.elp_attribute18
545 ,p_elp_attribute19 =>p_rec.elp_attribute19
546 ,p_elp_attribute20 =>p_rec.elp_attribute20
547 ,p_elp_attribute21 =>p_rec.elp_attribute21
548 ,p_elp_attribute22 =>p_rec.elp_attribute22
549 ,p_elp_attribute23 =>p_rec.elp_attribute23
550 ,p_elp_attribute24 =>p_rec.elp_attribute24
551 ,p_elp_attribute25 =>p_rec.elp_attribute25
552 ,p_elp_attribute26 =>p_rec.elp_attribute26
553 ,p_elp_attribute27 =>p_rec.elp_attribute27
554 ,p_elp_attribute28 =>p_rec.elp_attribute28
555 ,p_elp_attribute29 =>p_rec.elp_attribute29
556 ,p_elp_attribute30 =>p_rec.elp_attribute30
557 ,p_elig_mrtl_sts_flag =>p_rec.elig_mrtl_sts_flag
558 ,p_elig_gndr_flag =>p_rec.elig_gndr_flag
559 ,p_elig_dsblty_ctg_flag =>p_rec.elig_dsblty_ctg_flag
560 ,p_elig_dsblty_rsn_flag =>p_rec.elig_dsblty_rsn_flag
561 ,p_elig_dsblty_dgr_flag =>p_rec.elig_dsblty_dgr_flag
562 ,p_elig_suppl_role_flag =>p_rec.elig_suppl_role_flag
563 ,p_elig_qual_titl_flag =>p_rec.elig_qual_titl_flag
564 ,p_elig_pstn_flag =>p_rec.elig_pstn_flag
565 ,p_elig_prbtn_perd_flag =>p_rec.elig_prbtn_perd_flag
566 ,p_elig_sp_clng_prg_pt_flag =>p_rec.elig_sp_clng_prg_pt_flag
567 ,p_bnft_cagr_prtn_cd =>p_rec.bnft_cagr_prtn_cd
568 ,p_elig_dsbld_flag =>p_rec.elig_dsbld_flag
569 ,p_elig_ttl_cvg_vol_flag =>p_rec.elig_ttl_cvg_vol_flag
570 ,p_elig_ttl_prtt_flag =>p_rec.elig_ttl_prtt_flag
571 ,p_elig_comptncy_flag =>p_rec.elig_comptncy_flag
572 ,p_elig_hlth_cvg_flag =>p_rec.elig_hlth_cvg_flag
573 ,p_elig_anthr_pl_flag =>p_rec.elig_anthr_pl_flag
574 ,p_elig_qua_in_gr_flag =>p_rec.elig_qua_in_gr_flag
575 ,p_elig_perf_rtng_flag =>p_rec.elig_perf_rtng_flag
576 ,p_elig_crit_values_flag =>p_rec.elig_crit_values_flag /* RBC */
577 ,p_object_version_number =>p_rec.object_version_number
578 ,p_effective_date =>p_effective_date
579 ,p_datetrack_mode =>p_datetrack_mode
580 ,p_validation_start_date =>p_validation_start_date
581 ,p_validation_end_date =>p_validation_end_date
582 ,p_effective_start_date_o =>ben_elp_shd.g_old_rec.effective_start_date
583 ,p_effective_end_date_o =>ben_elp_shd.g_old_rec.effective_end_date
584 ,p_name_o =>ben_elp_shd.g_old_rec.name
585 ,p_description_o =>ben_elp_shd.g_old_rec.description
586 ,p_stat_cd_o =>ben_elp_shd.g_old_rec.stat_cd
587 ,p_asmt_to_use_cd_o =>ben_elp_shd.g_old_rec.asmt_to_use_cd
588 ,p_elig_enrld_plip_flag_o =>ben_elp_shd.g_old_rec.elig_enrld_plip_flag
589 ,p_elig_cbr_quald_bnf_flag_o=>ben_elp_shd.g_old_rec.elig_cbr_quald_bnf_flag
590 ,p_elig_enrld_ptip_flag_o =>ben_elp_shd.g_old_rec.elig_enrld_ptip_flag
591 ,p_elig_dpnt_cvrd_plip_flag_o=>ben_elp_shd.g_old_rec.elig_dpnt_cvrd_plip_flag
592 ,p_elig_dpnt_cvrd_ptip_flag_o=>ben_elp_shd.g_old_rec.elig_dpnt_cvrd_ptip_flag
593 ,p_elig_dpnt_cvrd_pgm_flag_o=>ben_elp_shd.g_old_rec.elig_dpnt_cvrd_pgm_flag
594 ,p_elig_job_flag_o =>ben_elp_shd.g_old_rec.elig_job_flag
595 ,p_elig_hrly_slrd_flag_o =>ben_elp_shd.g_old_rec.elig_hrly_slrd_flag
596 ,p_elig_pstl_cd_flag_o =>ben_elp_shd.g_old_rec.elig_pstl_cd_flag
597 ,p_elig_lbr_mmbr_flag_o =>ben_elp_shd.g_old_rec.elig_lbr_mmbr_flag
598 ,p_elig_lgl_enty_flag_o =>ben_elp_shd.g_old_rec.elig_lgl_enty_flag
599 ,p_elig_benfts_grp_flag_o =>ben_elp_shd.g_old_rec.elig_benfts_grp_flag
600 ,p_elig_wk_loc_flag_o =>ben_elp_shd.g_old_rec.elig_wk_loc_flag
601 ,p_elig_brgng_unit_flag_o =>ben_elp_shd.g_old_rec.elig_brgng_unit_flag
602 ,p_elig_age_flag_o =>ben_elp_shd.g_old_rec.elig_age_flag
603 ,p_elig_los_flag_o =>ben_elp_shd.g_old_rec.elig_los_flag
604 ,p_elig_per_typ_flag_o =>ben_elp_shd.g_old_rec.elig_per_typ_flag
605 ,p_elig_fl_tm_pt_tm_flag_o =>ben_elp_shd.g_old_rec.elig_fl_tm_pt_tm_flag
606 ,p_elig_ee_stat_flag_o =>ben_elp_shd.g_old_rec.elig_ee_stat_flag
607 ,p_elig_grd_flag_o =>ben_elp_shd.g_old_rec.elig_grd_flag
608 ,p_elig_pct_fl_tm_flag_o =>ben_elp_shd.g_old_rec.elig_pct_fl_tm_flag
609 ,p_elig_asnt_set_flag_o =>ben_elp_shd.g_old_rec.elig_asnt_set_flag
610 ,p_elig_hrs_wkd_flag_o =>ben_elp_shd.g_old_rec.elig_hrs_wkd_flag
611 ,p_elig_comp_lvl_flag_o =>ben_elp_shd.g_old_rec.elig_comp_lvl_flag
612 ,p_elig_org_unit_flag_o =>ben_elp_shd.g_old_rec.elig_org_unit_flag
613 ,p_elig_loa_rsn_flag_o =>ben_elp_shd.g_old_rec.elig_loa_rsn_flag
614 ,p_elig_pyrl_flag_o =>ben_elp_shd.g_old_rec.elig_pyrl_flag
615 ,p_elig_schedd_hrs_flag_o =>ben_elp_shd.g_old_rec.elig_schedd_hrs_flag
616 ,p_elig_py_bss_flag_o =>ben_elp_shd.g_old_rec.elig_py_bss_flag
617 ,p_eligy_prfl_rl_flag_o =>ben_elp_shd.g_old_rec.eligy_prfl_rl_flag
618 ,p_elig_cmbn_age_los_flag_o =>ben_elp_shd.g_old_rec.elig_cmbn_age_los_flag
619 ,p_cntng_prtn_elig_prfl_flag_o=>ben_elp_shd.g_old_rec.cntng_prtn_elig_prfl_flag
620 ,p_elig_prtt_pl_flag_o =>ben_elp_shd.g_old_rec.elig_prtt_pl_flag
621 ,p_elig_ppl_grp_flag_o =>ben_elp_shd.g_old_rec.elig_ppl_grp_flag
622 ,p_elig_svc_area_flag_o =>ben_elp_shd.g_old_rec.elig_svc_area_flag
623 ,p_elig_ptip_prte_flag_o =>ben_elp_shd.g_old_rec.elig_ptip_prte_flag
624 ,p_elig_no_othr_cvg_flag_o =>ben_elp_shd.g_old_rec.elig_no_othr_cvg_flag
625 ,p_elig_enrld_pl_flag_o =>ben_elp_shd.g_old_rec.elig_enrld_pl_flag
626 ,p_elig_enrld_oipl_flag_o =>ben_elp_shd.g_old_rec.elig_enrld_oipl_flag
627 ,p_elig_enrld_pgm_flag_o =>ben_elp_shd.g_old_rec.elig_enrld_pgm_flag
628 ,p_elig_dpnt_cvrd_pl_flag_o =>ben_elp_shd.g_old_rec.elig_dpnt_cvrd_pl_flag
629 ,p_elig_lvg_rsn_flag_o =>ben_elp_shd.g_old_rec.elig_lvg_rsn_flag
630 ,p_elig_optd_mdcr_flag_o =>ben_elp_shd.g_old_rec.elig_optd_mdcr_flag
631 ,p_elig_tbco_use_flag_o =>ben_elp_shd.g_old_rec.elig_tbco_use_flag
632 ,p_elig_dpnt_othr_ptip_flag_o =>ben_elp_shd.g_old_rec.elig_dpnt_othr_ptip_flag
633 ,p_business_group_id_o =>ben_elp_shd.g_old_rec.business_group_id
634 ,p_elp_attribute_category_o =>ben_elp_shd.g_old_rec.elp_attribute_category
635 ,p_elp_attribute1_o =>ben_elp_shd.g_old_rec.elp_attribute1
636 ,p_elp_attribute2_o =>ben_elp_shd.g_old_rec.elp_attribute2
637 ,p_elp_attribute3_o =>ben_elp_shd.g_old_rec.elp_attribute3
638 ,p_elp_attribute4_o =>ben_elp_shd.g_old_rec.elp_attribute4
639 ,p_elp_attribute5_o =>ben_elp_shd.g_old_rec.elp_attribute5
640 ,p_elp_attribute6_o =>ben_elp_shd.g_old_rec.elp_attribute6
641 ,p_elp_attribute7_o =>ben_elp_shd.g_old_rec.elp_attribute7
642 ,p_elp_attribute8_o =>ben_elp_shd.g_old_rec.elp_attribute8
643 ,p_elp_attribute9_o =>ben_elp_shd.g_old_rec.elp_attribute9
644 ,p_elp_attribute10_o =>ben_elp_shd.g_old_rec.elp_attribute10
645 ,p_elp_attribute11_o =>ben_elp_shd.g_old_rec.elp_attribute11
646 ,p_elp_attribute12_o =>ben_elp_shd.g_old_rec.elp_attribute12
647 ,p_elp_attribute13_o =>ben_elp_shd.g_old_rec.elp_attribute13
648 ,p_elp_attribute14_o =>ben_elp_shd.g_old_rec.elp_attribute14
649 ,p_elp_attribute15_o =>ben_elp_shd.g_old_rec.elp_attribute15
650 ,p_elp_attribute16_o =>ben_elp_shd.g_old_rec.elp_attribute16
651 ,p_elp_attribute17_o =>ben_elp_shd.g_old_rec.elp_attribute17
652 ,p_elp_attribute18_o =>ben_elp_shd.g_old_rec.elp_attribute18
653 ,p_elp_attribute19_o =>ben_elp_shd.g_old_rec.elp_attribute19
654 ,p_elp_attribute20_o =>ben_elp_shd.g_old_rec.elp_attribute20
655 ,p_elp_attribute21_o =>ben_elp_shd.g_old_rec.elp_attribute21
656 ,p_elp_attribute22_o =>ben_elp_shd.g_old_rec.elp_attribute22
657 ,p_elp_attribute23_o =>ben_elp_shd.g_old_rec.elp_attribute23
658 ,p_elp_attribute24_o =>ben_elp_shd.g_old_rec.elp_attribute24
659 ,p_elp_attribute25_o =>ben_elp_shd.g_old_rec.elp_attribute25
660 ,p_elp_attribute26_o =>ben_elp_shd.g_old_rec.elp_attribute26
661 ,p_elp_attribute27_o =>ben_elp_shd.g_old_rec.elp_attribute27
662 ,p_elp_attribute28_o =>ben_elp_shd.g_old_rec.elp_attribute28
663 ,p_elp_attribute29_o =>ben_elp_shd.g_old_rec.elp_attribute29
664 ,p_elp_attribute30_o =>ben_elp_shd.g_old_rec.elp_attribute30
665 ,p_elig_mrtl_sts_flag_o =>ben_elp_shd.g_old_rec.elig_mrtl_sts_flag
666 ,p_elig_gndr_flag_o =>ben_elp_shd.g_old_rec.elig_gndr_flag
667 ,p_elig_dsblty_ctg_flag_o =>ben_elp_shd.g_old_rec.elig_dsblty_ctg_flag
668 ,p_elig_dsblty_rsn_flag_o =>ben_elp_shd.g_old_rec.elig_dsblty_rsn_flag
669 ,p_elig_dsblty_dgr_flag_o =>ben_elp_shd.g_old_rec.elig_dsblty_dgr_flag
670 ,p_elig_suppl_role_flag_o =>ben_elp_shd.g_old_rec.elig_suppl_role_flag
671 ,p_elig_qual_titl_flag_o =>ben_elp_shd.g_old_rec.elig_qual_titl_flag
672 ,p_elig_pstn_flag_o =>ben_elp_shd.g_old_rec.elig_pstn_flag
673 ,p_elig_prbtn_perd_flag_o =>ben_elp_shd.g_old_rec.elig_prbtn_perd_flag
674 ,p_elig_sp_clng_prg_pt_flag_o=>ben_elp_shd.g_old_rec.elig_sp_clng_prg_pt_flag
675 ,p_bnft_cagr_prtn_cd_o =>ben_elp_shd.g_old_rec.bnft_cagr_prtn_cd
676 ,p_elig_dsbld_flag_o =>ben_elp_shd.g_old_rec.elig_dsbld_flag
677 ,p_elig_ttl_cvg_vol_flag_o =>ben_elp_shd.g_old_rec.elig_ttl_cvg_vol_flag
678 ,p_elig_ttl_prtt_flag_o =>ben_elp_shd.g_old_rec.elig_ttl_prtt_flag
679 ,p_elig_comptncy_flag_o =>ben_elp_shd.g_old_rec.elig_comptncy_flag
680 ,p_elig_hlth_cvg_flag_o =>ben_elp_shd.g_old_rec.elig_hlth_cvg_flag
681 ,p_elig_anthr_pl_flag_o =>ben_elp_shd.g_old_rec.elig_anthr_pl_flag
682 ,p_elig_qua_in_gr_flag_o =>ben_elp_shd.g_old_rec.elig_qua_in_gr_flag
683 ,p_elig_perf_rtng_flag_o =>ben_elp_shd.g_old_rec.elig_perf_rtng_flag
684 ,p_elig_crit_values_flag_o =>ben_elp_shd.g_old_rec.elig_crit_values_flag /* RBC */
685 ,p_object_version_number_o =>ben_elp_shd.g_old_rec.object_version_number );
686 --
687 exception
688 --
689 when hr_api.cannot_find_prog_unit then
690 --
691 hr_api.cannot_find_prog_unit_error
692 (p_module_name => 'ben_eligy_prfl_f'
693 ,p_hook_type => 'AU');
694 --
695 end;
696 --
697 -- End of API User Hook for post_update.
698 --
699 --
700 hr_utility.set_location(' Leaving:'||l_proc, 10);
701 End post_update;
702 --
703 -- ----------------------------------------------------------------------------
704 -- |-----------------------------< convert_defs >-----------------------------|
705 -- ----------------------------------------------------------------------------
706 -- {Start Of Comments}
707 --
708 -- Description:
709 -- The Convert_Defs procedure has one very important function:
710 -- It must return the record structure for the row with all system defaulted
711 -- values converted into its corresponding parameter value for update. When
712 -- we attempt to update a row through the Upd process , certain
713 -- parameters can be defaulted which enables flexibility in the calling of
714 -- the upd process (e.g. only attributes which need to be updated need to be
715 -- specified). For the upd process to determine which attributes
716 -- have NOT been specified we need to check if the parameter has a reserved
717 -- system default value. Therefore, for all parameters which have a
718 -- corresponding reserved system default mechanism specified we need to
719 -- check if a system default is being used. If a system default is being
720 -- used then we convert the defaulted value into its corresponding attribute
721 -- value held in the g_old_rec data structure.
722 --
723 -- Prerequisites:
724 -- This private function can only be called from the upd process.
725 --
726 -- In Parameters:
727 -- A Pl/Sql record structre.
728 --
729 -- Post Success:
730 -- The record structure will be returned with all system defaulted parameter
731 -- values converted into its current row attribute value.
732 --
733 -- Post Failure:
734 -- No direct error handling is required within this function. Any possible
735 -- errors within this procedure will be a PL/SQL value error due to conversion
736 -- of datatypes or data lengths.
737 --
738 -- Developer Implementation Notes:
739 -- None.
740 --
741 -- Access Status:
742 -- Internal Row Handler Use Only.
743 --
744 -- {End Of Comments}
745 -- ----------------------------------------------------------------------------
746 Procedure convert_defs(p_rec in out nocopy ben_elp_shd.g_rec_type) is
747 --
748 l_proc varchar2(72) := g_package||'convert_defs';
749 --
750 Begin
751 --
752 hr_utility.set_location('Entering:'||l_proc, 5);
753 --
754 -- We must now examine each argument value in the
755 -- p_rec plsql record structure
756 -- to see if a system default is being used. If a system default
757 -- is being used then we must set to the 'current' argument value.
758 --
759 If (p_rec.name = hr_api.g_varchar2) then
760 p_rec.name :=
761 ben_elp_shd.g_old_rec.name;
762 End If;
763 If (p_rec.description = hr_api.g_varchar2) then
764 p_rec.description :=
765 ben_elp_shd.g_old_rec.description;
766 End If;
767 If (p_rec.stat_cd = hr_api.g_varchar2) then
768 p_rec.stat_cd :=
769 ben_elp_shd.g_old_rec.stat_cd;
770 End If;
771 if (p_rec.elig_enrld_plip_flag = hr_api.g_varchar2) then
772 p_rec.elig_enrld_plip_flag :=
773 ben_elp_shd.g_old_rec.elig_enrld_plip_flag;
774 End If;
775 if (p_rec.elig_cbr_quald_bnf_flag = hr_api.g_varchar2) then
776 p_rec.elig_cbr_quald_bnf_flag :=
777 ben_elp_shd.g_old_rec.elig_cbr_quald_bnf_flag;
778 End If;
779 if (p_rec.elig_enrld_ptip_flag = hr_api.g_varchar2) then
780 p_rec.elig_enrld_ptip_flag :=
781 ben_elp_shd.g_old_rec.elig_enrld_ptip_flag;
782 End If;
783 if (p_rec.elig_dpnt_cvrd_plip_flag = hr_api.g_varchar2) then
784 p_rec.elig_dpnt_cvrd_plip_flag :=
785 ben_elp_shd.g_old_rec.elig_dpnt_cvrd_plip_flag;
786 End If;
787 if (p_rec.elig_dpnt_cvrd_ptip_flag = hr_api.g_varchar2) then
788 p_rec.elig_dpnt_cvrd_ptip_flag :=
789 ben_elp_shd.g_old_rec.elig_dpnt_cvrd_ptip_flag;
790 End If;
791 if (p_rec.elig_dpnt_cvrd_pgm_flag = hr_api.g_varchar2) then
792 p_rec.elig_dpnt_cvrd_pgm_flag :=
793 ben_elp_shd.g_old_rec.elig_dpnt_cvrd_pgm_flag;
794 End If;
795 if (p_rec.elig_job_flag = hr_api.g_varchar2) then
796 p_rec.elig_job_flag :=
797 ben_elp_shd.g_old_rec.elig_job_flag;
798 End If;
799 if (p_rec.elig_hrly_slrd_flag = hr_api.g_varchar2) then
800 p_rec.elig_hrly_slrd_flag :=
801 ben_elp_shd.g_old_rec.elig_hrly_slrd_flag;
802 End If;
803 if (p_rec.elig_pstl_cd_flag = hr_api.g_varchar2) then
804 p_rec.elig_pstl_cd_flag :=
805 ben_elp_shd.g_old_rec.elig_pstl_cd_flag;
806 End If;
807 if (p_rec.elig_lbr_mmbr_flag = hr_api.g_varchar2) then
808 p_rec.elig_lbr_mmbr_flag :=
809 ben_elp_shd.g_old_rec.elig_lbr_mmbr_flag;
810 End If;
811 if (p_rec.elig_lgl_enty_flag = hr_api.g_varchar2) then
812 p_rec.elig_lgl_enty_flag :=
813 ben_elp_shd.g_old_rec.elig_lgl_enty_flag;
814 End If;
815 if (p_rec.elig_benfts_grp_flag = hr_api.g_varchar2) then
816 p_rec.elig_benfts_grp_flag :=
817 ben_elp_shd.g_old_rec.elig_benfts_grp_flag;
818 End If;
819 if (p_rec.elig_wk_loc_flag = hr_api.g_varchar2) then
820 p_rec.elig_wk_loc_flag :=
821 ben_elp_shd.g_old_rec.elig_wk_loc_flag;
822 End If;
823 if (p_rec.elig_brgng_unit_flag = hr_api.g_varchar2) then
824 p_rec.elig_brgng_unit_flag :=
825 ben_elp_shd.g_old_rec.elig_brgng_unit_flag;
826 End If;
827 if (p_rec.elig_age_flag = hr_api.g_varchar2) then
828 p_rec.elig_age_flag :=
829 ben_elp_shd.g_old_rec.elig_age_flag;
830 End If;
831 if (p_rec.elig_los_flag = hr_api.g_varchar2) then
832 p_rec.elig_los_flag :=
833 ben_elp_shd.g_old_rec.elig_los_flag;
834 End If;
835 if (p_rec.elig_per_typ_flag = hr_api.g_varchar2) then
836 p_rec.elig_per_typ_flag :=
837 ben_elp_shd.g_old_rec.elig_per_typ_flag;
838 End If;
839 if (p_rec.elig_fl_tm_pt_tm_flag = hr_api.g_varchar2) then
840 p_rec.elig_fl_tm_pt_tm_flag :=
841 ben_elp_shd.g_old_rec.elig_fl_tm_pt_tm_flag;
842 End If;
843 if (p_rec.elig_ee_stat_flag = hr_api.g_varchar2) then
844 p_rec.elig_ee_stat_flag :=
845 ben_elp_shd.g_old_rec.elig_ee_stat_flag;
846 End If;
847 if (p_rec.elig_grd_flag = hr_api.g_varchar2) then
848 p_rec.elig_grd_flag :=
849 ben_elp_shd.g_old_rec.elig_grd_flag;
850 End If;
851 if (p_rec.elig_pct_fl_tm_flag = hr_api.g_varchar2) then
852 p_rec.elig_pct_fl_tm_flag :=
853 ben_elp_shd.g_old_rec.elig_pct_fl_tm_flag;
854 End If;
855 if (p_rec.elig_asnt_set_flag = hr_api.g_varchar2) then
856 p_rec.elig_asnt_set_flag :=
857 ben_elp_shd.g_old_rec.elig_asnt_set_flag;
858 End If;
859 if (p_rec.elig_hrs_wkd_flag = hr_api.g_varchar2) then
860 p_rec.elig_hrs_wkd_flag :=
861 ben_elp_shd.g_old_rec.elig_hrs_wkd_flag;
862 End If;
863 if (p_rec.elig_comp_lvl_flag = hr_api.g_varchar2) then
864 p_rec.elig_comp_lvl_flag :=
865 ben_elp_shd.g_old_rec.elig_comp_lvl_flag;
866 End If;
867 if (p_rec.elig_org_unit_flag = hr_api.g_varchar2) then
868 p_rec.elig_org_unit_flag :=
869 ben_elp_shd.g_old_rec.elig_org_unit_flag;
870 End If;
871 if (p_rec.elig_loa_rsn_flag = hr_api.g_varchar2) then
872 p_rec.elig_loa_rsn_flag :=
873 ben_elp_shd.g_old_rec.elig_loa_rsn_flag;
874 End If;
875 if (p_rec.elig_pyrl_flag = hr_api.g_varchar2) then
876 p_rec.elig_pyrl_flag :=
877 ben_elp_shd.g_old_rec.elig_pyrl_flag;
878 End If;
879 if (p_rec.elig_schedd_hrs_flag = hr_api.g_varchar2) then
880 p_rec.elig_schedd_hrs_flag :=
881 ben_elp_shd.g_old_rec.elig_schedd_hrs_flag;
882 End If;
883 if (p_rec.elig_py_bss_flag = hr_api.g_varchar2) then
884 p_rec.elig_py_bss_flag :=
885 ben_elp_shd.g_old_rec.elig_py_bss_flag;
886 End If;
887 if (p_rec.eligy_prfl_rl_flag = hr_api.g_varchar2) then
888 p_rec.eligy_prfl_rl_flag :=
889 ben_elp_shd.g_old_rec.eligy_prfl_rl_flag;
890 End If;
891 if (p_rec.elig_cmbn_age_los_flag = hr_api.g_varchar2) then
892 p_rec.elig_cmbn_age_los_flag :=
893 ben_elp_shd.g_old_rec.elig_cmbn_age_los_flag;
894 End If;
895 if (p_rec.cntng_prtn_elig_prfl_flag = hr_api.g_varchar2) then
896 p_rec.cntng_prtn_elig_prfl_flag :=
897 ben_elp_shd.g_old_rec.cntng_prtn_elig_prfl_flag;
898 End If;
899 if (p_rec.elig_prtt_pl_flag = hr_api.g_varchar2) then
900 p_rec.elig_prtt_pl_flag :=
901 ben_elp_shd.g_old_rec.elig_prtt_pl_flag;
902 End If;
903 if (p_rec.elig_ppl_grp_flag = hr_api.g_varchar2) then
904 p_rec.elig_ppl_grp_flag :=
905 ben_elp_shd.g_old_rec.elig_ppl_grp_flag;
906 End If;
907 if (p_rec.elig_svc_area_flag = hr_api.g_varchar2) then
908 p_rec.elig_svc_area_flag :=
909 ben_elp_shd.g_old_rec.elig_svc_area_flag;
910 End If;
911 if (p_rec.elig_ptip_prte_flag = hr_api.g_varchar2) then
912 p_rec.elig_ptip_prte_flag :=
913 ben_elp_shd.g_old_rec.elig_ptip_prte_flag;
914 End If;
915 if (p_rec.elig_no_othr_cvg_flag = hr_api.g_varchar2) then
916 p_rec.elig_no_othr_cvg_flag :=
917 ben_elp_shd.g_old_rec.elig_no_othr_cvg_flag;
918 End If;
919 if (p_rec.elig_enrld_pl_flag = hr_api.g_varchar2) then
920 p_rec.elig_enrld_pl_flag :=
921 ben_elp_shd.g_old_rec.elig_enrld_pl_flag;
922 End If;
923 if (p_rec.elig_enrld_oipl_flag = hr_api.g_varchar2) then
924 p_rec.elig_enrld_oipl_flag :=
925 ben_elp_shd.g_old_rec.elig_enrld_oipl_flag;
926 End If;
927 if (p_rec.elig_enrld_pgm_flag = hr_api.g_varchar2) then
928 p_rec.elig_enrld_pgm_flag :=
929 ben_elp_shd.g_old_rec.elig_enrld_pgm_flag;
930 End If;
931 if (p_rec.elig_dpnt_cvrd_pl_flag = hr_api.g_varchar2) then
932 p_rec.elig_dpnt_cvrd_pl_flag :=
933 ben_elp_shd.g_old_rec.elig_dpnt_cvrd_pl_flag;
934 End If;
935 if (p_rec.elig_lvg_rsn_flag = hr_api.g_varchar2) then
936 p_rec.elig_lvg_rsn_flag :=
937 ben_elp_shd.g_old_rec.elig_lvg_rsn_flag;
938 End If;
939 if (p_rec.elig_optd_mdcr_flag = hr_api.g_varchar2) then
940 p_rec.elig_optd_mdcr_flag :=
941 ben_elp_shd.g_old_rec.elig_optd_mdcr_flag;
942 End If;
943 if (p_rec.elig_tbco_use_flag = hr_api.g_varchar2) then
944 p_rec.elig_tbco_use_flag :=
945 ben_elp_shd.g_old_rec.elig_tbco_use_flag;
946 End If;
947 if (p_rec.elig_dpnt_othr_ptip_flag = hr_api.g_varchar2) then
948 p_rec.elig_dpnt_othr_ptip_flag :=
949 ben_elp_shd.g_old_rec.elig_dpnt_othr_ptip_flag;
950 End If;
951 If (p_rec.asmt_to_use_cd = hr_api.g_varchar2) then
952 p_rec.asmt_to_use_cd :=
953 ben_elp_shd.g_old_rec.asmt_to_use_cd;
954 End If;
955 If (p_rec.business_group_id = hr_api.g_number) then
956 p_rec.business_group_id :=
957 ben_elp_shd.g_old_rec.business_group_id;
958 End If;
959 If (p_rec.elp_attribute_category = hr_api.g_varchar2) then
960 p_rec.elp_attribute_category :=
961 ben_elp_shd.g_old_rec.elp_attribute_category;
962 End If;
963 If (p_rec.elp_attribute1 = hr_api.g_varchar2) then
964 p_rec.elp_attribute1 :=
965 ben_elp_shd.g_old_rec.elp_attribute1;
966 End If;
967 If (p_rec.elp_attribute2 = hr_api.g_varchar2) then
968 p_rec.elp_attribute2 :=
969 ben_elp_shd.g_old_rec.elp_attribute2;
970 End If;
971 If (p_rec.elp_attribute3 = hr_api.g_varchar2) then
972 p_rec.elp_attribute3 :=
973 ben_elp_shd.g_old_rec.elp_attribute3;
974 End If;
975 If (p_rec.elp_attribute4 = hr_api.g_varchar2) then
976 p_rec.elp_attribute4 :=
977 ben_elp_shd.g_old_rec.elp_attribute4;
978 End If;
979 If (p_rec.elp_attribute5 = hr_api.g_varchar2) then
980 p_rec.elp_attribute5 :=
981 ben_elp_shd.g_old_rec.elp_attribute5;
982 End If;
983 If (p_rec.elp_attribute6 = hr_api.g_varchar2) then
984 p_rec.elp_attribute6 :=
985 ben_elp_shd.g_old_rec.elp_attribute6;
986 End If;
987 If (p_rec.elp_attribute7 = hr_api.g_varchar2) then
988 p_rec.elp_attribute7 :=
989 ben_elp_shd.g_old_rec.elp_attribute7;
990 End If;
991 If (p_rec.elp_attribute8 = hr_api.g_varchar2) then
992 p_rec.elp_attribute8 :=
993 ben_elp_shd.g_old_rec.elp_attribute8;
994 End If;
995 If (p_rec.elp_attribute9 = hr_api.g_varchar2) then
996 p_rec.elp_attribute9 :=
997 ben_elp_shd.g_old_rec.elp_attribute9;
998 End If;
999 If (p_rec.elp_attribute10 = hr_api.g_varchar2) then
1000 p_rec.elp_attribute10 :=
1001 ben_elp_shd.g_old_rec.elp_attribute10;
1002 End If;
1003 If (p_rec.elp_attribute11 = hr_api.g_varchar2) then
1004 p_rec.elp_attribute11 :=
1005 ben_elp_shd.g_old_rec.elp_attribute11;
1006 End If;
1007 If (p_rec.elp_attribute12 = hr_api.g_varchar2) then
1008 p_rec.elp_attribute12 :=
1009 ben_elp_shd.g_old_rec.elp_attribute12;
1010 End If;
1011 If (p_rec.elp_attribute13 = hr_api.g_varchar2) then
1012 p_rec.elp_attribute13 :=
1013 ben_elp_shd.g_old_rec.elp_attribute13;
1014 End If;
1015 If (p_rec.elp_attribute14 = hr_api.g_varchar2) then
1016 p_rec.elp_attribute14 :=
1017 ben_elp_shd.g_old_rec.elp_attribute14;
1018 End If;
1019 If (p_rec.elp_attribute15 = hr_api.g_varchar2) then
1020 p_rec.elp_attribute15 :=
1021 ben_elp_shd.g_old_rec.elp_attribute15;
1022 End If;
1023 If (p_rec.elp_attribute16 = hr_api.g_varchar2) then
1024 p_rec.elp_attribute16 :=
1025 ben_elp_shd.g_old_rec.elp_attribute16;
1026 End If;
1027 If (p_rec.elp_attribute17 = hr_api.g_varchar2) then
1028 p_rec.elp_attribute17 :=
1029 ben_elp_shd.g_old_rec.elp_attribute17;
1030 End If;
1031 If (p_rec.elp_attribute18 = hr_api.g_varchar2) then
1032 p_rec.elp_attribute18 :=
1033 ben_elp_shd.g_old_rec.elp_attribute18;
1034 End If;
1035 If (p_rec.elp_attribute19 = hr_api.g_varchar2) then
1036 p_rec.elp_attribute19 :=
1037 ben_elp_shd.g_old_rec.elp_attribute19;
1038 End If;
1039 If (p_rec.elp_attribute20 = hr_api.g_varchar2) then
1040 p_rec.elp_attribute20 :=
1041 ben_elp_shd.g_old_rec.elp_attribute20;
1042 End If;
1043 If (p_rec.elp_attribute21 = hr_api.g_varchar2) then
1044 p_rec.elp_attribute21 :=
1045 ben_elp_shd.g_old_rec.elp_attribute21;
1046 End If;
1047 If (p_rec.elp_attribute22 = hr_api.g_varchar2) then
1048 p_rec.elp_attribute22 :=
1049 ben_elp_shd.g_old_rec.elp_attribute22;
1050 End If;
1051 If (p_rec.elp_attribute23 = hr_api.g_varchar2) then
1052 p_rec.elp_attribute23 :=
1053 ben_elp_shd.g_old_rec.elp_attribute23;
1054 End If;
1055 If (p_rec.elp_attribute24 = hr_api.g_varchar2) then
1056 p_rec.elp_attribute24 :=
1057 ben_elp_shd.g_old_rec.elp_attribute24;
1058 End If;
1059 If (p_rec.elp_attribute25 = hr_api.g_varchar2) then
1060 p_rec.elp_attribute25 :=
1061 ben_elp_shd.g_old_rec.elp_attribute25;
1062 End If;
1063 If (p_rec.elp_attribute26 = hr_api.g_varchar2) then
1064 p_rec.elp_attribute26 :=
1065 ben_elp_shd.g_old_rec.elp_attribute26;
1066 End If;
1067 If (p_rec.elp_attribute27 = hr_api.g_varchar2) then
1068 p_rec.elp_attribute27 :=
1069 ben_elp_shd.g_old_rec.elp_attribute27;
1070 End If;
1071 If (p_rec.elp_attribute28 = hr_api.g_varchar2) then
1072 p_rec.elp_attribute28 :=
1073 ben_elp_shd.g_old_rec.elp_attribute28;
1074 End If;
1075 If (p_rec.elp_attribute29 = hr_api.g_varchar2) then
1076 p_rec.elp_attribute29 :=
1077 ben_elp_shd.g_old_rec.elp_attribute29;
1078 End If;
1079 If (p_rec.elp_attribute30 = hr_api.g_varchar2) then
1080 p_rec.elp_attribute30 :=
1081 ben_elp_shd.g_old_rec.elp_attribute30;
1082 End If;
1083 If (p_rec.elig_mrtl_sts_flag = hr_api.g_varchar2) then
1084 p_rec.elig_mrtl_sts_flag :=
1085 ben_elp_shd.g_old_rec.elig_mrtl_sts_flag;
1086 End If;
1087 If (p_rec.elig_gndr_flag = hr_api.g_varchar2) then
1088 p_rec.elig_gndr_flag :=
1089 ben_elp_shd.g_old_rec.elig_gndr_flag;
1090 End If;
1091 If (p_rec.elig_dsblty_ctg_flag = hr_api.g_varchar2) then
1092 p_rec.elig_dsblty_ctg_flag :=
1093 ben_elp_shd.g_old_rec.elig_dsblty_ctg_flag;
1094 End If;
1095 If (p_rec.elig_dsblty_rsn_flag = hr_api.g_varchar2) then
1096 p_rec.elig_dsblty_rsn_flag :=
1097 ben_elp_shd.g_old_rec.elig_dsblty_rsn_flag;
1098 End If;
1099 If (p_rec.elig_dsblty_dgr_flag = hr_api.g_varchar2) then
1100 p_rec.elig_dsblty_dgr_flag :=
1101 ben_elp_shd.g_old_rec.elig_dsblty_dgr_flag;
1102 End If;
1103 If (p_rec.elig_suppl_role_flag = hr_api.g_varchar2) then
1104 p_rec.elig_suppl_role_flag :=
1105 ben_elp_shd.g_old_rec.elig_suppl_role_flag;
1106 End If;
1107 If (p_rec.elig_qual_titl_flag = hr_api.g_varchar2) then
1108 p_rec.elig_qual_titl_flag :=
1109 ben_elp_shd.g_old_rec.elig_qual_titl_flag;
1110 End If;
1111 If (p_rec.elig_pstn_flag = hr_api.g_varchar2) then
1112 p_rec.elig_pstn_flag :=
1113 ben_elp_shd.g_old_rec.elig_pstn_flag;
1114 End If;
1115 If (p_rec.elig_prbtn_perd_flag = hr_api.g_varchar2) then
1116 p_rec.elig_prbtn_perd_flag :=
1117 ben_elp_shd.g_old_rec.elig_prbtn_perd_flag;
1118 End If;
1119 If (p_rec.elig_sp_clng_prg_pt_flag = hr_api.g_varchar2) then
1120 p_rec.elig_sp_clng_prg_pt_flag :=
1121 ben_elp_shd.g_old_rec.elig_sp_clng_prg_pt_flag;
1122 End If;
1123 If (p_rec.bnft_cagr_prtn_cd = hr_api.g_varchar2) then
1124 p_rec.bnft_cagr_prtn_cd :=
1125 ben_elp_shd.g_old_rec.bnft_cagr_prtn_cd;
1126 End If;
1127 If (p_rec.elig_dsbld_flag = hr_api.g_varchar2) then
1128 p_rec.elig_dsbld_flag :=
1129 ben_elp_shd.g_old_rec.elig_dsbld_flag;
1130 End If;
1131 If (p_rec.elig_ttl_cvg_vol_flag = hr_api.g_varchar2) then
1132 p_rec.elig_ttl_cvg_vol_flag :=
1133 ben_elp_shd.g_old_rec.elig_ttl_cvg_vol_flag;
1134 End If;
1135 If (p_rec.elig_ttl_prtt_flag = hr_api.g_varchar2) then
1136 p_rec.elig_ttl_prtt_flag :=
1137 ben_elp_shd.g_old_rec.elig_ttl_prtt_flag;
1138 End If;
1139 If (p_rec.elig_comptncy_flag = hr_api.g_varchar2) then
1140 p_rec.elig_comptncy_flag :=
1141 ben_elp_shd.g_old_rec.elig_comptncy_flag;
1142 End If;
1143 If (p_rec.elig_hlth_cvg_flag = hr_api.g_varchar2) then
1144 p_rec.elig_hlth_cvg_flag :=
1145 ben_elp_shd.g_old_rec.elig_hlth_cvg_flag;
1146 End If;
1147 If (p_rec.elig_anthr_pl_flag = hr_api.g_varchar2) then
1148 p_rec.elig_anthr_pl_flag :=
1149 ben_elp_shd.g_old_rec.elig_anthr_pl_flag;
1150 End If;
1151 If (p_rec.elig_qua_in_gr_flag = hr_api.g_varchar2) then
1152 p_rec.elig_qua_in_gr_flag :=
1153 ben_elp_shd.g_old_rec.elig_qua_in_gr_flag;
1154 End If;
1155 If (p_rec.elig_perf_rtng_flag = hr_api.g_varchar2) then
1156 p_rec.elig_perf_rtng_flag :=
1157 ben_elp_shd.g_old_rec.elig_perf_rtng_flag;
1158 End If;
1159 If (p_rec.elig_crit_values_flag = hr_api.g_varchar2) then
1160 p_rec.elig_crit_values_flag :=
1161 ben_elp_shd.g_old_rec.elig_crit_values_flag;
1162 End If;
1163 --
1164 hr_utility.set_location(' Leaving:'||l_proc, 10);
1165 --
1166 End convert_defs;
1167 --
1168 -- ----------------------------------------------------------------------------
1169 -- |---------------------------------< upd >----------------------------------|
1170 -- ----------------------------------------------------------------------------
1171 Procedure upd
1172 (
1173 p_rec in out nocopy ben_elp_shd.g_rec_type,
1174 p_effective_date in date,
1175 p_datetrack_mode in varchar2
1176 ) is
1177 --
1178 l_proc varchar2(72) := g_package||'upd';
1179 l_validation_start_date date;
1180 l_validation_end_date date;
1181 --
1182 Begin
1183 hr_utility.set_location('Entering:'||l_proc, 5);
1184 --
1185 -- Ensure that the DateTrack update mode is valid
1186 --
1187 dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
1188 --
1189 -- We must lock the row which we need to update.
1190 --
1191 ben_elp_shd.lck
1192 (p_effective_date => p_effective_date,
1193 p_datetrack_mode => p_datetrack_mode,
1194 p_eligy_prfl_id => p_rec.eligy_prfl_id,
1195 p_object_version_number => p_rec.object_version_number,
1196 p_validation_start_date => l_validation_start_date,
1197 p_validation_end_date => l_validation_end_date);
1198 --
1199 -- 1. During an update system defaults are used to determine if
1200 -- arguments have been defaulted or not. We must therefore
1201 -- derive the full record structure values to be updated.
1202 --
1203 -- 2. Call the supporting update validate operations.
1204 --
1205 convert_defs(p_rec);
1206 ben_elp_bus.update_validate
1207 (p_rec => p_rec,
1208 p_effective_date => p_effective_date,
1209 p_datetrack_mode => p_datetrack_mode,
1210 p_validation_start_date => l_validation_start_date,
1211 p_validation_end_date => l_validation_end_date);
1212 --
1213 -- Call the supporting pre-update operation
1214 --
1215 pre_update
1216 (p_rec => p_rec,
1217 p_effective_date => p_effective_date,
1218 p_datetrack_mode => p_datetrack_mode,
1219 p_validation_start_date => l_validation_start_date,
1220 p_validation_end_date => l_validation_end_date);
1221 --
1222 -- Update the row.
1223 --
1224 update_dml
1225 (p_rec => p_rec,
1226 p_effective_date => p_effective_date,
1227 p_datetrack_mode => p_datetrack_mode,
1228 p_validation_start_date => l_validation_start_date,
1229 p_validation_end_date => l_validation_end_date);
1230 --
1231 -- Call the supporting post-update operation
1232 --
1233 post_update
1234 (p_rec => p_rec,
1235 p_effective_date => p_effective_date,
1236 p_datetrack_mode => p_datetrack_mode,
1237 p_validation_start_date => l_validation_start_date,
1238 p_validation_end_date => l_validation_end_date);
1239 End upd;
1240 --
1241 -- ----------------------------------------------------------------------------
1242 -- |---------------------------------< upd >----------------------------------|
1243 -- ----------------------------------------------------------------------------
1244 Procedure upd
1245 (
1246 p_eligy_prfl_id in number,
1247 p_effective_start_date out nocopy date,
1248 p_effective_end_date out nocopy date,
1249 p_name in varchar2 default hr_api.g_varchar2,
1250 p_description in varchar2 default hr_api.g_varchar2,
1251 p_stat_cd in varchar2 default hr_api.g_varchar2,
1252 p_asmt_to_use_cd in varchar2 default hr_api.g_varchar2,
1253 p_elig_enrld_plip_flag in varchar2 default hr_api.g_varchar2,
1254 p_elig_cbr_quald_bnf_flag in varchar2 default hr_api.g_varchar2,
1255 p_elig_enrld_ptip_flag in varchar2 default hr_api.g_varchar2,
1256 p_elig_dpnt_cvrd_plip_flag in varchar2 default hr_api.g_varchar2,
1257 p_elig_dpnt_cvrd_ptip_flag in varchar2 default hr_api.g_varchar2,
1258 p_elig_dpnt_cvrd_pgm_flag in varchar2 default hr_api.g_varchar2,
1259 p_elig_job_flag in varchar2 default hr_api.g_varchar2,
1260 p_elig_hrly_slrd_flag in varchar2 default hr_api.g_varchar2,
1261 p_elig_pstl_cd_flag in varchar2 default hr_api.g_varchar2,
1262 p_elig_lbr_mmbr_flag in varchar2 default hr_api.g_varchar2,
1263 p_elig_lgl_enty_flag in varchar2 default hr_api.g_varchar2,
1264 p_elig_benfts_grp_flag in varchar2 default hr_api.g_varchar2,
1265 p_elig_wk_loc_flag in varchar2 default hr_api.g_varchar2,
1266 p_elig_brgng_unit_flag in varchar2 default hr_api.g_varchar2,
1267 p_elig_age_flag in varchar2 default hr_api.g_varchar2,
1268 p_elig_los_flag in varchar2 default hr_api.g_varchar2,
1269 p_elig_per_typ_flag in varchar2 default hr_api.g_varchar2,
1270 p_elig_fl_tm_pt_tm_flag in varchar2 default hr_api.g_varchar2,
1271 p_elig_ee_stat_flag in varchar2 default hr_api.g_varchar2,
1272 p_elig_grd_flag in varchar2 default hr_api.g_varchar2,
1273 p_elig_pct_fl_tm_flag in varchar2 default hr_api.g_varchar2,
1274 p_elig_asnt_set_flag in varchar2 default hr_api.g_varchar2,
1275 p_elig_hrs_wkd_flag in varchar2 default hr_api.g_varchar2,
1276 p_elig_comp_lvl_flag in varchar2 default hr_api.g_varchar2,
1277 p_elig_org_unit_flag in varchar2 default hr_api.g_varchar2,
1278 p_elig_loa_rsn_flag in varchar2 default hr_api.g_varchar2,
1279 p_elig_pyrl_flag in varchar2 default hr_api.g_varchar2,
1280 p_elig_schedd_hrs_flag in varchar2 default hr_api.g_varchar2,
1281 p_elig_py_bss_flag in varchar2 default hr_api.g_varchar2,
1282 p_eligy_prfl_rl_flag in varchar2 default hr_api.g_varchar2,
1283 p_elig_cmbn_age_los_flag in varchar2 default hr_api.g_varchar2,
1284 p_cntng_prtn_elig_prfl_flag in varchar2 default hr_api.g_varchar2,
1285 p_elig_prtt_pl_flag in varchar2 default hr_api.g_varchar2,
1286 p_elig_ppl_grp_flag in varchar2 default hr_api.g_varchar2,
1287 p_elig_svc_area_flag in varchar2 default hr_api.g_varchar2,
1288 p_elig_ptip_prte_flag in varchar2 default hr_api.g_varchar2,
1289 p_elig_no_othr_cvg_flag in varchar2 default hr_api.g_varchar2,
1290 p_elig_enrld_pl_flag in varchar2 default hr_api.g_varchar2,
1291 p_elig_enrld_oipl_flag in varchar2 default hr_api.g_varchar2,
1292 p_elig_enrld_pgm_flag in varchar2 default hr_api.g_varchar2,
1293 p_elig_dpnt_cvrd_pl_flag in varchar2 default hr_api.g_varchar2,
1294 p_elig_lvg_rsn_flag in varchar2 default hr_api.g_varchar2,
1295 p_elig_optd_mdcr_flag in varchar2 default hr_api.g_varchar2,
1296 p_elig_tbco_use_flag in varchar2 default hr_api.g_varchar2,
1297 p_elig_dpnt_othr_ptip_flag in varchar2 default hr_api.g_varchar2,
1298 p_business_group_id in number default hr_api.g_number,
1299 p_elp_attribute_category in varchar2 default hr_api.g_varchar2,
1300 p_elp_attribute1 in varchar2 default hr_api.g_varchar2,
1301 p_elp_attribute2 in varchar2 default hr_api.g_varchar2,
1302 p_elp_attribute3 in varchar2 default hr_api.g_varchar2,
1303 p_elp_attribute4 in varchar2 default hr_api.g_varchar2,
1304 p_elp_attribute5 in varchar2 default hr_api.g_varchar2,
1305 p_elp_attribute6 in varchar2 default hr_api.g_varchar2,
1306 p_elp_attribute7 in varchar2 default hr_api.g_varchar2,
1307 p_elp_attribute8 in varchar2 default hr_api.g_varchar2,
1308 p_elp_attribute9 in varchar2 default hr_api.g_varchar2,
1309 p_elp_attribute10 in varchar2 default hr_api.g_varchar2,
1310 p_elp_attribute11 in varchar2 default hr_api.g_varchar2,
1311 p_elp_attribute12 in varchar2 default hr_api.g_varchar2,
1312 p_elp_attribute13 in varchar2 default hr_api.g_varchar2,
1313 p_elp_attribute14 in varchar2 default hr_api.g_varchar2,
1314 p_elp_attribute15 in varchar2 default hr_api.g_varchar2,
1315 p_elp_attribute16 in varchar2 default hr_api.g_varchar2,
1316 p_elp_attribute17 in varchar2 default hr_api.g_varchar2,
1317 p_elp_attribute18 in varchar2 default hr_api.g_varchar2,
1318 p_elp_attribute19 in varchar2 default hr_api.g_varchar2,
1319 p_elp_attribute20 in varchar2 default hr_api.g_varchar2,
1320 p_elp_attribute21 in varchar2 default hr_api.g_varchar2,
1321 p_elp_attribute22 in varchar2 default hr_api.g_varchar2,
1322 p_elp_attribute23 in varchar2 default hr_api.g_varchar2,
1323 p_elp_attribute24 in varchar2 default hr_api.g_varchar2,
1324 p_elp_attribute25 in varchar2 default hr_api.g_varchar2,
1325 p_elp_attribute26 in varchar2 default hr_api.g_varchar2,
1326 p_elp_attribute27 in varchar2 default hr_api.g_varchar2,
1327 p_elp_attribute28 in varchar2 default hr_api.g_varchar2,
1328 p_elp_attribute29 in varchar2 default hr_api.g_varchar2,
1329 p_elp_attribute30 in varchar2 default hr_api.g_varchar2,
1330 p_elig_mrtl_sts_flag in varchar2 default hr_api.g_varchar2,
1331 p_elig_gndr_flag in varchar2 default hr_api.g_varchar2,
1332 p_elig_dsblty_ctg_flag in varchar2 default hr_api.g_varchar2,
1333 p_elig_dsblty_rsn_flag in varchar2 default hr_api.g_varchar2,
1334 p_elig_dsblty_dgr_flag in varchar2 default hr_api.g_varchar2,
1335 p_elig_suppl_role_flag in varchar2 default hr_api.g_varchar2,
1336 p_elig_qual_titl_flag in varchar2 default hr_api.g_varchar2,
1337 p_elig_pstn_flag in varchar2 default hr_api.g_varchar2,
1338 p_elig_prbtn_perd_flag in varchar2 default hr_api.g_varchar2,
1339 p_elig_sp_clng_prg_pt_flag in varchar2 default hr_api.g_varchar2,
1340 p_bnft_cagr_prtn_cd in varchar2 default hr_api.g_varchar2,
1341 p_elig_dsbld_flag in varchar2 default hr_api.g_varchar2,
1342 p_elig_ttl_cvg_vol_flag in varchar2 default hr_api.g_varchar2,
1343 p_elig_ttl_prtt_flag in varchar2 default hr_api.g_varchar2,
1344 p_elig_comptncy_flag in varchar2 default hr_api.g_varchar2,
1345 p_elig_hlth_cvg_flag in varchar2 default hr_api.g_varchar2,
1346 p_elig_anthr_pl_flag in varchar2 default hr_api.g_varchar2,
1347 p_elig_qua_in_gr_flag in varchar2 default hr_api.g_varchar2,
1348 p_elig_perf_rtng_flag in varchar2 default hr_api.g_varchar2,
1349 p_elig_crit_values_flag in varchar2 default hr_api.g_varchar2, /* RBC */
1350 p_object_version_number in out nocopy number,
1351 p_effective_date in date,
1352 p_datetrack_mode in varchar2
1353 ) is
1354 --
1355 l_rec ben_elp_shd.g_rec_type;
1356 l_proc varchar2(72) := g_package||'upd';
1357 --
1358 Begin
1359 hr_utility.set_location('Entering:'||l_proc, 5);
1360 --
1361 -- Call conversion function to turn arguments into the
1362 -- l_rec structure.
1363 --
1364 l_rec :=
1365 ben_elp_shd.convert_args
1366 (
1367 p_eligy_prfl_id,
1368 null,
1369 null,
1370 p_name,
1371 p_description,
1372 p_stat_cd,
1373 p_asmt_to_use_cd,
1374 p_elig_enrld_plip_flag,
1375 p_elig_cbr_quald_bnf_flag,
1376 p_elig_enrld_ptip_flag,
1377 p_elig_dpnt_cvrd_plip_flag,
1378 p_elig_dpnt_cvrd_ptip_flag,
1379 p_elig_dpnt_cvrd_pgm_flag,
1380 p_elig_job_flag,
1381 p_elig_hrly_slrd_flag,
1382 p_elig_pstl_cd_flag,
1383 p_elig_lbr_mmbr_flag,
1384 p_elig_lgl_enty_flag,
1385 p_elig_benfts_grp_flag,
1386 p_elig_wk_loc_flag,
1387 p_elig_brgng_unit_flag,
1388 p_elig_age_flag,
1389 p_elig_los_flag,
1390 p_elig_per_typ_flag,
1391 p_elig_fl_tm_pt_tm_flag,
1392 p_elig_ee_stat_flag,
1393 p_elig_grd_flag,
1394 p_elig_pct_fl_tm_flag,
1395 p_elig_asnt_set_flag,
1396 p_elig_hrs_wkd_flag,
1397 p_elig_comp_lvl_flag,
1398 p_elig_org_unit_flag,
1399 p_elig_loa_rsn_flag,
1400 p_elig_pyrl_flag,
1401 p_elig_schedd_hrs_flag,
1402 p_elig_py_bss_flag,
1403 p_eligy_prfl_rl_flag,
1404 p_elig_cmbn_age_los_flag,
1405 p_cntng_prtn_elig_prfl_flag,
1406 p_elig_prtt_pl_flag,
1407 p_elig_ppl_grp_flag,
1408 p_elig_svc_area_flag,
1409 p_elig_ptip_prte_flag,
1410 p_elig_no_othr_cvg_flag,
1411 p_elig_enrld_pl_flag,
1412 p_elig_enrld_oipl_flag,
1413 p_elig_enrld_pgm_flag,
1414 p_elig_dpnt_cvrd_pl_flag,
1415 p_elig_lvg_rsn_flag,
1416 p_elig_optd_mdcr_flag,
1417 p_elig_tbco_use_flag,
1418 p_elig_dpnt_othr_ptip_flag,
1419 p_business_group_id,
1420 p_elp_attribute_category,
1421 p_elp_attribute1,
1422 p_elp_attribute2,
1423 p_elp_attribute3,
1424 p_elp_attribute4,
1425 p_elp_attribute5,
1426 p_elp_attribute6,
1427 p_elp_attribute7,
1428 p_elp_attribute8,
1429 p_elp_attribute9,
1430 p_elp_attribute10,
1431 p_elp_attribute11,
1432 p_elp_attribute12,
1433 p_elp_attribute13,
1434 p_elp_attribute14,
1435 p_elp_attribute15,
1436 p_elp_attribute16,
1437 p_elp_attribute17,
1438 p_elp_attribute18,
1439 p_elp_attribute19,
1440 p_elp_attribute20,
1441 p_elp_attribute21,
1442 p_elp_attribute22,
1443 p_elp_attribute23,
1444 p_elp_attribute24,
1445 p_elp_attribute25,
1446 p_elp_attribute26,
1447 p_elp_attribute27,
1448 p_elp_attribute28,
1449 p_elp_attribute29,
1450 p_elp_attribute30,
1451 p_elig_mrtl_sts_flag,
1452 p_elig_gndr_flag,
1453 p_elig_dsblty_ctg_flag,
1454 p_elig_dsblty_rsn_flag,
1455 p_elig_dsblty_dgr_flag,
1456 p_elig_suppl_role_flag,
1457 p_elig_qual_titl_flag,
1458 p_elig_pstn_flag,
1459 p_elig_prbtn_perd_flag,
1460 p_elig_sp_clng_prg_pt_flag,
1461 p_bnft_cagr_prtn_cd,
1462 p_elig_dsbld_flag,
1463 p_elig_ttl_cvg_vol_flag,
1464 p_elig_ttl_prtt_flag,
1465 p_elig_comptncy_flag,
1466 p_elig_hlth_cvg_flag,
1467 p_elig_anthr_pl_flag,
1468 p_elig_qua_in_gr_flag,
1469 p_elig_perf_rtng_flag,
1470 p_elig_crit_values_flag, /* RBC */
1471 p_object_version_number
1472 );
1473 --
1474 -- Having converted the arguments into the
1475 -- plsql record structure we call the corresponding record
1476 -- business process.
1477 --
1478 upd(l_rec, p_effective_date, p_datetrack_mode);
1479 p_object_version_number := l_rec.object_version_number;
1480 p_effective_start_date := l_rec.effective_start_date;
1481 p_effective_end_date := l_rec.effective_end_date;
1482 --
1483 --
1484 hr_utility.set_location(' Leaving:'||l_proc, 10);
1485 End upd;
1486 --
1487 end ben_elp_upd;