Consulta ao banco utilizando SimleDataSet Delphi 2005
06/01/2006
0
Caros amigos,
Utilizo D7 para desenvolvimento e estou migrando para o D2005.
Em uma consulta utilizo SimpleDataSet para recuperar os dados numa Grid e utilizo outro Simple para somar valores da mesma tabela que está na Grid.
No D7, tudo funciona normalmente.
Mas do D2005, funciona pela primeira vez que acesso e filtro os dados e qdo altero os parâmetros (no meu caso a data) simplesmente o resultado é mesmo, ele não consegue aplicar os parâmetros novamente.
Abaixo, o código:
with dtmCaixa.sdsConsulta do
begin
Active := False;
DataSet.CommandText := ´select a.*, b.CC_NOMECLI ´ +
´from CC01MOV a, CC01CLIE b ´ +
´where a.CC_CDCLI = b.CC_CODICLI and CC_DATACLI between :inicial and :final ´ +
´order by C_LACCLI´;
DataSet.ParamByName(´inicial´).AsDate := StrToDate(MaskEdit1.Text);
DataSet.ParamByName(´final´).AsDate := StrToDate(MaskEdit2.Text);
Active := True;
Fico grato pela ajuda...
Utilizo D7 para desenvolvimento e estou migrando para o D2005.
Em uma consulta utilizo SimpleDataSet para recuperar os dados numa Grid e utilizo outro Simple para somar valores da mesma tabela que está na Grid.
No D7, tudo funciona normalmente.
Mas do D2005, funciona pela primeira vez que acesso e filtro os dados e qdo altero os parâmetros (no meu caso a data) simplesmente o resultado é mesmo, ele não consegue aplicar os parâmetros novamente.
Abaixo, o código:
with dtmCaixa.sdsConsulta do
begin
Active := False;
DataSet.CommandText := ´select a.*, b.CC_NOMECLI ´ +
´from CC01MOV a, CC01CLIE b ´ +
´where a.CC_CDCLI = b.CC_CODICLI and CC_DATACLI between :inicial and :final ´ +
´order by C_LACCLI´;
DataSet.ParamByName(´inicial´).AsDate := StrToDate(MaskEdit1.Text);
DataSet.ParamByName(´final´).AsDate := StrToDate(MaskEdit2.Text);
Active := True;
Fico grato pela ajuda...
Luispaulo
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)