The following lines contain the word 'select', 'insert', 'update' or 'delete':
select route_classification_id into l_classification_id from iem_account_route_class
where account_route_class_id = l_acct_rt_class_id;
select route_classification_id, name
into l_classification_id, l_class_name
--from iem_route_classifications a, iem_post_mdts b
from iem_route_classifications a, iem_rt_proc_emails b
where a.route_classification_id = b.rt_classification_id
and b.message_id = l_msg_id;
select rt_media_item_id
into l_rt_media_item_id
from IEM_RT_MEDIA_ITEMs
where message_id = l_msg_id
and expire='N';