The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml(p_rec in out nocopy ota_tsp_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into ota_skill_provisions
( skill_provision_id,
activity_version_id,
object_version_number,
type,
comments,
tsp_information_category,
tsp_information1,
tsp_information2,
tsp_information3,
tsp_information4,
tsp_information5,
tsp_information6,
tsp_information7,
tsp_information8,
tsp_information9,
tsp_information10,
tsp_information11,
tsp_information12,
tsp_information13,
tsp_information14,
tsp_information15,
tsp_information16,
tsp_information17,
tsp_information18,
tsp_information19,
tsp_information20,
analysis_criteria_id
)
Values
( p_rec.skill_provision_id,
p_rec.activity_version_id,
p_rec.object_version_number,
p_rec.type,
p_rec.comments,
p_rec.tsp_information_category,
p_rec.tsp_information1,
p_rec.tsp_information2,
p_rec.tsp_information3,
p_rec.tsp_information4,
p_rec.tsp_information5,
p_rec.tsp_information6,
p_rec.tsp_information7,
p_rec.tsp_information8,
p_rec.tsp_information9,
p_rec.tsp_information10,
p_rec.tsp_information11,
p_rec.tsp_information12,
p_rec.tsp_information13,
p_rec.tsp_information14,
p_rec.tsp_information15,
p_rec.tsp_information16,
p_rec.tsp_information17,
p_rec.tsp_information18,
p_rec.tsp_information19,
p_rec.tsp_information20,
p_rec.analysis_criteria_id
);
End insert_dml;
Procedure pre_insert
(p_rec in out nocopy ota_tsp_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'pre_insert';
Cursor C_Sel1 is select ota_skill_provisions_s.nextval from sys.dual;
Select null
from ota_skill_provisions
where skill_provision_id =
ota_tsp_ins.g_skill_provision_id_i;
End pre_insert;
Procedure post_insert(p_rec in ota_tsp_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_insert';
End post_insert;
ota_tsp_bus.insert_validate(p_rec);
pre_insert(p_rec);
insert_dml(p_rec);
post_insert(p_rec);