Bonjour,
Au fait, j'essaye de faire une application qui permet de repertorier ou enregistrer les personnes par type de metiers, par exple. Pour ce faire j'ai créé les fichiers
PERSONNE,
TYPE_METIER qui sont liés au fichier
LIGNE_ENREGISTREMENT. J'ai créé aussi 2 fenêtres:
-
fen_pers qui sert à enregistrer l'identité de la personne (nom, prenom, age);
-
fen_2 qui porte une combo pour selectionner le nom de la personne enregistrée, des champs pour mettre les caractéristique du metier (nom_metier, description_metier), une table memoire (Tabl1) et 2 boutons:
- Bouton "ok": Pour inserer le contenu des champs dans la tabl1
voici ce que j'ai mis:
1 2 3
| HLitRecherche(PERSONNE,ID_PERSONNE,COMBO_nom_pers)
SI HTrouve(PERSONNE) ALORS
TableAjouteLigne(TABL1, PERSONNE.nom_pers, SAI_nom_metier, SAI_desc_metier) |
- Bouton "valide": Pour enregistrer le contenu de la table dans le fichier
voici le code:
1 2 3 4 5 6 7 8 9 10 11 12 13
| TYPE_METIER.nom_metier= SAI_nom_metier
TYPE_METIER.desc_metier=SAI_Desc_metier
HAjoute(TYPE_METIER)
POUR TOUTE LIGNE DE TABL1
HRAZ(Ligne_enregistrement)
Ligne_enregistrement.ID_PERSONNE=PERSONNE.ID_PERSONNE
Ligne_enregistrement.ID_metier=TYPE_metier.ID_metier
Ligne_enregistrement.ID_metier=COL_reference_metier
Ligne_enregistrement.ID_PERSONNE=COL_reference_pers
HAjoute(Ligne_enregistrement)
FIN |
Au fait, je crois que l'enregistrement se fait normalement dans les fichiers PERSONNE et TYPE_METIER, mais pour LIGNE_ENREGISTREMENT j'ai l'impression qu'il y a problème. Bef je veux que lorsqu'on selectionne une personne qu'on puisse savoir tous les metiers dont il fait partie et vice vers ça, mais je suis vraiment bloqué, je ne suis pas sûr de mes codes
Partager