Criar tabela a partir de outras

Delphi

19/06/2006

:?: Olá a todos.
Tenho o seguinte problema.
Preciso ler de três tabelas algumas informações criando um nova tabela.
No final quero é apurar o saldo atual contas correntes.
As tabelas são: PAGAR, RECEBER E BANCOS (data do saldo inicial e o valor).

Os campos da tabela PAGAR são:
- PAG_DATAMOV Data- Data do movimento
- PAG_VALORMOVNumerico- Valor do movimento
- CCO_CODString(3)- codigo da conta
Os campos da tabela RECEBER são:
- REC_DATAMOVData- Data do movimento
- REC_VALORMOVNumerico- Valor do movimento
- CCO_CODString(3)- Codigo da conta
Os campos da tabela BANCOS são:
- CCO_CODString(30)- codigo da conta
- CCO_DATASALDOData- Data do Saldo inicial
- CCO_SALDOnumerico- Valor do saldo inicial
Na tela será informado intervalo das contas desejadas e a partir de
qual data desejamos ver os movimentos.
exemplo: Conta: 001 a 005
Data.: 01/06/2006 a 09/06/2006
Como posso fazer isso???
Obrigado e abraços a todos.
Neto


Neto

Neto

Curtidas 0

Respostas

Agsilva

Agsilva

19/06/2006

Utilize o join (união de tabelas). Um exemplo seria este:

SELECT PAGAR.PAG_DATAMOV, PAGAR.PAG_VALORMOV, RECEBER.REC_DATAMOV
FROM PAGAR NATURAL JOIN RECEBER


É só um exemplo, depois você implementa o restante dos outros campos.

:wink:


GOSTEI 0
Agsilva

Agsilva

19/06/2006

Ah, quanto à data, você pode criar dois parâmetros que receberão as datas. Exemplo:

Código SQL:
WHERE DATA BETWEEN :DE AND :ATE


Código:
IbQuery.ParamByName(´DE´).asDateTime := StrToDate(edtDe.Text);
IbQuery.ParamByName(´ATE´).asDateTime := StrToDate(edtAte.Text);


Onde DATA seria uma coluna da tabela, em que DE e ATE são os parâmetros que irão filtrá-la, recebendo o valor de edtDe e edtAte.

:wink:


GOSTEI 0
POSTAR