The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_dml(p_rec in out nocopy ben_ecr_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_dml';
update ben_enrt_rt
set
enrt_rt_id = p_rec.enrt_rt_id,
-- ordr_num = p_rec.ordr_num,
acty_typ_cd = p_rec.acty_typ_cd,
tx_typ_cd = p_rec.tx_typ_cd,
ctfn_rqd_flag = p_rec.ctfn_rqd_flag,
dflt_flag = p_rec.dflt_flag,
dflt_pndg_ctfn_flag = p_rec.dflt_pndg_ctfn_flag,
dsply_on_enrt_flag = p_rec.dsply_on_enrt_flag,
use_to_calc_net_flx_cr_flag = p_rec.use_to_calc_net_flx_cr_flag,
entr_val_at_enrt_flag = p_rec.entr_val_at_enrt_flag,
asn_on_enrt_flag = p_rec.asn_on_enrt_flag,
rl_crs_only_flag = p_rec.rl_crs_only_flag,
dflt_val = p_rec.dflt_val,
ann_val = p_rec.ann_val,
ann_mn_elcn_val = p_rec.ann_mn_elcn_val,
ann_mx_elcn_val = p_rec.ann_mx_elcn_val,
val = p_rec.val,
nnmntry_uom = p_rec.nnmntry_uom,
mx_elcn_val = p_rec.mx_elcn_val,
mn_elcn_val = p_rec.mn_elcn_val,
incrmt_elcn_val = p_rec.incrmt_elcn_val,
cmcd_acty_ref_perd_cd = p_rec.cmcd_acty_ref_perd_cd,
cmcd_mn_elcn_val = p_rec.cmcd_mn_elcn_val,
cmcd_mx_elcn_val = p_rec.cmcd_mx_elcn_val,
cmcd_val = p_rec.cmcd_val,
cmcd_dflt_val = p_rec.cmcd_dflt_val,
rt_usg_cd = p_rec.rt_usg_cd,
ann_dflt_val = p_rec.ann_dflt_val,
bnft_rt_typ_cd = p_rec.bnft_rt_typ_cd,
rt_mlt_cd = p_rec.rt_mlt_cd,
dsply_mn_elcn_val = p_rec.dsply_mn_elcn_val,
dsply_mx_elcn_val = p_rec.dsply_mx_elcn_val,
entr_ann_val_flag = p_rec.entr_ann_val_flag,
rt_strt_dt = p_rec.rt_strt_dt,
rt_strt_dt_cd = p_rec.rt_strt_dt_cd,
rt_strt_dt_rl = p_rec.rt_strt_dt_rl,
rt_typ_cd = p_rec.rt_typ_cd,
elig_per_elctbl_chc_id = p_rec.elig_per_elctbl_chc_id,
acty_base_rt_id = p_rec.acty_base_rt_id,
spcl_rt_enrt_rt_id = p_rec.spcl_rt_enrt_rt_id,
enrt_bnft_id = p_rec.enrt_bnft_id,
prtt_rt_val_id = p_rec.prtt_rt_val_id,
decr_bnft_prvdr_pool_id = p_rec.decr_bnft_prvdr_pool_id,
cvg_amt_calc_mthd_id = p_rec.cvg_amt_calc_mthd_id,
actl_prem_id = p_rec.actl_prem_id,
comp_lvl_fctr_id = p_rec.comp_lvl_fctr_id,
ptd_comp_lvl_fctr_id = p_rec.ptd_comp_lvl_fctr_id,
clm_comp_lvl_fctr_id = p_rec.clm_comp_lvl_fctr_id,
business_group_id = p_rec.business_group_id,
--cwb
iss_val = p_rec.iss_val ,
val_last_upd_date = p_rec.val_last_upd_date ,
val_last_upd_person_id = p_rec.val_last_upd_person_id,
--cwb
pp_in_yr_used_num = p_rec.pp_in_yr_used_num,
ecr_attribute_category = p_rec.ecr_attribute_category,
ecr_attribute1 = p_rec.ecr_attribute1,
ecr_attribute2 = p_rec.ecr_attribute2,
ecr_attribute3 = p_rec.ecr_attribute3,
ecr_attribute4 = p_rec.ecr_attribute4,
ecr_attribute5 = p_rec.ecr_attribute5,
ecr_attribute6 = p_rec.ecr_attribute6,
ecr_attribute7 = p_rec.ecr_attribute7,
ecr_attribute8 = p_rec.ecr_attribute8,
ecr_attribute9 = p_rec.ecr_attribute9,
ecr_attribute10 = p_rec.ecr_attribute10,
ecr_attribute11 = p_rec.ecr_attribute11,
ecr_attribute12 = p_rec.ecr_attribute12,
ecr_attribute13 = p_rec.ecr_attribute13,
ecr_attribute14 = p_rec.ecr_attribute14,
ecr_attribute15 = p_rec.ecr_attribute15,
ecr_attribute16 = p_rec.ecr_attribute16,
ecr_attribute17 = p_rec.ecr_attribute17,
ecr_attribute18 = p_rec.ecr_attribute18,
ecr_attribute19 = p_rec.ecr_attribute19,
ecr_attribute20 = p_rec.ecr_attribute20,
ecr_attribute21 = p_rec.ecr_attribute21,
ecr_attribute22 = p_rec.ecr_attribute22,
ecr_attribute23 = p_rec.ecr_attribute23,
ecr_attribute24 = p_rec.ecr_attribute24,
ecr_attribute25 = p_rec.ecr_attribute25,
ecr_attribute26 = p_rec.ecr_attribute26,
ecr_attribute27 = p_rec.ecr_attribute27,
ecr_attribute28 = p_rec.ecr_attribute28,
ecr_attribute29 = p_rec.ecr_attribute29,
ecr_attribute30 = p_rec.ecr_attribute30,
last_update_login = p_rec.last_update_login,
created_by = p_rec.created_by,
creation_date = p_rec.creation_date,
last_updated_by = p_rec.last_updated_by,
last_update_date = p_rec.last_update_date,
request_id = p_rec.request_id,
program_application_id = p_rec.program_application_id,
program_id = p_rec.program_id,
program_update_date = p_rec.program_update_date,
object_version_number = p_rec.object_version_number
where enrt_rt_id = p_rec.enrt_rt_id;
End update_dml;
Procedure pre_update(p_rec in ben_ecr_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_update';
End pre_update;
Procedure post_update(p_rec in ben_ecr_shd.g_rec_type,
p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'post_update';
End post_update;
If (p_rec.program_update_date = hr_api.g_date) then
p_rec.program_update_date :=
ben_ecr_shd.g_old_rec.program_update_date;
ben_ecr_bus.update_validate(p_rec,p_effective_date);
pre_update(p_rec);
update_dml(p_rec);
post_update(p_rec,p_effective_date);
p_last_update_login in NUMBER DEFAULT hr_api.g_number,
p_created_by in NUMBER DEFAULT hr_api.g_number,
p_creation_date in DATE DEFAULT hr_api.g_date,
p_last_updated_by in NUMBER DEFAULT hr_api.g_number,
p_last_update_date in DATE DEFAULT hr_api.g_date,
p_request_id in NUMBER DEFAULT hr_api.g_number,
p_program_application_id in NUMBER DEFAULT hr_api.g_number,
p_program_id in NUMBER DEFAULT hr_api.g_number,
p_program_update_date in DATE DEFAULT hr_api.g_date,
p_object_version_number in out nocopy NUMBER
) is
--
l_rec ben_ecr_shd.g_rec_type;
p_last_update_login,
p_created_by,
p_creation_date,
p_last_updated_by,
p_last_update_date,
p_request_id,
p_program_application_id,
p_program_id,
p_program_update_date,
p_object_version_number
);