CREATE OR REPLACE TRIGGER nome_trigger_001
BEFORE INSERT OR DELETE OR UPDATE
ON nome_tabela
REFERENCING NEW AS NEW OLD AS OLD
FOR EACH ROW
BEGIN
IF(INSERTING)THEN
IF( USER <> nome_usuario_aplicacao)THEN
RAISE_APPLICATION_ERROR(-20001,'Só é possível INSERIR os registros pela aplicação.');
END IF;
SELECT nome_sequence.NEXTVAL
INTO :NEW.SEQ
FROM DUAL;
END IF;
END;