The following lines contain the word 'select', 'insert', 'update' or 'delete':
if (l_event_reason = 'DELETE') then
return; /* we don't want to do anything in case of delete */
select vendor_name
into l_vendor_name
from po_vendors
where vendor_id = l_vendor_id;
select language, fax, vendor_site_code,
ADDRESS_LINE1 || ' ' || ADDRESS_LINE2 || ' ' || ADDRESS_LINE3 || ' ' || CITY || ' ' || STATE || ' ' || ' ' || ZIP || ' ' || COUNTRY site_address
into l_language, l_fax, l_site_code, l_site_address
from po_vendor_sites_all
where vendor_site_id = l_vendor_site_id;
wf_event.AddParameterToList(p_name =>'UPDATEONLY', p_value =>'TRUE', p_parameterlist=>l_parameter_list);
l_parameter_list.DELETE;
wf_event.AddParameterToList(p_name =>'UPDATEONLY', p_value =>'TRUE', p_parameterlist => l_parameter_list);
l_parameter_list.DELETE;
l_parameter_list.DELETE;