ALTER TABLE TBCASO_PAINEL
    ADD VISUALIZAR_JANELA_FINALIZACAO INTEGER DEFAULT 1;


COMMENT ON COLUMN TBCASO_PAINEL.VISUALIZAR_JANELA_FINALIZACAO IS
'0 - Nao Visualiza janela ao finalizar caso;
1 - Visualiza janela ao finalizar caso;

Se REQUER_DESC_TECNICA ou REQUER_SOLUCAO_CASO estiverem marcados, valor sera definido como 1 por padrao.';


COMMENT ON COLUMN TBCASO_FEED.ORIGEM IS
'0-registro manual
1-email
2-caso origem';


UPDATE TBCASO_PAINEL
    SET VISUALIZAR_JANELA_FINALIZACAO = 1
    WHERE VISUALIZAR_JANELA_FINALIZACAO IS NULL;

/***************************************************************************************/
/***************************************************************************************/

SET TERM ^ ;

CREATE OR ALTER trigger ttbcaso_painel_b01u for tbcaso_painel
active before update position 0
AS
DECLARE VARIABLE HISTORICO VARCHAR(5000);
BEGIN

    HISTORICO = '';

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

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

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

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

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

     IF ( OLD.STATUS <> NEW.STATUS) THEN
    BEGIN
        HISTORICO = HISTORICO||' STATUS:'|| OLD.STATUS||'->'||NEW.STATUS;
        UPDATE TBMENU SET TIPO = NEW.STATUS WHERE CONTROLE = 99000 + NEW.ID;    -- MODIFICA O TIPO DA TBMENU DE ACORDO COM O STATUS DO PAINEL
    END

     IF ( OLD.CONTATO_CADASTRO <> NEW.CONTATO_CADASTRO) THEN
    BEGIN
        HISTORICO = HISTORICO||' CONTATO CADASTRO:'|| OLD.CONTATO_CADASTRO||'->'||NEW.CONTATO_CADASTRO;
    END

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

     IF ( OLD.EMAIL_PASS <> NEW.EMAIL_PASS) THEN
    BEGIN
        HISTORICO = HISTORICO||' EMAIL SENHA:'||'SENHA ALTERADA';
    END

     IF ( OLD.EMAIL_SMTP <> NEW.EMAIL_SMTP) THEN
    BEGIN
        HISTORICO = HISTORICO||' EMAIL SMTP:'|| OLD.EMAIL_SMTP||'->'||NEW.EMAIL_SMTP;
    END

     IF ( OLD.PORTA_SMTP <> NEW.PORTA_SMTP) THEN
    BEGIN
        HISTORICO = HISTORICO||' PORTA SMTP:'|| OLD.PORTA_SMTP||'->'||NEW.PORTA_SMTP;
    END

     IF ( OLD.EMAIL_POP <> NEW.EMAIL_POP) THEN
    BEGIN
        HISTORICO = HISTORICO||' EMAIL POP:'|| OLD.EMAIL_POP||'->'||NEW.EMAIL_POP;
    END

     IF ( OLD.PORTA_POP <> NEW.PORTA_POP) THEN
    BEGIN
        HISTORICO = HISTORICO||' PORTA POP:'|| OLD.PORTA_POP||'->'||NEW.PORTA_POP;
    END

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

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

      IF ( OLD.EMAIL_MONITOR <> NEW.EMAIL_MONITOR) THEN
    BEGIN
        HISTORICO = HISTORICO||' EMAIL MONITOR:'|| OLD.EMAIL_MONITOR||'->'||NEW.EMAIL_MONITOR;
    END

     IF ( OLD.SQL_EMAIL_CONTATO <> NEW.SQL_EMAIL_CONTATO) THEN
    BEGIN
        HISTORICO = HISTORICO||' SQL EMAIL CONTATO:'|| OLD.SQL_EMAIL_CONTATO||'->'||NEW.SQL_EMAIL_CONTATO;
    END

    IF ( OLD.CAMPO_NOME_CONTATO <> NEW.CAMPO_NOME_CONTATO) THEN
    BEGIN
        HISTORICO = HISTORICO||' CAMPO NOME CONTATO:'|| OLD.CAMPO_NOME_CONTATO||'->'||NEW.CAMPO_NOME_CONTATO;
    END

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

    IF ( OLD.REQUER_SOLUCAO_CASO <> NEW.REQUER_SOLUCAO_CASO) THEN
    BEGIN
        HISTORICO = HISTORICO||' REQUER SOLUC.CASO:'|| OLD.REQUER_SOLUCAO_CASO||'->'||NEW.REQUER_SOLUCAO_CASO;
    END

    IF ( OLD.VISUALIZACAO_WORKFOW <> NEW.VISUALIZACAO_WORKFOW) THEN
    BEGIN
        HISTORICO = HISTORICO||' VISUAL.WORKFLOW:'|| OLD.VISUALIZACAO_WORKFOW||'->'||NEW.VISUALIZACAO_WORKFOW;
    END

    IF ( OLD.VISUALIZAR_JANELA_FINALIZACAO <> NEW.VISUALIZAR_JANELA_FINALIZACAO) THEN
    BEGIN
        HISTORICO = HISTORICO||' VISUAL.JANELA FINAL:'|| OLD.VISUALIZAR_JANELA_FINALIZACAO||'->'||NEW.VISUALIZAR_JANELA_FINALIZACAO;
    END

    IF (HISTORICO <> '') THEN
    BEGIN
        HISTORICO = 'REGISTRO ALTERADO:'||HISTORICO;
        EXECUTE PROCEDURE SPI_HISTORICO('TBCASO_PAINEL',NEW.ID, FN_ELIPSE(HISTORICO, 500));
    END
END
^

SET TERM ; ^

