Bonjour,
J'ai un logiciel développé avec delphi7 et PostgreSQL, utilisant la connexion odbc.
J'ai une table des produits. Quand je fais update de la quantité, ça marche.
Mais après plusieurs jours, j'ai des réclamations indiquant que le stock n'est pas correcte.
je voudrais savoir quelles règles respecter pour bien faire fonctionner un logiciel de gestion de stock en réseau.
Aidez-moi svp :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 //////////////////////////UPDATE PRODUIT sql := 'SELECT * FROM public.produits WHERE code ='''+DataModule2.bonproduitcodeproduit.Value+'''FOR UPDATE ;'; v:=CurrToStr(DataModule2.bonproduitq.Value) ; DataModule2.ADOQuery2.SQL.Clear; DataModule2.ADOQuery2.SQL.Add('Begin;') ; DataModule2.ADOQuery2.SQL.Add(sql) ; DataModule2.ADOQuery2.SQL.Add('UPDATE produits'); DataModule2.ADOQuery2.SQL.Add('SET qcourant = qcourant -'+v); DataModule2.ADOQuery2.SQL.Add('where code ='''+DataModule2.bonproduitcodeproduit.Value+''';'); DataModule2.ADOQuery2.SQL.Add('commit;') ; DataModule2.ADOQuery2.ExecSQL;
Partager