DOCUMENTATION EN LIGNE
DE WINDEVWEBDEV ET WINDEV MOBILE

Aide / WLangage / Gestion des bases de données / HFSQL / Fonctions HFSQL
  • Exemple 1 : Décrire un fichier de données par programmation
  • Exemple 2 : Création d'un fichier de données par programmation constitué de 3 rubriques dont une clé composée
HDécritRubrique (Exemple)
Exemple 1 : Décrire un fichier de données par programmation
WINDEVCode Utilisateur (MCU)HFSQL ClassicProcédures stockéesOLE DBConnecteurs Natifs (Accès Natifs)
L'exemple suivant permet de décrire un fichier de données par programmation avec ses liaisons, rubriques, ....
UnFichier est une Description de Fichier
UneRubrique est une Description de Rubrique
 
// Description du fichier "CLIENT"
UnFichier.Nom = "CLIENT"
UnFichier.Type = hFichierNormal
UnFichier.CryptageFic = hCryptageStandard
 
// Description de la rubrique "NOM"
UneRubrique.Nom = "NOM"
UneRubrique.Type = hRubTexte
UneRubrique.Taille = 40
UneRubrique.TypeClé = hCléUnique
HDécritRubrique(UnFichier, UneRubrique)
 
// Description de la rubrique "PRENOM"
UneRubrique.Nom = "PRENOM"
UneRubrique.Type = hRubTexte
UneRubrique.Taille = 40
HDécritRubrique(UnFichier, UneRubrique)
 
// Valide la description du fichier
HDécritFichier(UnFichier)
Exemple 2 : Création d'un fichier de données par programmation constitué de 3 rubriques dont une clé composée
WINDEVCode Utilisateur (MCU)HFSQL ClassicProcédures stockées
Cet exemple permet de créer un fichier de données par programmation. Ce fichier de données est constitué de deux rubriques simples, et d'une clé composée. Lorsque le fichier de données est créé, il est rempli, et un recherche est effectuée sur la clé composée.
EXTERNE Fic_Temp
EXTERNE Rub1
EXTERNE Rub2
EXTERNE RubCompo
 
MonFic est une Description de Fichier
MaRub1 est une Description de Rubrique
MaRub2 est une Description de Rubrique
CléComposée est une Description de Rubrique
 
// Déclaration du fichier
MonFic.Nom = "Fic_TEMP"
MonFic.Type = hFichierNormal
 
// Déclaration de la rubrique 1
MaRub1.Nom = "RUB1"
MaRub1.Type = hRubTexte
MaRub1.Taille = 20
HDécritRubrique(MonFic, MaRub1)
 
// Déclaration de la rubrique 2
MaRub2.Nom="RUB2"
MaRub2.Type = hRubTexte
MaRub2.Taille = 20
HDécritRubrique(MonFic, MaRub2)
 
// Déclaration de la clé composée
CléComposée.Nom = "RubCompo"
CléComposée.FormuleClé = "RUB1+RUB2"
 
HDécritRubrique(MonFic, CléComposée)
 
HDécritFichier(MonFic)
 
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
Version minimum requise
  • Version 9
Documentation également disponible pour…
Commentaires
Cliquez sur [Ajouter] pour publier un commentaire

Dernière modification : 17/07/2023

Signaler une erreur ou faire une suggestion | Aide en ligne locale