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

Oracle學習筆記十四 內置程序包，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;