Oracle學習筆記十四 內置程序包

• 擴展數據庫的功能
• 爲 PL/SQL 提供對 SQL 功能的訪問
• 用戶 SYS 擁有全部程序包
• 是公有同義詞
• 能夠由任何用戶訪問

一些內置程序包

程序包名稱	說明
STANDARD和DBMS_STANDARD	定義和擴展PL/SQL語言環境
DBMS_LOB	提供對 LOB數據類型進行操做的功能
DBMS_OUTPUT	處理PL/SQL塊和子程序輸出調試信息
DBMS_RANDOM	提供隨機數生成器
DBMS_SQL	容許用戶使用動態 SQL
DBMS_XMLDOM	用DOM模型讀寫XML類型的數據
DBMS_XMLPARSER	XML解析，處理XML文檔內容和結構
DBMS_XMLQUERY	提供將數據轉換爲 XML 類型的功能
DBMS_XSLPROCESSOR	提供XSLT功能，轉換XML文檔
UTL_FILE	用 PL/SQL 程序來讀寫操做系統文本文件

 

DBMS_OUTPUT包顯示 PL/SQL 塊和子程序的調試信息。

SET SERVEROUTPUT ON
BEGIN
  DBMS_OUTPUT.PUT_LINE('打印三角形');
  FOR i IN 1..9 LOOP
    FOR j IN 1..i LOOP
      DBMS_OUTPUT.PUT('*');
    END LOOP for_j;
    DBMS_OUTPUT.NEW_LINE;
  END LOOP for_i;
END;

DBMS_LOB 包提供用於處理大型對象的過程和函數

DBMS_XMLQUERY 包用於將查詢結果轉換爲 XML 格式

DECLARE
  result CLOB;
  xmlstr VARCHAR2(32767);
  line   VARCHAR2(2000);
  line_no INTEGER := 1;
BEGIN
  result := DBMS_XMLQuery.getXml('SELECT empno, ename
  FROM employee');
  xmlstr := DBMS_LOB.SUBSTR(result,32767);
  LOOP
    EXIT WHEN xmlstr IS NULL;
    line := SUBSTR(xmlstr,1,INSTR(xmlstr,CHR(10))-1);
    DBMS_OUTPUT.PUT_LINE(line_no || ':' || line);
    xmlstr := SUBSTR(xmlstr,INSTR(xmlstr,CHR(10))+1);
    line_no := line_no + 1;
  END LOOP;    
END;

DBMS_RANDOM 包可用來生成8位的隨機正負整數

SET SERVEROUTPUT ON

 DECLARE
   l_num   NUMBER;
   counter NUMBER;
BEGIN
   counter:=1;
   WHILE counter <= 10
   LOOP
     l_num := DBMS_RANDOM.RANDOM;
     DBMS_OUTPUT.PUT_LINE(l_num);
     counter:=counter+1;
   END LOOP;
END;

 

UTL_FILE 包用於讀寫操做系統文本文件，操做文件的通常過程是打開、讀或寫、關閉

CREATE DIRECTORY TEST_DIR AS 'C:\DEVELOP';

UTL_FILE 包指定文件路徑依賴於 DIRECTORY 對象

GRANT READ, WRITE ON DIRECTORY TEST_DIR TO SCOTT;

 

 

SET SERVEROUTPUT ON

DECLARE
  input_file   UTL_FILE.FILE_TYPE;
  input_buffer VARCHAR2(4000);
BEGIN
  input_file := UTL_FILE.FOPEN('TEST_DIR', 'employees.xml', 'r');
  LOOP
    UTL_FILE.GET_LINE(input_file,input_buffer);
    DBMS_OUTPUT.PUT_LINE(input_buffer);
  END LOOP;
  UTL_FILE.FCLOSE(input_file);
EXCEPTION
  WHEN NO_DATA_FOUND THEN
    DBMS_OUTPUT.PUT_LINE('------------------');
END;