Question

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

新手求教：
一个oracle存储过程中使用CURSOR 和loop循环
怎样写可以实现：如果某此loop循环，发生异常(EXCEPTION)报-ORA,过程不中断，继续下次循环直到结束（以下面的例子说明）
--------------
CREATE OR REPLACE PROCEDURE p_test_emp is

CURSOR c1 is
select empno, ename from emp;
t_c1 c1%rowtype;

begin

open c1;
loop
FETCH c1
INTO t_c1;
Exit when(c1%NOTFOUND);
if (c1%found) then

insert into emp_test (empno, ename) values (t_c1.empno, t_c1.ename);
commit;

end if;
end loop;
close c1;

EXCEPTION

WHEN OTHERS THEN

rollback;
end;

Answer 1

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，否则的一定执行不下去。如果有疑问我们继续讨论。

Answer 2

把exeception放到循环里面就可以了！

Answer 3

将你的insert语句用begin end包起来

begin
insert into emp_test (empno, ename) values (t_c1.empno, t_c1.ename);
commit;
exception
when others then
insert into log_table(log_desc,log_date)
values(sqlerrm,sysdate);
commit;
end;