The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure dt_insert_dml
(p_rec in out nocopy ben_ler_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
-- Cursor to select 'old' created AOL who column values
--
Cursor C_Sel1 Is
select t.created_by,
t.creation_date
from ben_ler_f t
where t.ler_id = p_rec.ler_id
and t.effective_start_date =
ben_ler_shd.g_old_rec.effective_start_date
and t.effective_end_date = (p_validation_start_date - 1);
l_proc varchar2(72) := g_package||'dt_insert_dml';
l_last_update_date ben_ler_f.last_update_date%TYPE;
l_last_updated_by ben_ler_f.last_updated_by%TYPE;
l_last_update_login ben_ler_f.last_update_login%TYPE;
If (p_datetrack_mode <> 'INSERT') then
hr_utility.set_location(l_proc, 10);
l_last_update_date := sysdate;
l_last_updated_by := fnd_global.user_id;
l_last_update_login := fnd_global.login_id;
insert into ben_ler_f
( 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
, created_by,
creation_date,
last_update_date,
last_updated_by,
last_update_login
)
Values
( p_rec.ler_id,
p_rec.effective_start_date,
p_rec.effective_end_date,
p_rec.name,
p_rec.business_group_id,
p_rec.typ_cd,
p_rec.lf_evt_oper_cd,
p_rec.short_name,
p_rec.short_code,
p_rec.ptnl_ler_trtmt_cd,
p_rec.ck_rltd_per_elig_flag,
p_rec.ler_eval_rl,
p_rec.cm_aply_flag,
p_rec.ovridg_le_flag,
p_rec.qualg_evt_flag,
p_rec.whn_to_prcs_cd,
p_rec.desc_txt,
p_rec.tmlns_eval_cd,
p_rec.tmlns_perd_cd,
p_rec.tmlns_dys_num,
p_rec.tmlns_perd_rl,
p_rec.ocrd_dt_det_cd,
p_rec.ler_stat_cd,
p_rec.slctbl_slf_svc_cd,
p_rec.ss_pcp_disp_cd,
p_rec.ler_attribute_category,
p_rec.ler_attribute1,
p_rec.ler_attribute2,
p_rec.ler_attribute3,
p_rec.ler_attribute4,
p_rec.ler_attribute5,
p_rec.ler_attribute6,
p_rec.ler_attribute7,
p_rec.ler_attribute8,
p_rec.ler_attribute9,
p_rec.ler_attribute10,
p_rec.ler_attribute11,
p_rec.ler_attribute12,
p_rec.ler_attribute13,
p_rec.ler_attribute14,
p_rec.ler_attribute15,
p_rec.ler_attribute16,
p_rec.ler_attribute17,
p_rec.ler_attribute18,
p_rec.ler_attribute19,
p_rec.ler_attribute20,
p_rec.ler_attribute21,
p_rec.ler_attribute22,
p_rec.ler_attribute23,
p_rec.ler_attribute24,
p_rec.ler_attribute25,
p_rec.ler_attribute26,
p_rec.ler_attribute27,
p_rec.ler_attribute28,
p_rec.ler_attribute29,
p_rec.ler_attribute30,
p_rec.object_version_number
, l_created_by,
l_creation_date,
l_last_update_date,
l_last_updated_by,
l_last_update_login
);
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
p_rec.ler_id,
p_rec.effective_start_date,
p_rec.effective_end_date,
p_rec.typ_cd,
-- p_rec.lf_evt_oper_cd,
p_rec.name,
l.language_code,
userenv('LANG'),
l_last_update_date,
l_last_updated_by,
l_last_update_login,
fnd_global.user_id,
sysdate
from fnd_languages l
where l.installed_flag in ('I', 'B')
and not exists
(select null
from ben_ler_f_tl t
where t.ler_id = p_rec.ler_id
and t.effective_start_date = p_rec.effective_start_date
and t.language = l.language_code);
End dt_insert_dml;
Procedure insert_dml
(p_rec in out nocopy ben_ler_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'insert_dml';
dt_insert_dml(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => p_datetrack_mode,
p_validation_start_date => p_validation_start_date,
p_validation_end_date => p_validation_end_date);
End insert_dml;
Procedure pre_insert
(p_rec in out nocopy ben_ler_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'pre_insert';
Cursor C_Sel1 is select ben_ler_f_s.nextval from sys.dual;
End pre_insert;
Procedure post_insert
(p_rec in ben_ler_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'post_insert';
ben_ler_rki.after_insert
(
p_ler_id =>p_rec.ler_id
,p_effective_start_date =>p_rec.effective_start_date
,p_effective_end_date =>p_rec.effective_end_date
,p_name =>p_rec.name
,p_business_group_id =>p_rec.business_group_id
,p_typ_cd =>p_rec.typ_cd
,p_lf_evt_oper_cd =>p_rec.lf_evt_oper_cd
,p_short_name =>p_rec.short_name
,p_short_code =>p_rec.short_code
,p_ptnl_ler_trtmt_cd =>p_rec.ptnl_ler_trtmt_cd
,p_ck_rltd_per_elig_flag =>p_rec.ck_rltd_per_elig_flag
,p_ler_eval_rl =>p_rec.ler_eval_rl
,p_cm_aply_flag =>p_rec.cm_aply_flag
,p_ovridg_le_flag =>p_rec.ovridg_le_flag
,p_qualg_evt_flag =>p_rec.qualg_evt_flag
,p_whn_to_prcs_cd =>p_rec.whn_to_prcs_cd
,p_desc_txt =>p_rec.desc_txt
,p_tmlns_eval_cd =>p_rec.tmlns_eval_cd
,p_tmlns_perd_cd =>p_rec.tmlns_perd_cd
,p_tmlns_dys_num =>p_rec.tmlns_dys_num
,p_tmlns_perd_rl =>p_rec.tmlns_perd_rl
,p_ocrd_dt_det_cd =>p_rec.ocrd_dt_det_cd
,p_ler_stat_cd =>p_rec.ler_stat_cd
,p_slctbl_slf_svc_cd =>p_rec.slctbl_slf_svc_cd
,p_ss_pcp_disp_cd =>p_rec.ss_pcp_disp_cd
,p_ler_attribute_category =>p_rec.ler_attribute_category
,p_ler_attribute1 =>p_rec.ler_attribute1
,p_ler_attribute2 =>p_rec.ler_attribute2
,p_ler_attribute3 =>p_rec.ler_attribute3
,p_ler_attribute4 =>p_rec.ler_attribute4
,p_ler_attribute5 =>p_rec.ler_attribute5
,p_ler_attribute6 =>p_rec.ler_attribute6
,p_ler_attribute7 =>p_rec.ler_attribute7
,p_ler_attribute8 =>p_rec.ler_attribute8
,p_ler_attribute9 =>p_rec.ler_attribute9
,p_ler_attribute10 =>p_rec.ler_attribute10
,p_ler_attribute11 =>p_rec.ler_attribute11
,p_ler_attribute12 =>p_rec.ler_attribute12
,p_ler_attribute13 =>p_rec.ler_attribute13
,p_ler_attribute14 =>p_rec.ler_attribute14
,p_ler_attribute15 =>p_rec.ler_attribute15
,p_ler_attribute16 =>p_rec.ler_attribute16
,p_ler_attribute17 =>p_rec.ler_attribute17
,p_ler_attribute18 =>p_rec.ler_attribute18
,p_ler_attribute19 =>p_rec.ler_attribute19
,p_ler_attribute20 =>p_rec.ler_attribute20
,p_ler_attribute21 =>p_rec.ler_attribute21
,p_ler_attribute22 =>p_rec.ler_attribute22
,p_ler_attribute23 =>p_rec.ler_attribute23
,p_ler_attribute24 =>p_rec.ler_attribute24
,p_ler_attribute25 =>p_rec.ler_attribute25
,p_ler_attribute26 =>p_rec.ler_attribute26
,p_ler_attribute27 =>p_rec.ler_attribute27
,p_ler_attribute28 =>p_rec.ler_attribute28
,p_ler_attribute29 =>p_rec.ler_attribute29
,p_ler_attribute30 =>p_rec.ler_attribute30
,p_object_version_number =>p_rec.object_version_number
,p_effective_date =>p_effective_date
,p_validation_start_date =>p_validation_start_date
,p_validation_end_date =>p_validation_end_date
);
End post_insert;
l_datetrack_mode varchar2(30) := 'INSERT';
ben_ler_bus.insert_validate
(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => l_datetrack_mode,
p_validation_start_date => l_validation_start_date,
p_validation_end_date => l_validation_end_date);
pre_insert
(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => l_datetrack_mode,
p_validation_start_date => l_validation_start_date,
p_validation_end_date => l_validation_end_date);
insert_dml
(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => l_datetrack_mode,
p_validation_start_date => l_validation_start_date,
p_validation_end_date => l_validation_end_date);
post_insert
(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => l_datetrack_mode,
p_validation_start_date => l_validation_start_date,
p_validation_end_date => l_validation_end_date);