Oracle LOB数据类型

 LOB(large object) 是一种用于存储大对象的数据类型，每个LOB可以有4GB。
LOB有三种类型：
BLOB：Binary Large Object 二进制大型对象
CLOB：Character Large Object 单字符大型对象
Double-byte Character Large Object 双字节字符大型对象

oracle中大数据类型：
 LONG: 可变长的字符串数据，最长2G，LONG具有VARCHAR2列的特性，可以存储长文本，一个表中最多一个LONG列
 LONG RAW: 可变长二进制数据，最长2G

　　 CLOB:  字符大对象Clob 用来存储单字节的字符数据
　　 NCLOB: 用来存储多字节的字符数据
　　 BLOB: 用于存储二进制数据

　　 BFILE: 存储在文件中的二进制数据，这个文件中的数据只能被只读访。但该文件不包含在数据库内。
       bfile字段实际的文件存储在文件系统中,字段中存储的是文件定位指针.bfile对oracle来说是只读的,也不参与事务性控制和数据恢复. 
　　
　　CLOB，NCLOB，BLOB都是内部的LOB(Large Object)类型，最长4G，没有LONG只能有一列的限制
　　要保存图片、文本文件、Word文件各自最好用BLOB，LONG　RAW也不错，但Long是oracle将要废弃的类型，而且有只能有一列的限制，因此建议用BLOB。

oracle存储过程操作LOB字段 实例一：
做项目过程中遇到这么一个问题，就是有多套系统（0，A,B,C），其中中心系统(0)要提取其他子系统(A,B,C)的数据。设计的原理是在中心系统中创建存储过程，然后通过DBlink连接到子系统，根据子系统表内的标示字段，提取数据（插入或更新到中心系统中）。

存储过程语法（伪码）：

 CREATE OR REPLACE
 PROCEDURE "Pro_N_ROLES" ( V_Filter in varchar2 := ' ' )
 is
     V_ROLE varchar2(30);
     V_TREEAUTH varchar2(4);
     V_ORI number(22);
     V_UPDATEFLAG varchar2(2); //子系统 标示字段
     v_Sql varchar2(4000);
     type vv
 is
     ref cursor;
     CUR_DATA vv;
 begin
     v_Sql := 'select
 ROLE,TREEAUTH,UPDATEFLAG
 from ROLES@DB_N //创建好的 Dblink
 where UPLOADFLAG = ''Y''' || V_Filter ; //子系统 标示字段，
     open CUR_DATA
     for v_Sql;
     loop
         fetch CUR_DATA into V_ROLE,V_TREEAUTH ,V_UPDATEFLAG;
         exit
     when CUR_DATA%NOTFOUND;
         if V_UPDATEFLAG = 'N' then
             begin
                 INSERT
                 INTO
                     J_ROLES
                     (
                         ROLE,
                         TREEAUTH,
                         SORI, //子系统主键值
                         S_FLAG //子系统标示
                     )
                     VALUES
                     (
                         V_ROLE,
                         V_TREEAUTH,
                         V_ORI, //A系统表主键值
                         'A系统'
                     )
                     ;
                 commit;
                 UPDATE
                     ROLES@DB_N
                     SET UPLOADFLAG = 'N',
                     UPDATEFLAG     = 'Y'
                 WHERE
                     ORI = V_ORI;
                 commit;
             end;
         end if;
         if V_UPDATEFLAG = 'Y' then
             begin
                 UPDATE
                     J_ROLES
                     SET ROLE        = V_ROLE,
                     TREEAUTH    = V_TREEAUTH,
                     ORI     = V_ORI,
                     SORI = V_ORI,
                     S_FLAG   = 'A系统'
                 WHERE
                     SORI   = V_ORI
                     and S_FLAG = 'A系统';
                 commit;
                 UPDATE
                     ROLES@DB_N
                     SET UPLOADFLAG = 'N',
                     UPDATEFLAG     = 'Y'
                 WHERE
                     ORI = V_ORI;
                 commit;
             end;
         end if;
 //001这里加入更新CLOB字段代码
     end loop;
     close CUR_DATA;
 end Pro_N_ROLES;

oracle存储过程中没有longvarchar类型的定义，定义的varchar类型变量最长长度为32767个字符，因此无法直接用存储过程变量存储CLOB类型字段。
网上有不少方法，有的是通过创建临时表的方法，有的是通过截取然后合并的方法。根据我这边的实际情况，这样的字段不多，采用直接更新的方法。

所以在上面的注释“//001这里加入更新CLOB字段代码”出增加如下代码：       

 UPDATE
             J_ROLES
            SET OTHERSITUATION =
            (
            SELECT
                OTHERSITUATION
            FROM
                 ROLES@DB_N
            WHERE
                ORI = V_ORI
            ) ，
  SUGGEST =
            (
            SELECT
                SUGGEST
            FROM
                 ROLES@DB_N
            WHERE
                ORI = V_ORI
            )

        WHERE
            SORI   = V_ORI
            and S_FLAG = 'A系统';

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.fileopen(fileloc,0);
   amount:=dbms_lob.getlength(fileloc);
   select resume into lobloc from lob_example1
     where id=t_id for update;
   dbms_lob.loadclobfromfile(lobloc,fileloc,amount,dest_offset,src_offset,csid,lc,warning);
   dbms_lob.fileclose(fileloc);
   commit;
end;

//调用存储过程,把文件读入数据库CLOB中，c盘下要有这两个文件
call update_doc(1,'aa.csv');
call update_doc(2,'bb.csv');

//察看id是2和1的行中文件大小
select length(resume) from lob_example1 where id=2;

select length(resume) from lob_example1 where id=1;

/////////////////////////////////////////////////////文件已经放入数据库

//将文件从数据库clob中读出来
CREATE OR REPLACE PROCEDURE get_doc(
   t_id  number,
   filename varchar2 
   )
as
   lobloc clob;
   amount int;
   offset int:=1;
   buffer varchar2(2000);
   handle utl_file.file_type;
begin
   select resume into lobloc from lob_example1 where id=t_id;
   amount:=dbms_lob.getlength(lobloc);
   dbms_lob.read(lobloc,amount,offset,buffer);
   handle:=utl_file.fopen('DOCS',filename,'w',2000);
   utl_file.put_line(handle,buffer);
   utl_file.fclose(handle);
end;
/
 
//调用这个过程,把文件读出来
call get_doc(1,'zz.csv');

//哈哈，文件被保存在c盘了啊，快去看看吧

//对了，文件大了会导致缓冲区太小，缓冲区最大允许36k，大了我也不知道怎么办，正在解决中！