Verificando ACL
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | SQL> SELECT PRINCIPAL, HOST, lower_port, upper_port, acl, 'connect' AS PRIVILEGE,     DECODE(DBMS_NETWORK_ACL_ADMIN.CHECK_PRIVILEGE_ACLID(aclid, PRINCIPAL, 'connect'), 1,'GRANTED', 0,'DENIED', NULL) PRIVILEGE_STATUS FROM DBA_NETWORK_ACLS     JOIN DBA_NETWORK_ACL_PRIVILEGES USING (ACL, ACLID) UNION ALL SELECT PRINCIPAL, HOST, NULL lower_port, NULL upper_port, acl, 'resolve' AS PRIVILEGE,     DECODE(DBMS_NETWORK_ACL_ADMIN.CHECK_PRIVILEGE_ACLID(aclid, PRINCIPAL, 'resolve'), 1,'GRANTED', 0,'DENIED', NULL) PRIVILEGE_STATUS FROM DBA_NETWORK_ACLS     JOIN DBA_NETWORK_ACL_PRIVILEGES USING (ACL, ACLID); PRINCIPA HOST  LOWER_PORT UPPER_PORT ACL                    PRIVILEGE    PRIVILE -------- ----- ---------- ---------- ---------------------- ------------ ------- CPD      *                           /sys/acls/ACL_TI.xml  connect      GRANTED CPD      *                           /sys/acls/ACL_TI.xml  connect      GRANTED CPD      *                           /sys/acls/ACL_TI.xml  resolve      GRANTED CPD      *                           /sys/acls/ACL_TI.xml  resolve      GRANTED | 
Dropando ACL
| 1 2 3 4 5 6 7 8 | SQL> BEGIN    DBMS_NETWORK_ACL_ADMIN.DROP_ACL(       acl => '/sys/acls/ACL_TI.xml');    END; / PL/SQL procedure successfully completed. | 
Verificando ACL
| 1 2 3 4 5 6 7 8 9 10 11 12 | SQL> SELECT PRINCIPAL, HOST, lower_port, upper_port, acl, 'connect' AS PRIVILEGE,     DECODE(DBMS_NETWORK_ACL_ADMIN.CHECK_PRIVILEGE_ACLID(aclid, PRINCIPAL, 'connect'), 1,'GRANTED', 0,'DENIED', NULL) PRIVILEGE_STATUS FROM DBA_NETWORK_ACLS     JOIN DBA_NETWORK_ACL_PRIVILEGES USING (ACL, ACLID) UNION ALL SELECT PRINCIPAL, HOST, NULL lower_port, NULL upper_port, acl, 'resolve' AS PRIVILEGE,     DECODE(DBMS_NETWORK_ACL_ADMIN.CHECK_PRIVILEGE_ACLID(aclid, PRINCIPAL, 'resolve'), 1,'GRANTED', 0,'DENIED', NULL) PRIVILEGE_STATUS FROM DBA_NETWORK_ACLS   9  JOIN DBA_NETWORK_ACL_PRIVILEGES USING (ACL, ACLID); no rows selected |