Writing blobs to files in 8.1.7

Question

(Duplicate post of a message in the SQL forum - I belatedly realized it might belong under Java...)
I have got several thousand blobs in an Oracle 8.1.7 instance that I need to write to files.
I found sample procedures for doing this listed below.
I got them to compile and execute. But, when I do, the resulting file comes out much shorter than it should be (742 bytes vs. 2595), and unreadable.
Does anyone know how to correct this?
Thanks much,
Natasha
From:
http://www.oracle-base.com/articles/8i/ExportBlob.php
CREATE OR REPLACE JAVA SOURCE NAMED "BlobHandler" AS
import java.lang.*;
import java.sql.*;
import oracle.sql.*;
import java.io.*;
public class BlobHandler
public static void ExportBlob(String myFile, BLOB myBlob) throws Exception
// Bind the image object to the database object
// Open streams for the output file and the blob
File binaryFile = new File(myFile);
FileOutputStream outStream = new FileOutputStream(binaryFile);
InputStream inStream = myBlob.getBinaryStream();
// Get the optimum buffer size and use this to create the read/write buffer
int size = myBlob.getBufferSize();
byte[] buffer = new byte[size];
int length = -1;
// Transfer the data
while ((length = inStream.read(buffer)) != -1)
outStream.write(buffer, 0, length);
outStream.flush();
// Close everything down
inStream.close();
outStream.close();
ALTER java source "BlobHandler" compile;
show errors java source "BlobHandler"
CREATE OR REPLACE PROCEDURE ExportBlob (p_file IN VARCHAR2,
p_blob IN BLOB)
AS LANGUAGE JAVA
NAME 'BlobHandler.ExportBlob(java.lang.String, oracle.sql.BLOB)';
EXEC Dbms_Java.Grant_Permission( -
'USER', -
'SYS:java.io.FilePermission', -
'C:\temp\*', -
'read,write,execute,delete');
EXEC dbms_java.grant_permission('USER','SYS:java.lang.RuntimePermission','writeFileDescriptor', null);
EXEC dbms_java.grant_permission('USER','SYS:java.lang.RuntimePermission','readFileDescriptor', null);
EXEC dbms_java.grant_permission('USER','SYS:java.util.PropertyPermission','C:\test\*', 'read,write');
DECLARE
v_blob BLOB;
cursor c1 is
select detail
from blobtable
where row_id = 1006;
BEGIN
open c1;
fetch c1 into v_blob;
ExportBlob('c:\temp\test.txt',v_blob);
close c1;
END;

Answer 1

i have 9i and it works
SQL> drop type t_b
  2  /
Type dropped.
SQL> drop type t_a
  2  /
Type dropped.
SQL> create type t_a as object (kol_a number)
  2  /
Type created.
SQL> create type t_b as table of t_a
  2  /
Type created.
SQL> create table t_c (kol_c1 number, kol_c2 t_a);
Table created.
SQL> alter type t_a add attribute (d DATE) CASCADE NOT INCLUDING TABLE DATA;
Type altered.
SQL>
SQL> desc t_a
Name                                      Null?    Type
KOL_A                                              NUMBER
D                                                  DATE
SQL> desc t_c
Name                                      Null?    Type
KOL_C1                                             NUMBER
KOL_C2                                             T_ANot sure about 8.
Khurram