Anda tidak memerlukan commit
, karena operasi DML eksplisit tidak dilakukan untuk operasi ini. Dan menggunakan begin..end
blok juga tidak diperlukan untuk setiap metode yang dipanggil.
Masalah Anda berasal dari fakta perlunya menjalankan Dbms_Network_Acl_Admin.Add_Privilege
metode dengan privilege => 'connect'
pilihan juga. Jadi Anda dapat menggunakan yang berikut ini :
BEGIN
DBMS_NETWORK_ACL_ADMIN.CREATE_ACL(
acl => 'apex_user.xml',
description => 'access to apex email',
principal => 'DBUSER',
is_grant => TRUE,
privilege => 'connect',
start_date => SYSTIMESTAMP,
end_date =>Null
);
DBMS_NETWORK_ACL_ADMIN.ADD_PRIVILEGE(
acl => 'apex_user.xml',
principal => 'DBUSER',
is_grant => true,
privilege => 'connect'
);
DBMS_NETWORK_ACL_ADMIN.ADD_PRIVILEGE(
acl => 'apex_user.xml',
principal => 'DBUSER',
is_grant => true,
privilege => 'resolve'
);
DBMS_NETWORK_ACL_ADMIN.ASSIGN_ACL(
acl => 'apex_user.xml',
host => 'smtp.gmail.com',
lower_port =>587,
upper_port =>587
);
END;
Dengan kueri berikut, semua akses istimewa dapat diperiksa ( melalui skema SYS atau SYSTEM ):
select a.host,p.*
from dba_network_acl_privileges p
join dba_network_acls a on a.aclid = p.aclid
order by a.host, p.principal, p.privilege;