Discussion :

[priest69]

Bonjour,
J'ai développé une petite appli sous access 2003 pour gérer les commande fournisseur... J'aimerai savoir s'il existe un moyen de gérer une "alarme" pour signaler à l'user que le stock min de tel produit est atteint !
De plus, j'aimerai qu'il bloque les sorties de stock pour le produit en rupture !

Après chaque sortie de stock, le système vérifie le stock actuel du produit, puis valide ou non la sortie de stock. Si possible, ajouter un contrôle d'alarme lorsque le stock d'alarme est atteint !

Merci pr votre aide

[random]

si tu une table événements elle comprend par produit
des types de mouvements avec statut

les commandes statut passées ou non
les livraisons
les reprises renvoi fournisseur
les ventes
les annulations de vente
les écarts de stock constatées aux inventaires (ou le stock réévalué) à l'inventaire

tu dois avoir une table produit avec entre autre le stock mini

sur l'évenement vente, si tu es mono utilisateur, (sinon à gérer par transaction)

tu calcules un solde virtuel=livraisons-reprises-ventes+annulationsventes+
algébriques écarts -vente en cours

alors si solde virtuel <stockmini
msgbox("le stock mini etc
ajout d'une ligne commande statut non passée
si solde virtuel <0 alors
rejet vente et proposition de vente égale au solde virtuel>0
sinon enregistrement vente

[random]

après réflexion l'évènement rejet vente devrait être conservée
ceci permettrait de gèrer mieux le stock mini

[priest69]

Merci je comprend la logique, mais je n'arrive pas à l'appliquer à ma base :
J'ai une table SORTIE_STOCK qui comprend le NumProduit - QteSortie - ServiceDemandeur.
Une table PRODUIT avec le NumProduit - ... - StockAlarme

Sur mon formulaire "Sortie de stock", je dois créer, "quelque chose" qui va interroger ma table PRODUIT pour connaître le stock actuel de ce produit.

Certes, la fonction

si solde virtuel <stockmini
msgbox("le stock mini etc
ajout d'une ligne commande statut non passée
si solde virtuel <0 alors
rejet vente et proposition de vente égale au solde virtuel>0
sinon enregistrement vente

est correcte, mais comment l'appliquer concrétement à mon cas de figure ?

Thanks

[random]

our te répondre il faudrait dire où tu loges tes entrées stocks

[priest69]

Mes entrées de stock proviennent des commandes. Donc, je crée une requête pour interroger ma table EST_COMMANDE (qui contient la réf du fournisseur, les produits livrés et les Qté).

Besoin d'autres infos ?

Thanks

[random]

sortie=dsum("qtesortie","SORTIE_STOCK","where numproduit='" &
forms!maformmoncontrol & "'")
entrée=dsum("produitslivrés",""estcommande";,"where numproduit='" &
forms!maformmoncontrol & "'")
soix x la valeur de la commande
je vérifie si je peux livrer
si entrée-sortie=0
alors pas de vente exit
end if
si x>entrée -sortie alors
vente évntuelle partielle de entrée-sortie
traitement
sinon
vente
traitement
end if
si entré-sortie -qtévendue<=sumdom("stockmini","produit", where numproduit=monprosuit) alors
msgbox("à commander
ajout table commandeà effectuer
de numproduit réassaort


tu gagnerais beaucoup à laisser les mouvements de quantités dans une seule table
?? à loger clients et fournisseurs dans une table tiers avec des compléments pour les spécificités

[priest69]

Erreur de synthaxe (opérateur absent) dans l'expression 'Where IDProduit='520"

Cette erreur apparait lorsque je saisie le code suivant :

Code :

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

1
2
sortie=dsum("qtesortie","SORTIE_STOCK","where numproduit='" &
forms!maformmoncontrol & "'")

Qu'est ce ?

Merci

[random]

pardon retire le where

sortie=dsum("qtesortie","SORTIE_STOCK","numproduit='" &
forms!maformmoncontrol & "'")