* 14-04-1999 PF Syntaxfout (AS) en cad_v_alg_gebouw en cad_v_alg_locatie toegevoegd

svn path=/Database/trunk/; revision=6670

CAD/CAD_VIE.SRC

@@ -2,6 +2,7 @@
 
 /*  REVISIONS:
  *
+ * 14-04-1999 PF  Syntaxfout (AS) en cad_v_alg_gebouw en cad_v_alg_locatie toegevoegd
  * 13-04-1999 PF  DE LPN-views uitgebreid om Map-AlterProperties te ondersteunen.
  *                CAD_PRIVILEGE door NORMAAL_PRIVILEGE vervangen (nog onafh. module)
  *                Ook nog (alvast) de Views tbv de tooltip (LPN_xx_1 en LPN_xx_2) teogevoegd.
@@ -33,7 +34,7 @@ CREATE_VIEW(cad_v_cad_aanwezigtekening, NORMAAL_PRIVILEGE) AS
                                    FROM ins_discipline)
      OR C_T.ins_discipline_key IS NULL;
 
-CREATE_VIEW(cad_v_cad_tekening_gegevens, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_cad_tekening_gegevens, NORMAAL_PRIVILEGE) AS
    (cad_tekening_key,
     alg_locatie_key,
     alg_locatie_code,
@@ -80,7 +81,53 @@ CREATE_VIEW(cad_v_discipline, NORMAAL_PRIVILEGE) AS
  */
 
 #ifdef ALG
-CREATE_VIEW(cad_v_alg_gebouw, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_alg_locatie, NORMAAL_PRIVILEGE) AS
+  (alg_locatie_key,
+   alg_locatie_cadlabel,
+   alg_locatie_code
+) AS
+ SELECT L.alg_locatie_key,
+        L.alg_locatie_omschrijving,
+        L.alg_locatie_code
+ FROM alg_v_aanwezigLocatie L;
+/* Nog geen ToolTip views voor locatie */
+
+
+CREATE_VIEW(cad_v_alg_terreinsector, NORMAAL_PRIVILEGE) AS
+  (alg_terreinsector_key,
+   alg_terreinsector_cadlabel,
+   alg_terreinsector_code,
+   alg_terreinsector_omschrijving,
+   alg_terreinsector_oppervlak,
+   alg_terreinsector_omtrek
+) AS
+ SELECT T.alg_terreinsector_key,
+        T.alg_terreinsector_code,
+        T.alg_terreinsector_code,
+        T.alg_terreinsector_naam,
+        NVL(TO_CHAR(T.alg_terreinsector_oppervlak),'-')||' m2',
+        NVL(TO_CHAR(T.alg_terreinsector_omtrek),'-')||' m'
+ FROM alg_v_aanwezigterreinsector T;
+
+CREATE_VIEW(cad_v_lpn_alg_terreinsector_1, NORMAAL_PRIVILEGE) AS
+ SELECT T.alg_terreinsector_key,
+        'Oppervlakte' label,
+        NVL(TO_CHAR(T.alg_terreinsector_oppervlak),'-')||' m2' alg_terreinsector_oppervlak
+   FROM alg_v_aanwezigterreinsector T
+UNION
+ SELECT T.alg_terreinsector_key,
+        'Omtrek' label,
+        NVL(TO_CHAR(T.alg_terreinsector_omtrek),'-')||' m' alg_terreinsector_omtrek
+   FROM alg_v_aanwezigterreinsector T;
+
+CREATE_VIEW(cad_v_lpn_alg_terreinsector_2, NORMAAL_PRIVILEGE) AS
+ SELECT T.alg_terreinsector_key,
+        T.alg_terreinsector_code,
+        T.alg_terreinsector_naam
+ FROM alg_v_aanwezigterreinsector T;
+
+
+CREATE_VIEW(cad_v_alg_gebouw, NORMAAL_PRIVILEGE) AS
   (alg_gebouw_key,
    alg_gebouw_cadlabel,
    alg_gebouw_code,
@@ -97,7 +144,7 @@ CREATE_VIEW(cad_v_alg_gebouw, NORMAAL_PRIVILEGE)
  FROM alg_v_aanweziggebouw G, alg_srtgebouw SG
 WHERE SG.alg_srtgebouw_key=G.alg_srtgebouw_key;
 
-CREATE_VIEW(cad_v_lpn_alg_gebouw_1, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_lpn_alg_gebouw_1, NORMAAL_PRIVILEGE) AS
  SELECT G.alg_gebouw_key,
         'Oppervlakte' label,
         TO_CHAR(G.alg_gebouw_bruto_vloeropp)||' m2' alg_gebouw_bruto_vloeropp
@@ -108,13 +155,25 @@ UNION
         TO_CHAR(G.alg_gebouw_omtrek)||' m' alg_gebouw_omtrek
  FROM alg_v_aanweziggebouw G;
 
-CREATE_VIEW(cad_v_lpn_alg_gebouw_2, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_lpn_alg_gebouw_2, NORMAAL_PRIVILEGE) AS
  SELECT G.alg_gebouw_key,
         G.alg_gebouw_code,
         G.alg_gebouw_naam
  FROM alg_v_aanweziggebouw G;
 
-CREATE_VIEW(cad_v_alg_ruimte, NORMAAL_PRIVILEGE)
+
+CREATE_VIEW(cad_v_alg_verdieping, NORMAAL_PRIVILEGE) AS
+  (alg_verdieping_key,
+   alg_verdieping_cadlabel,
+   alg_verdieping_code
+) AS
+ SELECT V.alg_verdieping_key,
+        V.alg_verdieping_omschrijving,
+        V.alg_verdieping_volgnr
+ FROM alg_v_aanwezigverdieping V;
+/* Nog geen ToolTip views voor verdieping */
+
+CREATE_VIEW(cad_v_alg_ruimte, NORMAAL_PRIVILEGE) AS
   (alg_ruimte_key,
    alg_verdieping_key,
    alg_ruimte_cadlabel,
@@ -133,7 +192,7 @@ CREATE_VIEW(cad_v_alg_ruimte, NORMAAL_PRIVILEGE)
  FROM alg_v_aanwezigruimte R, alg_srtruimte SR
  WHERE SR.alg_srtruimte_key=R.alg_srtruimte_key;
 
-CREATE_VIEW(cad_v_lpn_alg_ruimte_1, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_lpn_alg_ruimte_1, NORMAAL_PRIVILEGE) AS
  SELECT R.alg_ruimte_key,
         'Oppervlakte' label,
         TO_CHAR(R.alg_ruimte_bruto_vloeropp)||' m2' alg_ruimte_bruto_vloeropp
@@ -144,45 +203,14 @@ UNION
         TO_CHAR(R.alg_ruimte_omtrek)||' m' alg_ruimte_omtrek
  FROM alg_v_aanwezigruimte R;
 
-CREATE_VIEW(cad_v_lpn_alg_ruimte_2, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_lpn_alg_ruimte_2, NORMAAL_PRIVILEGE) AS
  SELECT R.alg_ruimte_key,
         R.alg_ruimte_nr,
         R.alg_ruimte_omschrijving
  FROM alg_v_aanwezigruimte R;
 
-CREATE_VIEW(cad_v_alg_terreinsector, NORMAAL_PRIVILEGE)
-  (alg_terreinsector_key,
-   alg_terreinsector_cadlabel,
-   alg_terreinsector_code,
-   alg_terreinsector_omschrijving,
-   alg_terreinsector_oppervlak,
-   alg_terreinsector_omtrek
-) AS
- SELECT T.alg_terreinsector_key,
-        T.alg_terreinsector_code,
-        T.alg_terreinsector_code,
-        T.alg_terreinsector_naam,
-        NVL(TO_CHAR(T.alg_terreinsector_oppervlak),'-')||' m2',
-        NVL(TO_CHAR(T.alg_terreinsector_omtrek),'-')||' m'
- FROM alg_v_aanwezigterreinsector T;
-
-CREATE_VIEW(cad_v_lpn_alg_terreinsector_1, NORMAAL_PRIVILEGE)
- SELECT T.alg_terreinsector_key,
-        'Oppervlakte' label,
-        NVL(TO_CHAR(T.alg_terreinsector_oppervlak),'-')||' m2' alg_terreinsector_oppervlak
-   FROM alg_v_aanwezigterreinsector T
-UNION
- SELECT T.alg_terreinsector_key,
-        'Omtrek' label,
-        NVL(TO_CHAR(T.alg_terreinsector_omtrek),'-')||' m' alg_terreinsector_omtrek
-   FROM alg_v_aanwezigterreinsector T;
-
-CREATE_VIEW(cad_v_lpn_alg_terreinsector_2, NORMAAL_PRIVILEGE)
- SELECT T.alg_terreinsector_key,
-        T.alg_terreinsector_code,
-        T.alg_terreinsector_naam
- FROM alg_v_aanwezigterreinsector T;
 #endif //ALG
+
  
 /* View met ALLE tekeningen, ongeacht de autorisatie; minimale kolommen, gebruikt in CAD_PAC.SRC */
 CREATE_VIEW(cad_v_cad_tekening, NORMAAL_PRIVILEGE) AS
@@ -200,7 +228,7 @@ CREATE_VIEW(cad_v_cad_tekening, NORMAAL_PRIVILEGE) AS
  */
 #ifdef AKZ
 /* voor AKZ wordt alleen het laatste stuk van de omschrijving gebruikt */
-CREATE_VIEW(cad_v_ins_deel, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_ins_deel, NORMAAL_PRIVILEGE) AS
   (ins_deel_key,
    ins_deel_cadlabel,
    ins_srtdeel_omschrijving,
@@ -234,7 +262,7 @@ UNION
   WHERE SD.ins_srtdeel_key=D.ins_srtdeel_key
     AND SD.ins_srtdeel_dimensie=2; 
 #else
-CREATE_VIEW(cad_v_ins_deel, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_ins_deel, NORMAAL_PRIVILEGE) AS
   (ins_deel_key,
    ins_deel_cadlabel,
    ins_srtdeel_omschrijving,
@@ -269,7 +297,7 @@ UNION
     AND SD.ins_srtdeel_dimensie=2; 
 #endif // AKZ
 
-CREATE_VIEW(cad_v_lpn_ins_deel_1, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_lpn_ins_deel_1, NORMAAL_PRIVILEGE) AS
 SELECT
   D.ins_deel_key,
   ins_srtkenmerk_omschrijving,
@@ -283,7 +311,7 @@ WHERE SK.ins_srtkenmerk_key=K.ins_srtkenmerk_key
   AND K.ins_kenmerk_key=KD.ins_kenmerk_key
   AND KD.ins_deel_key=D.ins_deel_key
 
-CREATE_VIEW(cad_v_lpn_ins_deel_2, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_lpn_ins_deel_2, NORMAAL_PRIVILEGE) AS
 SELECT
   D.ins_deel_key,
   SD.ins_srtdeel_omschrijving,
@@ -296,7 +324,7 @@ WHERE D.ins_srtdeel_key = SD.ins_srtdeel_key;
 
 
 #ifdef PRS
-CREATE_VIEW(cad_v_prs_werkplek, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_prs_werkplek, NORMAAL_PRIVILEGE) AS
   (prs_werkplek_key,
    prs_werkplek_cadlabel,
    prs_werkplek_volgnr,
@@ -310,13 +338,13 @@ CREATE_VIEW(cad_v_prs_werkplek, NORMAAL_PRIVILEGE)
         W.prs_werkplek_opp   /* Alleen een waarde indien prs_werkplek_vastopp 1 is, anders te traag? */
    FROM prs_v_aanwezigwerkplek W;
 
-CREATE_VIEW(cad_v_lpn_prs_werkplek_1, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_lpn_prs_werkplek_1, NORMAAL_PRIVILEGE) AS
  SELECT W.prs_werkplek_key,
         prs_afd_perslid_naam,
         TO_CHAR(W.prs_perslidwerkplek_bezetting)||' %' prs_perslidwerkplek_bezetting2
    FROM prs_v_perslidwerkplek_gegevens W;
 
-CREATE_VIEW(cad_v_lpn_prs_werkplek_2, NORMAAL_PRIVILEGE)
+CREATE_VIEW(cad_v_lpn_prs_werkplek_2, NORMAAL_PRIVILEGE) AS
  SELECT W.prs_werkplek_key,
         W.prs_werkplek_volgnr,
         W.prs_werkplek_omschrijving,