enregistrement maitre detailRésolu

Question

Bonjour;
Je programme en Delphi avec SGBD Firebird

J'ai 2 tables
BANK (BNK_ID_BNK, BNK_NOM);
AGENCE (AGE_ID_AGE, AGE_ID_BNK, AGE_ADR);
avec la contrainte: une banque doit toujours avoir au moins une agence
Sur une seule fiche en haut les champs de la banque et en bas un dbgrid pour les agences bancaires de la banque

comment obliger un utilisateur à saisir une agence pour une banque nouvellement créée de telle sorte la banque insérée ne soit pas sans aucune agence
J'ai essayé de travailler avec les transactions mais je n'y ai pas pervenu.

pierrotk10d · Answer

Bonjour,
Les deux tables sont en relation par BANK_ID_BNK et AGE_ID_BNK je pense.
Une fois la création de la banque faite tu peux utiliser l'évènement AfterPost de la table BANK pour ajouter dans le champ AGE_ID_BNK de la table AGENCE la valeur contenu dans le champ BANK_ID_BNK de la table BANK
With Table.AGENCE do begin     Append;    FieldByName('AGE_ID_BNK'). AsInteger :=   Table.BANK.FieldByName('BANK_ID_BNK').AsInteger;   Post;End;
Ensuite à toi de completer les autres champs de la table AGENCE

Enregistrement maitre detail

1 réponse

Votre réponse

Discussions similaires