OPTIMISATION de code

Réponse acceptée !
Bonjour,

Je ne comprends pas ce que tu veux dire: "ligne par ligne" ou "faire défiler tous les enregistrements", c'est la même chose.

Ce que tu peux faire, si tu dois faire un replace sur une table pour plusieurs champs avec la même condition FOR, c'est écrire REPLACE champ1 WITH savaleur1, champ2 WITH savaleur2, ... FOR ...

si ton code est réellement ce que tu nous montres, alors tu ne gagneras rien à utiliser une syntaxe différente (UPDATE matable SET...).

Mais tu peux améliorer ton code, en regardant la syntaxe de EMPTY pour remplacer ton alltrim='', et aussi en utilisant des variables préfixées, et aussi en regardant le == à la place du = (surtout si tu ne nous précises pas ton SET NEAR et ton SET EXACT).

Alors, quel est ton code réel, et quel est ton problème?
(et ta version de VFP?)

Réponse acceptée !
Bonjour

Tu peux faire tous les REPLACE sans FOR en une seule instruction

REPLACE ALL NUMCARTE WITH NO_CM, CODEBARRE WITH ALLTRIM (NO_CODE49) && parcourt toute la table une seule fois

Pour les REPLACE FOR, si l'expression de filtre correspond à l'expression d'un index, REPLACE trouve directement les enrgistrements à modifier sans balayer la table (technologie d'optimisation Rushmore)
Note : avec REPLACE FOR, la clause ALL est inutile

En clair, pour optimiser
REPLACE ALL NUMCARTE WITH '2090000000009' FOR ALLTRIM (NUMCARTE) = ''
il faut écrire
REPLACE NUMCARTE WITH '2090000000009' FOR Empty(NUMCARTE)
et que la table correspondante ait un index regular (ou mieux binary avec VFP >=8) sur Empty(NUMCARTE)
INDEX ON Empty(NUMCARTE) TAG NUMCARTE_E BINARY

Même principe pour les autres conditions FOR
REPLACE MAG_NUM WITH ALLTRIM (SUBSTR (vNUM_MAG,2,2)) FOR LEFT (vNUM_MAG,1) = '0'
INDEX ON LEFT (vNUM_MAG,1) TAG vNUM_MAG1

REPLACE MAG_NUM WITH ALLTRIM (SUBSTR (vNUM_MAG,3,1)) FOR LEFT (vNUM_MAG,2) = '00'
INDEX ON LEFT (vNUM_MAG,2) TAG vNUM_MAG2

REPLACE MAG_NUM WITH ALLTRIM (vNUM_MAG) FOR LEFT (vNUM_MAG,1) <> '0'
INDEX ON LEFT (vNUM_MAG,1) TAG vNUM_MAG1 && cf. ci-dessus

REPLACE ALL PAYS WITH '' FOR PAYS = 'FRANCE'
INDEX ON PAYS TAG PAYS && cf. ci-dessus

Communauté Francophone des Professionnels FoxPro
news://news.AtoutFox.org/AtoutFox.association
www.AtoutFox.org