您的位置:首页 > 博客中心 > 数据库 >

oracle存储过程实例

时间:2022-03-14 16:05

分类: 2010-05-03 17:15 1055人阅读 (2)
认识存储过程和函数
存储过程和函数也是一种PL/SQL块,是存入数据库的PL/SQL块。但存储过程和函数不同于已经介绍过的PL/SQL程序,我们通常把PL/SQL程序称为无名块,而存储过程和函数是以命名的方式存储于数据库中的。和PL/SQL程序相比,存储过程有非常多长处,详细归纳例如以下:
* 存储过程和函数以命名的数据库对象形式存储于数据库其中。存储在数据库中的长处是非常明显的,由于代码不保存在本地,用户能够在不论什么客户机上登录到数据库,并调用或改动代码。
* 存储过程和函数可由数据库提供安全保证,要想使用存储过程和函数,须要有存储过程和函数的全部者的授权,仅仅有被授权的用户或创建者本身才干运行存储过程或调用函数。
* 存储过程和函数的信息是写入数据字典的,所以存储过程能够看作是一个公用模块,用户编写的PL/SQL程序或其它存储过程都能够调用它(但存储过程和函数不能调用PL/SQL程序)。一个反复使用的功能,能够设计成为存储过程,比方:显示一张工资统计表,能够设计成为存储过程;一个常常调用的计算,能够设计成为存储函数;依据雇员编号返回雇员的姓名,能够设计成存储函数。
* 像其它高级语言的过程和函数一样,能够传递參数给存储过程或函数,參数的传递也有多种方式。存储过程能够有返回值,也能够没有返回值,存储过程的返回值必须通过參数带回;函数有一定的数据类型,像其它的标准函数一样,我们能够通过对函数名的调用返回函数值。
   存储过程和函数须要进行编译,以排除语法错误,仅仅有编译通过才干调用。
创建和删除存储过程
创建存储过程,须要有CREATE PROCEDURE或CREATE ANY PROCEDURE的系统权限。该权限可由系统管理员授予。创建一个存储过程的基本语句例如以下:
CREATE [OR REPLACE] PROCEDURE 存储过程名[(參数[IN|OUT|IN OUT] 数据类型...)]
{AS|IS}
[说明部分]
BEGIN
可运行部分
[EXCEPTION
错误处理部分]
END [过程名];
当中:
可选keywordOR REPLACE 表示假设存储过程已经存在,则用新的存储过程覆盖,通经常使用于存储过程的重建。
參数部分用于定义多个參数(假设没有參数,就能够省略)。參数有三种形式:IN、OUT和IN OUT。假设没有指明參数的形式,则默觉得IN。
keywordAS也能够写成IS,后跟过程的说明部分,能够在此定义过程的局部变量。
编写存储过程能够使用不论什么文本编辑器或直接在SQL*Plus环境下进行,编写好的存储过程必需要在SQL*Plus环境下进行编译,生成编译代码,原代码和编译代码在编译过程中都会被存入数据库。编译成功的存储过程就能够在Oracle环境下进行调用了。
一个存储过程在不须要时能够删除。删除存储过程的人是过程的创建者或者拥有DROP ANY PROCEDURE系统权限的人。删除存储过程的语法例如以下:
DROP PROCEDURE 存储过程名;
假设要又一次编译一个存储过程,则仅仅能是过程的创建者或者拥有ALTER ANY PROCEDURE系统权限的人。语法例如以下:
ALTER PROCEDURE 存储过程名 COMPILE;
运行(或调用)存储过程的人是过程的创建者或是拥有EXECUTE ANY PROCEDURE系统权限的人或是被拥有者授予EXECUTE权限的人。运行的方法例如以下:
方法1:
EXECUTE 模式名.存储过程名[(參数...)];
方法2:
BEGIN
模式名.存储过程名[(參数...)];
END;
传递的參数必须与定义的參数类型、个数和顺序一致(假设參数定义了默认值,则调用时能够省略參数)。參数能够是变量、常量或表达式,使用方法參见下一节。
假设是调用本账户下的存储过程,则模式名能够省略。要调用其它账户编写的存储过程,则模式名必需要加入。
下面是一个生成和调用简单存储过程的训练。注意要事先授予创建存储过程的权限。
【训练1】  创建一个显示雇员总人数的存储过程。
步骤1:登录SCOTT账户(或学生个人账户)。
步骤2:在SQL*Plus输入区中,输入下面存储过程:
Sql代码
  1. CREATE OR REPLACE PROCEDURE EMP_COUNT   
  2. AS  
  3. V_TOTAL NUMBER(10);   
  4. BEGIN  
  5.  SELECT COUNT(*) INTO V_TOTAL FROM EMP;   
  6.  DBMS_OUTPUT.PUT_LINE(‘雇员总人数为:‘||V_TOTAL);   
  7. END;  
[sql]
  1. CREATE OR REPLACE PROCEDURE EMP_COUNT  
  2. AS  
  3. V_TOTAL NUMBER(10);  
  4. BEGIN  
  5.  SELECT COUNT(*) INTO V_TOTAL FROM EMP;  
  6.  DBMS_OUTPUT.PUT_LINE(‘雇员总人数为:‘||V_TOTAL);  
  7. END;  

步骤3:按“运行”button进行编译。
假设存在错误,就会显示:
警告: 创建的过程带有编译错误。
假设存在错误,对脚本进行改动,直到没有错误产生。
假设编译结果正确,将显示:
Sql代码
  1. 过程已创建。  
[sql]
  1. 过程已创建。  

步骤4:调用存储过程,在输入区中输入下面语句并运行:
Sql代码
  1. EXECUTE EMP_COUNT;  
[sql]
  1. EXECUTE EMP_COUNT;  

显示结果为:
Sql代码
  1. 雇员总人数为:14   
  2.         PL/SQL 过程已成功完毕。  
[sql]
  1. 雇员总人数为:14  
  2.         PL/SQL 过程已成功完毕。  

说明:在该训练中,V_TOTAL变量是存储过程定义的局部变量,用于接收查询到的雇员总人数。
注意:在SQL*Plus中输入存储过程,按“运行”button是进行编译,不是运行存储过程。
  假设在存储过程中引用了其它用户的对象,比方表,则必须有其它用户授予的对象訪问权限。一个存储过程一旦编译成功,就能够由其它用户或程序来引用。但存储过程或函数的全部者必须授予其它用户运行该过程的权限。
存储过程没有參数,在调用时,直接写过程名就可以。
【训练2】  在PL/SQL程序中调用存储过程。
步骤1:登录SCOTT账户。
步骤2:授权STUDENT账户使用该存储过程,即在SQL*Plus输入区中,输入下面的命令:
Sql代码
  1. GRANT EXECUTE ON EMP_COUNT TO STUDENT  
[sql]
  1. GRANT EXECUTE ON EMP_COUNT TO STUDENT  

Sql代码
  1. 授权成功。  
[sql]
  1. 授权成功。  

步骤3:登录STUDENT账户,在SQL*Plus输入区中输入下面程序:
Sql代码
  1. SET SERVEROUTPUT ON  
  2.         BEGIN  
  3.         SCOTT.EMP_COUNT;   
  4.         END;  
[sql]
  1. SET SERVEROUTPUT ON  
  2.         BEGIN  
  3.         SCOTT.EMP_COUNT;  
  4.         END;  

步骤4:运行以上程序,结果为:
Sql代码
  1. 雇员总人数为:14   
  2.         PL/SQL 过程已成功完毕。   
[sql]
  1. 雇员总人数为:14  
  2.         PL/SQL 过程已成功完毕。   

  说明:在本例中,存储过程是由SCOTT账户创建的,STUDEN账户获得SCOTT账户的授权后,才干调用该存储过程。
  注意:在程序中调用存储过程,使用了另外一种语法。
【训练3】  编写显示雇员信息的存储过程EMP_LIST,并引用EMP_COUNT存储过程。
步骤1:在SQL*Plus输入区中输入并编译下面存储过程:
Sql代码
  1. CREATE OR REPLACE PROCEDURE EMP_LIST   
  2.         AS  
  3.          CURSOR emp_cursor IS    
  4.         SELECT empno,ename FROM emp;   
  5.         BEGIN  
  6. FOR Emp_record IN emp_cursor LOOP      
  7.     DBMS_OUTPUT.PUT_LINE(Emp_record.empno||Emp_record.ename);   
  8.         END LOOP;   
  9.         EMP_COUNT;   
  10.         END;  
[sql]
  1. CREATE OR REPLACE PROCEDURE EMP_LIST  
  2.         AS  
  3.          CURSOR emp_cursor IS   
  4.         SELECT empno,ename FROM emp;  
  5.         BEGIN  
  6. FOR Emp_record IN emp_cursor LOOP     
  7.     DBMS_OUTPUT.PUT_LINE(Emp_record.empno||Emp_record.ename);  
  8.         END LOOP;  
  9.         EMP_COUNT;  
  10.         END;  

运行结果:
Sql代码
  1. 过程已创建。  
[sql]
  1. 过程已创建。  

步骤2:调用存储过程,在输入区中输入下面语句并运行:
Sql代码
  1. EXECUTE EMP_LIST  
[sql]
  1. EXECUTE EMP_LIST  

显示结果为:
Sql代码
  1. 7369SMITH   
  2. 7499ALLEN   
  3. 7521WARD   
  4. 7566JONES   
  5.             运行结果:   
  6.         雇员总人数为:14   
  7.         PL/SQL 过程已成功完毕。  
[sql]
  1. 7369SMITH  
  2. 7499ALLEN  
  3. 7521WARD  
  4. 7566JONES  
  5.             运行结果:  
  6.         雇员总人数为:14  
  7.         PL/SQL 过程已成功完毕。  

说明:以上的EMP_LIST存储过程中定义并使用了游标,用来循环显示全部雇员的信息。然后调用已经成功编译的存储过程EMP_COUNT,用来附加显示雇员总人数。通过EXECUTE命令来运行EMP_LIST存储过程。
【练习1】编写显示部门信息的存储过程DEPT_LIST,要求统计出部门个数。
參数传递
參数的作用是向存储过程传递数据,或从存储过程获得返回结果。正确的使用參数能够大大添加存储过程的灵活性和通用性。
參数的类型有三种,例如以下所看到的。
Sql代码
  1. IN  定义一个输入參数变量,用于传递參数给存储过程   
  2. OUT 定义一个输出參数变量,用于从存储过程获取数据   
  3. IN OUT  定义一个输入、输出參数变量,兼有以上两者的功能  
[sql]
  1. IN  定义一个输入參数变量,用于传递參数给存储过程  
  2. OUT 定义一个输出參数变量,用于从存储过程获取数据  
  3. IN OUT  定义一个输入、输出參数变量,兼有以上两者的功能  

參数的定义形式和作用例如以下:
參数名 IN 数据类型 DEFAULT 值;
定义一个输入參数变量,用于传递參数给存储过程。在调用存储过程时,主程序的实际參数能够是常量、有值变量或表达式等。DEFAULT keyword为可选项,用来设定參数的默认值。假设在调用存储过程时不指明參数,则參数变量取默认值。在存储过程中,输入变量接收主程序传递的值,但不能对其进行赋值。
參数名 OUT 数据类型;
定义一个输出參数变量,用于从存储过程获取数据,即变量从存储过程中返回值给主程序。
在调用存储过程时,主程序的实际參数仅仅能是一个变量,而不能是常量或表达式。在存储过程中,參数变量仅仅能被赋值而不能将其用于赋值,在存储过程中必须给输出变量至少赋值一次。
參数名 IN OUT 数据类型 DEFAULT 值;
定义一个输入、输出參数变量,兼有以上两者的功能。在调用存储过程时,主程序的实际參数仅仅能是一个变量,而不能是常量或表达式。DEFAULT keyword为可选项,用来设定參数的默认值。在存储过程中,变量接收主程序传递的值,同一时候能够參加赋值运算,也能够对其进行赋值。在存储过程中必须给变量至少赋值一次。
假设省略IN、OUT或IN OUT,则默认模式是IN。
【训练1】  编写给雇员添加工资的存储过程CHANGE_SALARY,通过IN类型的參数传递要添加工资的雇员编号和添加的工资额。
步骤1:登录SCOTT账户。
  步骤2:在SQL*Plus输入区中输入下面存储过程并运行:
Sql代码
  1. CREATE OR REPLACE PROCEDURE CHANGE_SALARY(P_EMPNO IN NUMBER DEFAULT 7788,P_RAISE NUMBER DEFAULT 10)   
  2.         AS  
  3.          V_ENAME VARCHAR2(10);   
  4. V_SAL NUMBER(5);   
  5.         BEGIN  
  6.         SELECT ENAME,SAL INTO V_ENAME,V_SAL FROM EMP WHERE EMPNO=P_EMPNO;   
  7.          UPDATE EMP SET SAL=SAL+P_RAISE WHERE EMPNO=P_EMPNO;   
  8.          DBMS_OUTPUT.PUT_LINE(‘雇员‘||V_ENAME||‘的工资被改为‘||TO_CHAR(V_SAL+P_RAISE));   
  9. COMMIT;   
  10.         EXCEPTION   
  11.          WHEN OTHERS THEN  
  12.         DBMS_OUTPUT.PUT_LINE(‘错误发生,改动失败!‘);   
  13.         ROLLBACK;   
  14.         END;  
[sql]
  1. CREATE OR REPLACE PROCEDURE CHANGE_SALARY(P_EMPNO IN NUMBER DEFAULT 7788,P_RAISE NUMBER DEFAULT 10)  
  2.         AS  
  3.          V_ENAME VARCHAR2(10);  
  4. V_SAL NUMBER(5);  
  5.         BEGIN  
  6.         SELECT ENAME,SAL INTO V_ENAME,V_SAL FROM EMP WHERE EMPNO=P_EMPNO;  
  7.          UPDATE EMP SET SAL=SAL+P_RAISE WHERE EMPNO=P_EMPNO;  
  8.          DBMS_OUTPUT.PUT_LINE(‘雇员‘||V_ENAME||‘的工资被改为‘||TO_CHAR(V_SAL+P_RAISE));  
  9. COMMIT;  
  10.         EXCEPTION  
  11.          WHEN OTHERS THEN  
  12.         DBMS_OUTPUT.PUT_LINE(‘错误发生,改动失败!‘);  
  13.         ROLLBACK;  
  14.         END;  

运行结果为:
Sql代码
  1. 过程已创建。  
[sql]
  1. 过程已创建。  

步骤3:调用存储过程,在输入区中输入下面语句并运行:
Sql代码
  1. EXECUTE CHANGE_SALARY(7788,80)  
[sql]
  1. EXECUTE CHANGE_SALARY(7788,80)  

显示结果为:
Sql代码
  1. 雇员SCOTT的工资被改为3080   
[sql]
  1. 雇员SCOTT的工资被改为3080   

说明:从运行结果能够看到,雇员SCOTT的工资已由原来的3000改为3080。
參数的值由调用者传递,传递的參数的个数、类型和顺序应该和定义的一致。假设顺序不一致,能够採用下面调用方法。如上例,运行语句能够改为:
 EXECUTE CHANGE_SALARY(P_RAISE=>80,P_EMPNO=>7788);
  能够看出传递參数的顺序发生了变化,而且明白指出了參数名和要传递的值,=>运算符左側是參数名,右側是參数表达式,这样的赋值方法的意义较清楚。
【练习1】创建插入雇员的存储过程INSERT_EMP,并将雇员编号等作为參数。
在设计存储过程的时候,也能够为參数设定默认值,这样调用者就能够不传递或少传递參数了。
【训练2】  调用存储过程CHANGE_SALARY,不传递參数,使用默认參数值。
在SQL*Plus输入区中输入下面命令并运行:
Sql代码
  1. EXECUTE CHANGE_SALARY  
[sql]
  1. EXECUTE CHANGE_SALARY  

显示结果为:
Sql代码
  1. 雇员SCOTT的工资被改为3090   
[sql]
  1. 雇员SCOTT的工资被改为3090   

说明:在存储过程的调用中没有传递參数,而是採用了默认值7788和10,即默认雇员号为7788,添加的工资为10。
【训练3】  使用OUT类型的參数返回存储过程的结果。
步骤1:登录SCOTT账户。
步骤2:在SQL*Plus输入区中输入并编译下面存储过程:
Sql代码
  1. CREATE OR REPLACE PROCEDURE EMP_COUNT(P_TOTAL OUT NUMBER)   
  2.         AS  
  3.         BEGIN  
  4.         SELECT COUNT(*) INTO P_TOTAL FROM EMP;   
  5.         END;  
[sql]
  1. CREATE OR REPLACE PROCEDURE EMP_COUNT(P_TOTAL OUT NUMBER)  
  2.         AS  
  3.         BEGIN  
  4.         SELECT COUNT(*) INTO P_TOTAL FROM EMP;  
  5.         END;  

运行结果为:
Sql代码
  1. 过程已创建。  
[sql]
  1. 过程已创建。  

步骤3:输入下面程序并运行:
Sql代码
  1. DECLARE  
  2.         V_EMPCOUNT NUMBER;   
  3.         BEGIN  
  4.         EMP_COUNT(V_EMPCOUNT);   
  5.         DBMS_OUTPUT.PUT_LINE(‘雇员总人数为:‘||V_EMPCOUNT);   
  6.         END;  
[sql]
  1. DECLARE  
  2.         V_EMPCOUNT NUMBER;  
  3.         BEGIN  
  4.         EMP_COUNT(V_EMPCOUNT);  
  5.         DBMS_OUTPUT.PUT_LINE(‘雇员总人数为:‘||V_EMPCOUNT);  
  6.         END;  

显示结果为:
Sql代码
  1. 雇员总人数为:14   
  2.         PL/SQL 过程已成功完毕。  
[sql]
  1. 雇员总人数为:14  
  2.         PL/SQL 过程已成功完毕。  

    说明:在存储过程中定义了OUT类型的參数P_TOTAL,在主程序调用该存储过程时,传递了參数V_EMPCOUNT。在存储过程中的SELECT...INTO...语句中对P_TOTAL进行赋值,赋值结果由V_EMPCOUNT变量带回给主程序并显示。
以上程序要覆盖同名的EMP_COUNT存储过程,假设不使用OR REPLACE选项,就会出现下面错误:
Sql代码
  1. ERROR 位于第 1 行:   
  2.         ORA-00955: 名称已由现有对象使用。  
[sql]
  1. ERROR 位于第 1 行:  
  2.         ORA-00955: 名称已由现有对象使用。  

【练习2】创建存储过程,使用OUT类型參数获得雇员经理名。
【训练4】  使用IN OUT类型的參数,给电话号码添加区码。
步骤1:登录SCOTT账户。
步骤2:在SQL*Plus输入区中输入并编译下面存储过程:
Sql代码
  1. CREATE OR REPLACE PROCEDURE ADD_REGION(P_HPONE_NUM IN OUT VARCHAR2)   
  2.         AS  
  3.         BEGIN  
  4.          P_HPONE_NUM:=‘0755-‘||P_HPONE_NUM;   
  5.         END;  
[sql]
  1. CREATE OR REPLACE PROCEDURE ADD_REGION(P_HPONE_NUM IN OUT VARCHAR2)  
  2.         AS  
  3.         BEGIN  
  4.          P_HPONE_NUM:=‘0755-‘||P_HPONE_NUM;  
  5.         END;  

运行结果为:
Sql代码
  1. 过程已创建。  
[sql]
  1. 过程已创建。  

步骤3:输入下面程序并运行:
Sql代码
  1. SET SERVEROUTPUT ON  
  2. DECLARE  
  3. V_PHONE_NUM VARCHAR2(15);   
  4. BEGIN  
  5. V_PHONE_NUM:=‘26731092‘;   
  6. ADD_REGION(V_PHONE_NUM);   
  7. DBMS_OUTPUT.PUT_LINE(‘新的电话号码:‘||V_PHONE_NUM);   
  8. END;  
[sql]
  1. SET SERVEROUTPUT ON  
  2. DECLARE  
  3. V_PHONE_NUM VARCHAR2(15);  
  4. BEGIN  
  5. V_PHONE_NUM:=‘26731092‘;  
  6. ADD_REGION(V_PHONE_NUM);  
  7. DBMS_OUTPUT.PUT_LINE(‘新的电话号码:‘||V_PHONE_NUM);  
  8. END;  

显示结果为:
Sql代码
  1. 新的电话号码:0755-26731092   
  2.         PL/SQL 过程已成功完毕。  
[sql]
  1. 新的电话号码:0755-26731092  
  2.         PL/SQL 过程已成功完毕。  

说明:变量V_HPONE_NUM既用来向存储过程传递旧电话号码,也用来向主程序返回新号码。新的号码在原来基础上添加了区号0755和-。
创建和删除存储函数
  创建函数,须要有CREATE PROCEDURE或CREATE ANY PROCEDURE的系统权限。该权限可由系统管理员授予。创建存储函数的语法和创建存储过程的类似,即
CREATE [OR REPLACE] FUNCTION 函数名[(參数[IN] 数据类型...)]
RETURN 数据类型
{AS|IS}
[说明部分]
BEGIN
可运行部分
RETURN (表达式)
[EXCEPTION
    错误处理部分]
END [函数名];
当中,參数是可选的,但仅仅能是IN类型(INkeyword能够省略)。
在定义部分的RETURN 数据类型,用来表示函数的数据类型,也就是返回值的类型,此部分不可省略。
在可运行部分的RETURN(表达式),用来生成函数的返回值,其表达式的类型应该和定义部分说明的函数返回值的数据类型一致。在函数的运行部分能够有多个RETURN语句,但仅仅有一个RETURN语句会被运行,一旦运行了RETURN语句,则函数结束并返回调用环境。
一个存储函数在不须要时能够删除,但删除的人应是函数的创建者或者是拥有DROP ANY PROCEDURE系统权限的人。其语法例如以下:
DROP FUNCTION 函数名;
又一次编译一个存储函数时,编译的人应是函数的创建者或者拥有ALTER ANY PROCEDURE系统权限的人。又一次编译一个存储函数的语法例如以下:
ALTER PROCEDURE 函数名 COMPILE;
函数的调用者应是函数的创建者或拥有EXECUTE ANY PROCEDURE系统权限的人,或是被函数的拥有者授予了函数运行权限的账户。函数的引用和存储过程不同,函数要出如今程序体中,能够參加表达式的运算或单独出如今表达式中,其形式例如以下:
变量名:=函数名(...)
【训练1】  创建一个通过雇员编号返回雇员名称的函数GET_EMP_NAME。
步骤1:登录SCOTT账户。
步骤2:在SQL*Plus输入区中输入下面存储函数并编译:
Sql代码
  1. CREATE OR REPLACE FUNCTION GET_EMP_NAME(P_EMPNO NUMBER DEFAULT 7788)   
  2.         RETURN VARCHAR2   
  3.         AS  
  4.          V_ENAME VARCHAR2(10);   
  5.         BEGIN  
  6.         ELECT ENAME INTO V_ENAME FROM EMP WHERE EMPNO=P_EMPNO;   
  7. RETURN(V_ENAME);   
  8. EXCEPTION   
  9.  WHEN NO_DATA_FOUND THEN  
  10.   DBMS_OUTPUT.PUT_LINE(‘没有该编号雇员!‘);   
  11.   RETURN (NULL);   
  12.  WHEN TOO_MANY_ROWS THEN  
  13.   DBMS_OUTPUT.PUT_LINE(‘有反复雇员编号!‘);   
  14.   RETURN (NULL);   
  15.  WHEN OTHERS THEN  
  16.   DBMS_OUTPUT.PUT_LINE(‘发生其它错误!‘);   
  17.   RETURN (NULL);   
  18. END;  
[sql]
  1. CREATE OR REPLACE FUNCTION GET_EMP_NAME(P_EMPNO NUMBER DEFAULT 7788)  
  2.         RETURN VARCHAR2  
  3.         AS  
  4.          V_ENAME VARCHAR2(10);  
  5.         BEGIN  
  6.         ELECT ENAME INTO V_ENAME FROM EMP WHERE EMPNO=P_EMPNO;  
  7. RETURN(V_ENAME);  
  8. EXCEPTION  
  9.  WHEN NO_DATA_FOUND THEN  
  10.   DBMS_OUTPUT.PUT_LINE(‘没有该编号雇员!‘);  
  11.   RETURN (NULL);  
  12.  WHEN TOO_MANY_ROWS THEN  
  13.   DBMS_OUTPUT.PUT_LINE(‘有反复雇员编号!‘);  
  14.   RETURN (NULL);  
  15.  WHEN OTHERS THEN  
  16.   DBMS_OUTPUT.PUT_LINE(‘发生其它错误!‘);  
  17.   RETURN (NULL);  
  18. END;  

步骤3:调用该存储函数,输入并运行下面程序:
Sql代码
  1. BEGIN  
  2.         DBMS_OUTPUT.PUT_LINE(‘雇员7369的名称是:‘|| GET_EMP_NAME(7369));   
  3.          DBMS_OUTPUT.PUT_LINE(‘雇员7839的名称是:‘|| GET_EMP_NAME(7839));   
  4.         END;  
[sql]
  1. BEGIN  
  2.         DBMS_OUTPUT.PUT_LINE(‘雇员7369的名称是:‘|| GET_EMP_NAME(7369));  
  3.          DBMS_OUTPUT.PUT_LINE(‘雇员7839的名称是:‘|| GET_EMP_NAME(7839));  
  4.         END;  

显示结果为:
Sql代码
  1. 雇员7369的名称是:SMITH   
  2.         雇员7839的名称是:KING   
  3.         PL/SQL 过程已成功完毕。  
[sql]
  1. 雇员7369的名称是:SMITH  
  2.         雇员7839的名称是:KING  
  3.         PL/SQL 过程已成功完毕。  

说明:函数的调用直接出如今程序的DBMS_OUTPUT.PUT_LINE语句中,作为字符串表达式的一部分。假设输入了错误的雇员编号,就会在函数的错误处理部分输出错误信息。试改动雇员编号,又一次执行调用部分。
【练习1】创建一个通过部门编号返回部门名称的存储函数GET_DEPT_NAME。
   【练习2】将函数的运行权限授予STUDENT账户,然后登录STUDENT账户调用。
存储过程和函数的查看
能够通过对数据字典的訪问来查询存储过程或函数的有关信息,假设要查询当前用户的存储过程或函数的源码,能够通过对USER_SOURCE数据字典视图的查询得到。USER_SOURCE的结构例如以下:
Sql代码
  1. DESCRIBE USER_SOURCE  
[sql]
  1. DESCRIBE USER_SOURCE  

结果为:
Sql代码
  1. 名称                                      是否为空? 类型   
  2.         ------------------------------------------------------------- ------------- -----------------------  
  3.  NAME                                               VARCHAR2(30)   
  4.  TYPE                                               VARCHAR2(12)   
  5.  LINE                                               NUMBER   
  6.  TEXT                                               VARCHAR2(4000)  
[sql]
  1. 名称                                      是否为空? 类型  
  2.         ------------------------------------------------------------- ------------- -----------------------  
  3.  NAME                                               VARCHAR2(30)  
  4.  TYPE                                               VARCHAR2(12)  
  5.  LINE                                               NUMBER  
  6.  TEXT                                               VARCHAR2(4000)  

  说明:里面按行存放着过程或函数的脚本,NAME是过程或函数名,TYPE 代表类型(PROCEDURE或FUNCTION),LINE是行号,TEXT 为脚本。
【训练1】  查询过程EMP_COUNT的脚本。
在SQL*Plus中输入并运行例如以下查询:
Sql代码
  1. select TEXT  from user_source WHERE NAME=‘EMP_COUNT‘;  
[sql]
  1. select TEXT  from user_source WHERE NAME=‘EMP_COUNT‘;  

结果为:
Sql代码
  1. TEXT   
  2. --------------------------------------------------------------------------------  
  3. PROCEDURE EMP_COUNT(P_TOTAL OUT NUMBER)   
  4. AS  
  5. BEGIN  
  6.  SELECT COUNT(*) INTO P_TOTAL FROM EMP;   
  7. END;  
[sql]
  1. TEXT  
  2. --------------------------------------------------------------------------------  
  3. PROCEDURE EMP_COUNT(P_TOTAL OUT NUMBER)  
  4. AS  
  5. BEGIN  
  6.  SELECT COUNT(*) INTO P_TOTAL FROM EMP;  
  7. END;  

【训练2】  查询过程GET_EMP_NAME的參数。
在SQL*Plus中输入并运行例如以下查询:
Sql代码
  1. DESCRIBE GET_EMP_NAME  
[sql]
  1. DESCRIBE GET_EMP_NAME  

结果为:
Sql代码
  1. FUNCTION GET_EMP_NAME RETURNS VARCHAR2   
  2.         參数名称            类型          输入/输出默认值?   
  3.         ----------------------------------------- ----------------------------------- ----------------- -------------  
  4.         P_EMPNO             NUMBER(4) IN     DEFAULT  
[sql]
  1. FUNCTION GET_EMP_NAME RETURNS VARCHAR2  
  2.         參数名称            类型          输入/输出默认值?  
  3.         ----------------------------------------- ----------------------------------- ----------------- -------------  
  4.         P_EMPNO             NUMBER(4) IN     DEFAULT  

【训练3】  在发生编译错误时,显示错误。
Sql代码
  1. SHOW ERRORS  
[sql]
  1. SHOW ERRORS  

下面是一段编译错误显示:
Sql代码
  1. LINE/COL ERROR   
  2.         ------------- -----------------------------------------------------------------  
  3.         4/2       PL/SQL: SQL Statement ignored   
  4.         4/36      PLS-00201: 必须说明标识符 ‘EMPP‘  
[sql]
  1. LINE/COL ERROR  
  2.         ------------- -----------------------------------------------------------------  
  3.         4/2       PL/SQL: SQL Statement ignored  
  4.         4/36      PLS-00201: 必须说明标识符 ‘EMPP‘  

  说明:查询一个存储过程或函数是否是有效状态(即编译成功),能够使用数据字典USER_OBJECTS的STATUS列。
【训练4】  查询EMP_LIST存储过程是否可用:
Sql代码
  1. SELECT STATUS FROM USER_OBJECTS WHERE OBJECT_NAME=‘EMP_LIST‘;  
[sql]
  1. SELECT STATUS FROM USER_OBJECTS WHERE OBJECT_NAME=‘EMP_LIST‘;  

结果为:
Sql代码
  1. STATUS   
  2.         ------------  
  3.         VALID  
[sql]
  1. STATUS  
  2.         ------------  
  3.         VALID  

说明:VALID表示该存储过程有效(即通过编译),INVALID表示存储过程无效或须要又一次编译。当Oracle调用一个无效的存储过程或函数时,首先试图对其进行编译,假设编译成功则将状态置成VALID并运行,否则给出错误信息。
当一个存储过程编译成功,状态变为VALID,会不会在某些情况下变成INVALID。结论是全然可能的。比方一个存储过程中包括对表的查询,假设表被改动或删除,存储过程就会变成无效INVALID。所以要注意存储过程和函数对其它对象的依赖关系。
假设要检查存储过程或函数的依赖性,能够通过查询数据字典USER_DENPENDENCIES来确定,该表结构例如以下:
Sql代码
  1. DESCRIBE USER_DEPENDENCIES;  
[sql]
  1. DESCRIBE USER_DEPENDENCIES;  

结果:
Sql代码
  1. 名称                     是否为空? 类型   
  2.         -------------------------------------------------------------- ------------- ----------------------------  
  3.          NAME            NOT NULL   VARCHAR2(30)   
  4.          TYPE                       VARCHAR2(12)   
  5.         REFERENCED_OWNER                                VARCHAR2(30)   
  6.  REFERENCED_NAME                                VARCHAR2(64)   
  7.  REFERENCED_TYPE                                VARCHAR2(12)   
  8. REFERENCED_LINK_NAME                            VARCHAR2(128)   
  9.         SCHEMAID                                        NUMBER   
  10.          DEPENDENCY_TYPE                                VARCHAR2(4)  
[sql]
  1. 名称                     是否为空? 类型  
  2.         -------------------------------------------------------------- ------------- ----------------------------  
  3.          NAME            NOT NULL   VARCHAR2(30)  
  4.          TYPE                       VARCHAR2(12)  
  5.         REFERENCED_OWNER                                VARCHAR2(30)  
  6.  REFERENCED_NAME                                VARCHAR2(64)  
  7.  REFERENCED_TYPE                                VARCHAR2(12)  
  8. REFERENCED_LINK_NAME                            VARCHAR2(128)  
  9.         SCHEMAID                                        NUMBER  
  10.          DEPENDENCY_TYPE                                VARCHAR2(4)  

  说明:NAME为实体名,TYPE为实体类型,REFERENCED_OWNER为涉及到的实体拥有者账户,REFERENCED_NAME为涉及到的实体名,REFERENCED_TYPE 为涉及到的实体类型。
【训练5】  查询EMP_LIST存储过程的依赖性。
Sql代码
  1. SELECT REFERENCED_NAME,REFERENCED_TYPE FROM USER_DEPENDENCIES WHERE NAME=‘EMP_LIST‘;  
[sql]
  1. SELECT REFERENCED_NAME,REFERENCED_TYPE FROM USER_DEPENDENCIES WHERE NAME=‘EMP_LIST‘;  

运行结果:
Sql代码
  1. REFERENCED_NAME                                         REFERENCED_TYPE   
  2.         ------------------------------------------------------------------------------------------ ----------------------------  
  3. STANDARD                                                PACKAGE   
  4.         SYS_STUB_FOR_PURITY_ANALYSIS                            PACKAGE   
  5.         DBMS_OUTPUT                                                 PACKAGE   
  6.         DBMS_OUTPUT                                             SYNONYM   
  7. DBMS_OUTPUT                      NON-EXISTENT   
  8.         EMP                                                         TABLE  
  9.         EMP_COUNT                                           &n

热门排行

今日推荐

热门手游