Messages : 5,594
Sujets : 87
Inscription : Nov 2005
Réputation :
0
Bonjour,
As-tu augmenté de 1 l'indice de la table...
POUR i = 1 A TableOccurrence(Table_K1) + 1
Sinon la dernière ligne n'est pas traitée, et si cette dernière ligne à une date unique elle ne sera pas prise en compte.
Se souvenir et savoir sont deux choses différentes. Se souvenir, c'est garder en mémoire. En revanche, savoir signifie assimiler sans dépendre d'un modèle.
WD 4.1 => 23
Messages : 5,594
Sujets : 87
Inscription : Nov 2005
Réputation :
0
Désolé mais je m'arrête à la 16, j'attends la 20...
Tu peux le faire en 9, 12, 16
Se souvenir et savoir sont deux choses différentes. Se souvenir, c'est garder en mémoire. En revanche, savoir signifie assimiler sans dépendre d'un modèle.
WD 4.1 => 23
Messages : 5,594
Sujets : 87
Inscription : Nov 2005
Réputation :
0
Bonsoir,
Bien sur tu fais le remplissage de la table K1 par une requête donc seules les lignes visibles (remplient) sont prises en compte. Moi dans les test j'utilisais une table K1 mémoire.
Alors voila le code modifié utilisable avec une table K1 à accès direct au fichier ou à une requête. Donc selon la fenêtre et tables de l'exemple que tu ma envoyé.
Code :
TableSupprimeTout(Table_K2)
dDateExpiration est une Date
i,nQt sont des entiers
//Affectation de la première ligne
dDateExpiration = Table_K1[1][2]
nQt += Table_K1[1][3]
//Toute la table K1
POUR i = 1 A TableOccurrence(Table_K1)
//On compare la date lue avec la date précédente dDateExpiration
SI i > 1 ET Table_K1[i][2] = dDateExpiration ALORS
//On calcul la quantité
nQt += Table_K1[i][3]
SINON
//Affectation de la ligne suivante
dDateExpiration = Table_K1[i][2]
//On affiche la ligne dans la table
TableAjouteLigne(Table_K2,Table_K1.PRCODE[i],Table_K1.PRDPER[i],nQt,Table_K1.PRDPRIX[i],Table_K1.PRDESIG[i],Table_K1.DTEOPE[i],Table_K1.MACLE[i],Table_K1.MACLE1[i])
//On affecte la quantité lue
nQt = Table_K1[i][3]
FIN
FIN
Se souvenir et savoir sont deux choses différentes. Se souvenir, c'est garder en mémoire. En revanche, savoir signifie assimiler sans dépendre d'un modèle.
WD 4.1 => 23
Messages : 93
Sujets : 27
Inscription : Mar 2007
Réputation :
0
Bonsoir Samifred .
Grand Merci à Vous .
Il persiste encore des erreurs . Si les DatedePéremption sont toutes scannées , par contre les Quantités cumulées sont erronées J'ai tout à fait compris Votre méthodologie de Tri et Cumul .
Je ne vais pas davantage abuser de Votre Extrême Obligeance , je vais faire l'effort de corriger et je retournerais à Vous
pour Vous informer .
Bonne Reprise et encore MERCI . Lhassane
