Changeset 324 for Version-0.8/import/alkis-functions.sql

Timestamp:

08/28/14 11:29:21 (10 years ago)

Author:

frank.jaeger

Message:

Beginn der Umstellung von Datenbank-Schema und Views.
Noch nicht ausgetestet.
Programme noch nicht umgestellt.

File:

• Version-0.8/import/alkis-functions.sql (modified) (3 diffs)

Version-0.8/import/alkis-functions.sql

@@ -12 +12 @@
 --             statt dessen verwenden der "import_id" um alte Relationen zu identifizieren und zu löschen.
 
+-- 2014-08-27: Angleichung des Datenbank-Schema an die NorBIT-Version.
+--             Die Trigger-Function "delete_feature_kill()" arbeitet falsch, wenn "gml_id" als "character varying" angelegt ist.
+--             Das Format war bisher charachter(16).
+--             Zugriff auf die Spalte gml_id umgestellt von "=" auf "like" um den individuellen Timestamp zu ignorieren.
 
 -- Table/View/Sequence löschen, wenn vorhanden
@@ -379 +383 @@
 -- "delete" und "replace" verarbeiten (OHNE Historie). Historische Objekte werden sofort gelöscht.
 -- Geaendert 2014-02-03 auf Vorschlag M.B. Krs. Unna
+
+/*
+
+-- Diese Version arbeitet nur korrekt, wenn die Spalte gml_id im Format "character(16)" angelegt ist.
+
 CREATE OR REPLACE FUNCTION delete_feature_kill() RETURNS TRIGGER AS $$
 DECLARE
@@ -417 +426 @@
 $$ LANGUAGE plpgsql;
 
+*/
+
+-- 2014-08-27: Anpassung an vereinheitlichtes Datenbank-Schema.
+-- Wenn die Spalte gml_id im Format "character varying" (ohne LÀngenbegrenzung) angelegt wird,
+-- muss gezielt der ID-Teil vor dem Timestamp angesprochen werden.
+-- Zugriff auf die Spalte gml_id umgestellt von "=" auf "like".
+CREATE OR REPLACE FUNCTION delete_feature_kill() RETURNS TRIGGER AS $$
+DECLARE
+        query TEXT;
+        begsql TEXT;
+        aktbeg TEXT;
+        gml_id TEXT;
+        query_bez TEXT;
+BEGIN
+        NEW.typename := lower(NEW.typename); -- Objektart = Tabellen-Name
+        NEW.context := lower(NEW.context);   -- Operation 'delete', 'replace' oder 'update'
+        gml_id      := substr(NEW.featureid, 1, 16); -- ID-Teil der gml_id, ggf. anhÀngender Timestamp abgeschnitten
+
+        IF NEW.context IS NULL THEN
+                NEW.context := 'delete'; -- default
+        END IF;
+
+        IF NEW.context='delete' THEN -- ersatzloses Löschen des Objektes
+
+          -- In der Objekt-Tabelle
+                EXECUTE 'DELETE FROM ' || NEW.typename || ' WHERE gml_id like ''' || gml_id || '%''';
+ 
+         -- Beziehungen von und zu dem Objekt sind hinfaellig (zukÃŒnftig entfallend)
+                EXECUTE 'DELETE FROM alkis_beziehungen WHERE beziehung_von = ''' || gml_id || ''' OR beziehung_zu = ''' || gml_id || '''';
+
+                --RAISE NOTICE 'Lösche gml_id % in % und Beziehungen', gml_id, NEW.typename;
+
+        ELSE -- Ersetzen eines Objektes (Replace). In der Objekt-Tabelle sind jetzt bereits 2 Objekte vorhanden (alt und neu).
+
+                -- beginnt-Wert des aktuellen Objektes ermitteln
+                begsql := 'SELECT max(beginnt) FROM ' || NEW.typename || ' WHERE gml_id like ''' || substr(NEW.replacedBy, 1, 16) || '%'' AND endet IS NULL';
+                EXECUTE begsql INTO aktbeg;
+
+                -- Alte Objekte entfernen
+                EXECUTE 'DELETE FROM ' || NEW.typename || ' WHERE gml_id like ''' || gml_id || '%'' AND beginnt < ''' || aktbeg || '''';
+
+                -- Beziehungen des alten Objektes entfernen, die aus frÃŒheren Importen stammen
+                EXECUTE 'DELETE FROM alkis_beziehungen WHERE beziehung_von like ''' || gml_id || '%'' AND import_id < (SELECT max(id) FROM import)';
+
+        END IF;
+
+        NEW.ignored := false;
+        RETURN NEW;
+END;
+$$ LANGUAGE plpgsql;
+
 
 -- BeziehungssÀtze aufrÀumen