Problema no Sql
Pessoal
Abaixo está um exemplo de um Sql que mesmo não econtrando registros
O recordcount mostra um registro encontrado, e pelos parametros informados no filtro não deveria
QrItemContrato.Clear;
QrItemContrato.Close;
QrItemCOntrato.Sql.Text := ´
SELECT DISTINCT SUM(SS.QTQUANTIDADE) as TotalQt
from FMSOLSERV ss where ss.CDCOMPANHIA = 321
and ss.CDRESIDUO = 28
and ss.CDEQUIPAMENTO = 2
and ss.NRCONTRATO = 332
and ss.FGSITUACAO = 1
and ss.DTAGENDAMENTO >= ´07/21/2006´
and ss.DTAGENDAMENTO <= ´08/20/2006´ ´
QrItemContrato.Open;
If Recordcount.IsEmpty then
......
Sou usuário do Delphi 6 + Firebird 2.0
Rogério
Abaixo está um exemplo de um Sql que mesmo não econtrando registros
O recordcount mostra um registro encontrado, e pelos parametros informados no filtro não deveria
QrItemContrato.Clear;
QrItemContrato.Close;
QrItemCOntrato.Sql.Text := ´
SELECT DISTINCT SUM(SS.QTQUANTIDADE) as TotalQt
from FMSOLSERV ss where ss.CDCOMPANHIA = 321
and ss.CDRESIDUO = 28
and ss.CDEQUIPAMENTO = 2
and ss.NRCONTRATO = 332
and ss.FGSITUACAO = 1
and ss.DTAGENDAMENTO >= ´07/21/2006´
and ss.DTAGENDAMENTO <= ´08/20/2006´ ´
QrItemContrato.Open;
If Recordcount.IsEmpty then
......
Sou usuário do Delphi 6 + Firebird 2.0
Rogério
Rogeranalista
Curtidas 0
Respostas
Acacio
29/08/2006
o correto é assim com o nome da tabela
If QrItemContrato.IsEmpty then
//está vazio
else
//nao está vazio
If QrItemContrato.IsEmpty then
//está vazio
else
//nao está vazio
GOSTEI 0