Fórum sum #296743
23/09/2005
0
uso:
D7 + Mysql
seguinte tenho uma busca no meu form com uma query assim:
zch2.Close; zch2.Sql.Clear; zch2.Sql.Add(´SELECT SUM(valor) as TOTAL FROM cheques´); zch2.Sql.Add(´WHERE para > :dtpi´); zch2.Sql.Add(´and para < :dtpf and compensado LIKE (:C)´); zch2.Params[0].AsDate := dtpi.Date; zch2.Params[1].AsDate := dtpf.Date; zch2.Params[2].Value := CBCompe; zch2.Open;
o q acontece é o seguinte, qdo busco por uma data exata, o resultado não aparece, tenho que digitar uma data sempre antes ou depois, da data que eu quero !
já tentei colocar assim:
zch2.Sql.Add(´WHERE para => :dtpi´); zch2.Sql.Add(´and para <= :dtpf and compensado LIKE (:C)´);
mas dá um erro de syntax:
SQL Error ... syntax to use near ´=>´17/09/2005´ .....
onde estou errando :cry: ?
Abraço a todos
Sr.Reis
Sr.reis
Curtir tópico
+ 0Posts
23/09/2005
Marco Salles
E assim , voce ja tentoucolocar ???
[b:5a1f373a0a]Código:[/b:5a1f373a0a]
zch2.Sql.Add(´WHERE para >=:dtpi´); zch2.Sql.Add(´and para <=:dtpf and compensado LIKE (:C)´);
Gostei + 0
23/09/2005
Sr.reis
mas dá o mesmo erro ...
obrigado ... e no aguardo !
sr.reis
abraços
Gostei + 0
23/09/2005
Silviogs
pelo erro que está aparecendo é seguinte:
zch2.Sql.Add(´WHERE para => :dtpi´);
^---errro está aqui
zch2.Sql.Add(´and para <= :dtpf and compensado LIKE (:C)´);
não é igual ou maior é maior ou igual
correto:
zch2.Sql.Add(´WHERE para >= :dtpi´);
zch2.Sql.Add(´and para <= :dtpf and compensado LIKE (:C)´);
Ex:
texto := texto + ´and pc.dataentrada>=:mdata1 and pc.dataentrada<=:mdata2 ´;
Atenciosamente
Silio Guedes
Gostei + 0
23/09/2005
Silviogs
esqueci de informar que precisa de um espaço:
zch2.Sql.Add(´SELECT SUM(valor) as TOTAL FROM cheques ´);
zch2.Sql.Add(´WHERE para > :dtpi ´);
zch2.Sql.Add(´and para < :dtpf and compensado LIKE (:C)´);
os parametrod data tente passar assim
QryProcesso.ParamByName(´mdata1´).Value := strtodate(MaskEdit1.Text);
QryProcesso.ParamByName(´mdata2´).Value := strtodate(MaskEdit2.Text);
atenciosamente
Silvio Geudes
Gostei + 0
23/09/2005
Silviogs
Corrigindo
esqueci de informar que precisa de um espaço no final de cada linha antes da ultima linha da query:
v
zch2.Sql.Add(´SELECT SUM(valor) as TOTAL FROM cheques ´);
zch2.Sql.Add(´WHERE para > :dtpi ´);
zch2.Sql.Add(´and para < :dtpf and compensado LIKE (:C)´);
os parametros data tente passar assim
QryProcesso.ParamByName(´mdata1´).Value := strtodate(MaskEdit1.Text);
QryProcesso.ParamByName(´mdata2´).Value := strtodate(MaskEdit2.Text);
Atenciosamente
Silvio Guedes
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)