DIRECTORY

[diegolenhardtParticipante]

veja o codigo abaixo,

DECLARE
f_lob BFILE := BFILENAME('BARRAGENS','TAIO_P03_28102009_10_15.JPG');
b_lob BLOB;
Lob BLOB;
Length INTEGER;

BEGIN

SELECT X INTO b_lob
FROM mydocs
WHERE A = 1
FOR UPDATE;

-- Open the LOBs.
dbms_lob.open(f_lob, dbms_lob.file_readonly);
dbms_lob.open(b_lob, dbms_lob.lob_readwrite);
dbms_lob.loadfromfile
(b_lob, f_lob, dbms_lob.getlength(f_lob));
-- Close the LOBs.
dbms_lob.close(b_lob);
dbms_lob.close(f_lob);

COMMIT;

-- Select the LOB:
-- SELECT X INTO Lob FROM mydocs;

/*
-- Opening the LOB is optional.
DBMS_LOB.OPEN (Lob, DBMS_LOB.LOB_READONLY);
-- Get the length of the LOB.
length := DBMS_LOB.GETLENGTH(Lob);
IF length IS NULL THEN
DBMS_OUTPUT.PUT_LINE('LOB is null.');
ELSE
DBMS_OUTPUT.PUT_LINE('The length is '|| length);
END IF;
-- Closing the LOB is mandatory if you have opened it.
DBMS_LOB.CLOSE (Lob);*/

END;