The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml
(p_rec in out nocopy hxc_err_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'insert_dml';
insert into hxc_errors
(error_id
,transaction_detail_id
,time_building_block_id
,time_building_block_ovn
,time_attribute_id
,time_attribute_ovn
,message_name
,message_level
,message_field
,message_tokens
,application_short_name
,object_version_number
,date_from
,date_to
)
Values
(p_rec.error_id
,p_rec.transaction_detail_id
,p_rec.time_building_block_id
,p_rec.time_building_block_ovn
,p_rec.time_attribute_id
,p_rec.time_attribute_ovn
,p_rec.message_name
,p_rec.message_level
,p_rec.message_field
,p_rec.message_tokens
,p_rec.application_short_name
,p_rec.object_version_number
,p_rec.date_from
,p_rec.date_to
);
End insert_dml;
Procedure pre_insert
(p_rec in out nocopy hxc_err_shd.g_rec_type
) is
--
Cursor C_Sel1 is select hxc_errors_s.nextval from sys.dual;
Select null
from hxc_errors
where error_id =
hxc_err_ins.g_error_id_i;
l_proc := g_package||'pre_insert';
End pre_insert;
Procedure post_insert
(p_rec in hxc_err_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'post_insert';
/*hxc_err_rki.after_insert
(p_error_id
=> p_rec.error_id
,p_transaction_detail_id
=> p_rec.transaction_detail_id
,p_time_building_block_id
=> p_rec.time_building_block_id
,p_time_building_block_ovn
=> p_rec.time_building_block_ovn
,p_time_attribute_id
=> p_rec.time_attribute_id
,p_time_attribute_ovn
=> p_rec.time_attribute_ovn
,p_message_name
=> p_rec.message_name
,p_message_level
=> p_rec.message_level
,p_message_field
=> p_rec.message_field
,p_message_tokens
=> p_rec.message_tokens
,p_application_short_name
=> p_rec.application_short_name
,p_object_version_number
=> p_rec.object_version_number
);
End post_insert;
hxc_err_bus.insert_validate
(p_rec
);
hxc_err_ins.pre_insert(p_rec);
hxc_err_ins.insert_dml(p_rec);
hxc_err_ins.post_insert
(p_rec
);