/******************************************************************************/
/****              Generated by IBExpert 13/07/2023 09:57:58               ****/
/******************************************************************************/

/******************************************************************************/
/****     Following SET SQL DIALECT is just for the Database Comparer      ****/
/******************************************************************************/
SET SQL DIALECT 3;



/******************************************************************************/
/****                                Tables                                ****/
/******************************************************************************/

/*
DROP TABLE TBATRIBUTO;
*/

CREATE GENERATOR GTBATRIBUTO;

CREATE TABLE TBATRIBUTO (
    ID         INTEGER NOT NULL,
    DESCRICAO  VARCHAR(50)
);




/******************************************************************************/
/****                             Primary keys                             ****/
/******************************************************************************/

ALTER TABLE TBATRIBUTO ADD CONSTRAINT PK_TBATRIBUTO PRIMARY KEY (ID);


/******************************************************************************/
/****                               Triggers                               ****/
/******************************************************************************/



SET TERM ^ ;



/******************************************************************************/
/****                         Triggers for tables                          ****/
/******************************************************************************/



/* Trigger: TTBATRIBUTO_B01D */
CREATE OR ALTER TRIGGER TTBATRIBUTO_B01D FOR TBATRIBUTO
ACTIVE BEFORE DELETE POSITION 9
AS
declare variable HISTORICO VARCHAR(500);
BEGIN
    HISTORICO = '';

    IF(OLD.ID > 0) THEN
    BEGIN
        HISTORICO = HISTORICO||' REGISTRO EXCLUÍDO';
    END

    IF(HISTORICO <> '') THEN
    BEGIN
        EXECUTE PROCEDURE SPI_HISTORICO('TBATRIBUTO', OLD.ID, HISTORICO);
    END
END
^


/* Trigger: TTBATRIBUTO_B01I */
CREATE OR ALTER TRIGGER TTBATRIBUTO_B01I FOR TBATRIBUTO
ACTIVE BEFORE INSERT POSITION 0
as
begin
  if (new.id is null) then
    new.id = gen_id(gtbatributo,1);
end
^


/* Trigger: TTBATRIBUTO_B01U */
CREATE OR ALTER TRIGGER TTBATRIBUTO_B01U FOR TBATRIBUTO
ACTIVE BEFORE UPDATE POSITION 9
AS
declare variable HISTORICO VARCHAR(500);
begin
    HISTORICO = '';

    IF(NEW.DESCRICAO <> OLD.DESCRICAO) THEN
    BEGIN
        HISTORICO = HISTORICO||' DESC: '||OLD.DESCRICAO||' -> '||NEW.DESCRICAO;
    END

    IF(HISTORICO <> '') THEN
    BEGIN
        EXECUTE PROCEDURE SPI_HISTORICO('TBATRIBUTO', NEW.ID, HISTORICO);
    END
end
^


/* Trigger: TTBATRIBUTO_B02I */
CREATE OR ALTER TRIGGER TTBATRIBUTO_B02I FOR TBATRIBUTO
ACTIVE BEFORE INSERT POSITION 9
AS
declare variable HISTORICO VARCHAR(500);
BEGIN
    HISTORICO = '';

    IF(NEW.ID > 0) THEN
    BEGIN
        HISTORICO = HISTORICO||' REGISTRO INCLUÍDO';
    END

    IF(HISTORICO <> '') THEN
    BEGIN
        EXECUTE PROCEDURE SPI_HISTORICO('TBATRIBUTO', NEW.ID, HISTORICO);
    END
END
^

SET TERM ; ^