The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE update_profile(
errbuf out NOCOPY varchar2
,retcode out NOCOPY varchar2
,p_business_group_id in varchar2
,p_action in varchar2) IS
cursor get_legislation_code is
select legislation_code
from per_business_groups
where business_group_id = p_business_group_id;
select decode(rule_mode,'Y','ENABLE','DISABLE')
from pay_legislative_field_info
where legislation_code = p_leg_code
and field_name = 'ONLINE_SOE'
and rule_type = 'DISPLAY';
update pay_legislative_field_info
set rule_mode = decode(p_action,'ENABLE','Y','N')
where legislation_code = l_leg_code
and field_name = 'ONLINE_SOE'
and rule_type = 'DISPLAY';
insert into pay_legislative_field_info(field_name, legislation_code,rule_type,rule_mode)
select 'ONLINE_SOE',
l_leg_code,
'DISPLAY',
decode(p_action,'ENABLE','Y','N')
from dual;
END update_profile;