The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
prtn_elig_id,
effective_start_date,
effective_end_date,
business_group_id,
pgm_id,
pl_id,
oipl_id,
ptip_id,
plip_id,
trk_scr_for_inelg_flag,
prtn_eff_strt_dt_cd,
prtn_eff_end_dt_cd,
prtn_eff_strt_dt_rl,
prtn_eff_end_dt_rl,
wait_perd_dt_to_use_cd,
wait_perd_dt_to_use_rl,
wait_perd_val,
wait_perd_uom,
wait_perd_rl,
mx_poe_det_dt_cd,
mx_poe_det_dt_rl,
mx_poe_val,
mx_poe_uom,
mx_poe_rl,
mx_poe_apls_cd,
epa_attribute_category,
epa_attribute1,
epa_attribute2,
epa_attribute3,
epa_attribute4,
epa_attribute5,
epa_attribute6,
epa_attribute7,
epa_attribute8,
epa_attribute9,
epa_attribute10,
epa_attribute11,
epa_attribute12,
epa_attribute13,
epa_attribute14,
epa_attribute15,
epa_attribute16,
epa_attribute17,
epa_attribute18,
epa_attribute19,
epa_attribute20,
epa_attribute21,
epa_attribute22,
epa_attribute23,
epa_attribute24,
epa_attribute25,
epa_attribute26,
epa_attribute27,
epa_attribute28,
epa_attribute29,
epa_attribute30,
object_version_number
from ben_prtn_elig_f
where prtn_elig_id = p_prtn_elig_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.prtn_eff_end_dt_rl,
t.oipl_id,
t.pl_id,
t.pgm_id,
t.ptip_id,
t.plip_id
from ben_prtn_elig_f t
where t.prtn_elig_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_prtn_elig_f t
set t.effective_end_date = p_new_effective_end_date,
t.object_version_number = l_object_version_number
where t.prtn_elig_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
select
prtn_elig_id,
effective_start_date,
effective_end_date,
business_group_id,
pgm_id,
pl_id,
oipl_id,
ptip_id,
plip_id,
trk_scr_for_inelg_flag,
prtn_eff_strt_dt_cd,
prtn_eff_end_dt_cd,
prtn_eff_strt_dt_rl,
prtn_eff_end_dt_rl,
wait_perd_dt_to_use_cd,
wait_perd_dt_to_use_rl,
wait_perd_val,
wait_perd_uom,
wait_perd_rl,
mx_poe_det_dt_cd,
mx_poe_det_dt_rl,
mx_poe_val,
mx_poe_uom,
mx_poe_rl,
mx_poe_apls_cd,
epa_attribute_category,
epa_attribute1,
epa_attribute2,
epa_attribute3,
epa_attribute4,
epa_attribute5,
epa_attribute6,
epa_attribute7,
epa_attribute8,
epa_attribute9,
epa_attribute10,
epa_attribute11,
epa_attribute12,
epa_attribute13,
epa_attribute14,
epa_attribute15,
epa_attribute16,
epa_attribute17,
epa_attribute18,
epa_attribute19,
epa_attribute20,
epa_attribute21,
epa_attribute22,
epa_attribute23,
epa_attribute24,
epa_attribute25,
epa_attribute26,
epa_attribute27,
epa_attribute28,
epa_attribute29,
epa_attribute30,
object_version_number
from ben_prtn_elig_f
where prtn_elig_id = p_prtn_elig_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;