oracle存储过程cursor

① Oracle存储过程游标for循环怎么写

• 首先编写存储过程的整体结构,如下：

  create or replace procere test_proc is

  v_date date; --变量定义

  begin

  select sysdate into v_date from al;

  end test_proc;

  

② ORACLE存储过程中的动态游标

你这种， 表名字是是参数的情况下， 需要使用 动态 sql 来处理了。

你需要先定义一个变量， 来存储你的 sql 语句。

然后 OPEN v_cursor FOR 那个 sql 语句的字符串

下面是一个例子：

SQL> DECLARE
2 TYPE refcursor IS REF CURSOR;
3 v_cursor REFCURSOR;
4 v_Sql VARCHAR(200);
5 v_name VARCHAR(10);
6 BEGIN
7 -- 动态SQL
8 v_Sql := 'SELECT name FROM test_dysql';
9 -- 打开游标.
10 OPEN v_cursor FOR v_SQL;
11 -- 循环处理.
12 LOOP
13 -- 填充数据.
14 FETCH v_cursor INTO v_name;
15 -- 无数据时 退出循环.
16 EXIT WHEN v_cursor%NOTFOUND;
17 -- 输出.
18 dbms_output.put_line(v_name);
19 END LOOP;
20 -- 关闭游标.
21 CLOSE v_cursor;
22 EXCEPTION
23 WHEN OTHERS THEN
24 -- 发生异常时，如果游标还打开，那么关闭掉.
25 IF (v_cursor%isopen) THEN
26 CLOSE v_cursor;
27 END IF;
28 RAISE;
29 END;
30 /
A
B
C
D
E

PL/SQL procere successfully completed.

③ 新手求教： 一个oracle存储过程中使用CURSOR 和loop循环 怎样写可以实现：如果某此loop循环，发生异常报-O

CREATE OR REPLACE PROCEDURE p_test_emp is

CURSOR c1 is
select empno, ename from emp;
t_c1 c1%rowtype;
err exception;
begin
open c1;
loop
FETCH c1
INTO t_c1;
if (c1%found) then
insert into emp_test (empno, ename) values (t_c1.empno, t_c1.ename);
commit;
else
raise err;(这个err 需要在前面定义的,类型为异常)
end if;
end loop;
close c1;
EXCEPTION
when err then
(这里可以写上你需要的提示)
WHEN OTHERS THEN
rollback;
end;
这样写的好处就是 当里面发生错误的时候直接跳到异常中的err 不会中断这段代码的执行。
楼上说的把exeception放到循环里面也是不行的，主要就是要修改exeception中，不能rollback，否则的一定执行不下去。如果有疑问我们继续讨论。