Exercice : Des voitures et des hommes de collection II [Tables d'objets en relationnel-objet sous Oracle]

[30 minutes]

Soit le diagramme de classe UML et le MLD en RO suivants :

CTRL+C pour copier, CTRL+V pour coller

Type Personne : <
  nom:string,
  ddn:date,
  =age():entier
>
tPersonne de Personne (#nom)
Type Conducteur : <
  nom:string,
  ddn:date,
  typePermis:{A,B,E},
  datePermis:date
  =age():entier
>
tConducteur de Conducteur (#nom)
Type RefConducteur : <refConducteur =>o tConducteur>
Type ListeRefConducteur : collection de <RefConducteur>
Type Voiture : <
  type:string,
  marque:string,
  nbPortes:integer,
  puissance:integer,
  refPropriétaire =>o tPersonne,
  refConducteurs:ListeRefConducteur
>
tVoiture de Voiture (#type, #marque)

Type Personne : <
  nom:string,
  ddn:date,
  =age():entier
>
tPersonne de Personne (#nom)

Type Conducteur : <
  nom:string,
  ddn:date,
  typePermis:{A,B,E},
  datePermis:date
  =age():entier
>
tConducteur de Conducteur (#nom)

Type RefConducteur : <refConducteur =>o tConducteur>
Type ListeRefConducteur : collection de <RefConducteur>

Type Voiture : <
  type:string,
  marque:string,
  nbPortes:integer,
  puissance:integer,
  refPropriétaire =>o tPersonne,
  refConducteurs:ListeRefConducteur
>
tVoiture de Voiture (#type, #marque)

Question

Proposer une implémentation sous Oracle de votre modèle logique (sans implémenter les méthodes et sans utiliser l'héritage de type).

Solution

num. | Ligne | texte | copie |

CTRL+C pour copier, CTRL+V pour coller

CREATE OR REPLACE TYPE Personne AS OBJECT (
  nom varchar(20),
  ddn date,
  MEMBER FUNCTION age RETURN number
);
/
CREATE TABLE tPersonne OF Personne (
  PRIMARY KEY (nom)
);
CREATE OR REPLACE TYPE Conducteur AS OBJECT(
  nom varchar(20),
  ddn date,
  typePermis char(1),
  datePermis date,
  MEMBER FUNCTION age RETURN number  
);
/
CREATE TABLE tConducteur OF Conducteur (
  PRIMARY KEY (nom),
  CHECK (typePermis IN ('A','B','E'))
);
CREATE OR REPLACE TYPE RefConducteur AS OBJECT (refConducteur REF Conducteur);
/
CREATE OR REPLACE TYPE ListeRefConducteur AS TABLE OF RefConducteur;
/
CREATE OR REPLACE TYPE Voiture AS OBJECT (
  type varchar(20),
  marque varchar(20),
  nbPortes number,
  puissance number,
  refProprietaire REF Personne,
  refConducteurs ListeRefConducteur
);
/
CREATE TABLE tVoiture OF Voiture (
  PRIMARY KEY (type, marque),
  SCOPE FOR (refProprietaire) IS tPersonne
)
NESTED TABLE refConducteurs STORE AS ntRefConducteurs;

CREATE OR REPLACE TYPE Personne AS OBJECT (
  nom varchar(20),
  ddn date,
  MEMBER FUNCTION age RETURN number
);
/
CREATE TABLE tPersonne OF Personne (
  PRIMARY KEY (nom)
);

CREATE OR REPLACE TYPE Conducteur AS OBJECT(
  nom varchar(20),
  ddn date,
  typePermis char(1),
  datePermis date,
  MEMBER FUNCTION age RETURN number  
);
/
CREATE TABLE tConducteur OF Conducteur (
  PRIMARY KEY (nom),
  CHECK (typePermis IN ('A','B','E'))
);

CREATE OR REPLACE TYPE RefConducteur AS OBJECT (refConducteur REF Conducteur);
/
CREATE OR REPLACE TYPE ListeRefConducteur AS TABLE OF RefConducteur;
/
CREATE OR REPLACE TYPE Voiture AS OBJECT (
  type varchar(20),
  marque varchar(20),
  nbPortes number,
  puissance number,
  refProprietaire REF Personne,
  refConducteurs ListeRefConducteur
);
/
CREATE TABLE tVoiture OF Voiture (
  PRIMARY KEY (type, marque),
  SCOPE FOR (refProprietaire) IS tPersonne
)
NESTED TABLE refConducteurs STORE AS ntRefConducteurs;

Remarque :

On notera que le choix d'implémentation de fkConducteurs en collection de références à des OID nous empêche dans l'implémentation sous Oracle de définir le SCOPE FOR et donc de contraindre l'intégrité référentielle à la table tConducteur. Dans le cas présent ce n'est pas préjudiciable dans la mesure où seule la table tConducteur contient des objets Conducteur.

Question

Insérer une voiture, un propriétaire et deux conducteurs dans le base de données.

Solution

Question

Afficher toutes les voitures avec les personnes qui les possèdent et les conduisent.