Problemas con triggers

[jamejilla]

Tengo el siguiente trigger:

CREATE TRIGGER controlExclusión
BEFORE INSERT ON escribe
FOR EACH ROW

DECLARE contador NUMBER := 0;

BEGIN

IF :new.id_modelo IS NOT NULL THEN

SELECT COUNT (id_modelo)
INTO contador
FROM revistas
WHERE id_modelo = :new.id_modelo;

IF contador = 1 THEN

RAISE_APPLICATION_ERROR (-20001, 'No puedes asignar una modelo para que escriba en la revista de la cual es directora');

END IF;
END IF;


Al ejecutar una inserción en la tabla escribe se muestra el mensaje de alerta pero además se muestran mensajes de error y no sé de qué pueden ser:


insert into escribe (id_modelo,id_revista) values (6,6)
*

ERROR en línea 1:
ORA-20001: No puedes asignar una modelo para que escriba en la revista de la cual es directora
ORA-06512: en "lalala.CONTROLEXCLUSIÓN", línea 14
ORA-04088: error durante la ejecución del disparador 'lalala.CONTROLEXCLUSIÓN'

A ver si alguien me ayuda. Gracias !!