The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
bnft_prvdd_ldgr_id,
effective_start_date,
effective_end_date,
prtt_ro_of_unusd_amt_flag,
frftd_val,
prvdd_val,
used_val,
bnft_prvdr_pool_id,
acty_base_rt_id,
per_in_ler_id,
prtt_enrt_rslt_id,
business_group_id,
bpl_attribute_category,
bpl_attribute1,
bpl_attribute2,
bpl_attribute3,
bpl_attribute4,
bpl_attribute5,
bpl_attribute6,
bpl_attribute7,
bpl_attribute8,
bpl_attribute9,
bpl_attribute10,
bpl_attribute11,
bpl_attribute12,
bpl_attribute13,
bpl_attribute14,
bpl_attribute15,
bpl_attribute16,
bpl_attribute17,
bpl_attribute18,
bpl_attribute19,
bpl_attribute20,
bpl_attribute21,
bpl_attribute22,
bpl_attribute23,
bpl_attribute24,
bpl_attribute25,
bpl_attribute26,
bpl_attribute27,
bpl_attribute28,
bpl_attribute29,
bpl_attribute30,
object_version_number,
cash_recd_val,
rld_up_val,
acty_ref_perd_cd,
cmcd_frftd_val,
cmcd_prvdd_val,
cmcd_rld_up_val,
cmcd_used_val,
cmcd_cash_recd_val,
cmcd_ref_perd_cd,
ann_frftd_val,
ann_prvdd_val,
ann_rld_up_val,
ann_used_val,
ann_cash_recd_val
from ben_bnft_prvdd_ldgr_f
where bnft_prvdd_ldgr_id = p_bnft_prvdd_ldgr_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.acty_base_rt_id,
t.bnft_prvdr_pool_id,
t.prtt_enrt_rslt_id
from ben_bnft_prvdd_ldgr_f t
where t.bnft_prvdd_ldgr_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_bnft_prvdd_ldgr_f t
set t.effective_end_date = p_new_effective_end_date,
t.object_version_number = l_object_version_number
where t.bnft_prvdd_ldgr_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
select
bnft_prvdd_ldgr_id,
effective_start_date,
effective_end_date,
prtt_ro_of_unusd_amt_flag,
frftd_val,
prvdd_val,
used_val,
bnft_prvdr_pool_id,
acty_base_rt_id,
per_in_ler_id,
prtt_enrt_rslt_id,
business_group_id,
bpl_attribute_category,
bpl_attribute1,
bpl_attribute2,
bpl_attribute3,
bpl_attribute4,
bpl_attribute5,
bpl_attribute6,
bpl_attribute7,
bpl_attribute8,
bpl_attribute9,
bpl_attribute10,
bpl_attribute11,
bpl_attribute12,
bpl_attribute13,
bpl_attribute14,
bpl_attribute15,
bpl_attribute16,
bpl_attribute17,
bpl_attribute18,
bpl_attribute19,
bpl_attribute20,
bpl_attribute21,
bpl_attribute22,
bpl_attribute23,
bpl_attribute24,
bpl_attribute25,
bpl_attribute26,
bpl_attribute27,
bpl_attribute28,
bpl_attribute29,
bpl_attribute30,
object_version_number,
cash_recd_val,
rld_up_val,
acty_ref_perd_cd,
cmcd_frftd_val,
cmcd_prvdd_val,
cmcd_rld_up_val,
cmcd_used_val,
cmcd_cash_recd_val,
cmcd_ref_perd_cd,
ann_frftd_val,
ann_prvdd_val,
ann_rld_up_val,
ann_used_val,
ann_cash_recd_val
from ben_bnft_prvdd_ldgr_f
where bnft_prvdd_ldgr_id = p_bnft_prvdd_ldgr_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;