Declarando Cursores (SQL) - Carnette Socorro!!!

Question

Boa, pessoal...Em especial pro mano carnette!meu problema �:tenho que fazer um log de uma tabela no sql 6.5, dai fiz uma trigger que faz quase tudo direitinho. Ela ve se a tabela inserted e a deleted ...

Carnette · Answer

POSTa a tua trigger aqui..pra gente dar uma olhada...

Flavio Sanches · Answer

if exists (select * from sysobjects where id = object_id(�dbo.tr_LogFinanceiro_imob�) and sysstat & 0xf = 8)drop trigger dbo.tr_LogFinanceiro_imobGOCREATE TRIGGER tr_LogFinanceiro_imob ON dbo.Financeiro_imob FOR INSERT,UPDATE,DELETE AS/* Cria o trigger para log das operacoes dos usuarios    Na Tabela Financeiro_Imob   AUTOR          : FL�VIO SANCHES   DATA           : 31/01/2003*/-- Testa se Tem algum registro na tabela Inserted  If exists(Select inscricao_imob from Inserted)   Begin      -- Testa se Tem algum registro na tabela Deleted     If exists(Select inscricao_imob from deleted)     begin        -- se tem registro em ambas as tabelas entao a operacao e alteracao        -- insere no log o registro antes da operacao                 Insert  Into lg_Financ_imob (                Usuario                  ,estacao               ,Dia_Hora             ,                Operacao                 ,Inscricao_imob        ,chave_ident          ,                Ano_Divida               ,cod_Divida            ,Sub_Divida           ,                Cod_Tipo_Moeda           ,Parcela               ,Vencimento           ,                Valor                    ,Cod_Situacao_Divida   ,Num_Termo_Origem     ,                Ano_Termo_Origem         ,Num_Termo_Destino     ,Ano_Termo_Destino    ,                TEM_COMPOSICAO           ,Qtde_Parc_Agrup                             )        select  Suser_Name()             ,Host_Name()           ,GetDate()            ,                �A�         ...

Cac2000 · Answer

Amigo, eu n�o sou o Carnete, mas eu tenho isso que vc est� querendo... vou te dar um exemplo, a� vc adapta pra sua trigger, ok?

create trigger tr_grava_log on tabela1
for insert, update, delete

as
declare @campo1_ins int, @campo2_ins int, @campo3_ins int,
@campo1_del int, @campo2_del int, @campo3_del int

declare cur_ins cursor for
select campo1, campo2, campo3
from inserted

declare cur_del cursor for
select campo1, campo2, campo3
from deleted

fetch cur_ins into @campo1_ins, @campo2_ins, @campo3_ins

fetch cur_del into @campo1_del, @campo2_del, @campo3_del

while @@fetch_status = 0 -- mesmo que WHILE NOT EOF
begin

-- aqui dentro vc grava nas suas tabelas de log, usando as variaveis(@)

fetch cur_ins into @campo1_ins, @campo2_ins, @campo3_ins

fetch cur_del into @campo1_del, @campo2_del, @campo3_del

end

end

Flavio Sanches · Answer

Obrigado pela resposta, acho que vai resolver.
Desculpe se pareci preferir a resposta do carnette, mas � que temos que reconhecer que o cara � bom pra caraca.

S� mais uma d�vida...
� claro que eu procurei tb em livros por aqui e l� tinha um exemplo parecido com o seu (cac2000), s� que ele usava @@fetch_next ou algo parecido e vc usa s� @@fetch. Qual seria a diferen�a? Pelo que eu entendi o fetch next l� o registro atual ponteirado e move o ponteiro automaricamente pro pr�ximo registro. N�o seria mais apropriado???

De qq forma, Valeu!!!

Aroldo Zanela · Answer

[quote:8b3e265ac1=�Flavio Sanches�]Obrigado pela resposta, acho que vai resolver.
Desculpe se pareci preferir a resposta do carnette, mas � que temos que reconhecer que o cara � bom pra caraca.

S� mais uma d�vida...
� claro que eu procurei tb em livros por aqui e l� tinha um exemplo parecido com o seu (cac2000), s� que ele usava @@fetch_next ou algo parecido e vc usa s� @@fetch. Qual seria a diferen�a? Pelo que eu entendi o fetch next l� o registro atual ponteirado e move o ponteiro automaricamente pro pr�ximo registro. N�o seria mais apropriado???

De qq forma, Valeu!!![/quote:8b3e265ac1]

A instru��o FETCH busca uma linha na dire��o especificada que pode ser NEXT, PRIOR, FIRST, LAST, ABSOLUTE n ou RELATIVE n. A dire��o default � NEXT. Quando bem sucedida retorna 0 em @@fetch_status.

Peguei um gancho com o exemplo do nosso colega cac2000 e adicionei algumas instru��es para n�o ocorrer erros, no caso de voc� se esquecer de abrir, fechar e desalocar os cursores:

create trigger tr_grava_log on tabela1
for insert, delete
as
declare @campo1_ins int, @campo2_ins int, @campo3_ins int,
@campo1_del int, @campo2_del int, @campo3_del int

declare cur_ins cursor for
select campo1, campo2, campo3
from inserted

declare cur_del cursor for
select campo1, campo2, campo3
from deleted

/* Abrir os cursores */

open cur_ins
open cur_del

while @@fetch_status = 0 /* Enquanto n�o percorrer os registros de ambas as tabelas */
begin

     fetch next from cur_ins into @campo1_ins, @campo2_ins, @campo3_ins
     Insert into TabelaLOG values(@campo1_ins, @campo2_ins, @campo3_ins)

     fetch next from cur_del into @campo1_del, @campo2_del, @campo3_del
     Insert into TabelaLOG values(@campo1_del, @campo2_del, @campo3_del)
end

/* Fechar cursores */
close cur_ins
close cur_del

/* Remover a aloca��o dos cursoses */
deallocate cur_ins
deallocate cur_del

end

Flavio Sanches · Answer

Brigad�o galera,Zanela...Cac2000...EtcE o meu camarada carnette que sumiu...Consegui gra�as a ajuda de vcs.abra�os...

Carnette · Answer

[quote:7759348a8e=�Flavio Sanches�]Brigad�o galera,
Zanela...Cac2000...Etc
E o meu camarada carnette que sumiu...

Consegui gra�as a ajuda de vcs.

abra�os[/quote:7759348a8e]

O Camarada carnette sumiu...Porque ficou pensando pensando pensando.....e s� pensando.....Mas, nada melhor do que ter companheiros competentes aqui no forum..que em vez de ficarem s� pensando....respondem as quest�es......tbm agrade�o as respostas dos companheiros acima e podem ter certeza que as dicas j� est�o guardadas....

Flavio Sanches · Answer

Voltei...O bagulho ficou legal,S� que funciona de vez em quando...Ou seja, no update ele faz umas e n�o faz outras vezes.algu�m tem alguma id�ia de como resolvere isso???tenho um livro aqui que diz que � poss�vel na mesma trigger, separar os eventos insert,delete e update, ser� que isso resolve???minha trigger est� assim:if exists (select * from sysobjects where id = object_id(�dbo.tr_LogFinanceiro_imob�) and sysstat & 0xf = 8)drop trigger dbo.tr_LogFinanceiro_imobGOCREATE TRIGGER tr_LogFinanceiro_imob ON dbo.Financeiro_imob FOR INSERT,UPDATE,DELETE AS/* Cria o trigger para log das operacoes dos usuarios    Na Tabela Financeiro_imob   AUTOR          : FL�VIO SANCHES   DATA           : 21/05/2003*/-- Declara as variaveis dos campos da tabela onde  o trigger atua  Declare    @Inscricao_imob      char(6) ,    @chave_ident         char(3) ,    @Ano_Divida          char(4) ,    @Cod_Divida          char(2) ,    @Sub_Divida          char(2) ,    @Cod_Tipo_Moeda      char(2) ,    @Parcela             char(2) ,    @Vencimento          DateTime,    @Valor               float   ,    @Cod_Situacao_Divida char(2) ,    @Num_Termo_Origem    char(6) ,    @Ano_Termo_Origem    char(4) ,    @Num_Termo_Destino   char(6) ,    @Ano_Termo_Destino   char(4) ,    @Qtde_Parc_Agrup     char(2) ,    @Tem_Composicao      char(1) -- Testa se Tem algum registro na tabela Inserted  If exists(Select inscricao from Inserted)   Begin      -- Testa se Tem algum registro na tabela Deleted     If exists(Select i...