ORACLE 存储过程创建多级目录问题和BLOB导出问题！

0 0

ORACLE 存储过程创建多级目录问题和BLOB导出问题！10

目的是根据表的相关字段创建多级目录，并将BLOB存储其中。
但存储过程中涉及到JAVA.IO，都必须先授权dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'read' )，而且是每级目录都要授权;

由于导出的BLOB文件很多，大约500个G左右，所以这短代码没跑几分钟就报 ORA-04031 JAVA POOL 错误，错误指向dbms_java.grant_permission。查资料得知是放入太多的对象到共享池。

现在解决方法我想到的就这几个，一个是增加共享池，一个是全用JAVA代码写，一个是优化存储过程。

如果不考虑用JDBC来做，还是用存储过程来做，请问能不能做，我这段代码该怎么修改？

下面是代码片段：

declare
  cursor c_folders is 
         select * from table1 where noa='01001' and nob='1987';
  v_root varchar2(4);--盘符
  v_loc_dir varchar2(50);
  v_loc_dir_str varchar2(100);
begin
         v_root:='d:\';
         v_loc_dir:='01001\1987';
         
         v_loc_dir_str:=v_root||'01001';
         --dbms_output.put_line( 'no1:'||v_loc_dir_str );
         dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'read' );
         dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'write' );
         createfolder(v_loc_dir_str);
         
         v_loc_dir_str:=v_loc_dir_str||'\1987';
         --dbms_output.put_line( 'no2:'||v_loc_dir_str );
         dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'read' );
         dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'write' );
         createfolder(v_loc_dir_str);
         
         v_loc_dir:=v_loc_dir_str;
       
         
         for i in c_folders loop
             --dbms_output.put_line( 'folderno:'||i.folderno );
             --*************************************************************************
             declare
               
               cursor c_archives is select * from table2 where folderno=i.folderno;
               v_loc_dir2 varchar2(100);
             begin
             
               v_loc_dir_str:=v_loc_dir||'\'||i.yearfolderno;
               --dbms_output.put_line( 'no4:'||v_loc_dir_str );
               dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'read' );
               dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'write' );
               createfolder(v_loc_dir_str);
               
               v_loc_dir2:=v_loc_dir_str;
               for ch in c_archives loop
                   --dbms_output.put_line( 'archiveno:'||ch.archiveno );
                   -------------------------------------------------------------------
                   declare
                     
                     cursor c_ori is select * from table3 where recordcode=ch.recordcode;
                     v_blob BLOB;
                     v_no integer;
                     v_fileNameExt varchar2(10);
                     v_loc_dir3 varchar2(10); 
                     
                   begin
                   
                     --v_loc_dir3:=ch.pageno;
                     
                     v_loc_dir_str:=v_loc_dir2||'\'||ch.pageno;
                     --dbms_output.put_line( 'no5:'||v_loc_dir_str);
                     
                                         
                     dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'read' );
                     dbms_java.grant_permission( 'user', 'SYS:java.io.FilePermission', v_loc_dir_str, 'write' );
                     createfolder(v_loc_dir_str);
                           
                     Execute immediate 'create or replace directory dir_temp as '||chr(39)||v_loc_dir_str||chr(39);
                     
                     v_no:=1;
                     for o in c_ori loop
                         select files,filetype into v_blob,v_fileNameExt from table4 where filecode=o.filecode;
                         
                         to_file('DIR_TEMP',v_no||'.'||v_fileNameExt,v_blob);
                         
                         v_no:=v_no+1;
                     end loop;
                     Execute immediate 'DROP DIRECTORY dir_temp';
                   end;
                   ------------------------------------------------------------------
               end loop;
             end;
             --*************************************************************************
         end loop;
end;

DAO