|
|
@ -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 n’existe 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;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|