Date de publication : Nov 26, 2008 11:5:46 AM
DECLARE
err_num NUMBER;
err_msg VARCHAR2(100);
BEGIN
. . .
EXCEPTION
WHEN OTHERS THEN
err_num := SQLCODE;
err_msg := SUBSTR(SQLERRM, 1, 100) ;
INSERT INTO errors (err_num, err_msg) ;
END;