The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml(p_rec in out nocopy ben_bmn_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into ben_reporting
( reporting_id,
benefit_action_id,
thread_id,
sequence,
text,
rep_typ_cd,
error_message_code,
national_identifier,
related_person_ler_id,
temporal_ler_id,
ler_id,
person_id,
pgm_id,
pl_id,
related_person_id,
oipl_id,
pl_typ_id,
actl_prem_id ,
val ,
mo_num ,
yr_num ,
object_version_number
)
Values
( p_rec.reporting_id,
p_rec.benefit_action_id,
p_rec.thread_id,
p_rec.sequence,
p_rec.text,
p_rec.rep_typ_cd,
p_rec.error_message_code,
p_rec.national_identifier,
p_rec.related_person_ler_id,
p_rec.temporal_ler_id,
p_rec.ler_id,
p_rec.person_id,
p_rec.pgm_id,
p_rec.pl_id,
p_rec.related_person_id,
p_rec.oipl_id,
p_rec.pl_typ_id,
p_rec.actl_prem_id ,
p_rec.val ,
p_rec.mo_num ,
p_rec.yr_num ,
p_rec.object_version_number
);
End insert_dml;
Procedure pre_insert(p_rec in out nocopy ben_bmn_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_insert';
Cursor C_Sel1 is select ben_reporting_s.nextval from sys.dual;
End pre_insert;
Procedure post_insert(p_rec in ben_bmn_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_insert';
End post_insert;
ben_bmn_bus.insert_validate(p_rec);
pre_insert(p_rec);
insert_dml(p_rec);
post_insert(p_rec);