Alimenter un fichier de relation |
Sujet: Alimenter un fichier de relation par roller0022 sur 22/8/2008 18:10:56 Bonjour à tous, j’essaye de comprendre sans comprendre, pourriez vous m’éclairer un peu. Je vous explique mon problème. WD10 J’ai trois fichiers : *Projets Idprojets > id automatic > Clé unique Nom_projet Description Idcontacts > Clé avec Doublons *Sociétés Idsociétés > id automatic > Clé unique Raison_social Siret Département *Contacts Idcontacts > id automatic > Clé unique Nom Prénom Département Idsociétés > Clé avec Doublons Un projet peut avoir plusieurs sociétés. Un projet peut avoir plusieurs Contacts Une Société peut avoir plusieurs Projets Une société peut avoir plusieurs contacts Un contact peut avoir plusieurs projets. J’ai créé les relations suivantes : Sociétés 0,n -------- 0,1 Contacts Contacts 0,n ------ 0,1 Projets Projets 0,n -------- 1,1 Sociétés Windev à alors créer un fichier de relation *Projets_Société Idsociété Idprojets Idprojet_société C’est ce fameux fichier que je dois renseigner par des hajoute que je ne comprends pas. J’ai donc créé une fenêtre vierge avec mes trois tables. Une fois la société créer et ses contacts je valide le projets avec le code suivant : // Enregistrement des informations dans le fichier Projet Projet.Nom_du_projet=SAI_Nom_du_projet Projet.Description=SAI_Description HAjoute(Projet) // Enregistrement des informations dans le fichier de relation Projet_Société Projet_Société.IDSociété=Société.IDSociété Projet_Société.IDProjet=Projet.IDProjet HAjoute(Projet_Société) Info("Votre enregistrement à bien été éffectué") Pour l’affichage de mes tables j’utilise le code suivant : // Affichage des sociétés du projet sélectionné TABLE_Société..Filtre=TABLE_Projet_Société.IDSociété // Affichage des contacts de la société selectionné TABLE_Contacts.IDSociété..Filtre=TABLE_Projet_Société.IDSociété Mon souci est que cela fonctionne avec un projet avec une société et ses contacts mais je ne comprends pas pour rajouter une nouvelle société avec le fichier de relation. Pourriez vous m’éclairer un peu, je vous remercie d’avance. Cordialement Jean Paul |