Exemple d'utilisation de la commande HLitRecherchePremier

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.

Revenir à la page des exemples évolués

Le fichier "Client" est parcouru selon la clé de parcours "NOM", pour la valeur contenue dans la variable sNom.

HLitRecherchePremier ( CLIENT , NOM , sNom )
SI HTrouve ( CLIENT ) ALORS
ClientExistant ()
SINON
ClientInconnu ()
FIN

Cet exemple permet de rechercher et de supprimer tous les clients ayant un certain nom et un certain prénom. La recherche se fait sur une clé composée. L'enregistrement est lu.

sValRech est une chaîne = HConstruitValClé(CLIENT,NOM_PRENOM,sNom,sPrenom)
HLitRecherchePremier (CLIENT,NOM_PRENOM,sValRech)
TANTQUE HTrouve(CLIENT)
HSupprime(CLIENT)
HSuivant(CLIENT,NOM_PRENOM)
FIN

Cet exemple permet de rechercher tous les clients ayant un chiffre d'affaire supérieur à une valeur donnée.

HLitRecherchePremier ( CLIENT , CA ,X)
TANTQUE PAS HEnDehors ( CLIENT )
AjouterClientListe ()
HLitSuivant ( CLIENT , CA )
FIN