PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2025 → Tableindicerupture()
Tableindicerupture()
Iniciado por Jean-Michel C, 05,dic. 2018 10:23 - 2 respuestas
Miembro registrado
474 mensajes
Publicado el 05,diciembre 2018 - 10:23
Bonjour à tous,

Il y a une remarque pour Tableindicerupture() à laquelle je ne trouve pas de solution :

Il est conseillé d'appeler la fonction TableIndiceRupture après l'affichage complet du contenu du champ Table. Dans le cas contraire, les indices renvoyés par la fonction TableIndiceRupture peuvent ne pas correspondre aux indices réellement affichés dans le champ.

Comment faire pour être sur de l'affichage complet du contenu du champ Table ?
Merci pour votre aide

--
Jean-Michel
Miembro registrado
134 mensajes
Publicado el 05,diciembre 2018 - 10:48
Bonjour,

Dans une table remplie par programmation, à la fin de la boucle d'alimentation de la table.
Par exemple :
Procedure lproc_maj_table()
...
i = TableAjouteLigne( TABLE_maTable )
...
SI TableOccurrence( TABLE_maTable ) > 0 ALORS
lproc_calculer_totaux()
FIN // SI TableOccurrence( TABLE_maTable ) > 0 ALORS




Procedure lproc_calculer_totaux()

i, iMax, iRupture est un entier
indices est un tableau de 0 entier

iMax = TableOccurrence( TABLE_maTable )
POUR i = 1 À iMax

iRupture = TableIndiceRupture( RUPT_BasRupture, i )
SI TableauCherche( indices, tcLinéairePremier, iRupture ) = -1 ALORS

TABLE_maTable[ iRupture ].RUB_formule = 0
TableauAjoute( indices, iRupture )

FIN // SI TableauCherche( indices, tcLinéairePremier, iRupture ) = -1 ALORS
...
FIN // POUR i = 1 A iMax

POUR TOUT i de indices

TABLE_maTable[ i ].RUB_formule = ...

FIN // POUR TOUT i DE indices


Dans une table fichier dans le code de Fin d'initialisation de la table.

Doit y avoir possibilité de jouer aussi avec la 3ème procédure passée en paramètre de TableFormuleAjoute
Miembro registrado
474 mensajes
Publicado el 05,diciembre 2018 - 13:45
Merci Julien pour ton aide. Je cherchais qlq chose de trop compliqué. C'est parfait ! :merci:

--
Jean-Michel