The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
pl_bnf_id,
effective_start_date,
effective_end_date,
business_group_id,
prtt_enrt_rslt_id,
bnf_person_id,
organization_id,
ttee_person_id,
prmry_cntngnt_cd,
pct_dsgd_num,
amt_dsgd_val,
amt_dsgd_uom,
dsgn_strt_dt,
dsgn_thru_dt,
addl_instrn_txt,
pbn_attribute_category,
pbn_attribute1,
pbn_attribute2,
pbn_attribute3,
pbn_attribute4,
pbn_attribute5,
pbn_attribute6,
pbn_attribute7,
pbn_attribute8,
pbn_attribute9,
pbn_attribute10,
pbn_attribute11,
pbn_attribute12,
pbn_attribute13,
pbn_attribute14,
pbn_attribute15,
pbn_attribute16,
pbn_attribute17,
pbn_attribute18,
pbn_attribute19,
pbn_attribute20,
pbn_attribute21,
pbn_attribute22,
pbn_attribute23,
pbn_attribute24,
pbn_attribute25,
pbn_attribute26,
pbn_attribute27,
pbn_attribute28,
pbn_attribute29,
pbn_attribute30,
request_id,
program_application_id,
program_id,
program_update_date,
object_version_number,
per_in_ler_id
from ben_pl_bnf_f
where pl_bnf_id = p_pl_bnf_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.per_in_ler_id,
t.prtt_enrt_rslt_id
from ben_pl_bnf_f t
where t.pl_bnf_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_pl_bnf_f t
set t.effective_end_date = p_new_effective_end_date,
t.object_version_number = l_object_version_number
where t.pl_bnf_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
select
pl_bnf_id,
effective_start_date,
effective_end_date,
business_group_id,
prtt_enrt_rslt_id,
bnf_person_id,
organization_id,
ttee_person_id,
prmry_cntngnt_cd,
pct_dsgd_num,
amt_dsgd_val,
amt_dsgd_uom,
dsgn_strt_dt,
dsgn_thru_dt,
addl_instrn_txt,
pbn_attribute_category,
pbn_attribute1,
pbn_attribute2,
pbn_attribute3,
pbn_attribute4,
pbn_attribute5,
pbn_attribute6,
pbn_attribute7,
pbn_attribute8,
pbn_attribute9,
pbn_attribute10,
pbn_attribute11,
pbn_attribute12,
pbn_attribute13,
pbn_attribute14,
pbn_attribute15,
pbn_attribute16,
pbn_attribute17,
pbn_attribute18,
pbn_attribute19,
pbn_attribute20,
pbn_attribute21,
pbn_attribute22,
pbn_attribute23,
pbn_attribute24,
pbn_attribute25,
pbn_attribute26,
pbn_attribute27,
pbn_attribute28,
pbn_attribute29,
pbn_attribute30,
request_id,
program_application_id,
program_id,
program_update_date,
object_version_number,
per_in_ler_id
from ben_pl_bnf_f
where pl_bnf_id = p_pl_bnf_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,
p_per_in_ler_id in number
)
Return g_rec_type is
--
l_rec g_rec_type;
l_rec.program_update_date := p_program_update_date;