ALTER TABLE TBCASO_USUARIOS
  ADD NOTIFICACAO INTEGER DEFAULT 0;

ALTER TABLE TBESTOQUE_SALDO_MES DROP DATA;

ALTER TABLE TBESTOQUE_SALDO_MES ADD DATA DATE;

ALTER TABLE TBLOCALIZACAO
  ADD WIP CHAR DEFAULT '0';

ALTER TABLE TBMOVCONTABIL
  ADD DATAHORA TIMESTAMP DEFAULT 'NOW';

ALTER TABLE TBNOTIFICACAO ALTER COLUMN DATA_HORA SET DEFAULT 'now';

ALTER TABLE TBPEDIDO_ITEM
  ADD CLASSIFICACAO INTEGER;

ALTER DOMAIN RDB$61288
  TYPE INTEGER CHARACTER SET UTF8;

ALTER TABLE TBREPLICA_TABELA
  ADD LINHA_ID INTEGER DEFAULT 0; 


CREATE TRIGGER TTBESTOQUE_SALDO_MES_BI0 FOR TBESTOQUE_SALDO_MES
ACTIVE
BEFORE INSERT
POSITION 0 
AS
begin
  NEW.DATA = CAST('01.'||NEW.MES||'.'||NEW.ANO AS DATE);
end;

CREATE TRIGGER TTBMODELO_CONSUMO_999 FOR TBMODELO_CONSUMO
ACTIVE
BEFORE INSERT OR UPDATE OR DELETE
POSITION 999 
AS
declare variable vLinha_Id Integer;
begin

  vLinha_Id = (Select First 1 Linha_Codigo from tbmodelo where codigo = New.Modelo_Codigo);
  if (vLinha_Id > 0) then
      Begin
         UpDate tbreplica_tabela set Status = '0'
          Where tabela = 'TBMODELO_FICHA_TECNICA'
            and linha_id = :vLinha_id
            and Status = '1';
      End

end;


CREATE TRIGGER TTBMODELO_CONSUMO_COR_999 FOR TBMODELO_CONSUMO_COR
ACTIVE
BEFORE INSERT OR UPDATE OR DELETE
POSITION 999 
AS
declare variable vLinha_Id Integer;
begin

  vLinha_Id = (Select First 1 Linha_Codigo from tbmodelo where codigo = New.Modelo_Id);
  if (vLinha_Id > 0) then
      Begin
         UpDate tbreplica_tabela set Status = '0'
          Where tabela = 'TBMODELO_FICHA_TECNICA'
            and linha_id = :vLinha_id
            and Status = '1';
      End

end;

CREATE SEQUENCE GTBCASO_CONTATO
  START WITH 0
  INCREMENT BY 1;
  
CREATE INDEX ITBESTOQUE_SALDO_MES_04
  ON TBESTOQUE_SALDO_MES (DATA);