110,571
社区成员
发帖
与我相关
我的任务
分享
Create Or Replace Procedure EXEC_TEST01 As
Cursor C_ITEM Is
SELECT ....
V_ITEM C_ITEM%Rowtype;
INTEGRITY_ERROR Exception;
ERRNO Integer;
ERRMSG Varchar2(2000);
Begin
Open C_ITEM;
Fetch C_ITEM
Into V_ITEM;
While C_ITEM%Found Loop
Begin
DoThing.....
Commit;
Exception
When Others Then
ERRMSG := Sqlerrm;//返回Oracle的错误信息
Rollback;
Update ERROR_LIST
Set MSG = ERRMSG
Where LISTID = ..
Commit;
End;
Fetch C_ITEM
Into V_ITEM;
End Loop;
Close C_ITEM;
Exception
When INTEGRITY_ERROR Then
RAISE_APPLICATION_ERROR(ERRNO, ERRMSG);
End;
List<string> dal = new List<string>();
dal.Add("1");
dal.Add("2");
dal.Add("3");
dal.Add("4");
List<string> faildal = new List<string>();
foreach (string str in dal)
{
try
{
}
catch
{
faildal.Add(str);
}
}