Note de ce sujet :
  • Moyenne : 0 (0 vote(s))
  • 1
  • 2
  • 3
  • 4
  • 5
Mise à Jour de Stock ....
#21
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


Répondre
#22
BJR Samifred .
Quand j'incrémente TableOccurence Table_K1 de 1 cela Bogue ....
Avec ta permission , je t'envoie un mini-projet ( une fenêtre , une requête et un .FIC) ) en WD17
pour voir de près ... Et Grand Merci à Toi encore . Lhassane

<!-- m --><a class="postlink" href="https://www.dropbox.com/s/mw4f2p3wmo5v73v/AuditStock.rar">https://www.dropbox.com/s/mw4f2p3wmo5v7 ... tStock.rar</a><!-- m -->
Répondre
#23
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


Répondre
#24
Samifred a écrit :Désolé mais je m'arrête à la 16, j'attends la 20...
Tu peux le faire en 9, 12, 16

Haha !! OKI Samifred .
Le Voici en WD9 et Merci encore !!

<!-- m --><a class="postlink" href="https://www.dropbox.com/s/mw4f2p3wmo5v73v/AuditStock.rar">https://www.dropbox.com/s/mw4f2p3wmo5v7 ... tStock.rar</a><!-- m -->
Répondre
#25
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


Répondre
#26
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
Répondre


Sujets apparemment similaires…
Sujet Auteur Réponses Affichages Dernier message
  avoir un message signalant une mise à jour dans la base de d fahdDEV 2 1,423 23-09-2009, 01:46 PM
Dernier message: fahdDEV
  mise a jour d'un fichier dbf tintin_tu 2 1,612 29-08-2009, 01:22 PM
Dernier message: tintin_tu
  Mise à jour des combos Adorewindev 2 1,726 19-06-2008, 05:40 PM
Dernier message: bhdih
  Mise à jour tableau depuis une aute fenêtre Adorewindev 2 2,137 08-03-2008, 08:33 PM
Dernier message: Adorewindev
  mise à jour Guest 0 1,205 27-07-2007, 09:16 AM
Dernier message: Guest
  verification de livraison et mise a jour du stock Guest 0 1,271 18-05-2007, 04:27 PM
Dernier message: Guest
  gestion de stock (débutant) Guest 1 1,821 24-04-2007, 12:09 PM
Dernier message: Samifred
  Problème aprés mise à jour de windev rebbah 2 1,204 27-01-2007, 09:22 PM
Dernier message: Guest
  Mise à jour d'applications Arnaud P 0 940 15-01-2007, 01:47 PM
Dernier message: Arnaud P
  Mise a jour fichier Guest 3 1,403 20-10-2006, 06:47 PM
Dernier message: Guest

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)