Fórum Problema Simples com SQL, essa é fácil #141628
27/02/2003
0
With QrConsulta1, SQL do
Begin
QrConsulta.Close;
Close;
Clear;
Add(´SELECT CONS_DATA, CONS_HORA, PRONT_NOME, CONS_VALOR,´);
Add(´CONV_DESCRICAO, MEDICO_NOME FROM VIEW_CONSULTA´);
Add(´WHERE CONS_DATA=:DIA´);
Add(´AND CONS_HORA BETWEEN :Inicial AND :Final´);
Add(´ORDER BY CONS_DATA, CONS_HORA´);
Params[0].AsDate:=StrToDate(MaskEdit1.Text);
Params[1].AsTime:=StrToTime(MaskEdit2.Text);
Params[2].AsTime:=StrToTime(MaskEdit3.Text);
QrConsulta.Open;
If QrConsulta.RecordCount=0 Then
ShowMessage(´Não há informações a serem exibidas!´)
Else
QuickRep1.Preview;
QrConsulta.Close;
End;
O record count dá zero mas tem 1 registro que inseri de teste justamente para ver se dava certo, a data e a hora do registro estão corretos com o intervalo que digito, o que pode estar errado?
Anonymous
Curtir tópico
+ 0Posts
27/02/2003
Diana
Gostei + 0
27/02/2003
Anonymous
Gostei + 0
27/02/2003
Anonymous
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)