The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
elig_per_id,
effective_start_date,
effective_end_date,
business_group_id,
pl_id,
pgm_id,
plip_id,
ptip_id,
ler_id,
person_id,
per_in_ler_id,
dpnt_othr_pl_cvrd_rl_flag,
prtn_ovridn_thru_dt,
pl_key_ee_flag,
pl_hghly_compd_flag,
elig_flag,
comp_ref_amt,
cmbn_age_n_los_val,
comp_ref_uom,
age_val,
los_val,
prtn_end_dt,
prtn_strt_dt,
wait_perd_cmpltn_dt,
wait_perd_strt_dt,
wv_ctfn_typ_cd,
hrs_wkd_val,
hrs_wkd_bndry_perd_cd,
prtn_ovridn_flag,
no_mx_prtn_ovrid_thru_flag,
prtn_ovridn_rsn_cd,
age_uom,
los_uom,
ovrid_svc_dt,
inelg_rsn_cd,
frz_los_flag,
frz_age_flag,
frz_cmp_lvl_flag,
frz_pct_fl_tm_flag,
frz_hrs_wkd_flag,
frz_comb_age_and_los_flag,
dstr_rstcn_flag,
pct_fl_tm_val,
wv_prtn_rsn_cd,
pl_wvd_flag,
rt_comp_ref_amt,
rt_cmbn_age_n_los_val,
rt_comp_ref_uom,
rt_age_val,
rt_los_val,
rt_hrs_wkd_val,
rt_hrs_wkd_bndry_perd_cd,
rt_age_uom,
rt_los_uom,
rt_pct_fl_tm_val,
rt_frz_los_flag,
rt_frz_age_flag,
rt_frz_cmp_lvl_flag,
rt_frz_pct_fl_tm_flag,
rt_frz_hrs_wkd_flag,
rt_frz_comb_age_and_los_flag,
once_r_cntug_cd,
pl_ordr_num,
plip_ordr_num,
ptip_ordr_num,
pep_attribute_category,
pep_attribute1,
pep_attribute2,
pep_attribute3,
pep_attribute4,
pep_attribute5,
pep_attribute6,
pep_attribute7,
pep_attribute8,
pep_attribute9,
pep_attribute10,
pep_attribute11,
pep_attribute12,
pep_attribute13,
pep_attribute14,
pep_attribute15,
pep_attribute16,
pep_attribute17,
pep_attribute18,
pep_attribute19,
pep_attribute20,
pep_attribute21,
pep_attribute22,
pep_attribute23,
pep_attribute24,
pep_attribute25,
pep_attribute26,
pep_attribute27,
pep_attribute28,
pep_attribute29,
pep_attribute30,
request_id,
program_application_id,
program_id,
program_update_date,
object_version_number
from ben_elig_per_f
where elig_per_id = p_elig_per_id
and p_effective_date
between effective_start_date and effective_end_date;
p_delete out nocopy boolean,
p_future_change out nocopy boolean,
p_delete_next_change out nocopy boolean) is
--
l_proc varchar2(72) := g_package||'find_dt_del_modes';
select t.ler_id,
t.pgm_id,
t.pl_id,
t.plip_id,
t.ptip_id
from ben_elig_per_f t
where t.elig_per_id = p_base_key_value
and p_effective_date between t.effective_start_date
and t.effective_end_date;
p_delete => p_delete,
p_future_change => p_future_change,
p_delete_next_change => p_delete_next_change);
p_update out nocopy boolean,
p_update_override out nocopy boolean,
p_update_change_insert out nocopy boolean) is
--
l_proc varchar2(72) := g_package||'find_dt_upd_modes';
p_update => p_update,
p_update_override => p_update_override,
p_update_change_insert => p_update_change_insert);
update ben_elig_per_f t
set t.effective_end_date = p_new_effective_end_date,
t.object_version_number = l_object_version_number
where t.elig_per_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
select
elig_per_id,
effective_start_date,
effective_end_date,
business_group_id,
pl_id,
pgm_id,
plip_id,
ptip_id,
ler_id,
person_id,
per_in_ler_id,
dpnt_othr_pl_cvrd_rl_flag,
prtn_ovridn_thru_dt,
pl_key_ee_flag,
pl_hghly_compd_flag,
elig_flag,
comp_ref_amt,
cmbn_age_n_los_val,
comp_ref_uom,
age_val,
los_val,
prtn_end_dt,
prtn_strt_dt,
wait_perd_cmpltn_dt,
wait_perd_strt_dt,
wv_ctfn_typ_cd,
hrs_wkd_val,
hrs_wkd_bndry_perd_cd,
prtn_ovridn_flag,
no_mx_prtn_ovrid_thru_flag,
prtn_ovridn_rsn_cd,
age_uom,
los_uom,
ovrid_svc_dt,
inelg_rsn_cd,
frz_los_flag,
frz_age_flag,
frz_cmp_lvl_flag,
frz_pct_fl_tm_flag,
frz_hrs_wkd_flag,
frz_comb_age_and_los_flag,
dstr_rstcn_flag,
pct_fl_tm_val,
wv_prtn_rsn_cd,
pl_wvd_flag,
rt_comp_ref_amt,
rt_cmbn_age_n_los_val,
rt_comp_ref_uom,
rt_age_val,
rt_los_val,
rt_hrs_wkd_val,
rt_hrs_wkd_bndry_perd_cd,
rt_age_uom,
rt_los_uom,
rt_pct_fl_tm_val,
rt_frz_los_flag,
rt_frz_age_flag,
rt_frz_cmp_lvl_flag,
rt_frz_pct_fl_tm_flag,
rt_frz_hrs_wkd_flag,
rt_frz_comb_age_and_los_flag,
once_r_cntug_cd,
pl_ordr_num,
plip_ordr_num,
ptip_ordr_num,
pep_attribute_category,
pep_attribute1,
pep_attribute2,
pep_attribute3,
pep_attribute4,
pep_attribute5,
pep_attribute6,
pep_attribute7,
pep_attribute8,
pep_attribute9,
pep_attribute10,
pep_attribute11,
pep_attribute12,
pep_attribute13,
pep_attribute14,
pep_attribute15,
pep_attribute16,
pep_attribute17,
pep_attribute18,
pep_attribute19,
pep_attribute20,
pep_attribute21,
pep_attribute22,
pep_attribute23,
pep_attribute24,
pep_attribute25,
pep_attribute26,
pep_attribute27,
pep_attribute28,
pep_attribute29,
pep_attribute30,
request_id,
program_application_id,
program_id,
program_update_date,
object_version_number
from ben_elig_per_f
where elig_per_id = p_elig_per_id
and p_effective_date
between effective_start_date and effective_end_date
for update nowait;
If (p_datetrack_mode <> 'INSERT') then
--
-- We must select and lock the current row.
--
Open C_Sel1;
p_program_update_date in date,
p_object_version_number in number
)
Return g_rec_type is
--
l_rec g_rec_type;
l_rec.program_update_date := p_program_update_date;