The following lines contain the word 'select', 'insert', 'update' or 'delete':
select message_number
into msg_num
from fnd_new_messages a, fnd_application b
where upper(a.language_code) = upper(userenv('LANG'))
and upper(a.message_name) = upper(p_msg_name)
and a.application_id = b.application_id
and b.application_short_name = upper(p_app_name);