?
??? 打算研究一下大文件在Oracle中的存儲，先得學習一下DBMS_LOB包，就從網上轉篇文章來。文章似乎不全，找遍google全都只有這個摘了一部分的版本，反正就湊合著看吧，DBMS_LOB包函數好多，文檔太累，這個看看聊勝于無。
?
--------------------------------------------------------------------------------
?
??? 摘要：本文通過實例介紹了在ORACLE數據庫中通過DBMS_LOB包使用和維護LOB數據類型的基本方法。
??? 關鍵詞：ORACLEDBMS_LOBLOB維護
??? 中圖分類號：TP31
?
1、引言
??? 隨著社會的發展，在現代信息系統的開發中，需要存儲的已不僅僅是簡單的文字信息，同時還包括一些圖片和音像資料或者是超長的文本。比如開發一套旅游信息系統，每一個景點都有豐富的圖片、音像資料和大量的文字介紹。這就要求后臺數據庫要有存儲這些數據的能力。ORACLE公司在其Oracle8i中通過提供LOB字段實現了該功能。???
??? 為了便于讀者的理解，我們先介紹一些基本的概念：
??? 在ORACLE數據庫中，LOB（Large?Objects —— 大對象）是用來存儲大量的二進制和文本數據的一種數據類型（一個LOB字段可存儲可多達4GB的數據）。目前，它又分為兩種類型：內部LOB和外部LOB。內部LOB將數據以字節流的形式存儲在數據庫的內部。因而，內部LOB的許多操作都可以參與事務，也可以像處理普通數據一樣對其進行備份和恢復操作。Oracle8i支持三種類型的內部LOB：BLOB（二進制數據）、CLOB（單字節字符數據）、NCLOB（多字節國家字符數據）。其中CLOB和NCLOB類型適用于存儲超長的文本數據，BLOB字段適用于存儲大量的二進制數據，如圖像、視頻、音頻等。目前，Oracle8i只支持一種外部LOB類型，即BFILE類型。在數據庫內，該類型僅存儲數據在操作系統中的位置信息，而數據的實體以外部文件的形式存在于操作系統的文件系統中。因而，該類型所表示的數據是只讀的，不參與事務。該類型可幫助用戶管理大量的由外部程序訪問的文件。
??? 為了方便下文的敘述，我們假定使用如下語句在數據庫中創建了一張表。
??? CREATE?? TABLE?? view_sites_info
??? (site_id?????NUMBER(3),
???? audio???????BLOBDEFAULT?empty_blob(),
???? document??? CLOBDEFAULT?empty_clob(),
???? video_file? BFILEDEFAULT?NULL,
???? constraint??PK_TAB_view_sites_info?primary?key?(site_id)
??? );
2、LOB的使用和維護
??? ORACL提供了多種使用和維護LOB的方式，如使用PL/SQL?DBMS_LOB包、調用OCI（Oracle?Call?Interface）、使用Proc*C/C++、使用JDBC等。其中最為方便有效的是使用PL/SQL調用DBMS_LOB包，本文就將介紹該方法。
??? 在Oracle中，存儲在LOB中數據稱為LOB的值，如使用Select?對某一LOB字段進行選擇，則返回的不是LOB的值，而是該LOB字段的定位器（可以理解為指向LOB值的指針）。如執行如下的SQL語句：
??? DELCARE
?????? AUDIO_INFOBLOB;
??? BENGIN
?????? SELECT?audio?INTO?AUDIO_INFO?FROM?view_sites_info
??????? WHERE?site_id=100;
??? END;
??? /
??? 存儲在AUDIO_INFO變量中的就是LOB定位器，而不是LOB的值。而要對某一LOB的值進行訪問和維護操作，必需通過其定位器來進行。DBMS_LOB包中提供的所有函數和過程都以LOB定位器作為參數。
??? 2.1內部LOB
??? DBMS_LOB包中主要提供了以下幾個過程供用戶對內部LOB字段進行維護。
??? APPEND()：將源LOB中的內容加到目的LOB中
??? COPY()：從源LOB中復制數據到目的LOB
??? ERASE()：刪除LOB中全部或部分內容
??? TRIM()：將LOB值減少到指定的長度
??? WRITE()：向LOB中寫入數據
??? COMPARE()：比較兩個同種數據類型的LOB的部分或全部值是否相同
??? GETLENGTH()：獲取LOB的長度
??? READ()：從LOB中讀出數據
??? 下面我們以最為常用的讀和寫為例詳細介紹這些過程的用法。
??? 首先介紹一下寫過程。該過程的語法為：
??? PROCEDURE?WRITE(lob_locIN?OUTBLOB,
???? ????????????????amount? INBINARY_INTEGER,?
???? ?????????????? ?offset? ININTEGER,
???? ?????????????? ?buffer? INRAW);
?
??? PROCEDURE?WRITE?(lob_locIN?OUTCLOBCHARACTER?SETANY_CS,?????
???????????????????? amount? INBINARY_INTEGER,?????
?????????????????????offset? ININTEGER,?????
???????????????????? buffer? INVARCHAR2CHARACTER?SET?lob_loc%CHARSET);????
??? 各參數的含義為：
????lob_loc：要寫入的LOB定位器
??? amount：寫入LOB中的字節數
??? offset：指定開始操作的偏移量
??? buffer：指定寫操作的緩沖區
??? 下面的代碼就是運用該過程向LOB字段寫入數據的示例。
??? DECLARE
?????? lobloc?CLOB;
?????? buffer?VARCHAR2(2000);
?????? amount?NUMBER?:=?20;
?????? offset?NUMBER?:=?1;
??? BEGIN
?????? --初始化要寫入的數據
?????? buffer?:=?'This?is?a?writing example';
?????? amount?:=?length(buffer);
?????? SELECT?document?INTO?lobloc--獲取定位器并鎖定行
???????? FROMview_sites_info
????????WHERE?site_id?=?100?FOR?UPDATE;
?????? dbms_lob.write(lobloc,amount,1,buffer);
?????? COMMIT;
??? END;
??? /
??? 需要特別指出的是：
??? I.在調用寫過程前一定要使用SELECT語句檢索到定位器且用FOR?UPDATE?子句鎖定行，否則不能更新LOB
??? II.寫過程從offset指定的位置開始，向LOB中寫入長度為amount的數據，原LOB中在這個范圍內的任何數據都將被覆蓋。
??? III.緩沖區的最大容量為32767字節，因此在寫入大量數據時需多次調用該過程。
??? 下面再來介紹一下讀過程：
??? 該過程的語法為：
??? PROCEDURE?READ(lob_locINBLOB,
?????? ???????????? amount? IN?OUTBINARY_INTEGER,
?????? ???????????? offset? ININTEGER,
?????? ???????????? buffer? OUTRAW);
??? PROCEDURE?READ?(lob_loc?INCLOBCHARACTER?SET?ANY_CS,
??? ????????????????amount? IN?OUTBINARY_INTEGER,
??? ??????????????? offset? ININTEGER,
??? ??????????????? buffer? OUTVARCHAR2?CHARACTER?SET?lob_loc%CHARSET);
????
??? 各參數的含義為：???
????
??? lob_loc：要讀取的LOB定位器???
??? amount：要讀取的字節數???
??? offset：開始讀取操作的偏移量???
??? buffer：存儲讀操作結果的緩沖區???
????
??? 下面的代碼演示了如何使用該過程讀取LOB字段中的數據：???
????
??? DECLARE?????
?????? lobloc?CLOB;?????
?????? buffer?VARCHAR2(2000);?????
?????? amount?NUMBER := 2;?????
?????? offset?NUMBER :=?6;?????
??? BEGIN?????
?????? SELECT?document?INTO?lobloc--獲取定位器???
???????? FROM?lob_store?????
??????? WHERE?lob_id?=?100;?????
?? ??? dbms_lob.read(lobloc,amount,offset,buffer);--讀取數據到緩沖區???
?????? dbms_output.put_line(buffer);--顯示緩沖區中的數據???
?????? COMMIT;?????
??? END;?????
??? /??
?
-The End-