<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"><channel><category>pcsoft.fr.windev</category><copyright>Copyright 2026, PC SOFT</copyright><lastBuildDate>11 Dec 2018 21:32:30 Z</lastBuildDate><pubDate>11 Dec 2018 09:15:26 Z</pubDate><description>Voici un bout de code que je trouve très laid, quel amélioration, je pourrais y apporter (pour éviter le pavé en double) !&#13;
&#13;
Je suis preneur de vos idées ?&#13;
[code:wl]&#13;
SI HExécuteRequête(REQ_Stock_En_Cours, hRequêteDéfaut) ALORS&#13;
&#13;
	// Archivage du contenu du résultat de la requête dans une table&#13;
	SI HLitPremier(REQ_Stock_En_Cours) &lt;&gt; Faux ALORS&#13;
&#13;
		// Boucle sur tout les enregistrement renvoyé.&#13;
		TANTQUE PAS HEnDehors(REQ_Stock_En_Cours)&#13;
				&#13;
			// Recherche a partir de la clef composé pour créer l'enregistrement ou le mettre a jour.&#13;
			SI HLitRecherchePremier(StatistiquesWMS, Stats_Stockeur_Date, [REQ_Stock_En_Cours.STOCKEURS, gdLaDateEnCours]) ALORS&#13;
				StatistiquesWMS.Stats_Date     = gdLaDateEnCours&#13;
				StatistiquesWMS.Stats_Annee    = gnLAnneeEnCours&#13;
				StatistiquesWMS.Stats_JourAnn  = gnLeJourDeAnnee&#13;
				StatistiquesWMS.Stats_Semaine  = gnLaSemaineEnCours&#13;
				StatistiquesWMS.Stats_Mois     = gnLeMoisEnCours&#13;
				StatistiquesWMS.Stats_Journee  = gnLeJourEnCours&#13;
				StatistiquesWMS.Stats_JourSem  = gnLeHebdoEnCours&#13;
				StatistiquesWMS.Stats_Stockeur = REQ_Stock_En_Cours.STOCKEURS&#13;
				StatistiquesWMS.Stats_Palettes = REQ_Stock_En_Cours.PALETTES&#13;
				StatistiquesWMS.Stats_Colis    = REQ_Stock_En_Cours.COLIS&#13;
				StatistiquesWMS.Stats_UVCs     = REQ_Stock_En_Cours.UVCS&#13;
				HModifie(StatistiquesWMS)&#13;
             		SINON&#13;
				StatistiquesWMS.Stats_Date     = gdLaDateEnCours&#13;
				StatistiquesWMS.Stats_Annee    = gnLAnneeEnCours&#13;
				StatistiquesWMS.Stats_JourAnn  = gnLeJourDeAnnee&#13;
				StatistiquesWMS.Stats_Semaine  = gnLaSemaineEnCours&#13;
				StatistiquesWMS.Stats_Mois     = gnLeMoisEnCours&#13;
				StatistiquesWMS.Stats_Journee  = gnLeJourEnCours&#13;
				StatistiquesWMS.Stats_JourSem  = gnLeHebdoEnCours&#13;
				StatistiquesWMS.Stats_Stockeur = REQ_Stock_En_Cours.STOCKEURS&#13;
				StatistiquesWMS.Stats_Palettes = REQ_Stock_En_Cours.PALETTES&#13;
				StatistiquesWMS.Stats_Colis    = REQ_Stock_En_Cours.COLIS&#13;
				StatistiquesWMS.Stats_UVCs     = REQ_Stock_En_Cours.UVCS&#13;
				HAjoute(StatistiquesWMS)&#13;
			FIN&#13;
				&#13;
			HLitSuivant(REQ_Stock_En_Cours)&#13;
		FIN&#13;
	FIN&#13;
SINON&#13;
	ConsoleErreur(ChaîneConstruit("Exécution de la requête STOCK impossible: %1.%2", HErreurInfo(), RC))&#13;
FIN&#13;
[/code]&#13;
&#13;
--&#13;
———————————————————————————————————&#13;
Ce qui se conçoit bien se code clairement et se débogue facilement...&#13;
&#13;
 - Pastiche d’une citation de Nicolas Boileau -</description><ttl>30</ttl><generator>WEBDEV</generator><language>fr_FR</language><link>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code/read.awp</link><title>Elegance de code</title><managingEditor>moderateur@pcsoft.fr (El moderador)</managingEditor><webMaster>webmaster@pcsoft.fr (El webmaster)</webMaster><item><author>Der§en</author><category>pcsoft.fr.windev</category><comments>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222589/read.awp</comments><pubDate>11 Dec 2018 21:32:30 Z</pubDate><description>Je suis arrivé au même résultat que toi Tim aprés m’être heurté à l’erreur me disant que l’enregistrement était introuvable&#13;
&#13;
-…</description><guid isPermaLink="true">https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222589/read.awp</guid><link>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222589/read.awp</link><source url="https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code/read.awp">Elegance de code</source><title>Re: Elegance de code</title></item><item><author>Tim</author><category>pcsoft.fr.windev</category><comments>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222575/read.awp</comments><pubDate>11 Dec 2018 13:18:03 Z</pubDate><description>[code:wl]&#13;
// Eviter les "SI... SINON... FIN imbriqué&#13;
SI PAS HExécuteRequête(REQ_Stock_En_Cours, hRequêteDéfaut) ALORS&#13;
	Consol…</description><guid isPermaLink="true">https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222575/read.awp</guid><link>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222575/read.awp</link><source url="https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code/read.awp">Elegance de code</source><title>Re: Elegance de code</title></item><item><author>Der§en</author><category>pcsoft.fr.windev</category><comments>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222566/read.awp</comments><pubDate>11 Dec 2018 09:51:17 Z</pubDate><description>Merci pour le "HEnregistre", que je ne connaissait pas du tout :merci:&#13;
&#13;
--&#13;
———————————————————————————————————&#13;
Ce qui se con…</description><guid isPermaLink="true">https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222566/read.awp</guid><link>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222566/read.awp</link><source url="https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code/read.awp">Elegance de code</source><title>Re: Elegance de code</title></item><item><author>Johjo</author><category>pcsoft.fr.windev</category><comments>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222563/read.awp</comments><pubDate>11 Dec 2018 09:23:01 Z</pubDate><description>Bonjour, je vous propose deux solutions : &#13;
&#13;
L'utilisation d'une procédure interne pour factoriser le code dupliqué&#13;
&#13;
ou alors…</description><guid isPermaLink="true">https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222563/read.awp</guid><link>https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code-222563/read.awp</link><source url="https://forum.pcsoft.fr/es-ES/pcsoft.fr.windev/222560-elegance-code/read.awp">Elegance de code</source><title>Re: Elegance de code</title></item></channel></rss>
