The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
ler_id,
effective_start_date,
effective_end_date,
name,
business_group_id,
typ_cd,
lf_evt_oper_cd,
short_name,
short_code,
ptnl_ler_trtmt_cd,
ck_rltd_per_elig_flag,
ler_eval_rl,
cm_aply_flag,
ovridg_le_flag,
qualg_evt_flag,
whn_to_prcs_cd,
desc_txt,
tmlns_eval_cd,
tmlns_perd_cd,
tmlns_dys_num,
tmlns_perd_rl,
ocrd_dt_det_cd,
ler_stat_cd,
slctbl_slf_svc_cd,
ss_pcp_disp_cd,
ler_attribute_category,
ler_attribute1,
ler_attribute2,
ler_attribute3,
ler_attribute4,
ler_attribute5,
ler_attribute6,
ler_attribute7,
ler_attribute8,
ler_attribute9,
ler_attribute10,
ler_attribute11,
ler_attribute12,
ler_attribute13,
ler_attribute14,
ler_attribute15,
ler_attribute16,
ler_attribute17,
ler_attribute18,
ler_attribute19,
ler_attribute20,
ler_attribute21,
ler_attribute22,
ler_attribute23,
ler_attribute24,
ler_attribute25,
ler_attribute26,
ler_attribute27,
ler_attribute28,
ler_attribute29,
ler_attribute30,
object_version_number
from ben_ler_f
where ler_id = p_ler_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_eval_rl
from ben_ler_f t
where t.ler_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_ler_f t
set t.effective_end_date = p_new_effective_end_date,
t.object_version_number = l_object_version_number
where t.ler_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
update ben_ler_f_tl t
set t.effective_end_date = p_new_effective_end_date,
t.last_update_date = sysdate,
t.last_updated_by = fnd_global.user_id,
t.last_update_login = fnd_global.login_id
where t.ler_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
select
ler_id,
effective_start_date,
effective_end_date,
name,
business_group_id,
typ_cd,
lf_evt_oper_cd,
short_name,
short_code,
ptnl_ler_trtmt_cd,
ck_rltd_per_elig_flag,
ler_eval_rl,
cm_aply_flag,
ovridg_le_flag,
qualg_evt_flag,
whn_to_prcs_cd,
desc_txt,
tmlns_eval_cd,
tmlns_perd_cd,
tmlns_dys_num,
tmlns_perd_rl,
ocrd_dt_det_cd,
ler_stat_cd,
slctbl_slf_svc_cd,
ss_pcp_disp_cd,
ler_attribute_category,
ler_attribute1,
ler_attribute2,
ler_attribute3,
ler_attribute4,
ler_attribute5,
ler_attribute6,
ler_attribute7,
ler_attribute8,
ler_attribute9,
ler_attribute10,
ler_attribute11,
ler_attribute12,
ler_attribute13,
ler_attribute14,
ler_attribute15,
ler_attribute16,
ler_attribute17,
ler_attribute18,
ler_attribute19,
ler_attribute20,
ler_attribute21,
ler_attribute22,
ler_attribute23,
ler_attribute24,
ler_attribute25,
ler_attribute26,
ler_attribute27,
ler_attribute28,
ler_attribute29,
ler_attribute30,
object_version_number
from ben_ler_f
where ler_id = p_ler_id
and p_effective_date
between effective_start_date and effective_end_date
for update nowait;
select t1.effective_end_date effective_end_date
from ben_css_rltd_per_per_in_ler_f t1
where (t1.css_rltd_per_per_in_ler_id,
t1.effective_start_date,
t1.effective_end_date) in
(select t2.css_rltd_per_per_in_ler_id,
max(t2.effective_start_date),
max(t2.effective_end_date)
from ben_css_rltd_per_per_in_ler_f t2
where t2.rsltg_ler_id = p_ler_id
and t2.ler_id <> p_ler_id
group by t2.css_rltd_per_per_in_ler_id)
order by t1.css_rltd_per_per_in_ler_id
for update nowait;
If (p_datetrack_mode <> 'INSERT') then
--
-- We must select and lock the current row.
--
Open C_Sel1;
if p_datetrack_mode = hr_api.g_delete and p_ler_id is not null then
Open C_lock(p_ler_id => p_ler_id);
fnd_message.set_name('PAY', 'HR_7201_DT_NO_DELETE_CHILD');
delete from ben_ler_f_tl t
where not exists
(select null
from ben_ler_f_tl b
where b.ler_id = t.ler_id
and b.effective_start_date = t.effective_start_date
);
update ben_ler_f_tl t set (
typ_cd,
name
) = (select
b.typ_cd,
b.name
from ben_ler_f_tl b
where b.ler_id = t.ler_id
and b.effective_start_date = t.effective_start_date
and b.language = t.source_lang)
where (
t.ler_id,
t.effective_start_date,
t.language
) in (select
subt.ler_id,
subt.effective_start_date,
subt.language
from ben_ler_f_tl subb, ben_ler_f_tl subt
where subb.ler_id = subt.ler_id
and subb.effective_start_date = subt.effective_start_date
and subb.language = subt.source_lang
and (subb.name <> subt.name
or subb.typ_cd <> subt.typ_cd
));
insert into ben_ler_f_tl (
ler_id,
effective_start_date,
effective_end_date,
typ_cd,
-- lf_evt_oper_cd,
name,
language,
source_lang,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date
) select
b.ler_id,
b.effective_start_date,
b.effective_end_date,
b.typ_cd,
-- b.lf_evt_oper_cd,
b.name,
l.language_code,
b.source_lang,
b.last_update_date,
b.last_updated_by,
b.last_update_login,
b.created_by,
b.creation_date
from ben_ler_f_tl b, fnd_languages l
where l.installed_flag in ('I', 'B')
and b.language = userenv('LANG')
and not exists
(select null
from ben_ler_f_tl t
where t.ler_id = b.ler_id
and t.effective_start_date = b.effective_start_date
and t.language = l.language_code);