The following lines contain the word 'select', 'insert', 'update' or 'delete':
select '@'||a.db_link,b.email_user,b.email_password, b.domain,
b.account_name,c.source_message_id,c.received_date,b.reply_to_address
INTO
l_dblink,l_user,l_password,l_domain,
l_account_name,l_source_message_id,l_received_date,l_replyto
from iem_db_connections a,iem_email_accounts b,iem_post_mdts c
where c.message_id=p_msgid
and b.email_account_id=c.email_account_id
and a.db_server_id=b.db_server_id
and a.is_admin='A';
x_merge_vals.delete;
select '@'||a.db_link,b.email_user,b.email_password, b.domain,
b.account_name,c.source_message_id,c.received_date,b.reply_to_address
INTO
l_dblink,l_user,l_password,l_domain,
l_account_name,l_source_message_id,l_received_date,l_replyto
from iem_db_connections a,iem_email_accounts b,iem_post_mdts c
where c.message_id=p_msgid
and b.email_account_id=c.email_account_id
and a.db_server_id=b.db_server_id
and a.is_admin='A';