1. Ce site utilise des cookies. En continuant à utiliser ce site, vous acceptez l'utilisation des cookies. En savoir plus.
  2. Bonjour tout le monde ! Veillez consulter la Politique de forum pour comprendre nos règles, Merci a vous !
    Rejeter la notice

WD comment gerer le stock

Discussion dans 'Windev' créé par bedro, Fev 12, 2019.

  1. bedro

    bedro New Member

    Inscrit:
    Fev 26, 2018
    Messages:
    5
    J'aime reçus:
    0
    bonsoir tout le monde;
    voila je suis sur une application de gestion de produits,cependant je n'arrive pas à gérer le stock. C'est à dire
    - j'ai un fichier stock, entréestock et sortiestock
    - sur le bouton valider le code suivant:
    // stock
    Code (Windev):
    POUR TOUT LigneCde AVEC NumCommande=Commande.NumCommande
           

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock,IDLigneCde,LigneCde.IDLigneCde)
           SI

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock) = Faux ALORS
           

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock)
           SortieStock.Quantite=LigneCde.Quantite
           SortieStock.LibProd=LigneCde.LibProd
           SortieStock.Reference=LigneCde.Reference
           SortieStock.DateSortie=Commande.DateCommande
           SortieStock.Observations=Commande.NumClient
           SortieStock.IDLigneCde=LigneCde.IDLigneCde
           

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock)
     
       // Il faut modifier le stock du produit en conséquence

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock, Reference, SortieStock.Reference)
    SI

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock) = Faux ALORS
       

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
       Stock.DateModif = SortieStock.DateSortie
       Stock.Reference = SortieStock.Reference
       Stock.IDSORTIE=SortieStock.IDSORTIE
           

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
    FIN

    // XX produit en moins en stock
    Stock.QteEnStock -= SortieStock.Quantite
    Stock.QteStockVirtuel -= SortieStock.Quantite

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)

    FIN      
    FIN
    malheureusement il faut que je valide et ferme la fenetre puis j'ouvre une 2° fois et je valide pour
    qu'il retrouve l'idlignecommande mais il déstock à chaque fois que je valide

    alors SVP j'ai besoin d'aide et merci
     
    #1 bedro, Fev 12, 2019
    Dernière édition par un modérateur: Fev 12, 2019
    Tags:
  2. kabeda

    kabeda Active Member

    Inscrit:
    Avr 23, 2018
    Messages:
    173
    J'aime reçus:
    63
    Bonjour,
    Je vois que ton code ressemble beaucoup à celui de l'exemple Gestion commerciale de windev mais il manque aussi des bouts de code. Tu pourrais peaufiner en utilisant le débogueur pour voir les différences et où ça coince sur ton application.
     
  3. Fakirato

    Fakirato New Member
    WXG24 MEMBRE WX WXG 23 WXG 22 WXG 21

    Inscrit:
    Déc 30, 2017
    Messages:
    302
    J'aime reçus:
    816
    Bonjour

    essayer la recherche de forum il y'a des exemples

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!


    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

     
  4. bedro

    bedro New Member

    Inscrit:
    Fev 26, 2018
    Messages:
    5
    J'aime reçus:
    0

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Bonjour

    essayer la recherche de forum il y'a des exemples

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!


    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Cliquez pour agrandir...
    Merci Fakirato pour ton engouement , voila je viens de consulter la page mais sincerement ca reste un flou pour moi alors si je peux prendre un peu de votre temps afin que tu puisse m'expliquer d'avantage .merci
     
  • kabeda

    kabeda Active Member

    Inscrit:
    Avr 23, 2018
    Messages:
    173
    J'aime reçus:
    63
    Bonjour,
    Il est où le flou?
     
  • bedro

    bedro New Member

    Inscrit:
    Fev 26, 2018
    Messages:
    5
    J'aime reçus:
    0

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Bonjour,
    Il est où le flou?
    Cliquez pour agrandir...
    tout simplement je n'arrive pas à gerer le stock. Je veux dire la déduction automatique
     
  • Njassou

    Njassou Member

    Inscrit:
    Nov 4, 2018
    Messages:
    32
    J'aime reçus:
    1
    POUR TOUT LigneCde AVEC NumCommande=Commande.NumCommande

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock,IDLigneCde,LigneCde.IDLigneCde)
    SI

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock) = Faux ALORS

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock)
    SortieStock.Quantite=LigneCde.Quantite
    SortieStock.LibProd=LigneCde.LibProd
    SortieStock.Reference=LigneCde.Reference
    SortieStock.DateSortie=Commande.DateCommande
    SortieStock.Observations=Commande.NumClient
    SortieStock.IDLigneCde=LigneCde.IDLigneCde

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock)

    // Il faut modifier le stock du produit en conséquence

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock, Reference, SortieStock.Reference)
    SI

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock) = vrai ALORS

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
    Stock.DateModif = SortieStock.DateSortie
    Stock.Reference = SortieStock.Reference
    Stock.IDSORTIE=SortieStock.IDSORTIE
    Stock.QteEnStock -= SortieStock.Quantite
    Stock.QteStockVirtuel -= SortieStock.Quantite

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
    FIN
    FIN
    FIN

    je pense que ton code devrais plutôt ressembler a ceci
     
    Gemini1961 apprécie ceci.
  • bedro

    bedro New Member

    Inscrit:
    Fev 26, 2018
    Messages:
    5
    J'aime reçus:
    0

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    POUR TOUT LigneCde AVEC NumCommande=Commande.NumCommande

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock,IDLigneCde,LigneCde.IDLigneCde)
    SI

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock) = Faux ALORS

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock)
    SortieStock.Quantite=LigneCde.Quantite
    SortieStock.LibProd=LigneCde.LibProd
    SortieStock.Reference=LigneCde.Reference
    SortieStock.DateSortie=Commande.DateCommande
    SortieStock.Observations=Commande.NumClient
    SortieStock.IDLigneCde=LigneCde.IDLigneCde

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock)

    // Il faut modifier le stock du produit en conséquence

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock, Reference, SortieStock.Reference)
    SI

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock) = vrai ALORS

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
    Stock.DateModif = SortieStock.DateSortie
    Stock.Reference = SortieStock.Reference
    Stock.IDSORTIE=SortieStock.IDSORTIE
    Stock.QteEnStock -= SortieStock.Quantite
    Stock.QteStockVirtuel -= SortieStock.Quantite

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
    FIN
    FIN
    FIN

    je pense que ton code devrais plutôt ressembler a ceci
    Cliquez pour agrandir...
    merci je vais essayer
     
  • bedro

    bedro New Member

    Inscrit:
    Fev 26, 2018
    Messages:
    5
    J'aime reçus:
    0

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    merci je vais essayer
    Cliquez pour agrandir...
    Bonsoir, apparament le stock- marche seulement il me reste un problème à résoudre c'est celui de sortieStock car il faut que je valide 2 fois car à la premiere validation l'idligne commande n'est pas enregistré et à la 2° validation après réouverture de la fenetre alors il retrouve l'idlignecommande. comment contourner ce soucis
     
  • trick

    trick Active Member
    MEMBRE WX DUMP TEAM

    Inscrit:
    Jan 1, 2018
    Messages:
    169
    J'aime reçus:
    95
    Code remis en forme
    Code (Windev):

    POUR TOUT LigneCde AVEC NumCommande=Commande.NumCommande
           

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock,IDLigneCde,LigneCde.IDLigneCde)
           SI PAS

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock) ALORS // ligne non trouvée dans la base
               

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock)
               SortieStock.Quantite=LigneCde.Quantite
               SortieStock.LibProd=LigneCde.LibProd
               SortieStock.Reference=LigneCde.Reference
               SortieStock.DateSortie=Commande.DateCommande
               SortieStock.Observations=Commande.NumClient
               SortieStock.IDLigneCde=LigneCde.IDLigneCde
             Si

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (SortieStock) = Vrai alors // Si ajout ok dans la base
               // Il faut modifier le stock du produit en conséquence
               

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock, Reference, SortieStock.Reference)
               SI Pas

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock) ALORS // ligne non trouvée dans la base
                 

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
                 Stock.DateModif = SortieStock.DateSortie
                 Stock.Reference = SortieStock.Reference
                 Stock.IDSORTIE=SortieStock.IDSORTIE
                 

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
               Sinon
                 // XX produit en moins en stock
                 Stock.QteEnStock -= SortieStock.Quantite
                 Stock.QteStockVirtuel -= SortieStock.Quantite
                 

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    (Stock)
               FIN
             FIN    
           FIN
    FIN
     
    Pour ton problème de IdLigneCommande piste dans le debogeur sinon au pire tu déclare une variable pour Idlignecommande et tu lui affecte idlignecommande u momemnt ou tu selectionne ta commande , idem pour Commande.numcommande
     
    #10 trick, Fev 14, 2019
    Dernière édition par un modérateur: Fev 14, 2019
    Gemini1961 et Fakirato aiment ça.
  • Partager cette page

    Chargement...