The following lines contain the word 'select', 'insert', 'update' or 'delete':
cursor policy_q is select kind, grantee, type_schema,type_name,
name,action, enabled from dba_java_policy where
enabled='ENABLED';
select seq into pol_seq from dba_java_policy
where kind = 'RESTRICT' and type_schema='SYS'
and type_name = POLICYPERM and
name = '0:java.lang.RuntimePermission#loadLibrary.*' and
enabled='ENABLED';
select seq into run_seq from dba_java_policy
where kind = 'RESTRICT' and type_schema='SYS'
and type_name = 'java.lang.RuntimePermission' and
name = 'loadLibrary.*' and enabled='ENABLED';
select count(*) into row_count from dba_java_policy d where
pcol(i).kind = d.kind and
pcol(i).grantee = d.grantee and
pcol(i).type_schema = d.type_schema and
pcol(i).type_name = d.type_name and
(pcol(i).name = d.name or (pcol(i).name is null and d.name is null)
or ((d.name ='*' or d.name is null) and pcol(i).name != null)) and
(pcol(i).action = d.action or (pcol(i).action is null and
d.action is null) or ((d.action = '*' or d.action is null) and
pcol(i).action != null));
' AS SELECT KIND, GRANTEE, TYPE_SCHEMA, TYPE_NAME,' ||
' NAME, ACTION, ENABLED FROM DBA_JAVA_POLICY WHERE ROWNUM > 1'');';
return 'INSERT INTO TEMP_JAVA_PRIVS VALUES(''' || kind || ''',''' ||
grantee || ''',''' || type_schema || ''',''' || type_name ||
''',''' || name || ''',''' || action || ''',''' ||
enabled || ''');';
CURSOR C1 IS SELECT KIND,GRANTEE,TYPE_SCHEMA,TYPE_NAME,
NAME,ACTION,ENABLED FROM TEMP_JAVA_PRIVS;