Discussion :

[Bonisam]

Bonjour a tous,

Please je sollicité votre aide.
J'ai créer une base de donné de vente-gestion de stock.
J'aimerais contrôler la quantité demandé par rapport au stock disponible.
C'est à dire qu'une saisie de quantité d'un article dans le formulaire de vente ne puisse dépasser son stock disponible.
Pour cela j'ai pu créer une réquete faisant la situation du stock disponible mais je n'arrive plus après multiple recherche à mettre la règle de validation dans le champ quantité vendu dans le formulaire de vente.
Merci à vous pour votre aide!!!
Mes respects
Bonisam

[marot_r]

Tu ne peux pas utiliser une requête comme valeur pour une règle de validation.

Je m'en sert rarement donc je ne sais pas si tu peux utiliser une fonction mais j'essairai

Code :

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

<=DFirst("NomTonChampQuantiteEnStock"; "NomTaRequeteDeControle"; "[ClefProduit]=" & [ClefProduit])

Sinon il faudra mettre du code dans l'événement Après MAJ de ton champ quantité.

A+

[Bonisam]

Merci Marot r pour ta reponse.
La réalité est que les code et moi ne sont pas famillier donc si vous connaisser une fonction qui pourrait resoudre mon probleme je serai bien ravi.
Merci encore
Mes respects
Bonisam

[marot_r]

J'ai posté la fonction que je pense pouvoir résoudre ton problème, l'as-tu essayé ?

A+

[Bonisam]

Bonjour Marot r;

J'ai tester ta fonction mais a moins que je n'ai su comment le faire, elle ne semble pas fonctionnée. Aussi j'ai essayé DLookup(expr, domaine [, critères] )
qui ne fonctionne pas non plus. je me pose la question est ce pas façon de faire.
Voici comment j'ai fais:
- j'ai une requete nommé réquete_vente;
- j'ai crée un formulaire nommé Vente basé sur la réquete_vente avec un champ Ref_Article,........,Qté_Vendue;
- j'ai aussi crée aussi une requete nommé Requete_situationstock avec les champs (Ref_Article,............,Entrée, sortie, stock).
Donc je voulais que la saisie de quantité dans le formulaire vente vérifie la quantité en stock dans la requete_situationstock (champ stock).
Ainsi dans ma requete vente en mode création dans le champ Qté_Vendue a l'aide du générateur j'ai insérré la fonction suivante:
DLookup("[Requete_SituationStock]![stock]", "Requete_SituationStock", "[Requete_SituationStock]![Ref_Article]" ).



Voila un peu ce que j'ai fais mais ça ne marche pas.
Priére venez a mon secours!
Merci
Mes respects
Bonisam

[marot_r]

Apparement utiliser une fonction ne marche pas. Il va falloir le faire par code après MAJ.

Juste pour être sur de comprendre ton processus :

1. le système affiche l'écran de saisie
2. L'utilisateur choisi le produit
3. L'utilisateur choisi la quantité
4. Le système vérifie la quantité en stock.
5. Si la quantité choisie est inférieure à la quantité en stock, le système affiche un message d'alerte.

C'est bien cela ?

A+

[Bonisam]

Bonjour,

Vous aviez bien compris ce que je veux mais seulement au point 5 je rectifie en disant que si la quantité choisie est supérieure à la quantité en stock, le système affiche un message d'allerte.
Bien à vous!
Mes respects
Bonisam

[marot_r]

Oui c'est beaucoup plus logique comme cela ;-).

Pour ton contrôle voici comment je procéderai

dans le formulaire de saisie, sur l'événement Après MAJ du champ quantité commandée.

Code :

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

1
2
3
4
5
6
7
8
9
10
dim qteStock as variant
qteStock=DFirst("[stock]", "Requete_SituationStock", "[Ref_Article]=" & me.Ref_Article ).
 
if not insull(qteStock) then
     if qteStok<me.QteCommande then
        msgbox "Il y a seulement " & qteStock & " article(s) en stock.",vbInformation
     end if
  else
     msgbox "Impossible de trouver le stock de " & me.Ref_Article ,vbExclamation
end if

À adapter selon nom de tes champs et tes besoins.

Note que si tu le mets après MAJ, ce code te permet quand même de saisir une quantité supérieure au stock. C'est une alarme rien de plus.

Si tu le mets avant MAJ tu peux empécher que l'on saisisse une quantité supérieure mais c'est un peu plus compliqué.


A+

[Bonisam]

Marot r,

J'ai bien recu ton code et je t'en remercie.
J'ai vais le tester le week end et te tenir informer.
Je suis bien ravie de ton aide.
Comme il semble avoir probablement un long week end ne sois pas etonner que ma reponse atteingne Lundi parce que je n'ai pas la connexion hors du bureau.
Merci sincèrement
Mes respects
Bonisam!

[Bonisam]

Bonjour Marot r,

J'ai tester ton code. Je pense que c'est moi je dois avoir un problème sinon le code telque je le vois, doit fonctionner. Malheureusement avec moi il ne fonctionne pas.

Par contre je suis arrivé a utilser Rechdom dans valide si et ça marche mais seulement cette règle est strict c-a-d que si y'a manque de stock imposible de saisir quand même pourtant je voudrait l'allerte et pouvoir saisir comme tu l'indique dans le code. Le code me parait vraiment très adequat.

J'ai voulu me debattre pour trouver la solution de moi même pour ne plus te deranger avec cette betise mais je suis désolé. Donc je t'envoie une copie de ma base et te solliciter encore de voir si tu peux faire quelque chose pour moi.

les indications:
- la requete où se trouve l'expression ("[Stock]"s'appelle : requete_situationstock
- le formulaire que lequel le contrôle se trouve s'appelle: requete_détailVente sous formulaire(Champ =Q_Vte). c'est un sous formulaire du formulaire Grille de saisie de vente.
La base: http://cjoint.com/?3Hwpe0auhvB
Mes respects
Bonisam

[marot_r]

Je vais t'envoyer mon adresse email en message privé.

Envoit moi ta base.

A+