Array
(
)

Erro em consulta

Jose
   - 22 ago 2004

Onde esta o erro nesta consulta?
estou usando o Access.

qSoma.Close;
qSoma.SQL.Clear;

qSoma.SQL.Add(´Select tlbClientes.Nome, tlbParcelas.DtaVncParcela, Sum(tlbParcelas.ValorParc) As Valor FROM tlbClientes INNER JOIN tlbParcelas On tlbClientes.Codigo=tlbParcelas.CodCliente GROUP BY tlbClientes.Nome´);
qSoma.SQL.Add(´HAVING tlbParcelas.DtaVncParcela Between :Inicio And :Final´);
qSoma.Parameters.ParamByName(´Inicio´).Value:= dpInicio.DateTime;
qSoma.Parameters.ParamByName(´Final´).Value:= dpFinal.DateTime;

qSoma.Open;

Retorna o seguinte erro:
você tentou executar uma consulta que não inclui a expressão ´DtaVncParcela´
especificada como parte de uma função agregada.


Agradeco a quem puder ajudar-me.


Sandra
   - 22 ago 2004

Jose,

De acordo com a mensagem de erro, a tabela tlbParcelas não foi informada na select, ou seja:
FROM tlbClientes, tlbParcelas

#Código

qSoma.Close; 
qSoma.SQL.Clear;

qSoma.SQL.Add(´Select tlbClientes.Nome, tlbParcelas.DtaVncParcela, Sum(tlbParcelas.ValorParc) As Valor ´);
qSoma.SQL.Add(´FROM tlbClientes, tlbParcelas´);
qSoma.SQL.Add(´INNER JOIN tlbParcelas On tlbClientes.Codigo=tlbParcelas.CodCliente ´);
qSoma.SQL.Add(´GROUP BY tlbClientes.Nome ´);
qSoma.SQL.Add(´HAVING tlbParcelas.DtaVncParcela Between :Inicio And :Final´);
qSoma.Parameters.ParamByName(´Inicio´).Value:= dpInicio.DateTime;
qSoma.Parameters.ParamByName(´Final´).Value:= dpFinal.DateTime;

qSoma.Open;



Jose
   - 22 ago 2004

Sandra assim retorna :
erro de sintaxe na operação JOIN

Obrigado......