獲取oracle exception vs errors；sqlcode sqlerrm使用

create table errors (code number,message varchar2(1000))
truncate table errors；

--測試用

DECLARE
msg CHAR(1000);
BEGIN
FOR num IN 1..100000 LOOP
msg := SQLERRM(-num); -- should be SQLERRM(-num)
if INSTR(msg,'not found',1) > 0 then
null;
else
if INSTR(msg,'non-ORACLE',1) > 0 then
null;
else

INSERT INTO errors VALUES (num,msg);
end if;
end if ;
END LOOP;
commit;
END;

[@more@]