The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure update_irc_asg_status_a (
p_status_change_reason varchar2,
p_status_change_date date,
p_assignment_status_id number,
p_object_version_number number) is
l_event_key number;
select per_wf_events_s.nextval from dual;
l_proc varchar2(72):=' irc_asg_status_be2.update_irc_asg_status_a';
l_event_name:='oracle.apps.per.irc.api.asg_status.update_irc_asg_status';
end update_irc_asg_status_a;