CREATE trigger ttboperador_b05iu for tboperador
active before insert position 5
AS
DECLARE VARIABLE NOME_OPERADOR VARCHAR(20);
BEGIN
    :NOME_OPERADOR = COALESCE((SELECT K.NOME FROM TBOPERADOR K WHERE K.CODIGO_BARRAS = NEW.CODIGO_BARRAS AND K.CODIGO <> NEW.CODIGO), '');

    IF(CHAR_LENGTH(:NOME_OPERADOR) > 0) THEN
    BEGIN
        EXCEPTION "..."'OPERADOR '||:NOME_OPERADOR||' JA UTILIZA ESSE CODIGO DE BARRAS';
    END

END;