PROCEDURĘ early_failure IS
BEGIN
DEC LARATION
little_string VARCHAR2(2) := 'BIG STRING'; BEGIN
/* body of anonymous błock */
EXCEPTION
WHEN VALUE_ERROR THEN END;
WHEN VALUE_ERROR THEN
END;