DBMS_LOB包使用和維護
?
?
??? 打算研究一下大文件在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;????
??? /??
?
?