0

データベースからいくつかの大きな wave ファイルを取得する必要があり、より小さい (約 5Mb) の wave ファイルに分割して取得したいと考えています。どのようにできるのか？プロシージャ dbms_lob.read を見たことがありますが、これは最大ファイル サイズ 32Kb を返します。

よろしく

procedure extract_blob(p_id in number, wrote_length in out number, chunk out blob) is
   len_file binary_integer;
   myblob blob;
   myname varchar2(255);
   buffer_length number := 32760;

   begin    
     select file_wav_data, file_wav_name, dbms_lob.getlength(file_wav_data)
     into myblob, myname, lun_file 
     from t_wav 
     where id = p_id;

     if(len_file > wrote_length) then
         dbms_lob.read(myblob,buffer_length,wrote_length+1,chunk);
         wrote_length := wrote_length + buffer_length;
     else wrote_length := -999; --EOF
     end if;
   end;
4

1 に答える 1

2

おそらく、一時 LOB を使用する必要があります。

procedure extract_blob(
    p_id in number,
    offset in number,
    chunk_length in out number,
    chunk out blob
) is
    chunk blob;
    wav_data blob;
    full_length number;
    chunk_length number;

begin    
    select file_wav_data, dbms_lob.getlength(file_wav_data)
    into wav_data, full_length
    from t_wav 
    where id = p_id;

    chunk_length := greatest(full_length - offset, 0);
    if chunk_length = 0 then
        return;
    end if;

    dbms_lob.createtemporary(chunk, TRUE);

    dbms_lob.copy(chunk, wav_data, chunk_length, 0, offset);

end extract_blob;

可能な場合は、(を使用してDBMS_LOB.FREETEMPORARY) 処理した後、クライアント側から一時 LOB を解放する必要があります。

于 2012-12-03T09:33:16.000 に答える