diff --git a/COURS/PLSQL.tex b/COURS/PLSQL.tex index 9c381ef..3014310 100644 --- a/COURS/PLSQL.tex +++ b/COURS/PLSQL.tex @@ -918,9 +918,66 @@ select * from Tligne; \end{itemize} \end{exercice} -%% \cache{ -%% TODO -%% } + \cache{ +CREATE TABLE tLigne( + + designation VARCHAR2(500) + + ); + +set echo off + +set verify off + +set feed off + +variable vnoP CHAR(5) + +variable vql NUMBER + +PROMPT Entrer le num du prod : + +ACCEPT vnoP + +PROMPT Entrer la quantitée livré : + +ACCEPT vql + +DECLARE + +dCo NUMBER; + +BEGIN + +SELECT stock INTO dCo + +FROM tProduit + +WHERE noprod = '\&vnoP'; + +dCo:= dCo + \&vql; + +UPDATE tProduit SET stock = dCo WHERE noprod = '\&vnoP'; + +EXCEPTION + +when no\_data\_found then + +insert into Tligne values('référence inconnue'); + +end; + +. + +/ + + +set echo on + +set verify on + +set feed on +} \begin{exercice} Enregistrer un nouveau produit d’un fournisseur : \begin{itemize}