Pascal Lafourcade 5 years ago
parent 41cb6aa1e9
commit a5d7e83c9b

@ -171,36 +171,38 @@ SET echo on;SET verify on;SET feedback on; SELECT * FROM TLIGNE;
\begin{lrbox}{\avecalter} \begin{lrbox}{\avecalter}
\begin{minipage}{\textwidth} \begin{minipage}{\textwidth}
\begin{verbatim} \begin{verbatim}
DROP TABLE ETUDIANT2020;
CREATE TABLE ETUDIANT2020(nom varchar2(100), age number);
INSERT INTO ETUDIANT2020 VALUES('Alice', 12);
INSERT INTO ETUDIANT2020 VALUES('Bob', 15);
INSERT INTO ETUDIANT2020 VALUES('Charlie', 18);
INSERT INTO ETUDIANT2020 VALUES('Dave', 21);
INSERT INTO ETUDIANT2020 VALUES('Eve', 11);
DROP TABLE tligne;
CREATE TABLE tligne(DESCRIPTION VARCHAR2(300));
SET echo off; SET echo off;SET verify off; SET feedback off;
SET verify off;
SET feedback off;
DECLARE DECLARE
Dnbmineur Dnbmineur number;
MINEUR EXCEPTION MINEUR EXCEPTION;
BEGIN BEGIN
SELECT count(*) into Dnbmineur SELECT count(*) into Dnbmineur
FROM ETUDIANT FROM ETUDIANT2020
WERE AGE < 18; WHERE AGE < 18;
IF Dnbmineur > 0 IF (Dnbmineur > 0) THEN RAISE MINEUR;
THEN RAISE MINEUR
END IF; END IF;
EXCEPTION EXCEPTION
WHEN MINEUR THEN WHEN MINEUR THEN
INSERT INTO tligne VALUES(Dnbmineur); INSERT INTO tligne VALUES(Dnbmineur);
END; END;
. .
/ /
SET echo on; SET echo on;SET verify on; SET feedback on; SELECT * FROM TLIGNE;
SET verify on;
SET feedback on;
\end{verbatim} \end{verbatim}
\end{minipage} \end{minipage}
\end{lrbox} \end{lrbox}

Loading…
Cancel
Save