consulta SQL

Question

Bom dia Pessoal.Estou com um problema ao tentar consultar um dado da tabela no SQL Server 2000. Estou utilizando esse comando abaixo:   Mes:=edtParcela.Text;   dmParcelas.cdsValroPago.CommandText:=�Se...

Jair Bg · Answer

Este campo na DB �mes� � inteiro, ou string?...

Wladmir · Answer

� um campo String....

Jair Bg · Answer

Bem, verifique j� que se trata de string a posibilidade de ser formatado em duas casas, como zeros a direita, e a passagem do par�metro por �QuotedStr()�...

Wladmir · Answer

N�o o campo mes n�o tem refer�ncia com data, esse campo � o n�mero de parcelas que ser� pago. eu utilizei Mes:=QuotedStr(edtParcela.Text); mas n�o tive resultado. O c�digo todo ficou assim:

Mes:=QuotedStr(edtParcela.Text);
dmParcelas.cdsValroPago.CommandText:=�Select Mes,Prestacao,chek from Parcelas where Mes=:Mes�;
dmParcelas.cdsValroPago.Open;

While not dmParcelas.cdsValroPago.Eof do
begin
if dmParcelas.cdsValroPagochek.Value=�T� then
valor:= dmParcelas.cdsValroPagoPRESTACAO.AsFloat;
dmParcelas.cdsValroPago.next;
end;
Mas ele n�o passa pelo if pois j� vem com dmParcelas.cdsValroPago.Eof com True.

Jair Bg · Answer

veja isso:=>   Mes:=QuotedStr(edtParcela.Text);   dmParcelas.cdsValroPago.CommandText:=�Select Mes,Prestacao,chek from Parcelas where Mes=:Mes�;Agora isso:   dmParcelas.cdsValroPago.ParamByName(Mes).AsString :=  edtParcela.Text;   dmParcelas.cdsValroPago.Open;   While not dmParcelas.cdsValroPago.Eof do   begin       if dmParcelas.cdsValroPagochek.Value=�T� then       valor:= dmParcelas.cdsValroPagoPRESTACAO.AsFloat;       dmParcelas.cdsValroPago.next;   end;...

Wladmir · Answer

Jair, agora ele passou pelo IF certinho, mas n�o mostrou as informa��es no grid....

Jair Bg · Answer

veja se o GRID como est� conectado ao DataSet, se voce est� �fechando� o DataSet?...

Wladmir · Answer

Jair deu certo com a rotina que voc� passou, obrigado....

F�rum consulta SQL #367286