ошибка PL SQL создание процедуры за исключением

Question

Я пытаюсь создать процедуру в PL / SQL и получаю следующую ошибку:

Errors: PROCEDURE BORRAR_PELI
Line/Col: 10/1 PLS-00103: Encountered the symbol "EXCEPTION" when expecting one of the following:
   ( begin case declare end exit for goto if loop mod null
   pragma raise return select update while with <an identifier>
   <a double-quoted delimited-identifier> <a bind variable> <<
   continue close current delete fetch lock insert open rollback
   savepoint set sql execute commit forall merge pipe purge
   json_exists json_value json_query json_object json_array***

Моя процедура:

CREATE OR REPLACE PROCEDURE borrar_peli(delete_id peliculas.id%TYPE)
IS
corrupto EXCEPTION;
precio_dia_v peliculas.precio_dia%TYPE;
BEGIN
  SELECT precio_dia INTO precio_dia_v FROM peliculas WHERE id = delete_id;
  IF precio_dia_v > 4 THEN
  RAISE corrupto;
  ELSE
    DELETE FROM películas WHERE id = delete_id;
    COMMIT;
  END IF;
EXCEPTION
  WHEN corrupto THEN 
        DBMS_OUTPUT.put_line('es corrupto');
  WHEN OTHERS THEN
        DBMS_OUTPUT.put_line('Error code ' || SQLCODE || ': ' || SQLCODE);
END;