From a5d7e83c9b0749d28fb600c4ac8b6ea9a50bf909 Mon Sep 17 00:00:00 2001
From: Pascal Lafourcade <pascal.lafourcade@imag.fr>
Date: Sat, 15 Feb 2020 12:11:23 +0100
Subject: [PATCH] q2

---
 EXOS/Partiel2020.tex | 30 ++++++++++++++++--------------
 1 file changed, 16 insertions(+), 14 deletions(-)

diff --git a/EXOS/Partiel2020.tex b/EXOS/Partiel2020.tex
index 2a59021..be80052 100644
--- a/EXOS/Partiel2020.tex
+++ b/EXOS/Partiel2020.tex
@@ -171,36 +171,38 @@ SET echo on;SET verify on;SET feedback on; SELECT * FROM TLIGNE;
     \begin{lrbox}{\avecalter}
       \begin{minipage}{\textwidth}
 \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 verify off;
-SET feedback off;
+SET echo off;SET verify off; SET feedback off;
 
 DECLARE
-Dnbmineur
-MINEUR EXCEPTION
+Dnbmineur number;
+MINEUR EXCEPTION;
 
 BEGIN
 SELECT count(*) into Dnbmineur 
-FROM ETUDIANT 
-WERE  AGE < 18;
+FROM ETUDIANT2020 
+WHERE  AGE < 18;
 
-IF Dnbmineur > 0 
-THEN RAISE MINEUR
+IF (Dnbmineur > 0) THEN RAISE MINEUR;
 END IF;
 
 EXCEPTION 
 WHEN MINEUR THEN
 INSERT INTO tligne VALUES(Dnbmineur); 
-
 END;
-
 .
 /
 
-SET echo on;
-SET verify on;
-SET feedback on;
+SET echo on;SET verify on; SET feedback on; SELECT * FROM TLIGNE;
 \end{verbatim}
   \end{minipage}
 \end{lrbox}