SQL gt;gt;gt;gt;gt;gt;gt;gt;QUE ERRO É ESSE?gt;gt;
21/02/2003
0
USO UMA TABELA DBASE E TODA VEZ QUE USO O EVENTO DA QUERY
APAREC E ESSE ERRO:
TIPY MISMATCH IN EXPRESSION!
A EXPRESSÃO QUE EU USO É ESSA
som.Close;
som.SQL.Clear;
som.SQL.Add(´Select count(Aparelho) as Hq,Sum(VALOR)As TOTAL´);
som.SQL.Add(´From Vendas´);
som.SQL.Add(´Where MES =´+(Cp));
som.Open;
a1:= som.fieldbyname(´TOTAL´).asCurrency;
Val.Text:=FloatToStr(a1);
d1:= som.fieldbyname(´Hq´).asCurrency;
QNT.Text:=FloatToStr(d1);
Valo.Caption:=FormatFloat(´R$ #,,0.00 ´, a1);
Liq.Text:=FloatToStr(c1);
Liq1.Caption:=FormatFloat(´R$ ,,0.00 ´, c1);
QNT1.Caption:=FormatFloat(´,,0´, d1);
som.Close;
APAREC E ESSE ERRO:
TIPY MISMATCH IN EXPRESSION!
A EXPRESSÃO QUE EU USO É ESSA
som.Close;
som.SQL.Clear;
som.SQL.Add(´Select count(Aparelho) as Hq,Sum(VALOR)As TOTAL´);
som.SQL.Add(´From Vendas´);
som.SQL.Add(´Where MES =´+(Cp));
som.Open;
a1:= som.fieldbyname(´TOTAL´).asCurrency;
Val.Text:=FloatToStr(a1);
d1:= som.fieldbyname(´Hq´).asCurrency;
QNT.Text:=FloatToStr(d1);
Valo.Caption:=FormatFloat(´R$ #,,0.00 ´, a1);
Liq.Text:=FloatToStr(c1);
Liq1.Caption:=FormatFloat(´R$ ,,0.00 ´, c1);
QNT1.Caption:=FormatFloat(´,,0´, d1);
som.Close;
Well
Curtir tópico
+ 0
Responder
Posts
21/02/2003
Anonymous
Primeiro explique o q é CP que está na sintaxe, se for um parametro você deve passar dessa forma :cp então antes de abrir passar o parametro assim
som.parambyname(´cp´).AsInteger := EditMes.Text;
// AsInteger se o parametro for inteiro
// AsString se for texto
// AsDate se for data
depois abra a query
só lembrando o parametro deve ser do mesmo tipo do campo da tabela
som.parambyname(´cp´).AsInteger := EditMes.Text;
// AsInteger se o parametro for inteiro
// AsString se for texto
// AsDate se for data
depois abra a query
só lembrando o parametro deve ser do mesmo tipo do campo da tabela
Responder
21/02/2003
Well
[quote:bb749c65e5=´O cara´]Primeiro explique o q é CP que está na sintaxe, se for um parametro você deve passar dessa forma :cp então antes de abrir passar o parametro assim
som.parambyname(´cp´).AsInteger := EditMes.Text;
// AsInteger se o parametro for inteiro
// AsString se for texto
// AsDate se for data
depois abra a query
só lembrando o parametro deve ser do mesmo tipo do campo da tabela[/quote:bb749c65e5]
cp:string
cp:=BDEdit1.Text
Não entedir. Desculpe mas sou um iniciante
som.parambyname(´cp´).AsInteger := EditMes.Text;
// AsInteger se o parametro for inteiro
// AsString se for texto
// AsDate se for data
depois abra a query
só lembrando o parametro deve ser do mesmo tipo do campo da tabela[/quote:bb749c65e5]
cp:string
cp:=BDEdit1.Text
Não entedir. Desculpe mas sou um iniciante
Responder
Clique aqui para fazer login e interagir na Comunidade :)