Comment calculer une valeur d'après plusieurs champs

Bonjour,

Je suis sous Paradox et Delphi 7. Je dois calculer le stock réel, disposant de :

1. stock initial dans la table Article
2. quantité vendue dans la table ligne facture vente
3. quantité achetée dans la table ligne facture achat

Merci pour vos pistes.

ouvre les tables puis tu te positionne sur l'article en question en utilisant findkey sur les trois table.

Code:

---

1 2 3 4 5

article.active := true; if Article.findkey() then Stock_initial := article.quantité else Stock_initial :=0; // dans le cas ou cette article n'existe pas (par mesure de sécurité)

---

même chose pour les autre table puis tu fait

quantité achetée + Stock_initial - quantité vendue // quantité restante

@aminefr1910 je :moinsser: ta réponse car incomplète , il semble évident que pour les quantités vendues ou achetées il n'y aura certainement pas qu'un seule ligne .
une recherche par table ne suffit donc pas .
il faut utiliser des querys pour récupérer les valeurs Total Quantité Achetées et Total Quantité Vendues

Code:

---

1 2 3 4

SELECT SUM(QUANTITE) AS ACHETES FROM LIGNEFACTUREVENTE WHERE CODE_ARTICLE=:CODE et SELECT SUM(QUANTITE) AS VENDUES FROM LIGNEFACTUREACHAT WHERE CODE_ARTICLE=:CODE

---

Paradox est hélas bien limité comme SGBD (il lui manque le R de relationnel ;)) , ce qui pourrait se faire en un seul SQL avec d'autre SGBDR se fera beaucoup plus difficilement de la même manière avec Paradox

Soit les tables

Citation:

---

ARTICLE - CODE ALPHA,QI INTEGER;
ACHATS - CODE ALPHA,QA INTEGER; 0 à n Achats pour un Article
VENTES - CODE ALPHA,QV INTEGER; 0 à n Ventes pour un Article

---

Citation:

---

Envoyé par Données

ARTICLE
'1',10
'2',5
'3',2
ACHATS
'1',20
'1',4
'2',1
VENTES
'1',2
'1',4
'1',5
'1',1

---

Voici avec une Query le moyen d'obtenir les différentes Quantités pour le calcul du stock

Code:

---

1 2 3 4 5

SELECT CODE,QI, (SELECT SUM(QA) FROM ACHATS WHERE CODE='1') AS SUMACHATS, (SELECT SUM(QV)FROM VENTES WHERE CODE='1') AS SUMVENTES FROM ARTICLE WHERE CODE='1'

---

on obtient :
CODE - QI - SUMACHATS - SUMVENTES
'1' - 10 - 24,00 - 12,00

une autre approche est d'utiliser une sorte de vue Paradox, c'est à dire utiliser un Texte SQL qui se trouvera dans le même endroit que les tables et sera utilisée comme une table intermédiaire (fonctionnalité peu connue)

Citation:

---

Envoyé par Fichier MOUVS.SQL

SELECT CODE,SUM(QA) AS N FROM ACHATS GROUP BY CODE
UNION
SELECT CODE,SUM(QV*-1) AS N FROM VENTES GROUP BY CODE

---

la query devient alors

Code:

---

1 2 3

SELECT A.CODE,A.QI,SUM(M.N) AS MVTS FROM ARTICLE A LEFT JOIN MOUVS.SQL M ON A.CODE=M.CODE GROUP BY A.CODE,A.QI

---

Ce qui permet d'obtenir tous les articles
CODE - QI - MVTS
'1' - 10 - 12,00
'2' - 5 - 1,00
'3' - 2 -

malheureusement Paradox ne connaissant pas des clauses comme COALESCE il n'est pas possible de faire le calcul du Stock directement , sauf à utiliser la manière suivante

Code:

---

1 2 3 4 5 6 7 8 9

-- Pas de mouvement SELECT A.CODE,A.QI AS STOCK FROM ARTICLE A LEFT JOIN MOUVS.SQL M ON A.CODE=M.CODE WHERE M.N IS NULL UNION -- à minima un mouvement SELECT A.CODE,A.QI+SUM(M.N) FROM ARTICLE A LEFT JOIN MOUVS.SQL M ON A.CODE=M.CODE WHERE M.N IS NOT NULL GROUP BY A.CODE,A.QI

---

CODE - STOCK
'1' - 22
'2' - 6
'3' - 2

J’espère que cela convaincra les lecteurs qu'utiliser le SQL peut s’avérer intéressant