The following lines contain the word 'select', 'insert', 'update' or 'delete':
select c.legislation_code into l_leg_code
from fnd_profile_options a, fnd_profile_option_values b, per_business_groups c
where a.profile_option_name = 'PER_BUSINESS_GROUP_ID'
and a.profile_option_id = b.profile_option_id
and b.level_value = p_responsibility_id
and b.level_id = 10003 /* responsibility level profile option */
and b.profile_option_value = to_char(c.business_group_id);