Discussion :

[Gregus]

Bonjour à toutes et à tous,

J'ai deux champs table dont je compare les ID. Lorsqu'il y a match sur les ID, je voudrais modifier la quatrième colonne de la table comparée avec la troisième colonne de la table de comparaison.

J'ai fait une boucle pour parcourir toutes les lignes de comparaison et rechercher les ID communs dans comparée. Jusque là pas de problème, je relève les indices des lignes pour chaque table avec ID commun.
J'ai fait des "Trace" pour vérifier les valeurs.

Code WINDEV :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
 
//Rempli table comparée
ConstruitTableFichier(TABLE_SansNom8, STOCK_INI_2021, taRemplirTable)
// position dans table comparaison
nPositionLigne est un entier
// position trouvée dans table comparée
nPosTrouvée est un entier
 
//Dans le champ table comparée je ne comprends pas un problème libellé des colonnes
//J'ai contourné le problème par ces modifications
{"TABLE_SansNom8._COL2"}..Libellé = "TABLE_SansNom8._COL2"
{"TABLE_SansNom8._COL4"}..Libellé = "TABLE_SansNom8._COL4"
sNom est une chaîne
sNom = TableEnumèreColonne(TABLE_SansNom8, 2)
sNom = {"TABLE_SansNom8."+sNom}..Libellé
sNom4 est une chaîne
sNom4 = TableEnumèreColonne(TABLE_SansNom8, 4)
sNom4 = {"TABLE_SansNom8."+sNom4}..Libellé
{"TABLE_SansNom8._COL4"}..TypeSaisie = typSaisieMonétaire
{"TABLE_SansNom8._COL4"}..MasqueAffichage = "999 999 999 999 999,99 €"
 
 
POUR TOUTE LIGNE nPositionLigne DE TABLE_Import_Plan5
	nPosTrouvée = TableCherche(sNom, TABLE_Import_Plan5.Colonne2[nPositionLigne], rechercheIdentique)
 
	SI nPosTrouvée <> 0 ALORS
 
TableModifieColonne("TABLE_SansNom8", nPosTrouvée, TABLE_Import_Plan5.Colonne3[nPositionLigne])
	FIN
FIN

Ainsi je récupère très bien la valeur que je souhaite de la table comparaison, mais quand il s'agit de modifier la valeur

Code windev :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TableModifieColonne("TABLE_SansNom8", nPosTrouvée, TABLE_Import_Plan5.Colonne3[nPositionLigne])

Cette valeur se modifie dans la première colonne et non la quatrième. Normale me direz-vous puisque "TABLE_Import_Plan5.Colonne3[nPositionLigne]" est le premier élément.

Alors j'ai essayé de le mettre en quatrième élément

Code windev :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TableModifieColonne("TABLE_SansNom8", nPosTrouvée,"", "", "", TABLE_Import_Plan5.Colonne3[nPositionLigne])

Et là impeccable la valeur se mets bien dans la quatrième colonne, mais les trois autres ont été modifiée par un beau 0.

J'ai essayé

Code windev :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
NbrColonne = TableModifieColonne(TABLE_SansNom8)
sNom4[NbrColonne] = TABLE_Import_Plan5.Colonne3[nPositionLigne]

Comme pour un tableajouteligne, mais ça ne fonctionne pas plus.

Si quelqu'un pouvait m'orienter vers la bonne façon de faire.

Merci

Gregus

[Voroltinquo]

Bonjour,
Ces champs tables sont-ils "réellement" utilisés ou ne servent-ils que de tampons pour ta comparaison ?

[Gregus]

Bonjour Voroltinquo,

Je pourrais me passer de deux, même si les données proviennent d'un fichier de données et que je suis passé par un ConstruitTableFichier, mais il faut que je conserve l'ID qui sert pour la comparaison.

Je ne sais si tu connais la ou une solution, mais ta question a allumé certaine ampoule.

Une idée qui me vient serait de déplacer la colonne dans le champ table comparée pour la mettre en premier?

Merci

[Voroltinquo]

Pourquoi ne pas travailler avec des tableaux de structures ou de classes ?

[tbc92]

Je ne connaissais pas cette fonction TableModifieColonne(). Elle doit pouvoir être utile dans certaines circonstances, mais de façons très exceptionnelle.
Oublie cette fonction.
Elle a été introduite en version 12 .... on devait forcément pouvoir modifier le contenu d'une table avant la version 12.

Je n'arrive pas à identifier clairement quelle table doit être modifiée dans ton histoire.

Pour écrire la valeur "A" dans la 5ème ligne, 4ème colonne d'une table TAB0, la syntaxe est : TAB0[5,4]= "A"
Je pense qu'avec cette information, tu devrais t'en sortir.

[Gregus]

Il y a des choses qui sont si simples à faire.

Pardonnez mon amateurisme et mon niveau débutant.

Merci à tbc92 qui m'a apporté la solution à mettre en œuvre.

Pour écrire la valeur "A" dans la 5ème ligne, 4ème colonne d'une table TAB0, la syntaxe est : TAB0[5,4]= "A"
Je pense qu'avec cette information, tu devrais t'en sortir.

J'ai utilisé deux variables pour les lignes de chaque champ table et utilisé l'indice des colonnes.
J'obtiens bien le résultat que je voulais.

En revanche

Pourquoi ne pas travailler avec des tableaux de structures ou de classes ?

Je ne sais pas ce que c'est, ni comment cela fonctionne. J'ai déjà quelque truc sur le feux niveau apprentissage, notamment avec une discussion sur les "Jauges", mais je vais me documenter pour voir de quoi il s'agit.

Merci à tous les deux pour vos réponses

Gregus

[yoshi570]

Alors pour répondre à la question, l'erreur vient de l'utilisation de l'indice sur le mauvais élément.

il faut utilisé l'indice sur la table pour récuprer la "ligne" complète. Ensuite on peux utilisé le suffix pour récupérer la "cellule" de la colonne voulue:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TABLE_SansNom8[nPosTrouvée]._COL2 = TABLE_Import_Plan5[nPositionLigne].Colonne3

Sinon comme le fait remarquer Voroltinquo: ne pas utiliser des champs (table ou autre) si il ne servent que à faire des traitements cachés.
Mauvais habitude qui, je vois, semble assez commune

[tbc92]

Pour compléter le message de Yoshi,
Le champ table, c'est un champ dédié à l'affichage. Le système d'exploitation va consommer quelques centièmes de seconde pour trouver la bonne information au bon endroit, et il va bouffer des dixièmes de secondes pour afficher tout ça à l'écran. Et tout ça,répété pour chaque cas à modifier.
Le temps de traitement va être multiplié par 10, pour gérer l'affichage.

Ceci dit, Gregus est inscrit depuis 8 ans, j'imagine qu'il fait de la programmation à peu près 3 heures tous les trimestres. Donc, les questions de performance, çe ne doit pas vraiment l'intéresser !