Oracle9i数据库存储和读取clob文件(PL/SQL脚本)

//先建立表 lob_example1
create table lob_example1(
id number(6) primary key,
name varchar2(10),
resume clob
);

//插入数据
insert into lob_example1 values(1,'猪',empty_clob());
insert into lob_example1 values(2,'狗',empty_clob());
commit;

//创建目录，保存在c盘根目录
CREATE OR REPLACE DIRECTORY DOCS AS 'C:/';

//创建将文件内容写入数据库CLOB的存储过程
CREATE OR REPLACE PROCEDURE update_doc(
   t_id  number,
   filename varchar2
   )
as
   lobloc clob;
   fileloc bfile;
   amount int;
   src_offset int:=1;
   dest_offset int:=1;
   csid int:=0;
   lc  int:=0;
   warning int;
begin
   fileloc:=bfilename('DOCS',filename);
   dbms_lob.fi