存儲過程示例：在存儲過程中使用臨時表

 

CREATE OR REPLACE PROCEDURE PRODUCT_TEMP_UPDATE_PRC AS
  PC_DELESTR   VARCHAR2(50); --刪除臨時表記錄語句
  PC_CREATESTR VARCHAR2(500); --創建臨時表
  TABEXT       VARCHAR2(10); --用於判斷臨時表是否存在中間變量

  CUR_CTGY   PRODUCTINFO.CATEGORY%TYPE;
  CUR_PRTIFO PRODUCTINFO%ROWTYPE;

  CURSOR CUR_CATEGORY --產品表中的產品類型游標
  IS
    SELECT CATEGORY FROM PRODUCTINFO GROUP BY CATEGORY;

  CURSOR CUR_PROINFO(CTGY VARCHAR) IS
    SELECT *
      FROM (SELECT *
              FROM PRODUCTINFO
             WHERE CATEGORY = CTGY
             ORDER BY PRODUCTPRICE ASC)
     WHERE ROWNUM < 2;

BEGIN
  SELECT COUNT(1)
    INTO TABEXT
    FROM ALL_TABLES
   WHERE TABLE_NAME = 'productinfo_tmp';

  PC_DELESTR   := 'delete from productinfo_tmp';
  PC_CREATESTR := 'create global temporary table productinfo_tmp
  (productid varchar2(10) not null,
  productname varchar2 (20),
  productprice number(8,2),
  quantity number(10),
  category varchar2(10),
  desperaction varchar2(1000),
  origin varchar2(10))on commit preserve rows';

  IF TABEXT = 0 THEN
    --不存在臨時表就創建一個
    EXECUTE IMMEDIATE PC_CREATESTR;
    DBMS_OUTPUT.PUT_LINE('創建臨時表成功！');
  ELSE
    EXECUTE IMMEDIATE PC_DELESTR;
    DBMS_OUTPUT.PUT_LINE('刪除記錄完成！');
  END IF;
  OPEN CUR_CATEGORY;
  LOOP
    FETCH CUR_CATEGORY
      INTO CUR_CTGY;
    EXIT WHEN CUR_CATEGORY%NOTFOUND;
    OPEN CUR_PROINFO(CUR_CTGY);
    FETCH CUR_PROINFO
      INTO CUR_PRTIFO;
    IF CUR_PROINFO%FOUND THEN
      IF CUR_PRTIFO.PRODUCTPRICE < 20 THEN
        ---產品價格低於20
        DBMS_OUTPUT.PUT_LINE('產品ID' || CUR_PRTIFO.PRODUCTID || '產品名稱' ||
                             CUR_PRTIFO.PRODUCTNAME || '產品價格' ||
                             CUR_PRTIFO.PRODUCTPRICE);
      ELSE
        --非低於20價格的產品輸入到臨時表productinfo_tmp
        EXECUTE IMMEDIATE 'insert into productinfo_tmp(
        productid,productname,productprice,quantity,category,desperaction,origin) values
        (''' || CUR_PRTIFO.PRODUCTID || ''',''' ||
                          CUR_PRTIFO.PRODUCTNAME || ''',''' ||
                          CUR_PRTIFO.PRODUCTPRICE || ''',''' ||
                          CUR_PRTIFO.QUANTITY || ''',''' ||
                          CUR_PRTIFO.CATEGORY || ''',''' ||
                          CUR_PRTIFO.DESPERACTION || ''',''' ||
                          CUR_PRTIFO.ORIGIN || ''')';
      END IF;
    END IF;
    CLOSE CUR_PROINFO;
  END LOOP;
  COMMIT;
  CLOSE CUR_CATEGORY;
  EXECUTE IMMEDIATE 'update productinfo_tmp set desperaction = ''熱銷產品''';
END;

第1行表示創建存儲過程，名稱為PRODUCT_TEMP_UPDATE_PRC 。

第2~7行表示聲明變量。

第9~11行表示創建游標cur_category;

第13~19行表示創建游標CUR_PROINFO；該游標帶有參數，其參數代表產品類型的編碼。游標根據產品的類型不同，獲取產品類型中價格最低的數據。

第22~25表示判斷臨時表productinfo_tmp是否存在。此處利用select into語句把結果放到變量tabext中，如果該表存在結果為1，否則為0.tabext變量將在第37行使用。

第27行表示為變量pc_delestr賦值，他的值是一條SQL語句，該SQL語句表示刪除表productinfo_tmp中的數據。這種寫法常常用在動態SQL語句上。

第28行表示為變量pc_createstr賦值。他的值是一條DDL語句，該語句用來創建臨時表productinfo_tmp。

第37~44行完成分析步驟中的第一步：創建臨時表productinfo_tmp。首先判斷臨時表是否存在，如果不存在，則創建，如果存在則刪除表中數據。這里使用了execute immediate語句，利用它執行DDL語句及動態語句。

第45~49行表示打開游標cur_category，並進入流循環取值。當游標的%nofound屬性為true時退出。

第50~53行表示打開游標cur_proinfo，它的參數是cur_category中的結果。

第54~58行表示判斷價格是否低於20，如果低於20輸出到屏幕。

第60~69行表示如果非低於20的插入表productinfo_tmp中。

第76行表示將productinfo_tmp表中的數據修改為熱銷產品。

【執行】

SQL>exec PRODUCT_TEMP_UPDATE_PRC ;