Dbms_java.grant_permission fails during the subsequent executions

Question

Always first call succeeds for the following lines in a procedure.
dbms_java.grant_permission('MDSYS','SYS:java.io.FilePermission','D:\temp\test.dat,'read' );
dbms_java.grant_permission('SCOTT,'SYS:java.io.FilePermission','D:\temp\test.dat,'read' );
Any subsequent call does not return error message. But the other parts of the code fails to recognize the file permission and results in error.
Workaround is to run the grant_permission for a set for files separately, then the other parts of the code recognize the file permissions.
Any ideas? Thanks.

Answer 1

Thanks for your attention.
1. Here is the code
-- Import the image.
PROCEDURE Import_Raster (pi_grant_schema varchar2, pi_utldirname varchar2, pi_filename varchar2, pi_georid number)
IS
     -- PRAGMA AUTONOMOUS_TRANSACTION;
     geor SDO_GEORASTER;
     l_filepathname varchar2(255);
     l_privilege varchar2(50) := 'read';
BEGIN
     l_filepathname:= pi_utldirname||'\'||pi_filename;
     dbms_java.grant_permission('MDSYS','SYS:java.io.FilePermission',l_filepathname, l_privilege );
     dbms_java.grant_permission(pi_grant_schema,'SYS:java.io.FilePermission',l_filepathname, l_privilege );
     delete from georaster_table where georid = pi_georid;
     insert into georaster_table (georid,georaster)
          values( pi_georid, sdo_geor.init('RDT_GEOR', pi_georid) );
     select georaster into geor from georaster_table where georid = pi_georid for update;
     sdo_geor.importFrom(geor, '', 'TIFF', 'file',l_filepathname);
     update georaster_table set georaster = geor where georid = pi_georid;
     dbms_java.revoke_permission('MDSYS','SYS:java.io.FilePermission',l_filepathname, l_privilege );
     dbms_java.revoke_permission(pi_grant_schema,'SYS:java.io.FilePermission',l_filepathname, l_privilege );
END;
2. I could reproduce the error if repeated call the procedure with different file name as below.
call dbms_java.grant_permission('SCOTT','SYS:java.io.FilePermission','e:\temp\m25l_2_a.tif','read' );
call dbms_java.grant_permission('SCOTT','SYS:java.io.FilePermission','e:\temp\m25l_2_b.tif','read' );
call dbms_java.grant_permission('SCOTT','SYS:java.io.FilePermission','e:\temp\m26d_2.tif','read' );
call dbms_java.grant_permission('SCOTT','SYS:java.io.FilePermission','e:\temp\m26e_2.tif','read' );
call dbms_java.grant_permission('SCOTT','SYS:java.io.FilePermission','e:\temp\m26f_3.tif','read' );
call dbms_java.grant_permission('SCOTT','SYS:java.io.FilePermission','e:\temp\m26g_1.tif','read' );
3. Workaround: I am exiting the session after each command.
Thanks.