Fórum Puts que dúvida filha da mãe... rss me ajudem.. #165247
07/06/2003
0
procedure TF_Caixa.TabSheet1Show(Sender: TObject);
var
dat : String;
begin
Dat := DateToStr(Date);
D_M.QY_CAIXA.Active := FALSE;
D_M.QY_CAIXA.SQL.Clear;
D_M.QY_CAIXA.SQL.Add(´Select * from caixa where tipo = ´Entrada´ and data = ´´+Dat+´´ and (Select sum(Valor)as Total From Caixa)´);
D_M.QY_CAIXA.Active := True;
//Dia
end;
Pessoal onde esta o erro aqui ou como faço para obter o resultado?
quero que ele consulte no banco de dados na DATA de HOJE e me some os valores que contenha o tipo ENTRADA.
só que já fiz de todas as forma que sei e nada....
será que alguém pode me ajudar ?
Grato! :wink: :D
var
dat : String;
begin
Dat := DateToStr(Date);
D_M.QY_CAIXA.Active := FALSE;
D_M.QY_CAIXA.SQL.Clear;
D_M.QY_CAIXA.SQL.Add(´Select * from caixa where tipo = ´Entrada´ and data = ´´+Dat+´´ and (Select sum(Valor)as Total From Caixa)´);
D_M.QY_CAIXA.Active := True;
//Dia
end;
Pessoal onde esta o erro aqui ou como faço para obter o resultado?
quero que ele consulte no banco de dados na DATA de HOJE e me some os valores que contenha o tipo ENTRADA.
só que já fiz de todas as forma que sei e nada....
será que alguém pode me ajudar ?
Grato! :wink: :D
Ajmsistemas
Curtir tópico
+ 0
Responder
Posts
07/06/2003
Salupe
coloque o seu select assim:
´Select * from caixa where tipo = ´Entrada´ and data = ´´+FormatDateTime(´MM/DD/YYYY´, Dat)+´´ and (Select sum(Valor)as Total From Caixa)´);
o sql só reconhece datas americanas
´Select * from caixa where tipo = ´Entrada´ and data = ´´+FormatDateTime(´MM/DD/YYYY´, Dat)+´´ and (Select sum(Valor)as Total From Caixa)´);
o sql só reconhece datas americanas
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)