|
|
|
|
- Exemple : Création d'un fichier de données par programmation constitué de 3 rubriques dont une clé composée
Exemple : Création d'un fichier de données par programmation constitué de 3 rubriques dont une clé composée EXTERNE Fic_Temp EXTERNE Rub1 EXTERNE Rub2 EXTERNE RubCompo  MonFic1 est une Description de Fichier MaRub1 est une Description de Rubrique MaRub2 est une Description de Rubrique MaRub3 est une Description de Rubrique MaCléComposée est une Description de Rubrique  // Déclaration du fichier de données MonFic1.Nom = "Fic_Temp" MonFic1.Type = hFichierNormal  // Déclaration de la rubrique 1 MaRub1.Nom = "Rub1" MaRub1.Type = hRubTexte MaRub1.Taille = 20 HDécritRubrique(MonFic1, MaRub1)  // Déclaration de la rubrique 2 MaRub2.Nom = "Rub2" MaRub2.Type = hRubTexte MaRub2.Taille = 20 HDécritRubrique(MonFic1, MaRub2)  // Déclaration de la rubrique 3 MaRub3.Nom = "Rub3" MaRub3.Type = hRubHeure MaRub3.Taille = 6 // Format HHMMSS HDécritRubrique(MonFic1, MaRub3)  // Déclaration de la clé composée MaCléComposée.Nom = "RubCompo" MaCléComposée.FormuleClé = "Rub1+Rub2" HDécritRubrique(MonFic1, MaCléComposée) HDécritFichier(MonFic1) HCréation(Fic_Temp) Fic_Temp.Rub1 = "Montpellier" Fic_Temp.Rub2 = "Paris" HAjoute(Fic_Temp)  Fic_Temp.Rub1 = "Marseille" Fic_Temp.Rub2 = "Lyon" HAjoute(Fic_Temp)  HLitRecherche(Fic_Temp, RubCompo, HConstruitValClé(Fic_Temp, RubCompo, "Marseille", "Lyon")) SI HTrouve() = Vrai ALORS Trace(Fic_Temp.Rub1, Fic_Temp.Rub2) FIN
Documentation également disponible pour…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|