Oracle中關于數據庫存儲過程和存儲函數的使用

2020-07-26 14:27:03

字體：大中小

來源：轉載

供稿：網友

存儲過程和存儲函數指存儲在數據庫中供所有用戶程序調用的子程序叫存儲過程、存儲函數。
存儲過程沒有返回值。存儲函數有返回值

創建存儲過程
      用CREATE PROCEDURE命令建立存儲過程和存儲函數。

      語法：
create [or replace] PROCEDURE過程名(參數列表)
AS
        PLSQL子程序體；

存儲過程示例：為指定的職工在原工資的基礎上長10%的工資

/*
為指定的職工在原工資的基礎上長10%的工資，并打印工資前和工資后的工資
*/
SQL> create or replace procedure raiseSalary(empid in number)
    as
    pSal emp.sal%type;--保存員工當前工資
    begin
--查詢該員工的工資
    select sal into pSal from emp where empno=empid;
--給該員工漲工資
    update emp set sal = sal*1.1 where empno=empid;
--打印漲工資前后的工資
    dbms_output.put_line('員工號:' || empid || '漲工資前
   ' || psal || '漲工資后' || psal*1.1);
    end;
1 /

Procedure created
--存儲過程調用
--方法一
SQL> set serveroutput on
SQL> exec raisesalary(7369);

員工號:7369漲工資前
800漲工資后880

方法二
    set serveroutput on
begin
raisesalary(7369);
end;
/

PL/SQL procedure successfully completed

      存儲函數
      函數（Function）為一命名的存儲程序，可帶參數，并返回一計算值。函數和過程的結構類似，但必須有一個RETURN子句，用于返回函數值。函數說明要指定函數名、結果值的類型，以及參數類型等。

     建立存儲函數的語法：

CREATE [OR REPLACE] FUNCTION函數名(參數列表)
RETURN 函數值類型
AS
PLSQL子程序體；

示例：查詢某職工的年收入。
SQL> /**/
    /*
    查詢某職工的總收入
    */
    create or replace function queryEmpSalary(empid in number)
    return number
   as
    pSal number; --定義變量保存員工的工資
    pComm number; --定義變量保存員工的獎金
   begin
   select sal,comm into psal,pcomm from emp where empno = empid;
   return psal*12+nvl(pcomm,0);
   end;
   /

Function created

   l   函數的調用

SQL> declare
    v_sal number;
    begin
    v_sal:=queryEmpSalary(7934);
    dbms_output.put_line('salary is:'|| v_sal);
    end;
    /

salary is:15600

PL/SQL procedure successfully completed

SQL> begin
    dbms_output.put_line('salary is:'|| queryEmpSalary(7934));
    end;
    /

salary is:15600

PL/SQL procedure successfully completed

       觸發器
       數據庫觸發器是一個與表相關聯的、存儲的PL/SQL程序。每當一個特定的數據操作語句(Insert,update,delete)在指定的表上發出時，Oracle自動地執行觸發器中定義的語句序列。

       觸發器的類型
         語句級觸發器
        在指定的操作語句操作之前或之后執行一次，不管這條語句影響了多少行。

         行級觸發器（FOR EACH ROW）
        觸發語句作用的每一條記錄都被觸發。在行級觸發器中使用old和new偽記錄變量,識別值的狀態。

      創建觸發器
CREATE [or REPLACE] TRIGGER 觸發器名
   {BEFORE | AFTER}
   {DELETE | INSERT | UPDATE [OF列名]}
   ON 表名
   [FOR EACH ROW [WHEN(條件) ] ]
   PLSQL 塊

       示例1：限制非工作時間向數據庫插入數據
SQL> create or replace
    trigger securityEmp
    before insert on emp
    declare
    begin
    if to_char(sysdate,'day')in('星期四','星期六','星期日')
    or to_number(to_char(sysdate,'hh24'))not between 8 and 18 then
    raise_application_error(-20001,'不能在非工作時間插入數據。');
    end if;
   end;
   /

Trigger created

觸發語句與偽記錄變量的值

觸發語句	:old	:new
Insert	所有字段都是空(null)	將要插入的數據
Update	更新以前該行的值	更新后的值
delete	刪除以前該行的值	所有字段都是空(null)

示例2：確認數據（檢查emp表中sal的修改值不低于原值）
SQL> create or replace trigger checkSal
    before update of sal on emp
    for each row
    declare
    begin
    if :new.sal<:old.sal then
    raise_application_error(-20001,'更新后的薪水比更新前小');
    end if;
    end;
   /

Trigger created
運行后結果：
SQL> update emp set sal=260 where empno=7499;

update emp set sal=260 where empno=7499

ORA-20001: 更新后的薪水比更新前小
ORA-06512: 在 "SCOTT.CHECKSAL", line 4
ORA-04088: 觸發器 'SCOTT.CHECKSAL'執行過程中出錯

       觸發器總結
      觸發器可用于
•         數據確認
•         實施復雜的安全性檢查
•         做審計，跟蹤表上所做的數據操作等

      查詢觸發器、過程及函數
•         Select * from user_triggers;
•         Select * from user_source;