The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
clpse_lf_evt_id,
effective_start_date,
effective_end_date,
business_group_id,
seq,
ler1_id,
bool1_cd,
ler2_id,
bool2_cd,
ler3_id,
bool3_cd,
ler4_id,
bool4_cd,
ler5_id,
bool5_cd,
ler6_id,
bool6_cd,
ler7_id,
bool7_cd,
ler8_id,
bool8_cd,
ler9_id,
bool9_cd,
ler10_id,
eval_cd,
eval_rl,
tlrnc_dys_num,
eval_ler_id,
eval_ler_det_cd,
eval_ler_det_rl,
clp_attribute_category,
clp_attribute1,
clp_attribute2,
clp_attribute3,
clp_attribute4,
clp_attribute5,
clp_attribute6,
clp_attribute7,
clp_attribute8,
clp_attribute9,
clp_attribute10,
clp_attribute11,
clp_attribute12,
clp_attribute13,
clp_attribute14,
clp_attribute15,
clp_attribute16,
clp_attribute17,
clp_attribute18,
clp_attribute19,
clp_attribute20,
clp_attribute21,
clp_attribute22,
clp_attribute23,
clp_attribute24,
clp_attribute25,
clp_attribute26,
clp_attribute27,
clp_attribute28,
clp_attribute29,
clp_attribute30,
object_version_number
from ben_clpse_lf_evt_f
where clpse_lf_evt_id = p_clpse_lf_evt_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';
l_delete boolean;
l_delete1 boolean;
l_delete_next_change boolean;
l_delete_next_change1 boolean;
select t.ler1_id,
t.ler2_id,
t.ler3_id,
t.ler4_id,
t.ler5_id,
t.ler6_id,
t.ler7_id,
t.ler8_id,
t.ler9_id,
t.ler10_id,
t.eval_ler_id
from ben_clpse_lf_evt_f t
where t.clpse_lf_evt_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
p_delete => l_delete,
p_future_change => l_future_change,
p_delete_next_change => l_delete_next_change);
p_delete => l_delete1,
p_future_change => l_future_change1,
p_delete_next_change => l_delete_next_change1);
if l_delete and l_delete1 then
--
p_delete := true;
p_delete := false;
if l_delete_next_change and l_delete_next_change1 then
--
p_delete_next_change := true;
p_delete_next_change := false;
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_clpse_lf_evt_f t
set t.effective_end_date = p_new_effective_end_date,
t.object_version_number = l_object_version_number
where t.clpse_lf_evt_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
select
clpse_lf_evt_id,
effective_start_date,
effective_end_date,
business_group_id,
seq,
ler1_id,
bool1_cd,
ler2_id,
bool2_cd,
ler3_id,
bool3_cd,
ler4_id,
bool4_cd,
ler5_id,
bool5_cd,
ler6_id,
bool6_cd,
ler7_id,
bool7_cd,
ler8_id,
bool8_cd,
ler9_id,
bool9_cd,
ler10_id,
eval_cd,
eval_rl,
tlrnc_dys_num,
eval_ler_id,
eval_ler_det_cd,
eval_ler_det_rl,
clp_attribute_category,
clp_attribute1,
clp_attribute2,
clp_attribute3,
clp_attribute4,
clp_attribute5,
clp_attribute6,
clp_attribute7,
clp_attribute8,
clp_attribute9,
clp_attribute10,
clp_attribute11,
clp_attribute12,
clp_attribute13,
clp_attribute14,
clp_attribute15,
clp_attribute16,
clp_attribute17,
clp_attribute18,
clp_attribute19,
clp_attribute20,
clp_attribute21,
clp_attribute22,
clp_attribute23,
clp_attribute24,
clp_attribute25,
clp_attribute26,
clp_attribute27,
clp_attribute28,
clp_attribute29,
clp_attribute30,
object_version_number
from ben_clpse_lf_evt_f
where clpse_lf_evt_id = p_clpse_lf_evt_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;