| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
susa
Novato
Registrado: Sexta-Feira, 11 de Janeiro de 2008
Mensagens: 3
|
 Enviada: Sex Jan 11, 2008 10:14 pm Assunto: calcular entrada/saida da consulta |
 |
|
Bom... estou usando o IBO junto com o FireBird e estou com um probleminha
estou tentando criar um sistema de livro-caixa
criei uma consulta entre datas... mais quanto a consulta é feita
queria que algum IB_edit mostra-se o saldo daquela consulta feita
coloquei dois DateTimePicker1 1 IB_grid e um button dispara esse codigo
IB_Query1.Close;
IB_Query1.SQL.Text := 'select * from livro_caixa where data between '+
QuotedStr(FormatDateTime('yyy-mm-dd',DateTimePicker1.Date))+'and'+
QuotedStr(FormatDateTime('yyy-mm-dd',DateTimePicker2.Date));
IB_Query1.Prepare;
IB_Query1.Open;
quem poder me ajudar... valew  |
|
| Voltar ao Topo |
|
 |
AnOnImUs.Info
Colaborador
Registrado: Quinta-Feira, 23 de Agosto de 2007
Mensagens: 1119
Localização: Goiânia - GO
|
| Enviada: Seg Jan 14, 2008 12:16 pm Assunto: Re: calcular entrada/saida da consulta |
|
|
| susa escreveu: | Bom... estou usando o IBO junto com o FireBird e estou com um probleminha
estou tentando criar um sistema de livro-caixa
criei uma consulta entre datas... mais quanto a consulta é feita
queria que algum IB_edit mostra-se o saldo daquela consulta feita
coloquei dois DateTimePicker1 1 IB_grid e um button dispara esse codigo
IB_Query1.Close;
IB_Query1.SQL.Text := 'select * from livro_caixa where data between '+
QuotedStr(FormatDateTime('yyy-mm-dd',DateTimePicker1.Date))+'and'+
QuotedStr(FormatDateTime('yyy-mm-dd',DateTimePicker2.Date));
IB_Query1.Prepare;
IB_Query1.Open;
quem poder me ajudar... valew |
o problema esta sendo que quando voce esta fazendo a sua select voce esta utilizando o ( * ), tente passando os campos desejados...
assim ficara mais facil
IB_Query1.Close;
IB_Query1.SQL.Text := 'select campo1, campo2,campo3 from livro_caixa where data between '+
QuotedStr(FormatDateTime('yyy-mm-dd',DateTimePicker1.Date))+'and'+
QuotedStr(FormatDateTime('yyy-mm-dd',DateTimePicker2.Date));
IB_Query1.Prepare;
IB_Query1.Open;
fazendo assim voce pode no final atribuir os valores aos campos desejados...
IB_edit1 := IB_Query1.field[0].asTipo;
IB_edit2 := IB_Query1.field[1].asTipo;
ve ai se funciona.
_________________
Reter o conhecimento é promover a ignorância ! |
|
| Voltar ao Topo |
|
|
susa
Novato
Registrado: Sexta-Feira, 11 de Janeiro de 2008
Mensagens: 3
|
| Enviada: Seg Jan 14, 2008 2:42 pm Assunto: |
|
|
mais mesmo assim o calculo não é feito
e coloquei assim
IB_Edit1.text := IB_query1.fieldbyname('entrada').asstring; |
|
| Voltar ao Topo |
|
|
susa
Novato
Registrado: Sexta-Feira, 11 de Janeiro de 2008
Mensagens: 3
|
| Enviada: Seg Jan 14, 2008 2:44 pm Assunto: |
|
|
um outro cara mandou eu fazer isso
sum(case when TipoMovto = 'C' then valor else valor * -1 end
mais na verdade não entendi nada |
|
| Voltar ao Topo |
|
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
