Gestiongeo devis

schema/geogestion/declencheurs/creation_trigger _a_id_ta_gg_dossier_devis.sql

@@ -0,0 +1,53 @@
+-- Trigger de mise à jour de la table TA_GG_DOSSIER_DEVIS
+
+/*
+A_I_TA_GG_DOSSIER_DEVIS : Création du déclencheur TA_GG_DOSSIER_DEVIS permettant d'insérer dans la table les longueurs de voies par type intersecté par un dossier
+après la création d'un dossier et de sa géométrie dans les tables TA_GG_DOSSIER et TA_GG_GEO.
+supprimer également les lignes concernant un dossier si celui-ci est supprimé.
+*/
+
+CREATE OR REPLACE TRIGGER A_I_TA_GG_DOSSIER_DEVIS
+AFTER INSERT OR DELETE ON G_GESTIONGEO.TA_GG_DOSSIER
+FOR EACH ROW
+BEGIN
+    /*
+    Objectif : ce trigger à pour objectif d'insérer dans la table TA_GG_DOSSIER_DEVIS les longueurs totales des voies intersectées par un dossier
+    */
+    IF INSERTING THEN
+        -- insertion des longueurs des voies de type A
+        INSERT INTO G_GESTIONGEO.TA_GG_DOSSIER_DEVIS(numero_dossier,type_voie)
+        VALUES(:new.objectid,13);
+
+        -- insertion des longueurs des voies de type B
+        INSERT INTO G_GESTIONGEO.TA_GG_DOSSIER_DEVIS(numero_dossier,type_voie)
+        VALUES(:new.objectid,14);
+
+        -- insertion des longueurs des voies de type C
+        INSERT INTO G_GESTIONGEO.TA_GG_DOSSIER_DEVIS(numero_dossier,type_voie)
+        VALUES(:new.objectid,15);
+
+        -- insertion des longueurs des voies de type D
+        INSERT INTO G_GESTIONGEO.TA_GG_DOSSIER_DEVIS(numero_dossier,type_voie)
+        VALUES(:new.objectid,16);
+
+        -- insertion des longueurs des voies de type E
+        INSERT INTO G_GESTIONGEO.TA_GG_DOSSIER_DEVIS(numero_dossier,type_voie)
+        VALUES(:new.objectid,17);
+
+        -- insertion des longueurs des voies de type X
+        INSERT INTO G_GESTIONGEO.TA_GG_DOSSIER_DEVIS(numero_dossier,type_voie)
+        VALUES(:new.objectid,18);
+
+    END IF;
+
+    IF DELETING THEN
+        DELETE FROM G_GESTIONGEO.TA_GG_DOSSIER_DEVIS WHERE numero_dossier = :old.objectid;
+
+    END IF;
+
+EXCEPTION
+    WHEN OTHERS THEN
+        mail.sendmail('[email protected]',SQLERRM,'ERREUR TRIGGER G_GESTIONGEO.A_I_TA_GG_DOSSIER_DEVIS','[email protected]');
+END;
+
+/

schema/geogestion/fonctions/creation_fonction_get _longueur_voie_type_voie.sql

@@ -0,0 +1,44 @@
+/*
+La fonction GET_LONGUEUR_TYPE_VOIE a pour objectif de calculer la somme des longueurs d'un type de voie intersecté par un dossier de l'application gestiongeo. Les types de voies considérés sont ceux définis dans la table SIREO.OUT_CLAS_TRAF
+deux parametres:
+v_dossier : le numéro de dossier
+v_voie : le type de voie (clé primaire de la table TA_GG_LIBELLE)
+*/
+
+create or replace FUNCTION GET_LONGUEUR_TYPE_VOIE(v_dossier NUMBER, v_voie char) RETURN NUMBER
+
+DETERMINISTIC
+AS
+v_longueur NUMBER(38,2);
+BEGIN
+    SELECT
+    -- Selection de la sommes des longueurs des troncons contenus dans la table SIREO_LEC.OUT_CLAS_TRAF, intersectés par le perimetre d'un dossier contenu dans la table G_GESTIONGEO.TA_GG_GEO.
+        ROUND(
+            SUM(
+                SDO_GEOM.SDO_LENGTH(
+                                    SDO_GEOM.SDO_INTERSECTION(SDO_LRS.CONVERT_TO_STD_GEOM(a.geom), j.geom ,0.005), 
+                                    0.005, 'unit=M'
+                                    )
+                ),2
+            )INTO V_LONGUEUR
+    FROM
+        SIREO_LEC.OUT_CLAS_TRAF a
+        INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE_COURT b ON upper(b.valeur) = upper(a.CODE_CLASTRF)
+        INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE c ON c.fid_libelle_court = b.objectid
+        INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE d ON d.objectid = c.fid_libelle,
+        G_GESTIONGEO.TA_GG_GEO j
+        INNER JOIN G_GESTIONGEO.TA_GG_DOSSIER k ON k.fid_perimetre = j.objectid
+    -- Restriction suivant les paramètres indiqués lors de l'appel de la fonction.
+    WHERE
+        k.objectid = v_dossier
+        AND d.objectid = v_voie
+        AND SDO_ANYINTERACT(a.geom,j.geom)='TRUE'
+    -- Regroupement des longueurs suivant le type de voie et le dossier
+        GROUP BY a.CODE_CLASTRF, k.objectid
+        ORDER BY a.CODE_CLASTRF
+        ;
+RETURN v_longueur;
+EXCEPTION
+    WHEN NO_DATA_FOUND THEN
+        RETURN '00000';
+END GET_LONGUEUR_TYPE_VOIE;

schema/geogestion/fonctions/creation_fonction_get_devis_type_voie.sql

@@ -0,0 +1,62 @@
+/*
+La fonction GET_DEVIS_TYPE_VOIE a pour objectif de fournir le cout d'un relevé d'un type de voie sur un dossier de l'application GestionGeo.
+deux parametres:
+v_dossier : le numéro de dossier
+v_voie : le type de voie (clé primaire de la table TA_GG_LIBELLE)
+*/
+
+create or replace FUNCTION GET_DEVIS_TYPE_VOIE(v_dossier NUMBER, v_voie char) RETURN NUMBER
+
+DETERMINISTIC
+AS
+v_devis NUMBER(38,2);
+BEGIN
+WITH CTE AS
+    (
+    SELECT
+    -- Selection de la sommes des longueurs des troncons contenus dans la table SIREO_LEC.OUT_CLAS_TRAF, intersectés par le perimetre d'un dossier contenu dans la table G_GESTIONGEO.TA_GG_GEO.        c.objectid AS NUMERO_DOSSIER,
+        ROUND(
+            SUM(
+                SDO_GEOM.SDO_LENGTH(
+                                    SDO_GEOM.SDO_INTERSECTION(SDO_LRS.CONVERT_TO_STD_GEOM(a.geom), j.geom ,0.005), 
+                                    0.005, 'unit=M'
+                                    )
+                ),2
+            ) as L,
+        d.objectid AS type_voie
+    FROM
+        SIREO_LEC.OUT_CLAS_TRAF a
+        INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE_COURT b ON upper(b.valeur) = upper(a.CODE_CLASTRF)
+        INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE c ON c.fid_libelle_court = b.objectid
+        INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE d ON d.objectid = c.fid_libelle,
+        G_GESTIONGEO.TA_GG_GEO j
+        INNER JOIN G_GESTIONGEO.TA_GG_DOSSIER k ON k.fid_perimetre = j.objectid
+    WHERE
+    -- Restriction suivant les paramètres indiqués lors de l'appel de la fonction.
+        k.objectid = v_dossier
+        AND d.objectid = v_voie
+        AND SDO_ANYINTERACT(a.geom,j.geom)='TRUE'
+    -- Regroupement des longueurs suivant le type de voie et le dossier
+        GROUP BY a.CODE_CLASTRF, c.objectid, d.objectid
+        ORDER BY a.CODE_CLASTRF
+    )
+    -- Calcul du devis pour le type de voie considéré sur le dossier considéré à l'aide des prix contenu dans la table G_GESTIONGEO.TA_GG_PRIX.
+SELECT
+    l*a.prix/100 into v_devis
+FROM
+    G_GESTIONGEO.TA_GG_PRIX a
+    INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE b ON b.objectid = a.fid_libelle
+    INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE c ON c.fid_libelle = b.objectid
+    INNER JOIN G_GESTIONGEO.TA_GG_LIBELLE_COURT d ON d.objectid = c.fid_libelle_court
+    INNER JOIN G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE e ON e.fid_libelle = b.objectid
+    INNER JOIN G_GESTIONGEO.TA_GG_FAMILLE f ON f.objectid = e.fid_famille
+    INNER JOIN CTE ON CTE.type_voie = a.fid_libelle
+WHERE
+    f.objectid = 25
+;
+
+RETURN v_devis;
+EXCEPTION
+    WHEN NO_DATA_FOUND THEN
+        RETURN '0';
+END GET_DEVIS_TYPE_VOIE;

schema/geogestion/tables/creation_ta_gg_dossier_devis.sql

@@ -0,0 +1,55 @@
+-- 1. TA_GG_DOSSIER_DEVIS
+-- Creation de la table TA_GG_DOSSIER_DEVIS
+-- Recapitule pour chaque dossier la longueur de chaque type de voie (selon la table SIREO.OUT_CLAS_TRAF) intersectée et le cout estimé du relevé de cette longueur.
+
+
+-- 1.1. Creation de la table.
+CREATE TABLE G_GESTIONGEO.TA_GG_DOSSIER_DEVIS
+  (
+    OBJECTID NUMBER(38,0) GENERATED ALWAYS AS IDENTITY START WITH 1 INCREMENT BY 1, 
+    NUMERO_DOSSIER NUMBER(38,0), 
+    TYPE_VOIE NUMBER(38,0),
+    LONGUEUR_VOIE NUMBER(38,2) AS (GET_LONGUEUR_TYPE_VOIE(numero_dossier, type_voie)),
+    DEVIS NUMBER(38,2) AS (GET_DEVIS_TYPE_VOIE(numero_dossier, type_voie))
+  );
+
+-- 1.2. Les contraintes
+-- 1.2.1. Contrainte de clé primaire
+ALTER TABLE G_GESTIONGEO.TA_GG_DOSSIER_DEVIS
+ADD CONSTRAINT TA_GG_DOSSIER_DEVIS_PK
+PRIMARY KEY("OBJECTID")
+USING INDEX TABLESPACE G_ADT_INDX;
+
+-- 1.2.2. Contrainte unicité
+ALTER TABLE G_GESTIONGEO.TA_GG_DOSSIER_DEVIS
+ADD CONSTRAINT TA_GG_DOSSIER_DEVIS_NUMERO_DOSSIER_TYPE_VOIE_UNIQUE UNIQUE("NUMERO_DOSSIER", "TYPE_VOIE");
+
+-- 1.2.3. Contraintes de clé étrangère
+-- 1.2.3.1. Clé étrangère sur le champ NUMERO DOSSIER
+ALTER TABLE G_GESTIONGEO.TA_GG_DOSSIER_DEVIS
+ADD CONSTRAINT TA_GG_DOSSIER_DEVIS_NUMERO_DOSSIER_FK
+FOREIGN KEY("NUMERO_DOSSIER")
+REFERENCES G_GESTIONGEO.TA_GG_DOSSIER("OBJECTID");
+
+
+-- 1.2.3.2. Clé étrangère sur le champ TYPE_VOIE
+ALTER TABLE G_GESTIONGEO.TA_GG_DOSSIER_DEVIS
+ADD CONSTRAINT TA_GG_DOSSIER_DEVIS_TYPE_VOIE_FK
+FOREIGN KEY("TYPE_VOIE")
+REFERENCES G_GESTIONGEO.TA_GG_LIBELLE("OBJECTID");
+
+
+-- 1.3. Commentaire de la table
+COMMENT ON TABLE G_GESTIONGEO.TA_GG_DOSSIER_DEVIS  IS 'devis estimé du relevé d''un dossier par type de voie de l''application GestionGeo';
+
+
+-- 1.4. Commentaire des champs
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_DOSSIER_DEVIS.OBJECTID IS 'Clé primaire de la vue.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_DOSSIER_DEVIS.NUMERO_DOSSIER IS 'Numéro du dossier considéré, clé étrangère vers la table TA_GG_DOSSIER';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_DOSSIER_DEVIS.TYPE_VOIE IS 'Type de voie à relevé en terme de traffic clé étrangère vers la table TA_GG_LIBELLE';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_DOSSIER_DEVIS.LONGUEUR_VOIE IS 'Longueur de voie estimée à relever en hectomètre';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_DOSSIER_DEVIS.DEVIS IS 'Prix du devis selon le type de voie et le dossier';
+
+-- 1.5. Droits
+GRANT SELECT, UPDATE, INSERT, DELETE ON G_GESTIONGEO.TA_GG_DOSSIER_DEVIS TO G_GESTIONGEO_MAJ;
+GRANT SELECT ON G_GESTIONGEO.TA_GG_DOSSIER_DEVIS TO G_GESTIONGEO_LEC;

schema/geogestion/tables/creation_ta_gg_famille_libelle.sql

@@ -0,0 +1,51 @@
+/*
+TA_GG_FAMILLE_LIBELLE: Table de relation entre les tables TA_LIBELLE et TA_FAMILLE afin d'associer à chaque libelle à sa famille.
+*/
+
+-- 1.1. Création de la table
+CREATE TABLE G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE(
+    objectid NUMBER(38,0) GENERATED BY DEFAULT AS IDENTITY,
+    fid_famille NUMBER(38,0) NOT NULL,
+    fid_libelle NUMBER(38,0) NOT NULL
+);
+
+-- 1.2. Création des commentaires
+COMMENT ON TABLE G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE IS 'Table contenant les identifiant des tables TA_GG_LIBELLE et TA_GG_FAMILLE permettant de joindre le libellé à sa famille.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE.objectid IS 'Identifiant de chaque ligne.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE.fid_famille IS 'Identifiant de chaque famille de libellés - FK de la table TA_GG_FAMILLE.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE.fid_libelle IS 'Identifiant de chaque libelle - FK de la table TA_GG_LIBELLE.';
+
+-- 1.3. Création de la clé primaire
+ALTER TABLE G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE
+ADD CONSTRAINT TA_GG_FAMILLE_LIBELLE_PK 
+PRIMARY KEY("OBJECTID")
+USING INDEX TABLESPACE "G_ADT_INDX";
+
+-- 1.4. Création des clés étrangères
+-- 1.4.1. Vers la table TA_GG_FAMILLE
+ALTER TABLE G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE
+ADD CONSTRAINT TA_GG_FAMILLE_LIBELLE_FID_FAMILLE_FK
+FOREIGN KEY("FID_FAMILLE")
+REFERENCES G_GESTIONGEO.TA_GG_FAMILLE(objectid);
+
+-- 1.4.2. Vers la table TA_GG_LIBELLE
+ALTER TABLE G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE
+ADD CONSTRAINT TA_GG_FAMILLE_LIBELLE_FID_LIBELLE_FK
+FOREIGN KEY("FID_LIBELLE")
+REFERENCES G_GESTIONGEO.TA_GG_LIBELLE(objectid);
+
+-- 1.5. Création de l'index de la clé étrangère
+CREATE INDEX TA_GG_FAMILLE_LIBELLE_FID_FAMILLE_IDX ON TA_GG_FAMILLE_LIBELLE(fid_famille)
+TABLESPACE G_ADT_INDX;
+
+CREATE INDEX TA_GG_FAMILLE_LIBELLE_FID_LIBELLE_IDX ON TA_GG_FAMILLE_LIBELLE(fid_libelle)
+TABLESPACE G_ADT_INDX;
+
+-- 1.6. Un libelle ne peut pas avoir deux fois la meme famille
+ALTER TABLE G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE 
+ADD CONSTRAINT TA_GG_FAMILLE_LIBELLE_FID_FAMILLE_FID_LIBELLE_UNIQUE
+UNIQUE (FID_FAMILLE,FID_LIBELLE);
+
+-- 1.5. Droits
+GRANT SELECT, UPDATE, INSERT, DELETE ON G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE TO G_GESTIONGEO_MAJ;
+GRANT SELECT ON G_GESTIONGEO.TA_GG_FAMILLE_LIBELLE TO G_GESTIONGEO_LEC;

schema/geogestion/tables/creation_ta_gg_libelle.sql

@@ -0,0 +1,31 @@
+/*
+TA_GG_LIBELLE: Contient les identiants des libelles utilisés dans le schéma G_GESTIONGEO.
+*/
+
+-- 1.1. Création de la table
+CREATE TABLE G_GESTIONGEO.TA_GG_LIBELLE(
+    objectid NUMBER(38,0) GENERATED BY DEFAULT AS IDENTITY,
+    fid_libelle_long NUMBER(38,0) NOT NULL
+);
+
+-- 1.2. Création des commentaires
+COMMENT ON TABLE G_GESTIONGEO.TA_GG_LIBELLE IS 'Table listant les libelles utilisés dans le schéma G_GESTIONGEO.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_LIBELLE.objectid IS 'Identifiant de chaque libelle.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_LIBELLE.fid_libelle_long IS 'Clé étrangère vers la table TA_GG_LIBELLE_LONG';
+
+-- 1.3. Création de la clé primaire
+ALTER TABLE G_GESTIONGEO.TA_GG_LIBELLE
+ADD CONSTRAINT TA_GG_LIBELLE_PK 
+PRIMARY KEY("OBJECTID")
+USING INDEX TABLESPACE "G_ADT_INDX";
+
+-- 1.4. Création des clés étrangères
+-- Vers la table TA_GG_LIBELLE_LONG
+ALTER TABLE G_GESTIONGEO.TA_GG_LIBELLE
+ADD CONSTRAINT TA_TA_GG_LIBELLE_FID_LIBELLE_LONG_FK
+FOREIGN KEY(FID_LIBELLE_LONG)
+REFERENCES G_GESTIONGEO.TA_GG_LIBELLE_LONG(objectid);
+
+-- 1.5. Droits
+GRANT SELECT, UPDATE, INSERT, DELETE ON G_GESTIONGEO.TA_GG_LIBELLE TO G_GESTIONGEO_MAJ;
+GRANT SELECT ON G_GESTIONGEO.TA_GG_LIBELLE TO G_GESTIONGEO_LEC;

schema/geogestion/tables/creation_ta_gg_libelle_correspondance.sql

@@ -0,0 +1,53 @@
+/*
+TA_GG_LIBELLE_CORRESPONDANCE: Table de correspondance pour associé à chaque libelle son libelles courts.
+*/
+
+-- 1. Creation de la table TA_GG_LIBELLE_CORRESPONDANCE
+-- 1.1. Création de la table
+CREATE TABLE G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE(
+    objectid NUMBER(38,0) GENERATED BY DEFAULT AS IDENTITY,
+    fid_libelle NUMBER(38,0) NOT NULL,
+    fid_libelle_court NUMBER(38,0) NOT NULL
+);
+
+-- 1.2. Création des commentaires
+COMMENT ON TABLE G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE IS 'Table contenant les identifiants des tables TA_GG_LIBELLE et TA_GG_LIBELLE_COURT, permettant de joindre les libelles à leur libellés courts.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE.objectid IS 'clé primaire de la table TA_GG_LIBELLE_CORRESPONDANCE.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE.fid_libelle IS 'Identifiant des libelles - FK de la table TA_GG_LIBELLE.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE.fid_libelle_court IS 'Identifiant de chaque LIBELLE court - FK de la table TA_GG_LIBELLE_COURT.';
+
+-- 1.3. Création de la clé primaire
+ALTER TABLE G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE
+ADD CONSTRAINT TA_GG_LIBELLE_CORRESPONDANCE_PK 
+PRIMARY KEY("OBJECTID")
+USING INDEX TABLESPACE "G_ADT_INDX";
+
+-- 1.4. Création des clés étrangères
+-- 1.4.1. Vers la table TA_GG_LIBELLE
+ALTER TABLE G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE
+ADD CONSTRAINT TA_GG_LIBELLE_CORRESPONDANCE_FID_LIBELLE_FK
+FOREIGN KEY("FID_LIBELLE")
+REFERENCES G_GESTIONGEO.TA_GG_LIBELLE(objectid);
+
+-- 1.4.2. Vers la table TA_GG_LIBELLE_COURT
+ALTER TABLE G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE
+ADD CONSTRAINT TA_GG_LIBELLE_CORRESPONDANCE_FID_LIBELLE_COURT_FK
+FOREIGN KEY("FID_LIBELLE_COURT")
+REFERENCES G_GESTIONGEO.TA_GG_LIBELLE_COURT(objectid);
+
+
+-- 1.5. Création de l'index de la clé étrangère
+CREATE INDEX TA_GG_LIBELLE_CORRESPONDANCE_FID_LIBELLE_IDX ON TA_GG_LIBELLE_CORRESPONDANCE(fid_libelle)
+TABLESPACE G_ADT_INDX;
+
+CREATE INDEX TA_GG_LIBELLE_CORRESPONDANCE_FID_LIBELLE_COURT_IDX ON TA_GG_LIBELLE_CORRESPONDANCE(fid_libelle_court)
+TABLESPACE G_ADT_INDX;
+
+-- 1.6. Un libelle ne peut pas avoir deux fois la meme libelle court
+ALTER TABLE G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE 
+ADD CONSTRAINT TA_GG_LIBELLE_CORRESPONDANCE_FID_LIBELLE_FID_LIBELLE_COURT_UNIQUE
+UNIQUE (FID_LIBELLE,FID_LIBELLE_COURT);
+
+-- 1.7. Droits
+GRANT SELECT, UPDATE, INSERT, DELETE ON G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE TO G_GESTIONGEO_MAJ;
+GRANT SELECT ON G_GESTIONGEO.TA_GG_LIBELLE_CORRESPONDANCE TO G_GESTIONGEO_LEC;

schema/geogestion/tables/creation_ta_gg_libelle_court.sql

@@ -0,0 +1,24 @@
+/*
+TA_GG_LIBELLE_COURT: Table qui contient les libelles courts utilisés par les objets du schéma G_GESTIONGEO
+*/
+
+-- 1.1. Création de la table
+CREATE TABLE G_GESTIONGEO.TA_GG_LIBELLE_COURT(
+    objectid NUMBER(38,0) GENERATED BY DEFAULT AS IDENTITY,
+    valeur VARCHAR2(255) NOT NULL
+);
+
+-- 1.2. Création des commentaires
+COMMENT ON TABLE G_GESTIONGEO.TA_GG_LIBELLE_COURT IS 'Table regroupant les libelles courts pouvant être pris par les libelles du schéma G_GESTIONGEO.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_LIBELLE_COURT.objectid IS 'Clé primaire de la table TA_GG_LIBELLE_COURT.';
+COMMENT ON COLUMN G_GESTIONGEO.TA_GG_LIBELLE_COURT.valeur IS 'Libelle court pouvant être prises par les libelles du schéma G_GESTIONGEO.';
+
+-- 1.3. Création de la clé primaire
+ALTER TABLE G_GESTIONGEO.TA_GG_LIBELLE_COURT
+ADD CONSTRAINT TA_GG_LIBELLE_COURT_PK 
+PRIMARY KEY("OBJECTID")
+USING INDEX TABLESPACE "G_ADT_INDX";
+
+-- 1.4. Droits
+GRANT SELECT, UPDATE, INSERT, DELETE ON G_GESTIONGEO.TA_GG_LIBELLE_COURT TO G_GESTIONGEO_MAJ;
+GRANT SELECT ON G_GESTIONGEO.TA_GG_LIBELLE_COURT TO G_GESTIONGEO_LEC;