Atualizar tabela automaticamente

Question

Ol�.Possuo duas tabelas em Paradox7: [u:de01652107]TabArea[/u:de01652107] e [u:de01652107]TabSetor[/u:de01652107].[u:de01652107]TabArea[/u:de01652107] possui um campo: [i:de01652107]AreaNome[/i:de0165...

Rodolpho123 · Answer

Ol� amigo!

Bem, qual � a ferramenta que voc� est� usando? Se for uma Table, essas altera��es s�o feitas automaticamentes, desde que a propriedade AutoRefresh esteja setada para True, por�m, se vc estiver usando uma Query, esta propriedade n�o funciona, for�ando assim o fechamento e depois a abertura da Query para poder ter dados atualizados. Existe tamb� uma propriedade na Query chamada Request Live. Setando esta propriedade para True, a Query deixa de trabalhar com os dados na mem�ria e passa a trabalhar diretamente no BD, como uma Table, permitindo o uso dos eventos Append,Edit,Cancel,Post...etc. Mas se vc rodar o SQL Monitor, vc vai ver que esta op��o cria muitas linhas de c�digo, onde compromete um pouco a aplica��o, cujo o nosso objetivo � a performance.
Espero t�-lo ajudado
Abra�os.......!

Capristo · Answer

Obrigado pela dica, mas n�o deu certo.Aparentemente h� dois problemas: O [b:38fc208c84]segundo[/b:38fc208c84], referente ao c�digo, � que n�o criei um relacionamento entre as duas tabelas. Originalmente s�o totalmente distintas. O objetivo do c�digo � atualizar os dados automaticamente, para que o usu�rio n�o fa�a isso na �unha�, mas � uma instru��o que ser� muito pouco utilizada, pois as atualiza��es n�o ser�o frequentes.O [b:38fc208c84]primeiro[/b:38fc208c84] � minha inesperi�ncia. N�o sou programador e por isso estou apanhando. Participar desse forum � uma das formas que encontrei para melhorar isso.Valeu de novo....

Bolus · Answer

Caro Colega,
Observando o seu C�digo, somente inclua os 2 pontos antes do NovaArea
ou seja:
Antes :

with QuerySetor do 
Begin 
  Close; 
  SQL.Clear; 
  SQL.Add(�Update TabSetor); 
  SQL.Add(�Set SetorArea = NovaArea�); // Acho que o problema est� aqui! 
  SQL.add(�Where SetorArea Like:Varea�); 
  Parambyname(�Varea�).value:=AntigaArea; 
  open; 
End;

Depois, como fica :

with QuerySetor do 
Begin 
  Close; 
  SQL.Clear; 
  SQL.Add(�Update TabSetor); 
  SQL.Add(�Set SetorArea = :NArea�); // Esta linha foi alterada
  SQL.add(�Where SetorArea = :Varea�); 
  Parambyname(�Varea�).asString :=AntigaArea; 
  Parambyname(�Narea�).asString :=NovaArea;  // Esta linha foi incluida
  open; 
End;

Obs.: Quando voc� sabe o que esta procurando no SQL, nunca coloque o Like, pois ele � mais demorado, sempre utilize o igual (=).

Isso deve resolver seu problema

Capristo · Answer

Ainda n�o deu!O programa d� a seguinte mensagem de erro: [color=darkred[b:01dd72ca47]]�Error creating cursor handle.�[/b:01dd72ca47][/color]Ah! Obrigado pela dica do Like....

Capristo · Answer

Alguem tem mais alguma dica?...

Tnaires · Answer

Cara, minha sugest�o � vc realmente criar os relacionamentos entre as tabelas e deixar o SGBD cuidar da integridade dos dados. Com os relacionamentos (e se assim vc ajustar), altera��es em uma tabela refletir�o na outra.

Wolverine · Answer

Para q complicar se pode facilitar,Amigo, o mais f�cil �Na tabela TabSetor crie um campo Cod_Area, pronto, � so isso, pois, oq estar� guardado na TabSetor � o c�digo da TabArea, se vc fizer altera��o na tabArea � vai influir na TabSetor pq oq interessa � saber qual a sua �rea,no caso o Cod_Area, as informa��es da �rea est�o na TabArea, entao s� atualize l�.(S� armazene na TabSetor os c�digos da tabArea)...

Djjunior · Answer

kra tipo eu concordo em parte com o [b:6fa348d2f0]tnaires [/b:6fa348d2f0] a minha �nica resalva � a seguinte, mude de bd, eu j� tive uma esperiencia por deveras desagrad�vel com o poradox e na minha opini�o eu nunca vi banco pra dar mais problemas com relacionamento do que essa porcaria (n�o � a toa que a borland o abandonou, e olha que isso j� tem uns 5 anos + ou -)
passe pra um access da vida que � muiiiiiito melhor, mais intuitivo, mais estavel, mais... tudo (isso tudo em compara��o somente com paradox por favor n�o confunda!!)

espero ter ajudado !

Tnaires · Answer

� verdade, o Paradox n�o gerencia os relacionamentos. Tem q mudar d bbanco msm.
Ei galera, ouvi um boato q o Access aceita no m�ximo 65536 registros, algu�m confirma essa informa��o pra mim?

Capristo · Answer

Optei por criar o c�digo na Tabela. J� est� rodando �bell�ss�.Quando a mudar de BD, � o que pretendo futuramente.Valeus, � todos !!!...

Aroldo Zanela · Answer

Colega,O �nico erro aqui foi utilizar Open, quando o correto seria ExecSQL:[code:1:0796a6c5f3]with QuerySetor do Begin   Close;   SQL.Clear;   SQL.Add(�Update TabSetor);   SQL.Add(�Set SetorArea = :NovaArea�);   SQL.add(�Where SetorArea = :Varea�);   Parambyname(�Varea�).value:=AntigaArea;   Parambyname(�NovaArea�).value:=NovaArea;   ExecSQL; // e n�o open; Open � apenas para SELECTEnd;[/code:1:0796a6c5f3]...

F�rum Atualizar tabela automaticamente #211250