The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml(p_rec in out nocopy ben_eat_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into ben_actn_typ
( actn_typ_id,
business_group_id,
type_cd,
name,
description,
eat_attribute_category,
eat_attribute1,
eat_attribute2,
eat_attribute3,
eat_attribute4,
eat_attribute5,
eat_attribute6,
eat_attribute7,
eat_attribute8,
eat_attribute9,
eat_attribute10,
eat_attribute11,
eat_attribute12,
eat_attribute13,
eat_attribute14,
eat_attribute15,
eat_attribute16,
eat_attribute17,
eat_attribute18,
eat_attribute19,
eat_attribute20,
eat_attribute21,
eat_attribute22,
eat_attribute23,
eat_attribute24,
eat_attribute25,
eat_attribute26,
eat_attribute27,
eat_attribute28,
eat_attribute29,
eat_attribute30,
object_version_number
)
Values
( p_rec.actn_typ_id,
p_rec.business_group_id,
p_rec.type_cd,
p_rec.name,
p_rec.description,
p_rec.eat_attribute_category,
p_rec.eat_attribute1,
p_rec.eat_attribute2,
p_rec.eat_attribute3,
p_rec.eat_attribute4,
p_rec.eat_attribute5,
p_rec.eat_attribute6,
p_rec.eat_attribute7,
p_rec.eat_attribute8,
p_rec.eat_attribute9,
p_rec.eat_attribute10,
p_rec.eat_attribute11,
p_rec.eat_attribute12,
p_rec.eat_attribute13,
p_rec.eat_attribute14,
p_rec.eat_attribute15,
p_rec.eat_attribute16,
p_rec.eat_attribute17,
p_rec.eat_attribute18,
p_rec.eat_attribute19,
p_rec.eat_attribute20,
p_rec.eat_attribute21,
p_rec.eat_attribute22,
p_rec.eat_attribute23,
p_rec.eat_attribute24,
p_rec.eat_attribute25,
p_rec.eat_attribute26,
p_rec.eat_attribute27,
p_rec.eat_attribute28,
p_rec.eat_attribute29,
p_rec.eat_attribute30,
p_rec.object_version_number
);
insert into ben_actn_typ_tl (
actn_typ_id,
name,
description,
language,
type_cd,
source_lang,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date
)
select
p_rec.actn_typ_id,
p_rec.name,
p_rec.description,
l.language_code,
p_rec.type_cd,
userenv('LANG'),
null,
null,
null,
fnd_global.user_id,
sysdate
from fnd_languages l
where l.installed_flag in ('I', 'B')
and not exists
(select null
from ben_actn_typ_tl t
where t.actn_typ_id = p_rec.actn_typ_id
and t.language = l.language_code);
End insert_dml;
Procedure pre_insert(p_rec in out nocopy ben_eat_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_insert';
cursor c1 is select ben_actn_typ_s.nextval
from sys.dual;
End pre_insert;
Procedure post_insert(
p_effective_date in date,p_rec in ben_eat_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_insert';
ben_eat_rki.after_insert
(
p_actn_typ_id =>p_rec.actn_typ_id
,p_business_group_id =>p_rec.business_group_id
,p_type_cd =>p_rec.type_cd
,p_name =>p_rec.name
,p_description =>p_rec.description
,p_eat_attribute_category =>p_rec.eat_attribute_category
,p_eat_attribute1 =>p_rec.eat_attribute1
,p_eat_attribute2 =>p_rec.eat_attribute2
,p_eat_attribute3 =>p_rec.eat_attribute3
,p_eat_attribute4 =>p_rec.eat_attribute4
,p_eat_attribute5 =>p_rec.eat_attribute5
,p_eat_attribute6 =>p_rec.eat_attribute6
,p_eat_attribute7 =>p_rec.eat_attribute7
,p_eat_attribute8 =>p_rec.eat_attribute8
,p_eat_attribute9 =>p_rec.eat_attribute9
,p_eat_attribute10 =>p_rec.eat_attribute10
,p_eat_attribute11 =>p_rec.eat_attribute11
,p_eat_attribute12 =>p_rec.eat_attribute12
,p_eat_attribute13 =>p_rec.eat_attribute13
,p_eat_attribute14 =>p_rec.eat_attribute14
,p_eat_attribute15 =>p_rec.eat_attribute15
,p_eat_attribute16 =>p_rec.eat_attribute16
,p_eat_attribute17 =>p_rec.eat_attribute17
,p_eat_attribute18 =>p_rec.eat_attribute18
,p_eat_attribute19 =>p_rec.eat_attribute19
,p_eat_attribute20 =>p_rec.eat_attribute20
,p_eat_attribute21 =>p_rec.eat_attribute21
,p_eat_attribute22 =>p_rec.eat_attribute22
,p_eat_attribute23 =>p_rec.eat_attribute23
,p_eat_attribute24 =>p_rec.eat_attribute24
,p_eat_attribute25 =>p_rec.eat_attribute25
,p_eat_attribute26 =>p_rec.eat_attribute26
,p_eat_attribute27 =>p_rec.eat_attribute27
,p_eat_attribute28 =>p_rec.eat_attribute28
,p_eat_attribute29 =>p_rec.eat_attribute29
,p_eat_attribute30 =>p_rec.eat_attribute30
,p_object_version_number =>p_rec.object_version_number
,p_effective_date =>p_effective_date
);
End post_insert;
ben_eat_bus.insert_validate(p_rec
,p_effective_date);
pre_insert(p_rec);
insert_dml(p_rec);
post_insert(
p_effective_date,p_rec);