Ordena��o ClientDataSet...

Question

Colegas..preciso fazer uma ordena��o num determinado n�mero de registros de uma tabela, mas esta ordena��o n�o pode ser passada via SQL, isto �, a ordena��o � um campo inexistante na tabela..assim :Te...

Rafs · Answer

Caro colega,Entendi que vc faz a inclus�o destes tr�s caracteres aleat�rios imediatamente antes da impress�o, sendo assim, ser�a necess�rio ter conhecimento de como vc efetua a impress�o.Por�m se vc puder incluir estes tr�s caracteres a ponto de serem vis�veis pelo ClientDataSet, vc s� precisar� criar um �ndice na coluna que deseja ordenar e no ClientDataSet apontar o IndexFieldNames (ou IndexName) para o �ndice criado. Desta forma vc ter� os seus dados ordenados como deseja.Para qualquer d�vida, a disposi��o....

Cabelo · Answer

Colega..N�o entendi o que quis dizer, vc est� me dizendo que preciso incluir estes tr�s caracteres no banco de dados?? Ou seria uma outra tabela que contivesse os valores aplicados??Cabelo...

Rafs · Answer

Colega,N�o quis me referir a voc� alterar no banco de dados, mas sim alterar localmente.Ao utilizar o ClientDataSet � criado um cache dos dados que foram solicitados ao banco de dados, correto. Neste caso voc� poder�a incluir estes tr�s caracteres localmente para depois efetuar a ordena��o e a impress�o conforme voc� deseja.Acredito que ser�a nestes moldes:-Resgatar�a os dados do banco de dados atrav�s do ClientDataSet-Alterar�a os registros, incluindo os tr�s caracteres no campo desejado, no ClientDataSet-Criar�a o �ndice para o referido campo (IndexDefs)-Ordenar�a o ClientDataSet pelo �ndice criado (IndexFieldNames ou IndexName)-Emitir�a o relat�rio.Apesar de ser um pouco trabalhoso, acredito que resolver� o seu problema.Se vc puder me detalhar como vc emite o relat�rio (se linca direto com o ClientDataSet ou conecta a outro componente), talvez possamos descobrir uma forma mais f�cil e pr�tica de inserir estes caracteres e orden�-los corretamente....

Cabelo · Answer

Colega..Como faria para inserir no cache do client, os caracteres, acho que � s� isso que falta..eu tinha imaginado exatamente isso, s� n�o sei como executar..agrade�o sua aten��o..Cabelo...

Rafs · Answer

Para incluir estes caracteres, trabalhe com o ClientDataSet como se ele fosse uma TTable. Mas em hip�tese alguma execute o ApplyUpdates, sen�o ele atualizar� seu BD.
Um exemplo de c�digo ser�a o seguinte:

var
  lRegistro: String;
begin
...
...
  ClientDataSet.First;
  while not ClientDataSet.Eof do begin
    lRegistro := ClientDataSet.FieldByName(�NomeCampo�).AsString;
    ClientDataSet.Edit;
    ClientDataSet.FieldByName(�NomeCampo�).AsString := 
      Copy(lRegistro,1,2)+CaracteresGerados+Copy(lRegistro,3,6);
    ClientDataSet.Post;
    ClientDataSet.Next;
  end;
...
...
end;

Declare a vari�vel [i:383f866247]lRegistro[/i:383f866247] para poder alterar o conte�do do ClientDataSet.
[i:383f866247]CaracteresGerados[/i:383f866247] ser� os caracteres que vc dever� gerar para incluir no campo desejado
Com o comando [b:383f866247]Copy[/b:383f866247] voc� inserir� os caracteres na posi��o que deseja (ap�s a segunda casa, conforme no seu exemplo)
Pela sua primeira mensagem, entendi que o campo seja string.
Depois de atualizar o ClientDataSet, voc� precisar� criar o �ndice e indexar o ClientDataSet pelo �ndice criado.

ClientDataSet.IndexDefs.Add(�NomeIndice�,�NomeCampo�,[]);
ClientDataSet.IndexFieldNames := �NomeCampo�;

Desta forma voc� ter� a ordena��o que deseja.

:)

Cabelo · Answer

Colega Rafs..O m�todo Post no clientdataset n�o ir� alterar o banco de dados? Pq com a TQuery do BDE no Delphi 5, quando vc utiliza o m�todo Post, ele altera os dados na base..Cabelo...

Rafs · Answer

Colega,O m�todo Post do ClientDataSet ir� alterar somente os valores locais da m�quina, mas n�o alterar�o os dados do BD. Pois o ClientDataSet realiza um cache dos dados na m�quina local. Para alterar os dados do BD, vc precisar� chamar o m�todo ApplyUpdates, por isso que coloquei para vc em [b:22869d16d2]hip�tese alguma[/b:22869d16d2] chamar este m�todo, sen�o o BD ser� alterado.A TQuery do BDE n�o realiza cache dos dados, isto �, n�o armazena os dados na m�quina local, assim, quando � chamado o m�todo Post a TQuery se encarrega de atualizar o BD imediatamente....

Cabelo · Answer

Obrigado pela ajuda..Vou tentar aqui..Cabelo...

Cabelo · Answer

Colega..Fiz exatamente o qu� vc sugeriu, mas n�o funcionou..Ainda n�o resolvi o problema..Cabelo...

Rafs · Answer

Colega,Voc� poder�a detalhar o que aconteceu? Se n�o ordenou corretamente ou se houve algum erro.Fiz um teste r�pido aqui, por�m funcionou.....

Uildenei · Answer

se for somente em ordem ascendente assim eh mais facil e eh certo que funciona:cds.IndexFieldNames:=�CAMPO�;desde que esse campo nao seja calculadoUildenei...

Cabelo · Answer

Ocorreu o seguinte :Ele simplesmente n�o fez a ordena��o corretamente..O problema � que o campo � string..e pela ordena��o a partir de uma string, a ordena��o acaba saindo errada..se fosse integer, ordenaria corretamente..Cabelo...

Rafs · Answer

Eu refiz o teste agora e ordenou corretamente.
Primeiro vc dever� atualizar a tabela com os caracteres desejados para depois indexar
Se vc quiser eu lhe mando o teste que fiz.
Um detalhe que esqueci de mencionar, o tamanho do campo no BD deve permitir receber os tr�s caracteres a mais que voc� ir� inserir, pois o ClientDataSet respeita este aspecto. Isto �, o campo deve ter 11 caracteres de tamanho, sen�o quando vc inserir os tr�s caracteres o sistema ir� �capar� os tr�s �ltimos.

Cabelo · Answer

Colega rafsExatamente o qu� eu havia imaginado..O problema � o seguinte..Al�m de inserir os tr�s caracteres, eu devo ainda inserir alguns caracteres em braco, para separar o c�digo, para facilitar a digita��o caso seja necess�rio..A� eu teria que ter uma campo com 25 caracteres, e meu sequancial seria de somente 15..Al�m do mais.. n�o posso mudar o banco de dados, pois esta tabela � usada mais adiante no sistema, e � necess�rio que tenha somente 15 caracteres..Eu tive uma id�ia de criar um campo calculado, mas n�o deu certo, e como o colega uildinei mencionou n�o � poss�vel realizar este evento em campos calculados..N�o sei o qu� eu fa�o..Como vou resolver este problema, sendo que al�m de tudo n�o posso usar uma tabela tempor�ria..Cabelo...

Rafs · Answer

Camarada, agora vc apertou sem abra�ar... :(

Vou dar uma pensada em casa e vejo se consigo alguma id�ia para ajudar com seu �probleminha�.
Mas para me ajudar, detalhe como vc faz desde a sele��o na tabela at� a apresenta��o no relat�rio. Quem sabe possa surgir alguma id�ia que supra as suas necessidades, diferente do que estamos trabalhando. :)

F�rum Ordena��o ClientDataSet... #244392