You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

661 lines
16 KiB

This file contains ambiguous Unicode characters!

This file contains ambiguous Unicode characters that may be confused with others in your current locale. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to highlight these characters.

\documentclass[a4paper,11pt]{article}
\usepackage[utf8x]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[french]{babel}
\usepackage[a4paper,hmargin=20mm,vmargin=30mm]{geometry}%\usepackage{fullpage}
\usepackage{url}
\usepackage{comment}
\usepackage{fancyhdr}% fancy header
\usepackage{multirow}
\usepackage{slashbox}
\usepackage{color, colortbl}
\definecolor{Gray}{gray}{0.9}
\usepackage{adjustbox}
\usepackage{slashbox}
%\usepackage{times}
\usepackage{tikz,pgflibraryarrows,pgffor,pgflibrarysnakes}
\usetikzlibrary{decorations.pathreplacing}
\usetikzlibrary{calc}
\usepackage[bf]{caption}
\usepackage{tcolorbox}
\usepackage{pdfpages}
\usepackage{fancyvrb}
\fancypagestyle{monstyle}{
%\fancyhead{}
\renewcommand{\headrulewidth}{1pt}
%% %\renewcommand{\footrulewidth}{0.4pt}
% \fancyhead[LE]{\slshape \thepage/ \pageref{LastPage}}
%% \fancyhead[RO]{\slshape \thepage/ \pageref{LastPage}}
%\fancyhf{}
%\fancyhead[LE]{\slshape LE}
%\fancyhead[CE]{\slshape CE}
%\fancyhead[RE]{\slshape RE}
\fancyhead[LO]{\bfseries 2020-2021 BD PLS/SQL\rightmark}
%\fancyhead[CO]{\slshape APF}
\fancyhead[RO]{\bfseries ~\leftmark }
%% %\fancyfoot{}
% \fancyfoot[LE,RO]{}
\fancyfoot[CO,CE]{}%\slshape\thepage/\pageref{LastPage}}
%% %\fancyfoot[LO,RE]{\small\slshape \ddmmyyyydate version du \today}
}
% \pagestyle{fancy}
\usepackage{amsmath}
\usepackage{amsthm}
\usetikzlibrary{fit}
\theoremstyle{definition}
\newtheorem{exercice}{Exercice}
\pagestyle{monstyle}
\usepackage{amsmath}
\usepackage{amsthm}
\newcommand{\code}[1]{\texttt{#1}}
\usepackage{boxedminipage}
\usepackage{setspace}
\newsavebox\svbx
\newif\ifcache
\long\def\cache#1{\ \newline
\setbox\svbx=\vbox{\leavevmode \newline \begin{spacing}{1}#1\end{spacing}}
\smallskip\par\noindent
\begin{boxedminipage}{\linewidth}
\ifcache
\leavevmode\hrule height 0pt\vskip \ht\svbx\hrule height 0pt
\else \unvbox\svbx
\fi
\end{boxedminipage}
\par\smallskip}
\cachefalse % version prof
%\cachetrue % version etudiant
\begin{document}
\begin{center}
NOM : \hfill Examen \hfill~\\
PRENOM : \hfill 90 minutes%% , 75 points
\hfill ~\\
GROUPE : \hfill \hfill~\\
\end{center}
\section*{PL/SQL : R\'eservation d'un terrain de sport}
Une entreprise de location de terrain de badminton/padel souhaite
informatiser la gestion de ses locaux. Chaque terrain possède un
numéro : il y a 10 terrains de badminton numérotés de 1 à 10, et 2 de
padels de 1 à 2. Il est possible qu'il y ait entre 2 et 4 joueurs pour
le badminton, mais exactement 4 joueurs pour le padel. Les tarifs
horaires pour la location du terrain ne sont pas les mêmes pour le
badminton et le padel. Ils varient également en fonction de
l'horaire. La réservation se fait pour un créneau dont lheure de
début est connue (9h , 10h, ... , 17h) et la durée spécifique au sport
pratiqué (1h ou 2h). Une fois sur place, il est également possible de
louer des équipements (raquettes et chaussures) pour un supplément :
\begin{center}
\begin{tabular}{|l|c|c|}
\hline
Prix à lunité & BADMINTON & PADEL \\ \hline
Raquette & 1€ & 2€ \\ \hline
Paire de chaussures& 2€ & 3€ \\ \hline
\end{tabular}
\end{center}
Lors d'une réservation, il faut connaître au moins les coordonnées
d'un des joueurs pour savoir qui a fait la réservation. Lors d'une
réservation en ligne, il est possible d'inscrire le nom et le numéro
de téléphone des joueurs, afin qu'un rappel leur soit envoyé le jour
de leur réservation. Il faut pouvoir sortir une facture avec le
montant total de la réservation ; c'est à dire le tarif de la location
en fonction du sport et du créneau horaire, ainsi que des équipements
loués.
MCD de lapplication :
%\newpage
%\begin{center}
% \includegraphics{MCD.png}
%\end{center}
\begin{center}
\begin{tikzpicture}[every node/.style={inner sep=0,outer sep=0}]
\node (equip) at (3,3) {
\begin{varwidth}{1.5in}
\begin{tabular}{|l|}
\hline
\rowcolor{lightgray}EQUIPEMENT\\
\hline
\underline{idEquipement}\\
Libell\'e\\
Tarif\\
\hline
\end{tabular}
\end{varwidth}
};
\node (con) at (7,3) {
\begin{varwidth}{1.5in}
\begin{tabular}{l}
\rowcolor{Gray}contenir\\
\hline
nombre\\
\end{tabular}
\end{varwidth}
};
\draw[rounded corners] ($(con.north west)-(0.03,-0.03)$) rectangle ($(con.south east)+(-0.03,0.03)$);
\node (faire) at (10,0) {
\begin{varwidth}{1.5in}
\begin{tabular}{l}
\rowcolor{Gray}Faire\\
\hline
~ \\
\end{tabular}
\end{varwidth}
};
\draw[rounded corners] ($(faire.north west)-(0.03,-0.03)$) rectangle ($(faire.south east)+(-0.03,0.03)$);
\node (DFres) at (14,-3) {
\begin{varwidth}{1.5in}
\begin{tabular}{l}
\rowcolor{Gray}DF\_reserver\\
\hline
~ \\
\end{tabular}
\end{varwidth}
};
\draw[rounded corners] ($(DFres.north west)-(0.03,-0.03)$) rectangle ($(DFres.south east)+(-0.03,0.03)$);
\node (DFpra) at (-1,-3) {
\begin{varwidth}{1.5in}
\begin{tabular}{l}
\rowcolor{Gray}DF\_pratiquer\\
\hline
~ \\
\end{tabular}
\end{varwidth}
};
\draw[rounded corners] ($(DFpra.north west)-(0.03,-0.03)$) rectangle ($(DFpra.south east)+(-0.03,0.03)$);
\node (fact) at (6.5,-3) {
\begin{varwidth}{1.5in}
\begin{tabular}{l}
\rowcolor{Gray}facturer\\
\hline
tarifHoraire \\
\end{tabular}
\end{varwidth}
};
\draw[rounded corners] ($(fact.north west)-(0.03,-0.03)$) rectangle ($(fact.south east)+(-0.03,0.03)$);
\node (DFcon) at (3,0) {
\begin{varwidth}{1.5in}
\begin{tabular}{l}
\rowcolor{Gray}DF\_concerner\\
\hline
~ \\
\end{tabular}
\end{varwidth}
};
\draw[rounded corners] ($(DFcon.north west)-(0.03,-0.03)$) rectangle ($(DFcon.south east)+(-0.03,0.03)$);
\node (res) at (7,0) {\begin{varwidth}{1.5in}
\begin{tabular}{|l|}
\hline
\rowcolor{lightgray}RESERVATION\\
\hline
\underline{idReservation}\\
dateReserv\\
nbJoueurs\\ \hline
\end{tabular}
\end{varwidth}
};
\node (ter) at (-1,0) {\begin{varwidth}{2.5in}
\begin{tabular}{|l|}
\hline
\rowcolor{lightgray}TERRAIN\\
\hline
\underline{idTerrain}\\
numTerrain\\
\hline
\end{tabular}
\end{varwidth}
};
\node (cre) at (10,-3) {\begin{varwidth}{2.5in}
\begin{tabular}{|l|}
\hline
\rowcolor{lightgray}CRENEAU\\
\hline
\underline{numCreneau}\\
heureD\'ebut\\
\hline
\end{tabular}
\end{varwidth}
};
\node[draw,rectangle] (g) at (3,-3) {\begin{varwidth}{2in}
\begin{tabular}{l}
\rowcolor{lightgray}SPORT\\
\hline
\underline{nomSport}\\
nbMinJoueurs\\
nbMaxJoueurs\\
dur\'ee\\
\end{tabular}
\end{varwidth}};
\node[draw,rectangle] (c) at (13,0) {
\begin{tabular}{|l|}
\hline
\rowcolor{lightgray}JOUEUR\\
\hline
\underline{idjoueur}\\
Nom\\
Pénom\\
num\'ero\\
\hline
\end{tabular}
};
\draw (equip) -- (con) node [pos=0.5, above] {$0,n$};
\draw (res) -- (con) node [midway, right] {$0,n$};
\draw (faire) -- (c) node [midway, above] {$0,n$};
\draw (res) -- (faire) node [midway, above] {$1,n$};
\draw (res) -- (DFres) node [midway, above] {$1,1$};
\draw (cre) -- (DFres) node [midway, above] {$0,n$};
\draw (cre) -- (fact) node [midway, above] {$0,n$};
\draw (fact) -- (g) node [midway, above] {$0,n$};
\draw (g) -- (DFpra) node [midway, above] {$1,n$};
\draw (ter) -- (DFpra) node [midway, right] {$1,1$};
\draw (ter) -- (DFcon) node [midway, above] {$0,n$};
\draw (res) -- (DFcon) node [midway, above] {$1,1$};
\end{tikzpicture}
\end{center}
% \newpage
Modèle relationnel :
EQUIPEMENT(\underline{idEquipement}, libell\'e, tarif)
CONTENIR(\underline{idReservation}, \underline{idEquipement}, nombre)
TERRAIN(\underline{idTerrain}, numTerrain, nomSport)
RESERVATION(\underline{idReservation}, dateReserv, nbJoueurs, idTerrain, numCreneau)
FAIRE(\underline{idReservation}, \underline{idJoueur})
JOUEUR(\underline{idJoueur}, nom, pr\'enom, num\'ero)
SPORT(\underline{nomSport}, nbMinJoueurs, nbMaxJoueurs, dur\'ee)
FACTURER(\underline{nomSport}, \underline{numCreneau}, tarifHoraire)
CRENEAU(\underline{numCreneau}, heureD\'ebut)
Ordres de création des tables :
\begin{verbatim}
create table EQUIPEMENT (
idEquipement char(3) primary key,
libelle varchar2(20),
tarif number(5,2));
create table JOUEUR (
idJoueur char(2) primary key,
nom varchar2(20),
pnom varchar2(20),
numero number);
create table CRENEAU (
numCreneau char(2) primary key,
heureDebut number(2));
create table TERRAIN (
idTerrain char(3) primary key,
numTerrain number,
nomSport varchar2(10) );
create table SPORT (
nomSport varchar2(10),
nbMinJoueurs number,
nbMaxJoueurs number,
duree number);
create table RESERVATION (
idReserv char(3) primary key,
dateReserv date,
nbJoueurs number,
idTerrain char(5) references TERRAIN,
numCreneau char(2) references CRENEAU );
create table faire (
idReserv char(3) references RESERVATION,
idJoueur char(2) references JOUEUR,
primary key(idReserv, idJoueur));
create table contenir (
idReserv char(3) primary key,
idEquipement char(3),
nombre number);
\end{verbatim}
Consignes :
\begin{itemize}
\item Les résultats seront affichés avec une table Tresultat (ligne varchar2 (200))
\item La partie SQL+ nest pas demandée pour les exercices 2 et 3
\end{itemize}
\begin{exercice}[MF1] (10 points)
Donner le programme (partie SQL + et PL/SQL) permettant denregistrer un sport.
Messages à prévoir :
\begin{itemize}
\item Le nom du sport est déjà attribué
\item Le nombre maximum de joueurs ne peut être inférieur au nombre minimum
\item La durée est de 1h ou 2h
\item Le sport a été enregistré : nom du sport
\end{itemize}
\begin{SaveVerbatim}{Maxpoints}
DROP TABLE tligne ;
CREATE TABLE tligne (ligne varchar2(100)) ;
\end{SaveVerbatim}
%% \cache{%\begin{small}
%% \BUseVerbatim{Maxpoints}
%% % \end{small}
%}
\end{exercice}
\begin{exercice}[PB1] (10 points)
Donner le programme (partie SQL + et PL/SQL) permettant denregistrer
une réservation sans équipement et pour 2 joueurs.
Messages à prévoir :
\begin{itemize}
\item Lidentifiant de la réservation est déjà attribué
\item La date de réservation doit être postérieure à la date du jour
\item Lidentifiant du terrain est inconnu
\item Au moins un des identifiants joueurs est inconnu
\item La réservation a été enregistrée pour les joueurs : nom joueur1 et
nom joueur2
\end{itemize}
\end{exercice}
\begin{exercice}[MF2] (15 points)
Donner le programme permettant la suppression dun joueur à condition
quil nait pas fait de réservations pour aujourdhui ou dans le
futur. Lidentifiant du joueur aura été précédemment lu dans la
variable \code{vidJoueur}. Messages à prévoir, utilisation dau moins
une exception utilisateur:
\begin{itemize}
\item Joueur inconnu
\item Impossible, il existe des réservations faites par ce joueur pour aujourdhui ou dans le futur
\item Nb actions de réservations faites dans le passé par ce joueur ont été supprimées
\item Joueur supprimé
\end{itemize}
\end{exercice}
\begin{exercice}[PB2] (15 points)
Donner le programme permettant la suppression de toutes les réservations du mois de mars utilisant léquipement didentifiant contenu dans la variable videquip.
Messages à prévoir :
\begin{itemize}
\item Lidentifiant de léquipement est inconnu
\item nb réservations ont été supprimées
\end{itemize}
\end{exercice}
\begin{exercice}[MF3] (20 points)
Donner le programme permettant dafficher les réservations actuelles
ou futures par créneau horaire pour un sport donné. On utilisera le
nom du sport contenu dans la variable \code{vnomSport}. On affichera les
résultats dans lordre croissant de lheure de début, puis de la
date de réservation.
\begin{SaveVerbatim}{Affichage}
Heure de début : XX
Id réservation date : XX/XX/XX
Id réservation date : XX/XX/XX
Id réservation date : XX/XX/XX
...
Heure de début : XX
Id réservation date : XX/XX/XX
Id réservation date : XX/XX/XX
...
Nombre de réservations total pour ce sport : nb
\end{SaveVerbatim}
% \cache{%\begin{small}
\begin{center}
\fbox{ \BUseVerbatim{Affichage}}
\end{center}
%\end{small}
% }
\end{exercice}
\begin{exercice}[PB2] (15 points)
Donner le programme permettant dafficher la liste des réservations
concernant le terrain didentifiant T003, affichage dans lordre
croissant de la date de réservation, puis du nom des joueurs.
\begin{SaveVerbatim}{AffichagePB}
Id reservation : XXXXX date : XX/XX/XX
nom joueur
nom joueur
nom joueur
...
Id reservation : XXXXX date : XX/XX/XX
nom joueur
nom joueur
...
...
Nombre de réservations sans équipement : nb
\end{SaveVerbatim}
% \cache{%\begin{small}
\begin{center}
\fbox{ \BUseVerbatim{AffichagePB}}
\end{center}
%\end{small}
% }
\end{exercice}
\begin{exercice}[MF4] (15 points)
Donner le programme permettant dafficher pour chaque réservation le
coût de la réservation du terrain. On affichera les résultats dans
lordre décroissant du coût du terrain.
\begin{SaveVerbatim}{AffichageMF2}
Id. réserv: XXXXX heure début : X durée : X tarif horaire : 99 Coût terrain :9999€
Id. réserv: XXXXX heure début : X durée : X tarif horaire : 99 Coût terrain :9999€
...
\end{SaveVerbatim}
\begin{center}
\fbox{\begin{small}
\BUseVerbatim{AffichageMF2}
\end{small}
}
\end{center}
\end{exercice}
\section*{Rappels}
Les fonctions \code{connexion}, \code{deconnexion} et \code{sql\_error}
sont rappell\'ees ci-dessous. Elles ne sont pas \`a r\'e\'ecrire sur
vos copies, mais \`a utiliser dans les exercices si besoin.
\begin{verbatim}
void connexion()
{ VARCHAR uid[50];
char login[20];
char passwd[20];
printf("Donner votre login : ");
scanf("%s",login);
printf("\nDonnez votre mot de passe Oracle : ");
scanf("%s",passwd);
printf("\n");
strcpy(uid.arr,login);
strcat(uid.arr,"/");
strcat(uid.arr,passwd);
strcat(uid.arr,"@kirov");
uid.len=strlen(uid.arr);
EXEC SQL CONNECT :uid;
if (sqlca.sqlcode==0)
printf(" Connexion réussie avec succès.\n\n");
else
{
printf ("Problème à la connexion.\n\n");
exit(1);
}}
\end{verbatim}
\begin{verbatim}
void deconnexion(int validation)
{
if (validation == 1)
{ EXEC SQL COMMIT WORK RELEASE;
} else
{ EXEC SQL ROLLBACK WORK RELEASE;}
printf("Déconnexion sans problème.\n");
}
\end{verbatim}
\begin{verbatim}
void sql_error(char *msg)
{ char err_msg[128];
long buf_len, msg_len;
EXEC SQL WHENEVER SQLERROR CONTINUE;
printf("%s\n", msg);
buf_len = sizeof (err_msg);
sqlglm(err_msg, &buf_len, &msg_len);
if (msg_len > buf_len)
msg_len = buf_len;
printf("%.*s\n", msg_len, err_msg);
deconnexion(0);
exit(1);
}
\end{verbatim}
\section*{MEMO}
\subsection*{Langage PL/SQL}
\begin{verbatim}
DECLARE
variable_PL/SQL {type SQL | nom_table.nom_colonne%TYPE | nom_table%ROWTYPE} ;
CURSOR curseur IS SELECT … ;
nom_exception EXCEPTION;
BEGIN
OPEN curseur ;
FETCH curseur INTO liste de variables ;
curseur%FOUND
CLOSE curseur ;
RAISE nom_exception ;
SELECT liste_de_sélection INTO liste de variables FROM … WHERE … ORDER BY ... ;
Variable PL/SQL := &variable_ SQLPlus
IF … THEN … [ELSE …] END IF ;
WHILE … LOOP … END LOOP ;
EXCEPTION
WHEN nom_exception THEN …;
WHEN NO_DATA_FOUND THEN … ;
WHEN OTHERS THEN … :
END ;
\end{verbatim}
\subsection*{Langage PRO*C}
\begin{verbatim}
struct {long sqlcode;/* code resultant de l'exécution
=0 -> ok,
>0 -> ok avec un code d'état,
<0 -> erreur */
struct {
unsigned short sqlerrml;/*longueur du message*/
char sqlerrmc[70];/*message d'erreur*/
} sqlerrm;
long sqlerrd[6];/* seul sqlerrd[2] est utilisé -> donne le nombre de lignes modifiées
UPDATE ou rajoutées par INSERT ou ramenées par un SELECT*/
char sqlwarn[8];/*sqlwarn[0] 'W -> warning*/
sqlwarn[0] = '' /*-> pas de warning*/
sqlwarn[1] = 'W'/*-> troncation numérique ou char*/
sqlwarn[2] = 'W'/*-> valeur Null est ignore */
sqlwarn[3] = 'W'/*-> plus de champs dans SELECT que de variables pour recevoir*/
sqlwarn[4] = 'W'/*-> toutes les lignes d'une table sont touchées (par DELETE ou
UPDATE par exemple)*/
sqlwarn[5] /* inutilisé */
sqlwarn[6] = 'W'/*-> Oracle a dû exécuter un rollback */
sqlwarn[7] = 'W'/*-> la donnée ramenée par un FETCH a été modifié
depuis que la clause SELECT a été executé */
} sqlca;
:var_hote INDICATOR :indicateur
:var_hote :indicateur
\end{verbatim}
%\includepdf[pages=-]{MEMO.pdf}
\end{document}