The following lines contain the word 'select', 'insert', 'update' or 'delete':
IF p_event_type = 'UpdateSite' THEN
l_event_name := 'oracle.apps.rrs.site.updateSiteEvent';
ELSIF p_event_type = 'UpdateCluster' THEN
l_event_name := 'oracle.apps.rrs.site.updateClusterEvent';
ELSIF p_event_type = 'UpdateHierarchy' THEN
l_event_name := 'oracle.apps.rrs.site.updateHierarchyEvent';
SELECT MTL_BUSINESS_EVENTS_S.NEXTVAL into l_event_num FROM dual;
l_parameter_list.DELETE;