Exemples évolués
Chaque exemple montre une utilisation pratique de la fonction du WLangage.
Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.
Le code suivant permet de connaître le volet d'un champ présent dans un onglet. La procédure DonneVolet permet de rechercher un champ parmi les champs présents dans les volets d'un onglet.
|
||
PROCEDURE DonneVolet(NomOnglet, NomChamp)
// Dans quel volet de l'onglet se trouve le champ ? i est un entier j est un entier sChamp est une chaîne NbVolet est un entier = {NomOnglet}..Occurrence NumOnglet est un entier = 0 POUR i = 1 A NbVolet j = 1 sChamp = Majuscule( EnumèreChamp ({NomOnglet}[i],j)) TANTQUE sChamp <> "" // trace(sChamp, i) SI sChamp = Majuscule(NomChamp) ALORS NumOnglet = i j++ sChamp = Majuscule( EnumèreChamp ({NomOnglet}[i],j)) FIN FIN
// Exemples d'utilisation
Info("SAISIE1", DonneVolet("ONGLET1", "SAISIE1")) Info("SAISIE5", DonneVolet("ONGLET1", "SAISIE5")) Info("SAISIE3", DonneVolet("ONGLET1", "SAISIE3")) Info("NOMCLI", DonneVolet("ONGLET1", "NOMCLI"))
|