ExtraitChaine - Parcours non initialisé ou terminé?
Bonjour à tous,
Petite bizarrerie de WD17:
A l'exécution du code suivant:
Code:
1
2
3
4
5
6
7
8
9
10
| ch=ExtraitChaîne(Main.Table_Sel_BLVte.libelle[i],rangPremier,RC)
TANTQUE ch<>EOT
// pour p=1 a val(extraitchaine(ch,1,tab))
POUR p=1 _A_ Val(Gauche(ch,Position(ch,TAB)-1))
j++
// tableajouteligne(Table_Poids,"Colis N° "+NumériqueVersChaine(j,"02d"),val(extraitchaine(ch,1,tab,DepuisFin)))
TableAjouteLigne(Table_Poids,"Colis N° "+NumériqueVersChaîne(j,"02d"),Val(Droite(ch,3)))
FIN
ch=ExtraitChaîne(Main.Table_Sel_BLVte.libelle[i],rangSuivant,RC) // <--- Erreur !
FIN |
A l'avant dernière ligne j'obtiens le message suivant:
Code:
1
2
3
| Erreur à la ligne 24 du traitement Déclarations globales de Exped2.
Vous avez appelé la fonction ExtraitChaîne.
Utilisation de l'option de parcours rangSuivant alors que le parcours n'a pas été initialisé par rangPremier ou qu'il est terminé. |
J'ai mis en commentaire les autres utilisations de ExtraitChaine qui se trouvaient entre les 2 ExtraitChaine du parcours, mais l'erreur subsiste.
Ce code marchait très bien depuis 2006, mais plus depuis le passage du projet en WD17 (78n)
Dans le debug, l'extraction de la 1ère chaine avant le RC se fait bien.
Le 2ème ExtraitChaine avec rangSuivant plante, qu'il y ait 1, 2 ou 3 éléments séparés par RC...
Y aurait-il quelque-chose que je ne vois pas?
EDIT: Est-ce que, par hasard, ce parcours ne fonctionnerait plus avec RC comme séparateur, c-à-d qu'il voit le 1er RC comme la fin de la chaine initiale au lieu d'un séparateur?
Merci de votre aide
