pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

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


L'exemple suivant permet de réaliser des opérations dans une transaction lors d'un accès à une base de données effectué avec la fonction SQLConnecte . La transaction est ensuite annulée : les opérations ne sont pas enregistrées dans le fichier.



NumConnexion est un entier = SQLConnecte("MaBase", "User", "MotDePasse",...
                             "","OLEDB","MonProvider")
SI NumConnexion = 0 ALORS
   SQLInfoGene()
   Erreur("Erreur d'ouverture de la connexion : " + SQL.MesErreur)
SINON
   // Mise en transaction de la connexion
    SQLTransaction ( SQLDébut )
   // Modification de la valeur de toutes les rubriques MonFichier. MaRubrique
   SI SQLExec("UPDATE MonFichier SET MaRubrique = 'nouvelle valeur'",...
                "RequeteModif") = 0 ALORS
      SQLInfoGene("RequeteModif")
      Erreur("Erreur d'execution de la requête : " + SQL.MesErreur)
      SQLTransaction ( sqlFin )
  FIN
  // Annulation de la transaction
  SQLTransaction ( sqlAnnule )
  // le contenu du fichier MonFichier n'a pas changé.
FIN


L'exemple suivant permet de réaliser des opérations dans une transaction lors d'un accès à un fichier utilisant une connexion décrite dans l'analyse.

La transaction est ensuite annulée : les opérations ne sont pas enregistrées dans le fichier.

Dans cet exemple, MonFichier est un fichier OLEDB décrit sous l'éditeur d'analyses. Ce fichier utilise la connexion MaConnexion décrite elle aussi sous l'éditeur d'analyses.



HLitPremier(MonFichier)
// Mise en transaction de la connexion
SQLTransaction ( SQLDébut , MaConnexion)
// Modification de la valeur de la rubrique
MonFichier.MaRubrique = "nouvelle valeur"
HModifie(MonFichier)
// Annulation de la transaction
SQLTransaction ( SQLAnnule , MaConnexion)