The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT p_event_name ||'-'|| JTF_AM_WF_SR_EVENT_S.nextval INTO l_key FROM DUAL;
SELECT Upper(Substr(p_event_name,22,(Instr(p_event_name,'.',1,5)-22))) into l_doc_type from dual;
l_str:='SELECT JTF_AM_WF_'||l_doc_type||'_EVENT_S.nextval FROM DUAL';
l_list.DELETE;
l_list.DELETE;
l_list.DELETE;
l_list.DELETE;
l_list.DELETE;
l_list.DELETE;
l_list.DELETE;
l_list.DELETE;
l_list.DELETE;