The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Context_Index(policy_name IN VARCHAR2,primary_key IN VARCHAR2)
IS
cursor_name INTEGER;
END; -- update_context_index.
string := 'Select unique pa.pat_value
From ctxsys.dr$preference_attribute pa,
ctxsys.dr$preference pr,
ctxsys.dr$policy po,
ctxsys.dr$preference_usage pu
Where pa.pat_name = ''STOP_WORD''
AND pa.pat_pre_id = pu.pus_pre_id
AND pu.pus_pol_id = po.pol_id
AND po.pol_name in
(''CS_INCIDENTS_SUMMARY'',''CS_INCIDENTS_COMMENTS'',
''CS_INCIDENTS_PROBLEM_DESC'', ''CS_INCIDENTS_RESOLUTION_DESC'')';