WINDEV 2025 : Les concepts

156 Partie 4 : Concepts avancés Gérer l’affichage des informations de débogage L’affichage à l’écran des informations de débogage est utile uniquement en mode test. Avant de diffuser une application, il est donc néces- saire de supprimer tout affichage superflu. Pour éviter tout oubli, il est conseillé de gérer l’affi- chage des informations de débogage à l’aide d’une procédure globale. Par exemple : PROCEDURE MaTrace(ChaîneATracer) SI EnModeTest() = Vrai ALORS Trace(ChaîneATracer) FIN Dans ce code, selon le résultat de la fonction EnMo- deTest , la fenêtre de trace apparaît uniquement lors d’un test de l’application. Une telle procédure permet de laisser l’appel aux fenêtres de trace dans le code de l’application, sans risque d’apparition en clientèle. L’appel à cette procédure de trace est identique à l’utilisation de la fonction Trace  : MaTrace("Client : "+ ... Client.NumClient) Créer un fichier de trace Lors de traitements longs (traitements Batchs, ...), pour contrôler le bon déroulement du programme, il est nécessaire de conserver une trace physique des traitements effectués (un fichier texte par exemple). La procédure suivante permet de gérer par exemple l’affichage de la trace : • soit à l’écran (paramètre /DEBUG en ligne de commande). • soit dans un fichier texte (mode par défaut). PROCEDURE MaTrace(ChaîneATracer) CheminFichier est une chaîne CheminFichier = fRepDonnéesUtilisa teur() + ProjetInfo(piNomProjet) + ".txt" Fichier est un entier ModeDebug est un booléen = Faux SI Position(LigneCommande(), "/ DEBUG") > 0 ALORS ModeDebug = Vrai FIN SI ModeDebug = Vrai ALORS Trace(ChaîneATracer) SINON Fichier = fOuvre(CheminFichier, foCréationSiInexistant + foEcriture + foAjout) SI Fichier <> -1 ALORS DateHeureTrace est un DateHeure DateTrace est une Date HeureTrace est une Heure DateHeureTrace = DateHeureSys() DateTrace = Madate.PartieDate HeureTrace = Madate.PartieHeure fEcritLigne(Fichier, DateVersChaîne(DateTrace) + ... " - " + HeureVersChaîne(HeureTrace)) fEcritLigne(Fichier, ChaîneA Tracer) fEcritLigne(Fichier, " ") fFerme(Fichier) FIN FIN Remarques  : • Le fichier de trace est créé par défaut dans le répertoire des données de l’utilisateur. Ce fichier a pour nom le nom du projet. Ce fichier contient les informations à tracer durant l’exécution du programme. Les informations sont complétées par la date et l’heure de chaque "Trace". Il est ainsi possible de déterminer un éventuel dysfonctionnement durant le traitement. • Exemple de contenu du fichier de trace : 01/12/2015 - 10:53:25:20 Nom de client : Martin