关键字: oracle 存储过程
立此存照
1.基本结构
子程序和程序包
CREATE OR REPLACE PROCEDURE 存储过程名字 ( 参数1 IN NUMBER, 参数2 IN NUMBER ) IS 变量1 INTEGER :=0; 变量2 DATE; BEGIN
子程序：是已命名的PL/SQL块，存储在数据库中。
END 存储过程名字
命名的PL/SQL程序包括存储过程和函数，程序包是存储过程和函数的集合。
2.SELECT INTO STATEMENT
子程序具有声明部分、可执行部分和可选的异常处理部分；优点：模块化、可重用性、可维护性、安全性。
将select查询的结果存入到变量中，可以同时将多个列存储多个变量中，必须有一条
过程：是执行某些操作的子程序，是执行特定任务的模块。从根本上说，过程就是命名的PL/SQL程序块，可以被赋予参数，存储在数据库中，由应用程序或其他PL/SQL程序调用。
记录，否则抛出异常(如果没有记录抛出NO_DATA_FOUND)
创建过程的格式如下：
例子：
CREATE [OR REPLACE] PROCEDURE PROC_NAME[(PARAMETER_LIST)]
BEGIN SELECT col1,col2 into 变量1,变量2 FROM typestruct where xxx; EXCEPTION WHEN NO_DATA_FOUND THEN xxxx; END; ...
AS ---PROC_NAME 过程名字 PARAMETER_LIST参数列表
3.IF 判断
[LOCAL_DECARATIONS] ----LOCAL_DECARATIONS是局部声明 置于关键字AS 和 BEGIN之间
IF V_TEST=1 THEN BEGIN do something END; END IF;
BEGIN
4.while 循环
EXECUTABLE_STATEMENTS -----EXECUTABLE_STATEMENTS 是可执行语句
WHILE V_TEST=1 LOOP BEGIN XXXX END; END LOOP;
[EXCEPTION]
5.变量赋值
EXCEPTION_HANDLERS ------异常处理语句
V_TEST := 123;
END PROC_NAME; ----END过程结束
6.用for in 使用cursor
示例：
... IS CURSOR cur IS SELECT * FROM xxx; BEGIN FOR cur_result in cur LOOP BEGIN V_SUM :=cur_result.列名1+cur_result.列名2 END; END LOOP; END;
-----创建过程 默认IN模式
7.带参数的cursor
CREATE PROCEDURE ADD_DEPT(DEPTNO DEPT.DEPTNO%TYPE,DNAME DEPT.DNAME%TYPE,LOC DEPT.LOC%TYPE )
CURSOR C_USER(C_ID NUMBER) IS SELECT NAME FROM USER WHERE TYPEID=C_ID; OPEN C_USER(变量值); LOOP FETCH C_USER INTO V_NAME; EXIT FETCH C_USER%NOTFOUND; do something END LOOP; CLOSE C_USER;
AS
8.用pl/sql developer debug
BEGIN
连接数据库后建立一个Test WINDOW
INSERT INTO DEPT VALUES(DEPTNO, DNAME, LOC )
在窗口输入调用SP的代码,F9开始debug,CTRL+N单步调试
END ADD_DEPT;
转载：
---在PL/SQL环境下执行过程
oracle 存储过程
BEGIN
关键字: oracle 存储过程
ADD_DEPT(50,’测试部’,’BEIJING’);
存储过程创建语法：
END;
create or replace procedure 存储过程名
------OUT模式
as
CREATE OR REPLACE PROCEDURE GET_NAME
变量1 类型;
(IN_EMPNO EMP.EMPNO%TYPE, OU_ENAME OUT EMP.ENAME%TYPE)
变量2 类型;
AS
Begin Select count(*) into 变量1 from 表A where列名=param1； If (判断条件) then Select 列名 into 变量2 from 表A where列名=param1； Dbms_output。Put_line(‘打印信息'); Elsif (判断条件) then Dbms_output。Put_line(‘打印信息'); Else Raise 异常名; End if; Exception When others then Rollback; End;
BEGIN
注意事项：
SELECT ENAME INTO OU_ENAME FROM EMP WHERE EMPNO = IN_EMPNO;
1， 存储过程参数不带取值范围，in表示传入，out表示输出
EXCEPTION
2， 变量带取值范围，后面接分号
WHEN NO_DATA_FOUND THEN
3， 在判断语句前最好先用count函数判断是否存在该条操作记录
DBMS_OUTPUT.PUT_LINE(‘雇员编号没有找到’);
4， 用select 。。。into。。。给变量赋值
END GET_NAME;
5， 在代码中抛异常用 raise+异常名
---在PL/SQL环境下执行过程
以命名的异常
DECLARE
命名的系统异常 产生原因
OU_NAME EMP.ENAME%TYPE;
ACCESS_INTO_NULL 未定义对象 CASE_NOT_FOUND CASE 中若未包含相应的 WHEN ，并且没有设置 ELSE 时 COLLECTION_IS_NULL 集合元素未初始化 CURSER_ALREADY_OPEN 游标已经打开 DUP_VAL_ON_INDEX 唯一索引对应的列上有重复的值 INVALID_CURSOR 在不合法的游标上进行操作 INVALID_NUMBER 内嵌的 SQL 语句不能将字符转换为数字 NO_DATA_FOUND 使用 select into 未返回行，或应用索引表未初始化的 TOO_MANY_ROWS 执行 select into 时，结果集超过一行 ZERO_DIVIDE 除数为 0 SUBSCRIPT_BEYOND_COUNT 元素下标超过嵌套表或 VARRAY 的最大值 SUBSCRIPT_OUTSIDE_LIMIT 使用嵌套表或 VARRAY 时，将下标指定为负数 VALUE_ERROR 赋值时，变量长度不足以容纳实际数据 LOGIN_DENIED PL/SQL 应用程序连接到 oracle 数据库时，提供了不 正确的用户名或密码 NOT_LOGGED_ON PL/SQL 应用程序在没有连接 oralce 数据库的情况下 访问数据 PROGRAM_ERROR PL/SQL 内部问题，可能需要重装数据字典＆ pl./SQL 系统包 ROWTYPE_MISMATCH 宿主游标变量与 PL/SQL 游标变量的返回类型不兼容 SELF_IS_NULL 使用对象类型时，在 null 对象上调用对象方法 STORAGE_ERROR 运行 PL/SQL 时，超出内存空间 SYS_INVALID_ID 无效的 ROWID 字符串 TIMEOUT_ON_RESOURCE Oracle 在等待资源时超时
BEGIN
语法及示例：
GET_NAME(7902,OU_NAME);
1、存储过程创建存储过程的语法：
DBMS_OUTPUT.PUT_LINE(OU_NAME);
CREATE [OR REPLACE] PROCEDURE procedure_name[(parameter_list)]{IS|AS}[local_declarations]BEGINexecutable_statements[EXCEPTIONexception_handlers]END [procedure_name];
END;
其中：procedure_name是过程的名称。
执行过程：在SQL提示符下：EXECUTE PROC_NAME(PATAMETER_LIST);
parameter_list是参数列表。
在PL/SQL中 BEGIN LOCAL_DECATATIONS() END;
local_declarations是局部声明。
过程参数模式：调用程序通过参数向被调用的过程传递值，模式有3中： IN、 OUT、 IN OUT
executable_statements是可执行语句。
语法：PARAMETER_NAME[IN|OUT|IN OUT] DATATYPE
exception_handlers是异常处理程序。
参数IN模式是默认模式，OUT和IN OUT参数必须明确指定。
示例1：
OUT用于向调用程序返回值
演示创建过程(参数列表中为IN参数赋予一个默认值，不能为OUT、IN OUT参数赋予默认值)
IN OUT用于接受调用程序的值，并向调用程序返回更新的值
create or replace procedure find_emp(emp_no in number:=7900)asempname varchar2(20);beginselect ename into empname from emp where empno=emp_no;dbms_output.put_line('雇员姓名是 '||empname);exceptionwhen no_data_found thendbms_output.put_line('雇员编号未找到');end find_emp;
将过程的执行权限授权其他用户
调用过程：
GRANT EXTCUTE ON GET_NAME TO ZHANGSAN;
EXECUTE procudure_name(parameters_list);
删除过程：
也可以在过程里面调用，直接写上procudure_name而不必写EXECUTE。
DROP PROCEDURE GET_NAME;
示例2：演示创建带OUT参数的过程
函数：和过程类似，也是数据库中存储的已命名PL/SQL程序块，函数的主要特征是必须返回一个值，创建函数时通过RETURN字句指定函数返回值的数据类型。在函数体的任何地方都可以通过RETURN语句从函数返回。
create or replace procedure test(value1 varchar2,value2 out number) is identity number; begin select sal into identity from emp where empno=value1; if identity2000 then value2:=1000; else value2:=500; end if; end;
CREATE [OR REPLACE] FUNCTION FU_NAME[(PARAMETER_LIST)]
调用带OUT参数的过程：
RETURN DATATYPE -----定义函数的一些限制
declare value2 number; begin test('7900',value2); dbms_output.put_line(value2); end;
AS ----形式参数必须只能使用数据库类型，不能使用PL/SQL类型
示例3：
[LOCAL_DECARATIONS] ----函数的返回类型也必须是数据库类型
演示创建带IN OUT参数的过程
BEGIN ----必须要有RETURN子句
create or replace procedure swap(p1 in out number,p2 in out number) is v_temp number; begin v_temp:=p1; p1:=p2; p2:=v_temp; end;
EXECUTABLE_STATEMENTS
调用带IN OUT参数的过程：
[EXCEPTION]
declare num1 number:=100; num2 number:=200; begin swap(num1,num2); dbms_output.put_line('num1= '||num1); dbms_output.put_line('num2= '||num2); end;
EXCEPTION_HANDLERS
示例4：将过程的执行权限授予其他用户
END FUN_NAME;
GRANT EXECUTE ON find_emp TO scott; GRANT EXECUTE ON swap TO PUBLIC;
访问函数的两种方式：使用 PL/SQL 块 、使用 SQL 语句
将find_emp过程的执行权限授予给用户scott，将执行swap过程的权限授予所有数据库用户。
示例：
删除过程语法：
CREATE OR REPLACE function moneyMaker(eid emp.empno%type)
DROP PROCEDURE procudure_name;
RETURN varchar2
2、函数 定义函数的语法如下：
AS
CREATE [OR REPLACE] FUNCTION function_name [(parameter_list)] RETURN datatype {IS|AS} [local_declarations] BEGIN executable_statements [EXCEPTION exception_handlers] END [function_name];
salary emp.sal%type;
其中：function_name是函数的名称。
BEGIN
parameter_list是参数列表。
SELECT sal INTO salary FROM emp WHERE empno=eid;
local_declarations是局部声明。
if salary>3000 then
executable_statements是可执行语句。
return '工资高于3000';
exception_handlers是异常处理程序。
else
使用函数时注意：形式参数必须只使用数据库类型，不得使用PL/SQL类型。函数的返回类型也必须是数据库类型。 函数不能单独执行，只能通过SQL语句或PL/SQL程序块来调用。
return '工资小于等于3000';
示例5：
end if;
演示如何创建函数
EXCEPTION
create or replace function fun_hello return varchar2 is begin return '朋友，您好'; end;
WHEN no_data_found THEN
调用函数：
return '没找到数据';
select fun_hello from dual;
WHEN too_many_rows THEN
函数的授权：同过和的授权一样具体请看示例4。
return '查询到多条数据';
删除函数：
WHEN others THEN
DROP FUNCTION function_name
return '其他错误';
过程和函数的差异 过程 函数 作为PL/SQL语句执行 作为表达式的一部分调用 在规范中不包含RETURN子句 必须在规范中包含RETURN子句 不返回任何值 必须返回单个值 可以包含RETURN语句，但是与函数不同，它不能用于返回值 必须包含至少一条RETURN语句
END;
3、程序包 创建包规范的语法：
----查询语句
CREATE [OR REPLACE] PACKAGE package_name IS|AS [Public type and item declarations] [Subprogram specifications] END [package_name];
BEGIN
其中：package_name是包的名称。
DBMS_OUTPUT.PUT_LINE(moneyMAKER(7902));
Public type and item declarations是声明类型、常量、变量、异常和游标等。 Subprogram specifications声明PL/SQL子程序。
END;
示例6：
从SQL语句调用函数 SQL> SELECT MONEYMAKER(7369) FROM DUAL;
演示创建程序包规范
从PL/SQL程序调用函数：
create or replace package pack_op is procedure pro_print_ename(id number); procedure pro_print_sal(id number); function fun_re_date(id number) return date; end;
DECLARE
创建包主体的语法：
v_desc varchar2(30);
CREATE [OR REPLACE] PACKAGE BODY package_name IS|AS [Public type and item declarations] [Subprogram bodies] [BEGIN Initialization_statements] END [package_name];
BEGIN
其中：package_name是包的名称。
v_desc := moneyMaker(7369) ;
本文由宝马娱乐在线发布于网络频道,转载请注明出处：子程序和程序包