Intebase com IBDATASET (Mestre - Detalhe)

Delphi

21/02/2003

OI PESSOAL

Tenho uma tabela denominada ´BANCOS´ COM a seguinte estrutura

ID_Banco
Nome do Banco
´CHAVE PRIMARIA ID_BANCO

e outra denomindada ´AGencia´ com a seguinte estrutura

ID_AGencia
ID_Banco
Numero_Agencia
Nome_Agencia

CHAVE PRIMARIA (ID_BANCO E ID_AGENCIA)


outra denominada Conta_Corrente

ID_Banco
ID_Agencia
ID_Conta_Corrente
Numero_Conta
Limite


Preciso que quando [b:952c0b07ba]for incluir [/b:952c0b07ba]uma nova agencia ( ou conta_corrente) o campo ID_Banco (id_Banco e IdAgencia no caso da conta corrente)
[b:952c0b07ba]Seja preenchido automaticamente[/b:952c0b07ba], utilizo o ´IBDATASET´
e não sei como fazer ( no paradox anteriormente utilizava Ttable com a tabela banco ´mestre´ e
´agencia´ detalhe e era facil).

Como fazer isso com o IBDATASET? como devo proceder..


Agradeço a atençao de todos..


Siro


Siro

Siro

Curtidas 0

Respostas

Jeová Soares

Jeová Soares

21/02/2003

No evento BeforePost do IBDataSet coloque o seguinte código:

Para Tabela Agencia
IBDSAgenciaId_Banco.Value := IBDSBancoID_Banco.Value;

Para Tabela Conta Corrente
IBDSContaCorrenteID_Banco.Value := IBDS_AgenciaID_Banco.Value;
IBDSContaCorrenteID_Agencia.Value := IBDSAgenciaID_Agencia.Value;

Espero ter ajudado


GOSTEI 0
POSTAR