SKAF#18202: Nieuwe thema's bij Facilitor Graphics en - CAD.

svn path=/Customer/trunk/; revision=14259

SKAF/skaf.sql

@@ -1,7 +1,7 @@
 -- Script containing customer specific configuration sql statements for SKAF
 -- (c) 2009 SG|facilitor bv
--- $Revision: 1 $
--- $Modtime: 3-03-10 15:38 $
+-- $Revision: 2 $
+-- $Modtime: 1-07-10 11:52 $
 --
 -- Support: +31 53 4800710
 
@@ -1926,6 +1926,69 @@ END;
 /
 
 
+--- 																						Facilitor Graphics / CAD 																		---
+
+
+CREATE OR REPLACE VIEW cad_v_thema_srtruimte (alg_ruimte_key, waarde, waarde_key)
+AS
+   SELECT r.alg_ruimte_key, sr.alg_srtruimte_omschrijving, r.alg_srtruimte_key
+     FROM alg_v_aanwezigruimte r, alg_srtruimte sr
+    WHERE r.alg_srtruimte_key = sr.alg_srtruimte_key(+);
+
+
+
+
+CREATE OR REPLACE VIEW cad_v_thema_vloersoort (alg_ruimte_key, waarde, waarde_key)
+AS
+   SELECT r.alg_ruimte_key,
+          va.fac_usrdata_omschr,
+          va.fac_usrdata_key
+     FROM alg_ruimte r,
+          (SELECT rr.alg_ruimte_key, ud.fac_usrdata_omschr, ud.fac_usrdata_key
+             FROM alg_onrgoedkenmerk ok,
+                  fac_usrdata ud,
+                  alg_refkenmerk rk,
+                  alg_kenmerk k,
+                  alg_v_aanwezigruimte rr
+            WHERE rk.fac_usrtab_key = ud.fac_usrtab_key
+              AND k.alg_refkenmerk_key = rk.alg_refkenmerk_key
+              AND TO_CHAR (ud.fac_usrdata_key) = ok.alg_onrgoedkenmerk_waarde
+              AND k.alg_kenmerk_key = 1020
+              AND rr.alg_ruimte_key = ok.alg_onrgoed_key) va
+    WHERE r.alg_ruimte_key = va.alg_ruimte_key (+);
+
+-- Stap 5b: Actie/trigger bij sleur+pleur van thema HV-divisie
+CREATE OR REPLACE TRIGGER uwva_t_thema_vloersoort_i_iu
+   INSTEAD OF INSERT OR UPDATE
+   ON cad_v_thema_vloersoort
+DECLARE
+
+BEGIN
+
+   			DELETE FROM alg_onrgoedkenmerk ok
+   			WHERE ok.alg_onrgoed_key = :new.alg_ruimte_key
+   			AND ok.alg_kenmerk_key = 1020
+   			AND ok.alg_onrgoed_niveau='R';
+   		
+   				--UPDATE alg_onrgoedkenmerk ok
+   				--SET ok.alg_onrgoedkenmerk_waarde = TO_CHAR(:new.waarde_key)
+   				--WHERE ok.alg_onrgoed_key = :new.alg_ruimte_key
+   				--AND ok.alg_kenmerk_key = 1020
+   				--AND ok.alg_onrgoed_niveau='R';
+		
+			INSERT INTO alg_onrgoedkenmerk (alg_onrgoed_key, alg_onrgoed_niveau, alg_kenmerk_key, alg_onrgoedkenmerk_waarde)
+			VALUES (:new.alg_ruimte_key, 'R', 1020, to_char(:new.waarde_key));
+	 EXCEPTION
+	    WHEN OTHERS
+	    THEN NULL;
+
+
+END;
+/
+
+
+
+
 
 commit;