oracle游标中捕获异常,oracle 游标循环, 查询,异常捕获,继续执行

declare

--类型定义

strsql string(500);

v_ErrorCode NUMBER;           -- Variable to hold the error message code

v_ErrorText VARCHAR2(200);    -- Variable to hold the error message text

cursor c_eventstate

is

Select  CampaignId,phonenumber,PolicyNumber from mkt_eventstate a where synstate =0 and packagestate = 2 and errorcode = 6;

--定义一个游标变量v_cinfo c_emp%ROWTYPE ，该类型为游标c_emp中的一行数据类型

c_row c_eventstate%rowtype;

begin

for c_row in c_eventstate loop

begin

strsql:=‘select * from mkt_userprizeinfo t where t.campaignid=‘||c_row.CampaignId||‘ and t.userid=‘||c_row.phonenumber||‘ and t.PolicyNumber=‘‘‘||c_row.PolicyNumber||‘‘‘‘;

execute immediate strsql ;

dbms_output.put_line(c_row.CampaignId||‘-‘||c_row.phonenumber||‘-‘||c_row.PolicyNumber);

-- RAISE_APPLICATION_ERROR(-20001,‘数值不能为0‘);

EXCEPTION

--捕捉异常

WHEN others THEN

begin

v_ErrorCode := SQLCODE;

v_ErrorText := SUBSTR(SQLERRM, 1, 200);

DBMS_OUTPUT.put_line(‘捕获了错误begin‘);

dbms_output.put_line(c_row.CampaignId||‘-‘||c_row.phonenumber||‘-‘||c_row.PolicyNumber||‘-‘||v_ErrorCode || ‘::‘||v_ErrorText);

DBMS_OUTPUT.put_line(‘捕获了错误end‘);

end;

end;

end loop;

end;

原文：http://www.cnblogs.com/linbl/p/4565746.html