Discussion :

[tarikov2006]

J ai une table avec sélection multiple et des champs de saisie SAI_texte1 ,SAI_texte2 et SAI_texte3

Je voudrais récupérer les données des lignes sélectionnées dans les champs de saisie ; pour cela j’utilise ce code

Code :

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

1
2
3
4
5
6
POUR TOUTE LIGNE SELECTIONNEE DE TABLE_LISTE
 
	SAI_texte1= TABLE_historique.COL_NOM[TableSelect(TABLE_LISTE,1)]
	SAI_texte2= TABLE_historique.COL_NOM[TableSelect (TABLE_LISTE,2)]
       SAI_texte3= TABLE_historique.COL_NOM[TableSelect (TABLE_LISTE,3)]
fin

mon problème c’est quand je sélectionne une seule ligne le code ne fonctionne pas , je pense qu’ il faut utiliser une condition
merci d avance

[Voroltinquo]

Bonjour,
Ton problème est triple.
2 problèmes (dont 1 majeur) au niveau de la récupération des données

A priori, tu veux récupérer les premières (max 3) sélections de ton champ table.
Pourquoi parcourir toutes les lignes, d'autant plus qu'à la première ligne la récupération est "théoriquement" terminée.

Code :

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

1
2
3
4
 
SAI_texte1= TABLE_historique.COL_NOM[TableSelect(TABLE_LISTE,1)]
SAI_texte2= TABLE_historique.COL_NOM[TableSelect (TABLE_LISTE,2)]
SAI_texte3= TABLE_historique.COL_NOM[TableSelect (TABLE_LISTE,3)]

On en arrive au problème majeur :
Si aucun enregistrement n'est sélectionné, ou si le rang (r) passé en paramètre est supérieur au nombre de lignes sélectionnées TableSelect renvoie -1
Donc

Code :

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

TABLE_historique.COL_NOM[TableSelect(TABLE_LISTE,r)]

revient à

Code :

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

TABLE_historique.COL_NOM[-1]

, et ça, Windev n'aime pas.

Une solution consiste à faire des traitement différents en fonction du nombre de lignes sélectionné

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
SELON TableSelectOccurrence(TABLE_LISTE)
     CAS 1:
          SAI_texte1= TABLE_historique.COL_NOM[TableSelect(TABLE_LISTE,1)]
     CAS 2:
          SAI_texte1= TABLE_historique.COL_NOM[TableSelect(TABLE_LISTE,1)]
          SAI_texte2= TABLE_historique.COL_NOM[TableSelect (TABLE_LISTE,2)]
     CAS >2:
          SAI_texte1= TABLE_historique.COL_NOM[TableSelect(TABLE_LISTE,1)]
          SAI_texte2= TABLE_historique.COL_NOM[TableSelect (TABLE_LISTE,2)]
          SAI_texte3= TABLE_historique.COL_NOM[TableSelect (TABLE_LISTE,3)]
FIN

Une autre solution plus "compacte"

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
nSélection est entier
saNomChamp est chaine
 
POUR nSélection=1 A 3
     saNomChamp=chaineConstruit("SAI_Texte%1",nSélection)
     {saNomChamp,IndChamp}=TABLE_historique.COL_NOM[TableSelect(TABLE_LISTE,nSélection)]
	SI nSélection+1>TableSelectOccurrence(TABLE_Test) ALORS  //Traitement de 1 et 2 sélections
		nSélection=3
	FIN
FIN

[tarikov2006]

Merci beauoup Monsieur Voroltinquo

[mous97]

Un "Pour toute ligne sélectionnée" serai plus propre et simple