CREATE OR REPLACE PROCEDURE Load_BLOB_From_File (file_name varchar2,bno number)
AS
src_loc bfile:= bfilename('DIRECTORY1',Load_BLOB_From_File.file_name);
dest_loc BLOB;
begin
UPDATE BOOKS SET TOC=empty_blob() returning toc into dest_loc where bookno=bno;
dbms_lob.open(src_loc,DBMS_LOB.LOB_READONLY);
DBMS_LOB.OPEN(dest_loc, DBMS_LOB.LOB_READWRITE);
DBMS_LOB.LOADFROMFILE(
dest_lob => dest_loc,src_lob => src_loc,amount => DBMS_LOB.getLength(src_lo

DBMS_LOB.CLOSE(dest_loc);
DBMS_LOB.CLOSE(src_loc);
COMMIT;
end;

UPDATE BOOKS SET TOC=empty_blob() where bookno=bno returning toc into dest_loc;