1 Package Body ben_pln_upd2 as
2 /* $Header: beplnrhi.pkb 120.8.12010000.2 2008/08/18 09:47:19 ubhat ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- | Private Global Definitions |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package varchar2(33) := ' ben_pln_upd2.'; -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |-----------------------------< convert_defs >-----------------------------|
12 -- ----------------------------------------------------------------------------
13 --
14 Procedure convert_defs(p_rec in out nocopy ben_pln_shd.g_rec_type) is
15 --
16 l_proc varchar2(72) := g_package||'convert_defs';
17 --
18 Begin
19 --
20 hr_utility.set_location('Entering:'||l_proc, 5);
21 --
22 -- We must now examine each argument value in the
23 -- p_rec plsql record structure
24 -- to see if a system default is being used. If a system default
25 -- is being used then we must set to the 'current' argument value.
26 --
27 If (p_rec.pl_typ_id = hr_api.g_number) then
28 p_rec.pl_typ_id :=
29 ben_pln_shd.g_old_rec.pl_typ_id;
30 End If;
31 If (p_rec.business_group_id = hr_api.g_number) then
32 p_rec.business_group_id :=
33 ben_pln_shd.g_old_rec.business_group_id;
34 End If;
35 If (p_rec.name = hr_api.g_varchar2) then
36 p_rec.name :=
37 ben_pln_shd.g_old_rec.name;
38 End If;
39 If (p_rec.alws_qdro_flag = hr_api.g_varchar2) then
40 p_rec.alws_qdro_flag :=
41 ben_pln_shd.g_old_rec.alws_qdro_flag;
42 End If;
43 If (p_rec.alws_qmcso_flag = hr_api.g_varchar2) then
44 p_rec.alws_qmcso_flag :=
45 ben_pln_shd.g_old_rec.alws_qmcso_flag;
46 End If;
47 If (p_rec.bnf_addl_instn_txt_alwd_flag = hr_api.g_varchar2) then
48 p_rec.bnf_addl_instn_txt_alwd_flag :=
49 ben_pln_shd.g_old_rec.bnf_addl_instn_txt_alwd_flag;
50 End If;
51 If (p_rec.bnf_adrs_rqd_flag = hr_api.g_varchar2) then
52 p_rec.bnf_adrs_rqd_flag :=
53 ben_pln_shd.g_old_rec.bnf_adrs_rqd_flag;
54 End If;
55 If (p_rec.bnf_cntngt_bnfs_alwd_flag = hr_api.g_varchar2) then
56 p_rec.bnf_cntngt_bnfs_alwd_flag :=
57 ben_pln_shd.g_old_rec.bnf_cntngt_bnfs_alwd_flag;
58 End If;
59 If (p_rec.bnf_ctfn_rqd_flag = hr_api.g_varchar2) then
60 p_rec.bnf_ctfn_rqd_flag :=
61 ben_pln_shd.g_old_rec.bnf_ctfn_rqd_flag;
62 End If;
63 If (p_rec.bnf_dob_rqd_flag = hr_api.g_varchar2) then
64 p_rec.bnf_dob_rqd_flag :=
65 ben_pln_shd.g_old_rec.bnf_dob_rqd_flag;
66 End If;
67 If (p_rec.bnf_dsge_mnr_ttee_rqd_flag = hr_api.g_varchar2) then
68 p_rec.bnf_dsge_mnr_ttee_rqd_flag :=
69 ben_pln_shd.g_old_rec.bnf_dsge_mnr_ttee_rqd_flag;
70 End If;
71 If (p_rec.bnf_incrmt_amt = hr_api.g_number) then
72 p_rec.bnf_incrmt_amt :=
73 ben_pln_shd.g_old_rec.bnf_incrmt_amt;
74 End If;
75 If (p_rec.bnf_dflt_bnf_cd = hr_api.g_varchar2) then
76 p_rec.bnf_dflt_bnf_cd :=
77 ben_pln_shd.g_old_rec.bnf_dflt_bnf_cd;
78 End If;
79 If (p_rec.bnf_legv_id_rqd_flag = hr_api.g_varchar2) then
80 p_rec.bnf_legv_id_rqd_flag :=
81 ben_pln_shd.g_old_rec.bnf_legv_id_rqd_flag;
82 End If;
83 If (p_rec.bnf_may_dsgt_org_flag = hr_api.g_varchar2) then
84 p_rec.bnf_may_dsgt_org_flag :=
85 ben_pln_shd.g_old_rec.bnf_may_dsgt_org_flag;
86 End If;
87 If (p_rec.bnf_mn_dsgntbl_amt = hr_api.g_number) then
88 p_rec.bnf_mn_dsgntbl_amt :=
89 ben_pln_shd.g_old_rec.bnf_mn_dsgntbl_amt;
90 End If;
91 If (p_rec.bnf_mn_dsgntbl_pct_val = hr_api.g_number) then
92 p_rec.bnf_mn_dsgntbl_pct_val :=
93 ben_pln_shd.g_old_rec.bnf_mn_dsgntbl_pct_val;
94 End If;
95 If (p_rec.rqd_perd_enrt_nenrt_val = hr_api.g_number) then
96 p_rec.rqd_perd_enrt_nenrt_val :=
97 ben_pln_shd.g_old_rec.rqd_perd_enrt_nenrt_val;
98 End If;
99 If (p_rec.ordr_num = hr_api.g_number) then
100 p_rec.ordr_num :=
101 ben_pln_shd.g_old_rec.ordr_num;
102 End If;
103 If (p_rec.bnf_pct_incrmt_val = hr_api.g_number) then
104 p_rec.bnf_pct_incrmt_val :=
105 ben_pln_shd.g_old_rec.bnf_pct_incrmt_val;
106 End If;
107 If (p_rec.bnf_pct_amt_alwd_cd = hr_api.g_varchar2) then
108 p_rec.bnf_pct_amt_alwd_cd :=
109 ben_pln_shd.g_old_rec.bnf_pct_amt_alwd_cd;
110 End If;
111 If (p_rec.bnf_qdro_rl_apls_flag = hr_api.g_varchar2) then
112 p_rec.bnf_qdro_rl_apls_flag :=
113 ben_pln_shd.g_old_rec.bnf_qdro_rl_apls_flag;
114 End If;
115 If (p_rec.per_cvrd_cd = hr_api.g_varchar2) then
116 p_rec.per_cvrd_cd :=
117 ben_pln_shd.g_old_rec.per_cvrd_cd;
118 End If;
119 If (p_rec.svgs_pl_flag = hr_api.g_varchar2) then
120 p_rec.svgs_pl_flag :=
121 ben_pln_shd.g_old_rec.svgs_pl_flag;
122 End If;
123 If (p_rec.dflt_to_asn_pndg_ctfn_cd = hr_api.g_varchar2) then
124 p_rec.dflt_to_asn_pndg_ctfn_cd :=
125 ben_pln_shd.g_old_rec.dflt_to_asn_pndg_ctfn_cd;
126 End If;
127 If (p_rec.dflt_to_asn_pndg_ctfn_rl = hr_api.g_number) then
128 p_rec.dflt_to_asn_pndg_ctfn_rl :=
129 ben_pln_shd.g_old_rec.dflt_to_asn_pndg_ctfn_rl;
130 End If;
131 If (p_rec.postelcn_edit_rl = hr_api.g_number) then
132 p_rec.postelcn_edit_rl :=
133 ben_pln_shd.g_old_rec.postelcn_edit_rl;
134 End If;
135 If (p_rec.drvbl_fctr_apls_rts_flag = hr_api.g_varchar2) then
136 p_rec.drvbl_fctr_apls_rts_flag :=
137 ben_pln_shd.g_old_rec.drvbl_fctr_apls_rts_flag;
138 End If;
139 If (p_rec.drvbl_fctr_prtn_elig_flag = hr_api.g_varchar2) then
140 p_rec.drvbl_fctr_prtn_elig_flag :=
141 ben_pln_shd.g_old_rec.drvbl_fctr_prtn_elig_flag;
142 End If;
143 If (p_rec.dpnt_dsgn_cd = hr_api.g_varchar2) then
144 p_rec.dpnt_dsgn_cd :=
145 ben_pln_shd.g_old_rec.dpnt_dsgn_cd;
146 End If;
147 If (p_rec.elig_apls_flag = hr_api.g_varchar2) then
148 p_rec.elig_apls_flag :=
149 ben_pln_shd.g_old_rec.elig_apls_flag;
150 End If;
151 If (p_rec.invk_dcln_prtn_pl_flag = hr_api.g_varchar2) then
152 p_rec.invk_dcln_prtn_pl_flag :=
153 ben_pln_shd.g_old_rec.invk_dcln_prtn_pl_flag;
154 End If;
155 If (p_rec.invk_flx_cr_pl_flag = hr_api.g_varchar2) then
156 p_rec.invk_flx_cr_pl_flag :=
157 ben_pln_shd.g_old_rec.invk_flx_cr_pl_flag;
158 End If;
159 If (p_rec.imptd_incm_calc_cd = hr_api.g_varchar2) then
160 p_rec.imptd_incm_calc_cd :=
161 ben_pln_shd.g_old_rec.imptd_incm_calc_cd;
162 End If;
163 If (p_rec.drvbl_dpnt_elig_flag = hr_api.g_varchar2) then
164 p_rec.drvbl_dpnt_elig_flag :=
165 ben_pln_shd.g_old_rec.drvbl_dpnt_elig_flag;
166 End If;
167 If (p_rec.trk_inelig_per_flag = hr_api.g_varchar2) then
168 p_rec.trk_inelig_per_flag :=
169 ben_pln_shd.g_old_rec.trk_inelig_per_flag;
170 End If;
171 If (p_rec.pl_cd = hr_api.g_varchar2) then
172 p_rec.pl_cd :=
173 ben_pln_shd.g_old_rec.pl_cd;
174 End If;
175 If (p_rec.auto_enrt_mthd_rl = hr_api.g_number) then
176 p_rec.auto_enrt_mthd_rl :=
177 ben_pln_shd.g_old_rec.auto_enrt_mthd_rl;
178 End If;
179 If (p_rec.ivr_ident = hr_api.g_varchar2) then
180 p_rec.ivr_ident :=
181 ben_pln_shd.g_old_rec.ivr_ident;
182 End If;
183 If (p_rec.url_ref_name = hr_api.g_varchar2) then
184 p_rec.url_ref_name :=
185 ben_pln_shd.g_old_rec.url_ref_name;
186 End If;
187 If (p_rec.cmpr_clms_to_cvg_or_bal_cd = hr_api.g_varchar2) then
188 p_rec.cmpr_clms_to_cvg_or_bal_cd :=
189 ben_pln_shd.g_old_rec.cmpr_clms_to_cvg_or_bal_cd;
190 End If;
191 If (p_rec.cobra_pymt_due_dy_num = hr_api.g_number) then
192 p_rec.cobra_pymt_due_dy_num :=
193 ben_pln_shd.g_old_rec.cobra_pymt_due_dy_num;
194 End If;
195 If (p_rec.dpnt_cvd_by_othr_apls_flag = hr_api.g_varchar2) then
196 p_rec.dpnt_cvd_by_othr_apls_flag :=
197 ben_pln_shd.g_old_rec.dpnt_cvd_by_othr_apls_flag;
198 End If;
199 If (p_rec.enrt_mthd_cd = hr_api.g_varchar2) then
200 p_rec.enrt_mthd_cd :=
201 ben_pln_shd.g_old_rec.enrt_mthd_cd;
202 End If;
203 If (p_rec.enrt_cd = hr_api.g_varchar2) then
204 p_rec.enrt_cd :=
205 ben_pln_shd.g_old_rec.enrt_cd;
206 End If;
207 If (p_rec.enrt_cvg_strt_dt_cd = hr_api.g_varchar2) then
208 p_rec.enrt_cvg_strt_dt_cd :=
209 ben_pln_shd.g_old_rec.enrt_cvg_strt_dt_cd;
210 End If;
211 If (p_rec.enrt_cvg_end_dt_cd = hr_api.g_varchar2) then
212 p_rec.enrt_cvg_end_dt_cd :=
213 ben_pln_shd.g_old_rec.enrt_cvg_end_dt_cd;
214 End If;
215 If (p_rec.frfs_aply_flag = hr_api.g_varchar2) then
216 p_rec.frfs_aply_flag :=
217 ben_pln_shd.g_old_rec.frfs_aply_flag;
218 End If;
219 If (p_rec.hc_pl_subj_hcfa_aprvl_flag = hr_api.g_varchar2) then
220 p_rec.hc_pl_subj_hcfa_aprvl_flag :=
221 ben_pln_shd.g_old_rec.hc_pl_subj_hcfa_aprvl_flag;
222 End If;
223 If (p_rec.hghly_cmpd_rl_apls_flag = hr_api.g_varchar2) then
224 p_rec.hghly_cmpd_rl_apls_flag :=
225 ben_pln_shd.g_old_rec.hghly_cmpd_rl_apls_flag;
226 End If;
227 If (p_rec.incptn_dt = hr_api.g_date) then
228 p_rec.incptn_dt :=
229 ben_pln_shd.g_old_rec.incptn_dt;
230 End If;
231 If (p_rec.mn_cvg_rl = hr_api.g_number) then
232 p_rec.mn_cvg_rl :=
233 ben_pln_shd.g_old_rec.mn_cvg_rl;
234 End If;
235 If (p_rec.mn_cvg_rqd_amt = hr_api.g_number) then
236 p_rec.mn_cvg_rqd_amt :=
237 ben_pln_shd.g_old_rec.mn_cvg_rqd_amt;
238 End If;
239 If (p_rec.mn_opts_rqd_num = hr_api.g_number) then
240 p_rec.mn_opts_rqd_num :=
241 ben_pln_shd.g_old_rec.mn_opts_rqd_num;
242 End If;
243 If (p_rec.mx_cvg_alwd_amt = hr_api.g_number) then
244 p_rec.mx_cvg_alwd_amt :=
245 ben_pln_shd.g_old_rec.mx_cvg_alwd_amt;
246 End If;
247 If (p_rec.mx_cvg_rl = hr_api.g_number) then
248 p_rec.mx_cvg_rl :=
249 ben_pln_shd.g_old_rec.mx_cvg_rl;
250 End If;
251 If (p_rec.mx_opts_alwd_num = hr_api.g_number) then
252 p_rec.mx_opts_alwd_num :=
253 ben_pln_shd.g_old_rec.mx_opts_alwd_num;
254 End If;
255 If (p_rec.mx_cvg_wcfn_mlt_num = hr_api.g_number) then
256 p_rec.mx_cvg_wcfn_mlt_num :=
257 ben_pln_shd.g_old_rec.mx_cvg_wcfn_mlt_num;
258 End If;
259 If (p_rec.mx_cvg_wcfn_amt = hr_api.g_number) then
260 p_rec.mx_cvg_wcfn_amt :=
261 ben_pln_shd.g_old_rec.mx_cvg_wcfn_amt;
262 End If;
263 If (p_rec.mx_cvg_incr_alwd_amt = hr_api.g_number) then
264 p_rec.mx_cvg_incr_alwd_amt :=
265 ben_pln_shd.g_old_rec.mx_cvg_incr_alwd_amt;
266 End If;
267 If (p_rec.mx_cvg_incr_wcf_alwd_amt = hr_api.g_number) then
268 p_rec.mx_cvg_incr_wcf_alwd_amt :=
269 ben_pln_shd.g_old_rec.mx_cvg_incr_wcf_alwd_amt;
270 End If;
271 If (p_rec.mx_cvg_mlt_incr_num = hr_api.g_number) then
272 p_rec.mx_cvg_mlt_incr_num :=
273 ben_pln_shd.g_old_rec.mx_cvg_mlt_incr_num;
274 End If;
275 If (p_rec.mx_cvg_mlt_incr_wcf_num = hr_api.g_number) then
276 p_rec.mx_cvg_mlt_incr_wcf_num :=
277 ben_pln_shd.g_old_rec.mx_cvg_mlt_incr_wcf_num;
278 End If;
279 If (p_rec.mx_wtg_dt_to_use_cd = hr_api.g_varchar2) then
280 p_rec.mx_wtg_dt_to_use_cd :=
281 ben_pln_shd.g_old_rec.mx_wtg_dt_to_use_cd;
282 End If;
283 If (p_rec.mx_wtg_dt_to_use_rl = hr_api.g_number) then
284 p_rec.mx_wtg_dt_to_use_rl :=
285 ben_pln_shd.g_old_rec.mx_wtg_dt_to_use_rl;
286 End If;
287 If (p_rec.mx_wtg_perd_prte_uom = hr_api.g_varchar2) then
288 p_rec.mx_wtg_perd_prte_uom :=
289 ben_pln_shd.g_old_rec.mx_wtg_perd_prte_uom;
290 End If;
291 If (p_rec.mx_wtg_perd_prte_val = hr_api.g_number) then
292 p_rec.mx_wtg_perd_prte_val :=
293 ben_pln_shd.g_old_rec.mx_wtg_perd_prte_val;
294 End If;
295 If (p_rec.mx_wtg_perd_rl = hr_api.g_number) then
296 p_rec.mx_wtg_perd_rl :=
297 ben_pln_shd.g_old_rec.mx_wtg_perd_rl;
298 End If;
299 If (p_rec.nip_dflt_enrt_cd = hr_api.g_varchar2) then
300 p_rec.nip_dflt_enrt_cd :=
301 ben_pln_shd.g_old_rec.nip_dflt_enrt_cd;
302 End If;
303 If (p_rec.nip_dflt_enrt_det_rl = hr_api.g_number) then
304 p_rec.nip_dflt_enrt_det_rl :=
305 ben_pln_shd.g_old_rec.nip_dflt_enrt_det_rl;
306 End If;
307 If (p_rec.dpnt_adrs_rqd_flag = hr_api.g_varchar2) then
308 p_rec.dpnt_adrs_rqd_flag :=
309 ben_pln_shd.g_old_rec.dpnt_adrs_rqd_flag;
310 End If;
311 If (p_rec.dpnt_cvg_end_dt_cd = hr_api.g_varchar2) then
312 p_rec.dpnt_cvg_end_dt_cd :=
313 ben_pln_shd.g_old_rec.dpnt_cvg_end_dt_cd;
314 End If;
315 If (p_rec.dpnt_cvg_end_dt_rl = hr_api.g_number) then
316 p_rec.dpnt_cvg_end_dt_rl :=
317 ben_pln_shd.g_old_rec.dpnt_cvg_end_dt_rl;
318 End If;
319 If (p_rec.dpnt_cvg_strt_dt_cd = hr_api.g_varchar2) then
320 p_rec.dpnt_cvg_strt_dt_cd :=
321 ben_pln_shd.g_old_rec.dpnt_cvg_strt_dt_cd;
322 End If;
323 If (p_rec.dpnt_cvg_strt_dt_rl = hr_api.g_number) then
324 p_rec.dpnt_cvg_strt_dt_rl :=
325 ben_pln_shd.g_old_rec.dpnt_cvg_strt_dt_rl;
326 End If;
327 If (p_rec.dpnt_dob_rqd_flag = hr_api.g_varchar2) then
328 p_rec.dpnt_dob_rqd_flag :=
329 ben_pln_shd.g_old_rec.dpnt_dob_rqd_flag;
330 End If;
331 If (p_rec.dpnt_leg_id_rqd_flag = hr_api.g_varchar2) then
332 p_rec.dpnt_leg_id_rqd_flag :=
333 ben_pln_shd.g_old_rec.dpnt_leg_id_rqd_flag;
334 End If;
335 If (p_rec.dpnt_no_ctfn_rqd_flag = hr_api.g_varchar2) then
336 p_rec.dpnt_no_ctfn_rqd_flag :=
337 ben_pln_shd.g_old_rec.dpnt_no_ctfn_rqd_flag;
338 End If;
339 If (p_rec.no_mn_cvg_amt_apls_flag = hr_api.g_varchar2) then
340 p_rec.no_mn_cvg_amt_apls_flag :=
341 ben_pln_shd.g_old_rec.no_mn_cvg_amt_apls_flag;
342 End If;
343 If (p_rec.no_mn_cvg_incr_apls_flag = hr_api.g_varchar2) then
344 p_rec.no_mn_cvg_incr_apls_flag :=
345 ben_pln_shd.g_old_rec.no_mn_cvg_incr_apls_flag;
346 End If;
347 If (p_rec.no_mn_opts_num_apls_flag = hr_api.g_varchar2) then
348 p_rec.no_mn_opts_num_apls_flag :=
349 ben_pln_shd.g_old_rec.no_mn_opts_num_apls_flag;
350 End If;
351 If (p_rec.no_mx_cvg_amt_apls_flag = hr_api.g_varchar2) then
352 p_rec.no_mx_cvg_amt_apls_flag :=
353 ben_pln_shd.g_old_rec.no_mx_cvg_amt_apls_flag;
354 End If;
355 If (p_rec.no_mx_cvg_incr_apls_flag = hr_api.g_varchar2) then
356 p_rec.no_mx_cvg_incr_apls_flag :=
357 ben_pln_shd.g_old_rec.no_mx_cvg_incr_apls_flag;
358 End If;
359 If (p_rec.no_mx_opts_num_apls_flag = hr_api.g_varchar2) then
360 p_rec.no_mx_opts_num_apls_flag :=
361 ben_pln_shd.g_old_rec.no_mx_opts_num_apls_flag;
362 End If;
363 If (p_rec.nip_pl_uom = hr_api.g_varchar2) then
364 p_rec.nip_pl_uom :=
365 ben_pln_shd.g_old_rec.nip_pl_uom;
366 End If;
367 If (p_rec.rqd_perd_enrt_nenrt_uom = hr_api.g_varchar2) then
368 p_rec.rqd_perd_enrt_nenrt_uom :=
369 ben_pln_shd.g_old_rec.rqd_perd_enrt_nenrt_uom;
370 End If;
371 If (p_rec.nip_acty_ref_perd_cd = hr_api.g_varchar2) then
372 p_rec.nip_acty_ref_perd_cd :=
373 ben_pln_shd.g_old_rec.nip_acty_ref_perd_cd;
377 ben_pln_shd.g_old_rec.nip_enrt_info_rt_freq_cd;
374 End If;
375 If (p_rec.nip_enrt_info_rt_freq_cd = hr_api.g_varchar2) then
376 p_rec.nip_enrt_info_rt_freq_cd :=
378 End If;
379 If (p_rec.enrt_cvg_end_dt_rl = hr_api.g_number) then
380 p_rec.enrt_cvg_end_dt_rl :=
381 ben_pln_shd.g_old_rec.enrt_cvg_end_dt_rl;
382 End If;
383 If (p_rec.enrt_cvg_strt_dt_rl = hr_api.g_number) then
384 p_rec.enrt_cvg_strt_dt_rl :=
385 ben_pln_shd.g_old_rec.enrt_cvg_strt_dt_rl;
386 End If;
387 If (p_rec.prort_prtl_yr_cvg_rstrn_cd = hr_api.g_varchar2) then
388 p_rec.prort_prtl_yr_cvg_rstrn_cd :=
389 ben_pln_shd.g_old_rec.prort_prtl_yr_cvg_rstrn_cd;
390 End If;
391 If (p_rec.prort_prtl_yr_cvg_rstrn_rl = hr_api.g_number) then
392 p_rec.prort_prtl_yr_cvg_rstrn_rl :=
393 ben_pln_shd.g_old_rec.prort_prtl_yr_cvg_rstrn_rl;
394 End If;
395 If (p_rec.prtn_elig_ovrid_alwd_flag = hr_api.g_varchar2) then
396 p_rec.prtn_elig_ovrid_alwd_flag :=
397 ben_pln_shd.g_old_rec.prtn_elig_ovrid_alwd_flag;
398 End If;
399 If (p_rec.rt_end_dt_rl = hr_api.g_number) then
400 p_rec.rt_end_dt_rl :=
401 ben_pln_shd.g_old_rec.rt_end_dt_rl;
402 End If;
403 If (p_rec.rt_strt_dt_rl = hr_api.g_number) then
404 p_rec.rt_strt_dt_rl :=
405 ben_pln_shd.g_old_rec.rt_strt_dt_rl;
406 End If;
407 If (p_rec.subj_to_imptd_incm_typ_cd = hr_api.g_varchar2) then
408 p_rec.subj_to_imptd_incm_typ_cd :=
409 ben_pln_shd.g_old_rec.subj_to_imptd_incm_typ_cd;
410 End If;
411 If (p_rec.use_all_asnts_elig_flag = hr_api.g_varchar2) then
412 p_rec.use_all_asnts_elig_flag :=
413 ben_pln_shd.g_old_rec.use_all_asnts_elig_flag;
414 End If;
415 If (p_rec.use_all_asnts_for_rt_flag = hr_api.g_varchar2) then
416 p_rec.use_all_asnts_for_rt_flag :=
417 ben_pln_shd.g_old_rec.use_all_asnts_for_rt_flag;
418 End If;
419 If (p_rec.vstg_apls_flag = hr_api.g_varchar2) then
420 p_rec.vstg_apls_flag :=
421 ben_pln_shd.g_old_rec.vstg_apls_flag;
422 End If;
423 If (p_rec.wvbl_flag = hr_api.g_varchar2) then
424 p_rec.wvbl_flag :=
425 ben_pln_shd.g_old_rec.wvbl_flag;
426 End If;
427 If (p_rec.hc_svc_typ_cd = hr_api.g_varchar2) then
428 p_rec.hc_svc_typ_cd :=
429 ben_pln_shd.g_old_rec.hc_svc_typ_cd;
430 End If;
431 If (p_rec.pl_stat_cd = hr_api.g_varchar2) then
432 p_rec.pl_stat_cd :=
433 ben_pln_shd.g_old_rec.pl_stat_cd;
434 End If;
435 If (p_rec.prmry_fndg_mthd_cd = hr_api.g_varchar2) then
436 p_rec.prmry_fndg_mthd_cd :=
437 ben_pln_shd.g_old_rec.prmry_fndg_mthd_cd;
438 End If;
439 If (p_rec.rt_end_dt_cd = hr_api.g_varchar2) then
440 p_rec.rt_end_dt_cd :=
441 ben_pln_shd.g_old_rec.rt_end_dt_cd;
442 End If;
443 If (p_rec.rt_strt_dt_cd = hr_api.g_varchar2) then
444 p_rec.rt_strt_dt_cd :=
445 ben_pln_shd.g_old_rec.rt_strt_dt_cd;
446 End If;
447 If (p_rec.bnf_dsgn_cd = hr_api.g_varchar2) then
448 p_rec.bnf_dsgn_cd :=
449 ben_pln_shd.g_old_rec.bnf_dsgn_cd;
450 End If;
451 If (p_rec.alws_reimbmts_flag = hr_api.g_varchar2) then
452 p_rec.alws_reimbmts_flag :=
453 ben_pln_shd.g_old_rec.alws_reimbmts_flag;
454 End If;
455 If (p_rec.enrt_pl_opt_flag = hr_api.g_varchar2) then
456 p_rec.enrt_pl_opt_flag :=
457 ben_pln_shd.g_old_rec.enrt_pl_opt_flag;
458 End If;
459 If (p_rec.bnft_prvdr_pool_id = hr_api.g_number) then
460 p_rec.bnft_prvdr_pool_id :=
461 ben_pln_shd.g_old_rec.bnft_prvdr_pool_id;
462 End If;
463 If (p_rec.MAY_ENRL_PL_N_OIPL_FLAG = hr_api.g_VARCHAR2) then
464 p_rec.MAY_ENRL_PL_N_OIPL_FLAG :=
465 ben_pln_shd.g_old_rec.MAY_ENRL_PL_N_OIPL_FLAG;
466 End If;
467 If (p_rec.ENRT_RL = hr_api.g_NUMBER) then
468 p_rec.ENRT_RL :=
469 ben_pln_shd.g_old_rec.ENRT_RL;
470 End If;
471 If (p_rec.rqd_perd_enrt_nenrt_rl = hr_api.g_NUMBER) then
472 p_rec.rqd_perd_enrt_nenrt_rl :=
473 ben_pln_shd.g_old_rec.rqd_perd_enrt_nenrt_rl;
474 End If;
475 If (p_rec.ALWS_UNRSTRCTD_ENRT_FLAG = hr_api.g_VARCHAR2) then
476 p_rec.ALWS_UNRSTRCTD_ENRT_FLAG :=
477 ben_pln_shd.g_old_rec.ALWS_UNRSTRCTD_ENRT_FLAG;
478 End If;
479 If (p_rec.ALWS_TMPRY_ID_CRD_FLAG = hr_api.g_VARCHAR2) then
480 p_rec.ALWS_TMPRY_ID_CRD_FLAG :=
481 ben_pln_shd.g_old_rec.ALWS_TMPRY_ID_CRD_FLAG;
482 End If;
483 If (p_rec.BNFT_OR_OPTION_RSTRCTN_CD = hr_api.g_VARCHAR2) then
484 p_rec.BNFT_OR_OPTION_RSTRCTN_CD :=
485 ben_pln_shd.g_old_rec.BNFT_OR_OPTION_RSTRCTN_CD;
486 End If;
487 If (p_rec.CVG_INCR_R_DECR_ONLY_CD = hr_api.g_VARCHAR2) then
488 p_rec.CVG_INCR_R_DECR_ONLY_CD :=
489 ben_pln_shd.g_old_rec.CVG_INCR_R_DECR_ONLY_CD;
490 End If;
491 If (p_rec.unsspnd_enrt_cd = hr_api.g_VARCHAR2) then
492 p_rec.unsspnd_enrt_cd :=
493 ben_pln_shd.g_old_rec.unsspnd_enrt_cd;
494 End If;
495 If (p_rec.pln_attribute_category = hr_api.g_varchar2) then
496 p_rec.pln_attribute_category :=
497 ben_pln_shd.g_old_rec.pln_attribute_category;
498 End If;
499 If (p_rec.pln_attribute1 = hr_api.g_varchar2) then
500 p_rec.pln_attribute1 :=
501 ben_pln_shd.g_old_rec.pln_attribute1;
502 End If;
503 If (p_rec.pln_attribute2 = hr_api.g_varchar2) then
504 p_rec.pln_attribute2 :=
505 ben_pln_shd.g_old_rec.pln_attribute2;
509 ben_pln_shd.g_old_rec.pln_attribute3;
506 End If;
507 If (p_rec.pln_attribute3 = hr_api.g_varchar2) then
508 p_rec.pln_attribute3 :=
510 End If;
511 If (p_rec.pln_attribute4 = hr_api.g_varchar2) then
512 p_rec.pln_attribute4 :=
513 ben_pln_shd.g_old_rec.pln_attribute4;
514 End If;
515 If (p_rec.pln_attribute5 = hr_api.g_varchar2) then
516 p_rec.pln_attribute5 :=
517 ben_pln_shd.g_old_rec.pln_attribute5;
518 End If;
519 If (p_rec.pln_attribute6 = hr_api.g_varchar2) then
520 p_rec.pln_attribute6 :=
521 ben_pln_shd.g_old_rec.pln_attribute6;
522 End If;
523 If (p_rec.pln_attribute7 = hr_api.g_varchar2) then
524 p_rec.pln_attribute7 :=
525 ben_pln_shd.g_old_rec.pln_attribute7;
526 End If;
527 If (p_rec.pln_attribute8 = hr_api.g_varchar2) then
528 p_rec.pln_attribute8 :=
529 ben_pln_shd.g_old_rec.pln_attribute8;
530 End If;
531 If (p_rec.pln_attribute9 = hr_api.g_varchar2) then
532 p_rec.pln_attribute9 :=
533 ben_pln_shd.g_old_rec.pln_attribute9;
534 End If;
535 If (p_rec.pln_attribute10 = hr_api.g_varchar2) then
536 p_rec.pln_attribute10 :=
537 ben_pln_shd.g_old_rec.pln_attribute10;
538 End If;
539 If (p_rec.pln_attribute11 = hr_api.g_varchar2) then
540 p_rec.pln_attribute11 :=
541 ben_pln_shd.g_old_rec.pln_attribute11;
542 End If;
543 If (p_rec.pln_attribute12 = hr_api.g_varchar2) then
544 p_rec.pln_attribute12 :=
545 ben_pln_shd.g_old_rec.pln_attribute12;
546 End If;
547 If (p_rec.pln_attribute13 = hr_api.g_varchar2) then
548 p_rec.pln_attribute13 :=
549 ben_pln_shd.g_old_rec.pln_attribute13;
550 End If;
551 If (p_rec.pln_attribute14 = hr_api.g_varchar2) then
552 p_rec.pln_attribute14 :=
553 ben_pln_shd.g_old_rec.pln_attribute14;
554 End If;
555 If (p_rec.pln_attribute15 = hr_api.g_varchar2) then
556 p_rec.pln_attribute15 :=
557 ben_pln_shd.g_old_rec.pln_attribute15;
558 End If;
559 If (p_rec.pln_attribute16 = hr_api.g_varchar2) then
560 p_rec.pln_attribute16 :=
561 ben_pln_shd.g_old_rec.pln_attribute16;
562 End If;
563 If (p_rec.pln_attribute17 = hr_api.g_varchar2) then
564 p_rec.pln_attribute17 :=
565 ben_pln_shd.g_old_rec.pln_attribute17;
566 End If;
567 If (p_rec.pln_attribute18 = hr_api.g_varchar2) then
568 p_rec.pln_attribute18 :=
569 ben_pln_shd.g_old_rec.pln_attribute18;
570 End If;
571 If (p_rec.pln_attribute19 = hr_api.g_varchar2) then
572 p_rec.pln_attribute19 :=
573 ben_pln_shd.g_old_rec.pln_attribute19;
574 End If;
575 If (p_rec.pln_attribute20 = hr_api.g_varchar2) then
576 p_rec.pln_attribute20 :=
577 ben_pln_shd.g_old_rec.pln_attribute20;
578 End If;
579 If (p_rec.pln_attribute21 = hr_api.g_varchar2) then
580 p_rec.pln_attribute21 :=
581 ben_pln_shd.g_old_rec.pln_attribute21;
582 End If;
583 If (p_rec.pln_attribute22 = hr_api.g_varchar2) then
584 p_rec.pln_attribute22 :=
585 ben_pln_shd.g_old_rec.pln_attribute22;
586 End If;
587 If (p_rec.pln_attribute23 = hr_api.g_varchar2) then
588 p_rec.pln_attribute23 :=
589 ben_pln_shd.g_old_rec.pln_attribute23;
590 End If;
591 If (p_rec.pln_attribute24 = hr_api.g_varchar2) then
592 p_rec.pln_attribute24 :=
593 ben_pln_shd.g_old_rec.pln_attribute24;
594 End If;
595 If (p_rec.pln_attribute25 = hr_api.g_varchar2) then
596 p_rec.pln_attribute25 :=
597 ben_pln_shd.g_old_rec.pln_attribute25;
598 End If;
599 If (p_rec.pln_attribute26 = hr_api.g_varchar2) then
600 p_rec.pln_attribute26 :=
601 ben_pln_shd.g_old_rec.pln_attribute26;
602 End If;
603 If (p_rec.pln_attribute27 = hr_api.g_varchar2) then
604 p_rec.pln_attribute27 :=
605 ben_pln_shd.g_old_rec.pln_attribute27;
606 End If;
607 If (p_rec.pln_attribute28 = hr_api.g_varchar2) then
608 p_rec.pln_attribute28 :=
609 ben_pln_shd.g_old_rec.pln_attribute28;
610 End If;
611 If (p_rec.pln_attribute29 = hr_api.g_varchar2) then
612 p_rec.pln_attribute29 :=
613 ben_pln_shd.g_old_rec.pln_attribute29;
614 End If;
615 If (p_rec.pln_attribute30 = hr_api.g_varchar2) then
616 p_rec.pln_attribute30 :=
617 ben_pln_shd.g_old_rec.pln_attribute30;
618 End If;
619 If (p_rec.susp_if_ctfn_not_prvd_flag = hr_api.g_varchar2) then
620 p_rec.susp_if_ctfn_not_prvd_flag :=
621 ben_pln_shd.g_old_rec.susp_if_ctfn_not_prvd_flag;
622 End If;
623 If (p_rec.ctfn_determine_cd = hr_api.g_varchar2) then
624 p_rec.ctfn_determine_cd :=
625 ben_pln_shd.g_old_rec.ctfn_determine_cd;
626 End If;
627 If (p_rec.susp_if_dpnt_ssn_nt_prv_cd = hr_api.g_varchar2) then
628 p_rec.susp_if_dpnt_ssn_nt_prv_cd :=
629 ben_pln_shd.g_old_rec.susp_if_dpnt_ssn_nt_prv_cd;
630 End If;
631 If (p_rec.susp_if_dpnt_dob_nt_prv_cd = hr_api.g_varchar2) then
632 p_rec.susp_if_dpnt_dob_nt_prv_cd :=
633 ben_pln_shd.g_old_rec.susp_if_dpnt_dob_nt_prv_cd;
634 End If;
635 If (p_rec.susp_if_dpnt_adr_nt_prv_cd = hr_api.g_varchar2) then
636 p_rec.susp_if_dpnt_adr_nt_prv_cd :=
637 ben_pln_shd.g_old_rec.susp_if_dpnt_adr_nt_prv_cd;
638 End If;
639 If (p_rec.susp_if_ctfn_not_dpnt_flag = hr_api.g_varchar2) then
640 p_rec.susp_if_ctfn_not_dpnt_flag :=
644 p_rec.susp_if_bnf_ssn_nt_prv_cd :=
641 ben_pln_shd.g_old_rec.susp_if_ctfn_not_dpnt_flag;
642 End If;
643 If (p_rec.susp_if_bnf_ssn_nt_prv_cd = hr_api.g_varchar2) then
645 ben_pln_shd.g_old_rec.susp_if_bnf_ssn_nt_prv_cd;
646 End If;
647 If (p_rec.susp_if_bnf_dob_nt_prv_cd = hr_api.g_varchar2) then
648 p_rec.susp_if_bnf_dob_nt_prv_cd :=
649 ben_pln_shd.g_old_rec.susp_if_bnf_dob_nt_prv_cd;
650 End If;
651 If (p_rec.susp_if_bnf_adr_nt_prv_cd = hr_api.g_varchar2) then
652 p_rec.susp_if_bnf_adr_nt_prv_cd :=
653 ben_pln_shd.g_old_rec.susp_if_bnf_adr_nt_prv_cd;
654 End If;
655 If (p_rec.susp_if_ctfn_not_bnf_flag = hr_api.g_varchar2) then
656 p_rec.susp_if_ctfn_not_bnf_flag :=
657 ben_pln_shd.g_old_rec.susp_if_ctfn_not_bnf_flag;
658 End If;
659 If (p_rec.dpnt_ctfn_determine_cd = hr_api.g_varchar2) then
660 p_rec.dpnt_ctfn_determine_cd :=
661 ben_pln_shd.g_old_rec.dpnt_ctfn_determine_cd;
662 End If;
663 If (p_rec.bnf_ctfn_determine_cd = hr_api.g_varchar2) then
664 p_rec.bnf_ctfn_determine_cd :=
665 ben_pln_shd.g_old_rec.bnf_ctfn_determine_cd;
666 End If;
667 If (p_rec.actl_prem_id = hr_api.g_number) then
668 p_rec.actl_prem_id :=
669 ben_pln_shd.g_old_rec.actl_prem_id;
670 End If;
671 If (p_rec.nip_dflt_flag = hr_api.g_varchar2) then
672 p_rec.nip_dflt_flag :=
673 ben_pln_shd.g_old_rec.nip_dflt_flag;
674 End If;
675 If (p_rec.frfs_distr_mthd_cd= hr_api.g_varchar2) then
676 p_rec.frfs_distr_mthd_cd:=
677 ben_pln_shd.g_old_rec.frfs_distr_mthd_cd;
678 End If;
679 If (p_rec.frfs_distr_mthd_rl= hr_api.g_number) then
680 p_rec.frfs_distr_mthd_rl:=
681 ben_pln_shd.g_old_rec.frfs_distr_mthd_rl;
682 End If;
683 If (p_rec.frfs_cntr_det_cd= hr_api.g_varchar2) then
684 p_rec.frfs_cntr_det_cd:=
685 ben_pln_shd.g_old_rec.frfs_cntr_det_cd;
686 End If;
687 If (p_rec.frfs_distr_det_cd= hr_api.g_varchar2) then
688 p_rec.frfs_distr_det_cd:=
689 ben_pln_shd.g_old_rec.frfs_distr_det_cd;
690 End If;
691 If (p_rec.cost_alloc_keyflex_1_id= hr_api.g_number) then
692 p_rec.cost_alloc_keyflex_1_id:=
693 ben_pln_shd.g_old_rec.cost_alloc_keyflex_1_id;
694 End If;
695 If (p_rec.cost_alloc_keyflex_2_id= hr_api.g_number) then
696 p_rec.cost_alloc_keyflex_2_id:=
697 ben_pln_shd.g_old_rec.cost_alloc_keyflex_2_id;
698 End If;
699 If (p_rec.post_to_gl_flag= hr_api.g_varchar2) then
700 p_rec.post_to_gl_flag:=
701 ben_pln_shd.g_old_rec.post_to_gl_flag;
702 End If;
703 If (p_rec.frfs_val_det_cd= hr_api.g_varchar2) then
704 p_rec.frfs_val_det_cd:=
705 ben_pln_shd.g_old_rec.frfs_val_det_cd;
706 End If;
707 If (p_rec.frfs_mx_cryfwd_val= hr_api.g_number) then
708 p_rec.frfs_mx_cryfwd_val:=
709 ben_pln_shd.g_old_rec.frfs_mx_cryfwd_val;
710 End If;
711 If (p_rec.frfs_portion_det_cd= hr_api.g_varchar2) then
712 p_rec.frfs_portion_det_cd:=
713 ben_pln_shd.g_old_rec.frfs_portion_det_cd;
714 End If;
715 If (p_rec.bndry_perd_cd= hr_api.g_varchar2) then
716 p_rec.bndry_perd_cd:=
717 ben_pln_shd.g_old_rec.bndry_perd_cd;
718 End If;
719 If (p_rec.short_name= hr_api.g_varchar2) then
720 p_rec.short_name:=
721 ben_pln_shd.g_old_rec.short_name;
722 End If;
723 If (p_rec.short_code= hr_api.g_varchar2) then
724 p_rec.short_code:=
725 ben_pln_shd.g_old_rec.short_code;
726 End If;
727 If (p_rec.legislation_code= hr_api.g_varchar2) then
728 p_rec.legislation_code:=
729 ben_pln_shd.g_old_rec.legislation_code;
730 End If;
731 If (p_rec.legislation_subgroup= hr_api.g_varchar2) then
732 p_rec.legislation_subgroup:=
733 ben_pln_shd.g_old_rec.legislation_subgroup;
734 End If;
735
736 If (p_rec.group_pl_id= hr_api.g_number) then
737 p_rec.group_pl_id:=
738 ben_pln_shd.g_old_rec.group_pl_id;
739 End If;
740 If (p_rec.mapping_table_name= hr_api.g_varchar2) then
741 p_rec.mapping_table_name:=
742 ben_pln_shd.g_old_rec.mapping_table_name;
743 End If;
744 If (p_rec.mapping_table_pk_id= hr_api.g_number) then
745 p_rec.mapping_table_pk_id:=
746 ben_pln_shd.g_old_rec.mapping_table_pk_id;
747 End If;
748 If (p_rec.Function_code= hr_api.g_varchar2) then
749 p_rec.Function_code:=
750 ben_pln_shd.g_old_rec.Function_code;
751 End If;
752 If (p_rec.pl_yr_not_applcbl_flag= hr_api.g_varchar2) then
753 p_rec.pl_yr_not_applcbl_flag:=
754 ben_pln_shd.g_old_rec.pl_yr_not_applcbl_flag;
755 End If;
756 If (p_rec.use_csd_rsd_prccng_cd= hr_api.g_varchar2) then
757 p_rec.use_csd_rsd_prccng_cd:=
758 ben_pln_shd.g_old_rec.use_csd_rsd_prccng_cd;
759 End If;
760
761 --
762 hr_utility.set_location(' Leaving:'||l_proc, 10);
763 --
764 End convert_defs;
765 --
766 end ben_pln_upd2;
[Home] [Help]