CREATE OR ALTER TRIGGER TTBUNIDADEMEDIDA_B03I FOR TBUNIDADEMEDIDA
ACTIVE BEFORE INSERT POSITION 0
AS
declare variable CODIGO VARCHAR(10);
begin
    IF(NEW.SIGLA IS NOT NULL) THEN
    BEGIN
        CODIGO = COALESCE((SELECT FIRST 1 A.SIGLA FROM TBUNIDADEMEDIDA A WHERE A.SIGLA = NEW.SIGLA),'');
    END
    
    IF(CODIGO <> '') THEN
    BEGIN
       EXCEPTION "..." 'SIGLA: '||CODIGO||' P/ UNIDADE DE MEDIDA JA CADASTRADA!';
    END
END;
