The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml(p_rec in out nocopy ben_xcl_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into ben_ext_chg_evt_log
( ext_chg_evt_log_id,
chg_evt_cd,
chg_eff_dt,
chg_user_id,
prmtr_01,
prmtr_02,
prmtr_03,
prmtr_04,
prmtr_05,
prmtr_06,
prmtr_07,
prmtr_08,
prmtr_09,
prmtr_10,
person_id,
business_group_id,
object_version_number,
chg_actl_dt,
new_val1,
new_val2,
new_val3,
new_val4,
new_val5,
new_val6,
old_val1,
old_val2,
old_val3,
old_val4,
old_val5,
old_val6
)
Values
( p_rec.ext_chg_evt_log_id,
p_rec.chg_evt_cd,
p_rec.chg_eff_dt,
p_rec.chg_user_id,
p_rec.prmtr_01,
p_rec.prmtr_02,
p_rec.prmtr_03,
p_rec.prmtr_04,
p_rec.prmtr_05,
p_rec.prmtr_06,
p_rec.prmtr_07,
p_rec.prmtr_08,
p_rec.prmtr_09,
p_rec.prmtr_10,
p_rec.person_id,
p_rec.business_group_id,
p_rec.object_version_number,
p_rec.chg_actl_dt,
p_rec.new_val1,
p_rec.new_val2,
p_rec.new_val3,
p_rec.new_val4,
p_rec.new_val5,
p_rec.new_val6,
p_rec.old_val1,
p_rec.old_val2,
p_rec.old_val3,
p_rec.old_val4,
p_rec.old_val5,
p_rec.old_val6
);
End insert_dml;
Procedure pre_insert(p_rec in out nocopy ben_xcl_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_insert';
select ben_ext_chg_evt_log_s.nextval from sys.dual;
End pre_insert;
Procedure post_insert(
p_effective_date in date,p_rec in ben_xcl_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_insert';
ben_xcl_rki.after_insert
(
p_ext_chg_evt_log_id =>p_rec.ext_chg_evt_log_id
,p_chg_evt_cd =>p_rec.chg_evt_cd
,p_chg_eff_dt =>p_rec.chg_eff_dt
,p_chg_user_id =>p_rec.chg_user_id
,p_prmtr_01 =>p_rec.prmtr_01
,p_prmtr_02 =>p_rec.prmtr_02
,p_prmtr_03 =>p_rec.prmtr_03
,p_prmtr_04 =>p_rec.prmtr_04
,p_prmtr_05 =>p_rec.prmtr_05
,p_prmtr_06 =>p_rec.prmtr_06
,p_prmtr_07 =>p_rec.prmtr_07
,p_prmtr_08 =>p_rec.prmtr_08
,p_prmtr_09 =>p_rec.prmtr_09
,p_prmtr_10 =>p_rec.prmtr_10
,p_person_id =>p_rec.person_id
,p_business_group_id =>p_rec.business_group_id
,p_object_version_number =>p_rec.object_version_number
,p_effective_date =>p_effective_date
,p_chg_actl_dt =>p_rec.chg_actl_dt
,p_new_val1 =>p_rec.new_val1
,p_new_val2 =>p_rec.new_val2
,p_new_val3 =>p_rec.new_val3
,p_new_val4 =>p_rec.new_val4
,p_new_val5 =>p_rec.new_val5
,p_new_val6 =>p_rec.new_val6
,p_old_val1 =>p_rec.old_val1
,p_old_val2 =>p_rec.old_val2
,p_old_val3 =>p_rec.old_val3
,p_old_val4 =>p_rec.old_val4
,p_old_val5 =>p_rec.old_val5
,p_old_val6 =>p_rec.old_val6
);
End post_insert;
ben_xcl_bus.insert_validate(p_rec
,p_effective_date);
pre_insert(p_rec);
insert_dml(p_rec);
post_insert(
p_effective_date,p_rec);