master
Pascal LAFOURCADE 4 years ago
parent 59d52f1701
commit 98ff7414c9

@ -736,10 +736,10 @@ dnbfournisseurs number ;
BEGIN BEGIN
SELECT COUNT(*) INTO dnbfournisseurs FROM tProduitfourn SELECT COUNT(*) INTO dnbfournisseurs FROM tProduitfourn
WHERE noproduit = '&vnoproduit' ; WHERE noproduit = '\&vnoproduit' ;
INSERT INTO Tligne VALUES('Le nombre de fournisseur du produit' INSERT INTO Tligne VALUES('Le nombre de fournisseur du produit'
||'&vnoproduit'||' est '|| dnbfournisseurs) ; END ; ||'\&vnoproduit'||' est '|| dnbfournisseurs) ; END ;
. .
@ -772,7 +772,6 @@ fournisseurs soit le message \code{le produit nexiste pas}.
\end{exercice} \end{exercice}
\cache{ \cache{
variable vnoproduit char(4) variable vnoproduit char(4)
PROMPT Saisir un numero de produit PROMPT Saisir un numero de produit
@ -787,11 +786,11 @@ dnbproduit number;
BEGIN BEGIN
SELECT COUNT(*) INTO dnbfournisseur FROM PRODUITFOURN WHERE noproduit = '\&vnoproduit'; SELECT COUNT(*) INTO dnbfournisseur FROM TPRODUITFOURN WHERE noproduit = '\&vnoproduit';
IF dnbfournisseurs = 0 THEN IF dnbfournisseur = 0
SELECT COUNT(*) INTO dnbproduit FROM TPRODUIT WHERE noproduit = '\&vnoproduit'; THEN SELECT COUNT(*) INTO dnbproduit FROM TPRODUIT WHERE noproduit = '\&vnoproduit';
END IF; END IF;
@ -809,6 +808,7 @@ END;
. .
/ /
SELECT * FROM Tligne; SELECT * FROM Tligne;
} }

Loading…
Cancel
Save