source: trunk/import/sichten.sql @ 421

-- =====
-- ALKIS
-- =====

--  PostNAS 0.8

--  -----------------------------------------
--  Sichten fÃŒr Fehlersuche und Daten-Analyse
--  -----------------------------------------

--  Dieses SQL braucht nur bei Bedarf in einer PostNAS-DB verarbeitet werden.
--  Es werden zusÀtzliche Views eingerichtet, die nur bei Fehlersuche und Analyse (vom Entwickler) benötigt werden.

--  2012-04-17 flstnr_ohne_position
--  2012-04-24 pauschal Filter 'endet IS NULL' um historische Objekte auszublenden
--  2012-10-29 Redundanzen in Beziehungen suchen (entstehen durch replace)
--  2013-02-20 Mehrfache Buchungsstellen zum FS suchen, dies sind Auswirkungen eines Fehlers bei Replace
--  2013-03-05 Beschriftungen aus ap_pto auseinander sortieren, neuer View "grenzpunkt"
--  2013-03-12 Optimierung Hausnummern, View "gebaeude_txt" (Funktion und Name)
--  2013-04-15 UnterdrÃŒcken doppelter Darstellung in den Views 'ap_pto_stra', 'ap_pto_nam', 'ap_pto_rest'
--  2013-04-16 Thema "BodenschÀtzung" und fehlernde Kommentare zum Views ergÀnzt.
--             Diese Datei aufgeteilt in "sichten.sql" und "sichten_wms.sql"
--  2013-10-23 Fehlersuche GebÀude-Hausnummer-Relation
--  2013-11-26 Neue Views (doppelverbindung)
--  2014-01-17 View "exp_csv" fÃŒr den Export von CSV-Daten aus der Auskunft mit Modul alkisexport.php.
--  2014-01-20 Erweiterung "exp_csv" fÃŒr alkisexport.php
--  2014-01-21 In "exp_csv": Rechtsgemeinsachaft zu allen Personen statt als eigener Satz.
--  2014-01-27 Neuer Baustein "flst_an_strasse". Neuer View "exp_csv_str" fÃŒr CSV-Export von Flst. an einer Straße
--  2014-01-29 Neuer View "strasse_als_gewanne" zur Fehlersuche.
--  2014-01-31 Kommentar
--  2014-02-06 nachmigration_aehnliche_anschriften
--  2014-09-02 Tabelle "alkis_beziehungen" ÃŒberflÃŒssig machen. Relationen nun ÃŒber Spalten in den Objekttabellen. 
--  2014-09-11 Neu: View "fehlersuche_namensanteile_je_blatt", substring(gml_id) bei Relation-Join, mehr "endet IS NULL"
--  2014-09-12 Korrektur "doppelverbindung" (nach Patch der Indices fÃŒr Relation auf Substring(gml_id,1,16))
--  2014-09-17 View "fehler_gebaeude_zu_mehrfach_hsnr"
--  2014-09-22 Views zur Suche von Fehlern aus einem fehlerhaften Historie-Trigger (beginnt-endet-Paarungen)
--  2014-09-29 substring(gml_id,1,16) wieder entfernen, gml_id ist im Schema nun wieder fixe 16 Zeichen lang.
--  2014-09-30 Umbenennung SchlÃŒsseltabellen (Prefix)
--  2015-03-19 View "suche_grosse_gb_bestaende"
--  2016-03-01 bereits auskommentierte-Substring-JOIN entfernt, neuer View "fehlersuche_nba_person"

-- Bausteine fÃŒr andere Views:
-- ---------------------------

-- Ein View, der die Verbindung von FlurstÌck zur Buchung fÌr zwei verschiedene FÀlle herstellt.
-- Einmal die "normalen" (direkten) Buchungen.
-- Zweitens ÃŒber die Rechte von Buchungsstellen an anderen Buchungsstellen.
-- Dies kann als "MittelstÃŒck" in den anderen Views eingefÃŒgt werden.

-- Einfach/Direkt:
--   FlurstÃŒck   >istGebucht>                         (Buchungs-Stelle)
--
-- Mit "Recht an":
--   FlurstÃŒck   >istGebucht>  Buchungs-Stelle  <an<  (Buchungs-Stelle)
--                               (dienend)              (herrschend) 

--           DROP VIEW public.doppelverbindung;
CREATE OR REPLACE VIEW public.doppelverbindung
AS
  -- FS >istGebucht> Buchungstelle
  SELECT f1.gml_id              AS fsgml,    -- gml_id FlurstÃŒck
         b1.gml_id              AS bsgml,    -- gml_id Buchungs
         0                      AS ba_dien
    FROM ax_flurstueck f1
    JOIN ax_buchungsstelle b1   ON f1.istgebucht = b1.gml_id
 UNION
  -- FS >istGebucht> Buchungstelle  <an<  Buchungstelle
  SELECT f2.gml_id              AS fsgml,    -- gml_id FlurstÃŒck
         b2.gml_id              AS bsgml,    -- gml_id Buchung - (herrschendes GB)
         dien.buchungsart       AS ba_dien   -- Ein Feld aus der Zwischen-Buchung zur Fall-Unterscheidung
    FROM ax_flurstueck f2
    JOIN ax_buchungsstelle dien ON f2.istgebucht = dien.gml_id
    JOIN ax_buchungsstelle b2   ON dien.gml_id = ANY (b2.an)  -- auch "zu" ?
   WHERE dien.endet IS NULL;   -- FÃŒr das zusÀtzliche Verbindungselement die Historie HIER ausschließen, 
                               -- FÃŒr andere Tabellen muss dies in dem View erfolgen, der dies verwendet.

COMMENT ON VIEW public.doppelverbindung 
 IS 'ALKIS-Beziehung von FlurstÃŒck zu Buchung. UNION-Zusammenfassung des einfachen Falls mit direkter Buchung und des Falles mit Recht einer Buchungsstelle an einer anderen Buchungsstelle.
Dies ist ausschließlich gedacht zur Verwendung in anderen Views um diese einfacher zu machen.';


-- Test-Ausgabe: Ein paar FÀlle mit "Recht an"
--   SELECT * FROM doppelverbindung WHERE ba_dien > 0 LIMIT 20;
-- Nach Umstellung auf PostNAS 0.8 - mit ANY() und Substring - sehr lange Antwortzeit in PG 8.4

-- Ein View, der die Verbindung von FlurstÃŒck zur Straßentabelle fÃŒr zwei verschiedene FÀlle herstellt.
-- Einmal ÃŒber die Lagebezeichnung MIT Hausnummer und einmal OHNE.
-- Dies kann als "MittelstÃŒck" in den anderen Views eingefÃŒgt werden.

--           DROP VIEW public.flst_an_strasse;
CREATE OR REPLACE VIEW public.flst_an_strasse
AS
  -- FlurstÃŒck >weistAuf> ax_lagebezeichnungMIThausnummer <JOIN> ax_lagebezeichnungkatalogeintrag
  SELECT fm.gml_id AS fsgml,
         sm.gml_id AS stgml,                 -- Filter: gml_id der Straße
         'm' AS fall                         -- SÀtze unterschieden: Mit HsNr
    FROM ax_flurstueck fm                    -- FlurstÃŒck Mit
    JOIN ax_lagebezeichnungmithausnummer lm  -- Lage MIT
      ON lm.gml_id = ANY (fm.weistauf)
    JOIN ax_lagebezeichnungkatalogeintrag sm
      ON lm.land=sm.land AND lm.regierungsbezirk=sm.regierungsbezirk AND lm.kreis=sm.kreis AND lm.gemeinde=sm.gemeinde AND lm.lage=sm.lage 
   WHERE lm.endet IS NULL AND fm.endet IS NULL -- nichts Historisches
 UNION
  -- FlurstÃŒck >zeigtAuf> ax_lagebezeichnungOHNEhausnummer <JOIN> ax_lagebezeichnungkatalogeintrag
  SELECT fo.gml_id AS fsgml,
         so.gml_id AS stgml,                 -- Filter: gml_id der Straße
         'o' AS fall                         -- SÀtze unterschieden: Ohne HsNr
    FROM ax_flurstueck fo                    -- FlurstÃŒck OHNE
    JOIN ax_lagebezeichnungohnehausnummer lo -- Lage OHNE
      ON lo.gml_id = ANY (fo.zeigtauf)
    JOIN ax_lagebezeichnungkatalogeintrag so -- Straße OHNE
      ON lo.land=so.land AND lo.regierungsbezirk=so.regierungsbezirk AND lo.kreis=so.kreis AND lo.gemeinde=so.gemeinde AND lo.lage=so.lage
   WHERE lo.endet IS NULL AND fo.endet IS NULL; -- nichts Historisches

COMMENT ON VIEW public.flst_an_strasse 
 IS 'ALKIS-Beziehung von FlurstÃŒck zu Straßentabelle. UNION-Zusammenfassung der FÀlle MIT und OHNE Hausnummer.';

-- Muss man noch dafÃŒr sorgen, dass FlurstÃŒck nicht doppelt vorkommt? z.B. mit DISTINCT
-- Oder mÃŒssen ggf. mehrfache FS im Programm ÃŒbersprungen werden?

-- Test-Ausgabe:
--   SELECT * FROM flst_an_strasse WHERE stgml='DENW18AL000004Fl' LIMIT 40;

-- Ende "Bausteine"


-- Generelle Export-Struktur "FlurstÃŒck - Buchung - Grundbuch - Person"
-- --------------------------------------------------------------------
-- Verwendet den gespeicherten View "doppelverbindung".
-- Wird benötigt im Auskunft-Modul "alkisexport.php":
-- Je nach aufrufendem Modul wird der Filter (WHERE) an anderer Stelle gesetzt (gml_id von FS, GB oder Pers.)
-- FÃŒr Filter nach "Straße" siehe die nachfolgende Sonderversion "exp_csv_str".

-- Problem / Konflikt:
-- Es kann nur eine lineare Struktur aus Spalten und Zeilen exportiert werden. 
-- Wenn nicht nur die Daten des Ausgangs-Objektes exportiert werden, sondern auch verbundene Tabellen in 
-- einer 1:N-Struktur, dann verdoppeln sich Zeileninhalte und es werden redundante Daten erzeugt. 
-- Diese Redundanzen mÃŒssen vom dem Programm gefiltert werden, das die Daten ÃŒber eine Schnittstelle einliest.

-- Anwendungs-Beispiel: Abrechnung von AnliegerbeitrÀgen.

--           DROP VIEW exp_csv;

CREATE OR REPLACE VIEW exp_csv
AS
 SELECT
  -- FlurstÃŒck
    f.gml_id                             AS fsgml,       -- möglicher Filter FlurstÌcks-GML-ID
    f.flurstueckskennzeichen             AS fs_kennz,
    f.gemarkungsnummer,                                  -- Teile des FS-Kennz. noch mal einzeln
    f.flurnummer, f.zaehler, f.nenner, 
    f.amtlicheflaeche                    AS fs_flae,
    g.bezeichnung                        AS gemarkung,

  -- Grundbuch
    gb.gml_id                            AS gbgml,       -- möglicher Filter Grundbuch-GML-ID
    gb.bezirk                            AS gb_bezirk,
    gb.buchungsblattnummermitbuchstabenerweiterung AS gb_blatt,
    z.bezeichnung                        AS beznam,      -- GB-Bezirks-Name

  -- Buchungsstelle (GrundstÃŒck)
    s.laufendenummer                     AS bu_lfd,      -- BVNR
  --s.zaehler, s.nenner,                                 -- Anteil des GB am FS, einzelne Felder
    '=' || s.zaehler || '/' || s.nenner  AS bu_ant,      -- als Excel-Formel (nur bei Wohnungsgrundbuch JOIN ÃŒber 'Recht an')
    s.buchungsart,                                       -- verschlÃŒsselt
    b.bezeichner                         AS bu_art,      -- Buchungsart entschlÃŒsselt

  -- NamensNummer (Normalfall mit Person)
    nn.laufendenummernachdin1421         AS nam_lfd, 
    '=' || nn.zaehler|| '/' || nn.nenner AS nam_ant,         -- als Excel-Formel

  -- Rechtsgemeinsachaft (Sonderfall von Namensnummer, ohne Person, ohne Nummer)
    rg.artderrechtsgemeinschaft          AS nam_adr,
    rg.beschriebderrechtsgemeinschaft    AS nam_bes,

  -- Person
    p.gml_id                             AS psgml,           -- möglicher Filter Personen-GML-ID
    p.anrede,
    p.vorname,
    p.namensbestandteil,
    p.nachnameoderfirma,                                     -- Familienname
    p.geburtsdatum,
    --p.geburtsname, p.akademischergrad 
 
  -- Adresse der Person
    a.postleitzahlpostzustellung         AS plz,
    a.ort_post                           AS ort,             -- Anschreifenzeile 1: PLZ+Ort
    a.strasse,  a.hausnummer,                                -- Anschriftenzeile 2: Straße+HsNr
    a.bestimmungsland                    AS land

  FROM ax_flurstueck    f               -- FlurstÃŒck
  JOIN doppelverbindung d               -- beide FÀlle Ìber Union-View: direkt und Ìber Recht von Buchung an Buchung
    ON d.fsgml = f.gml_id
  JOIN ax_gemarkung g                   -- entschlÃŒsseln
    ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer 
  JOIN ax_buchungsstelle s              -- Buchungs-Stelle
    ON d.bsgml = s.gml_id
  JOIN v_bs_buchungsart b  -- EnstschlÃŒsselung der Buchungsart
    ON s.buchungsart = b.wert 
  JOIN ax_buchungsblatt  gb             -- Buchung >istBestandteilVon> Grundbuchblatt
    ON gb.gml_id = s.istbestandteilvon
  JOIN ax_buchungsblattbezirk z 
    ON gb.land=z.land AND gb.bezirk=z.bezirk 
  JOIN ax_namensnummer nn               -- Blatt <istBestandteilVon< NamNum
    ON  gb.gml_id = nn.istbestandteilvon
  JOIN ax_person p                      -- NamNum >benennt> Person 
    ON p.gml_id = nn.benennt
  LEFT JOIN ax_anschrift a 
    ON a.gml_id = ANY (p.hat)

  -- 2mal "LEFT JOIN" verdoppelt die Zeile in der Ausgabe. Darum als Subquery in Spalten packen:
  -- Noch mal "GB -> NamNum", aber dieses Mal fÃŒr "Rechtsgemeinschaft".
  -- Kommt max. 1 mal je GB vor und hat keine Relation auf Person.
  LEFT JOIN
   ( SELECT gr.gml_id, r.artderrechtsgemeinschaft, r.beschriebderrechtsgemeinschaft 
       FROM ax_namensnummer r 
       JOIN ax_buchungsblatt gr
         ON r.istbestandteilvon = gr.gml_id -- Blatt <istBestandteilVon< NamNum (Rechtsgemeinschaft) 
      WHERE NOT r.artderrechtsgemeinschaft IS NULL ) AS rg -- Rechtsgemeinschaft
   ON rg.gml_id = gb.gml_id  -- zum GB

  WHERE f.endet IS NULL AND s.endet IS NULL and gb.endet IS NULL and nn.endet IS NULL AND p.endet IS NULL

  ORDER BY f.flurstueckskennzeichen, 
           gb.bezirk, gb.buchungsblattnummermitbuchstabenerweiterung, s.laufendenummer,
           nn.laufendenummernachdin1421;

COMMENT ON VIEW exp_csv 
 IS 'View fÃŒr einen CSV-Export aus der Buchauskunft mit alkisexport.php. Generelle Struktur. FÃŒr eine bestimmte gml_id noch den Filter setzen.';


-- Variante des View "exp_csv":
-- Hier wird zusÀtzlich der Baustein "flst_an_strasse" verwendet.
-- Der Filter "WHERE stgml= " auf die "gml_id" von "ax_lagebezeichnungkatalogeintrag" sollte gesetzt werden
-- um alle FlurstÃŒcke zu bekommen, die an einer Straße liegen.

-- DROP           VIEW exp_csv_str;

CREATE OR REPLACE VIEW exp_csv_str
AS
 SELECT
    l.stgml,                                             -- Filter: gml_id aus "ax_lagebezeichnungkatalogeintrag"
                                                         -- UNTERSCHIED zu exp_csv)

  -- FlurstÃŒck
    f.gml_id                             AS fsgml,       -- Gruppenwechsel fÃŒr "function lage_zum_fs" in alkisexport.php
    f.flurstueckskennzeichen             AS fs_kennz,
    f.gemarkungsnummer,                                  -- Teile des FS-Kennz. noch mal einzeln
    f.flurnummer, f.zaehler, f.nenner, 
    f.amtlicheflaeche                    AS fs_flae,
    g.bezeichnung                        AS gemarkung,

  -- Grundbuch
  --gb.gml_id                            AS gbgml,       -- möglicher Filter Grundbuch-GML-ID
    gb.bezirk                            AS gb_bezirk,
    gb.buchungsblattnummermitbuchstabenerweiterung AS gb_blatt,
    z.bezeichnung                        AS beznam,      -- GB-Bezirks-Name

  -- Buchungsstelle (GrundstÃŒck)
    s.laufendenummer                     AS bu_lfd,      -- BVNR
  --s.zaehler, s.nenner,                                 -- Anteil des GB am FS, einzelne Felder
    '=' || s.zaehler || '/' || s.nenner  AS bu_ant,      -- als Excel-Formel (nur bei Wohnungsgrundbuch JOIN ÃŒber 'Recht an')
    s.buchungsart,                                       -- verschlÃŒsselt
    b.bezeichner                         AS bu_art,      -- Buchungsart entschlÃŒsselt

  -- NamensNummer (Normalfall mit Person)
    nn.laufendenummernachdin1421         AS nam_lfd, 
    '=' || nn.zaehler|| '/' || nn.nenner AS nam_ant,         -- als Excel-Formel

  -- Rechtsgemeinsachaft (Sonderfall von Namensnummer, ohne Person, ohne Nummer)
    rg.artderrechtsgemeinschaft          AS nam_adr,
    rg.beschriebderrechtsgemeinschaft    AS nam_bes,

  -- Person
  --p.gml_id                             AS psgml,           -- möglicher Filter Personen-GML-ID
    p.anrede,
    p.vorname,
    p.namensbestandteil,
    p.nachnameoderfirma,                                     -- Familienname
    p.geburtsdatum,
    --p.geburtsname, p.akademischergrad 
 
  -- Adresse der Person
    a.postleitzahlpostzustellung         AS plz,
    a.ort_post                           AS ort,             -- Anschreifenzeile 1: PLZ+Ort
    a.strasse,  a.hausnummer,                                -- Anschriftenzeile 2: Straße+HsNr
    a.bestimmungsland                    AS land

  FROM ax_flurstueck    f               -- FlurstÃŒck
  JOIN flst_an_strasse  l               -- Lage (hier zusÀtzlicher JOIN gegenÌber Version "exp_csv") 
        ON l.fsgml = f.gml_id 
  JOIN doppelverbindung d               -- beide FÀlle Ìber Union-View: direkt und Ìber Recht von Buchung an Buchung
    ON d.fsgml = f.gml_id 
  JOIN ax_gemarkung g                   -- entschlÃŒsseln
    ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer 
  JOIN ax_buchungsstelle s              -- Buchungs-Stelle
    ON d.bsgml = s.gml_id 
  JOIN v_bs_buchungsart b  -- EnstschlÃŒsselung der Buchungsart
    ON s.buchungsart = b.wert 
  JOIN ax_buchungsblatt  gb             -- Buchung >istBestandteilVon> Grundbuchblatt
    ON gb.gml_id = s.istbestandteilvon
  JOIN ax_buchungsblattbezirk z 
    ON gb.land=z.land AND gb.bezirk=z.bezirk 
  JOIN ax_namensnummer nn               -- Blatt <istBestandteilVon< NamNum
    ON gb.gml_id = nn.istbestandteilvon
  JOIN ax_person p                      -- NamNum >benennt> Person 
    ON p.gml_id = nn.benennt
  LEFT JOIN ax_anschrift a 
    ON a.gml_id = ANY (p.hat)

  -- 2mal "LEFT JOIN" verdoppelt die Zeile in der Ausgabe. Darum als Subquery in Spalten packen:
  -- Noch mal "GB -> NamNum", aber dieses Mal fÃŒr "Rechtsgemeinschaft".
  -- Kommt max. 1 mal je GB vor und hat keine Relation auf Person.
  LEFT JOIN
   ( SELECT gr.gml_id, r.artderrechtsgemeinschaft, r.beschriebderrechtsgemeinschaft 
       FROM ax_namensnummer r 
       JOIN ax_buchungsblatt gr
         ON r.istbestandteilvon = gr.gml_id -- Blatt <istBestandteilVon< NamNum (Rechtsgemeinschaft) 
      WHERE NOT r.artderrechtsgemeinschaft IS NULL ) AS rg  -- Rechtsgemeinschaft
   ON rg.gml_id = gb.gml_id  -- zum GB

  WHERE f.endet IS NULL AND s.endet IS NULL and gb.endet IS NULL and nn.endet IS NULL AND p.endet IS NULL

  ORDER BY f.flurstueckskennzeichen, 
           gb.bezirk, gb.buchungsblattnummermitbuchstabenerweiterung, s.laufendenummer,
           nn.laufendenummernachdin1421;

COMMENT ON VIEW exp_csv_str 
 IS 'View fÃŒr einen CSV-Export aus der Buchauskunft mit alkisexport.php. Liefert nur FlurstÃŒcke, die eine Lagebezeichnung MIT/OHNE Hausnummer haben. Dazu noch den Filter auf GML-ID der Straßentabelle setzen.';

-- Test: SELECT * FROM exp_csv_str WHERE stgml = 'DENW15AL100000Q8'; -- Veilchenstraße in Löhne


-- Analyse: Kann es mehr als 1 "Rechtsgemeinschaft" zu einem GB-Blatt geben? 
-- (Diese Frage stellte sich beim Design des View "exp_csv".)

-- In umgekehrter Reihenfolge löschen (AbhÀngigkeiten).
DROP VIEW IF EXISTS rechtsgemeinschaften_mehrfachzeilen;
DROP VIEW IF EXISTS rechtsgemeinschaften_zaehlen;
DROP VIEW IF EXISTS rechtsgemeinschaften_zum_grundbuch;

-- Schritt 1: alle vorhandenen Rechtsgemeinschaften

CREATE OR REPLACE VIEW rechtsgemeinschaften_zum_grundbuch
AS
 SELECT
     gb.gml_id AS gb_gml,
     gb.bezirk,
     gb.buchungsblattnummermitbuchstabenerweiterung AS gb_blatt,
     nn.gml_id AS nn_gml, nn.beginnt, nn.laufendenummernachdin1421, 
     nn.artderrechtsgemeinschaft AS adr,
     nn.beschriebderrechtsgemeinschaft
  FROM ax_buchungsblatt gb 
  JOIN ax_namensnummer  nn  
    ON gb.gml_id = nn.istbestandteilvon
  WHERE NOT nn.artderrechtsgemeinschaft IS NULL
    AND gb.endet IS NULL AND nn.endet IS NULL -- Historie weglassen
  ORDER BY gb.bezirk, gb.buchungsblattnummermitbuchstabenerweiterung, nn.laufendenummernachdin1421;

COMMENT ON VIEW rechtsgemeinschaften_zum_grundbuch 
 IS 'Rechtsgemeinschaften zum Grundbuchblatt.';

-- Schritt 2: Wo gibt es mehrere zu einem GB-Blatt

CREATE OR REPLACE VIEW rechtsgemeinschaften_zaehlen
AS
 SELECT gb_gml, bezirk, gb_blatt, count(adr) AS anzahl
   FROM rechtsgemeinschaften_zum_grundbuch
   GROUP BY gb_gml, bezirk, gb_blatt
   HAVING count(adr) > 1
   ORDER BY bezirk, gb_blatt;

COMMENT ON VIEW rechtsgemeinschaften_zaehlen 
 IS 'Rechtsgemeinschaften zum Grundbuchblatt zÀhlen. Nur Anzeigen, wenn es mehrere gibt.';
-- Ergebnis: Ja, kann es geben

-- Schritt 3: alle vorhandenen Zeilen anzeigen zu den GB-BlÀttern, bei denen es mehrere gibt.
CREATE OR REPLACE VIEW rechtsgemeinschaften_mehrfachzeilen
AS
 SELECT * 
   FROM rechtsgemeinschaften_zum_grundbuch
  WHERE gb_gml IN (SELECT gb_gml FROM rechtsgemeinschaften_zaehlen);

COMMENT ON VIEW rechtsgemeinschaften_mehrfachzeilen 
 IS 'GrundbuchblÀtter mit mehr als einer Zeile Rechtsgemeinschaft.';

-- Fazit:
-- Man findet einige wenige identische oder Àhnlich aussehende Zeilen zu einem Grundbuch.
-- Das sieht also eher nach einem PostNAS-FortfÌhrungsproblem aus, als nach unabhÀngigen Zeilen.
-- Wurde hier eine Relation nicht sauber gelöscht?

-- Welche Karten-Typen ?
CREATE OR REPLACE VIEW kartentypen_der_texte_fuer_hnr
AS 
   SELECT DISTINCT advstandardmodell 
   FROM ap_pto p 
   WHERE p.art = 'HNR';

COMMENT ON VIEW kartentypen_der_texte_fuer_hnr 
  IS 'Datenanalyse: Kartentypen in Tabelle ap_pto fÃŒr Hausnummern.';

-- Dies liefert:
--  "{DKKM1000}"
--  "{DKKM1000,DKKM500}"
--  "{DKKM500}"
--  NULL

-- Texte, die NICHT dargestellt werden sollen.
-- -------------------------------------------
-- Texte und Text-Fragmente aus der Konvertierung ALK+ALB, die noch nicht gelöscht worden sind.
CREATE OR REPLACE VIEW ap_pto_muell 
AS 
  SELECT p.ogc_fid, 
         p.schriftinhalt, 
         p.art, 
         p.drehwinkel * 57.296 AS winkel, -- * 180 / Pi
         p.wkb_geometry 
    FROM ap_pto p
   WHERE not p.schriftinhalt IS NULL 
     AND p.endet IS NULL
     AND p.art IN ('AOG_AUG','PNR');

COMMENT ON VIEW ap_pto_muell 
 IS 'Datenanalyse: Beschriftungen aus "ap_pto", die NICHT dargestellt werden sollen.';


-- FlurstÃŒcke mit Anzeige der FlurstÃŒcksnummer an der "Standardposition"

-- Nach der Konvertierung aus ALK hat zunÀchst jedes FlurstÌck eine explizit gesetzte Position der FlurstÌcksnummer.

-- Nach einer manuellen Teilung bekommen die neuen FlurstÃŒcke im ALKIS nur dann eine Position,
-- wenn die Positioin manuell bestimmt (verschoben) wurde.
-- Wenn die FlurstÃŒcksnummer an ihrer "Standardposition" angezeigt werden soll, 
-- dann wird diese in den Daten (DHK, NAS) nicht gesetzt.
-- Der Konverter PostNAS konvertiert aber nur die Daten, die er bekommt, er setzt nicht die Standard-Position 
-- fÃŒr die FlurstÃŒcke, die ohne eine manuelle Position kommen.

-- Diese FÀlle identifizieren und unterscheiden:

CREATE OR REPLACE VIEW flstnr_mit_manueller_position
AS 
 SELECT f.gml_id, 
        f.gemarkungsnummer || '-' || f.flurnummer || '-' || f.zaehler::text || COALESCE ('/' || f.nenner::text, '') AS such -- Suchstring fÃŒr ALKIS-Navigation nach FS-Kennzeichen
   FROM ax_flurstueck f 
   JOIN ap_pto p 
     ON f.gml_id = ANY(p.dientzurdarstellungvon) 
  WHERE f.endet IS NULL AND p.endet IS NULL;
-- TIPP: mit zusÀtzlichem LIMIT auftrufen!

COMMENT ON VIEW flstnr_mit_manueller_position 
  IS 'Sicht fÌr Datenanalyse: FlurstÌcke MIT manuell gesetzter Position fÌr die PrÀsentation der FS-Nr';

CREATE OR REPLACE VIEW flstnr_ohne_manuelle_position
AS 
 SELECT f.gml_id, 
        f.gemarkungsnummer || '-' || f.flurnummer || '-' || f.zaehler::text || COALESCE ('/' || f.nenner::text, '') AS such -- Suchstring fÃŒr ALKIS-Navigation nach FS-Kennzeichen
 FROM   ax_flurstueck f 
 LEFT JOIN ap_pto p 
   ON f.gml_id = ANY(p.dientzurdarstellungvon)
 WHERE p.gml_id IS NULL
   AND f.endet IS NULL;
-- TIPP: mit zusÀtzlichem LIMIT aufrufen!

COMMENT ON VIEW flstnr_ohne_manuelle_position 
  IS 'Sicht fÌr Datenanalyse: FlurstÌcke OHNE manuell gesetzte Position fÌr die PrÀsentation der FS-Nr';


-- Umbruch im Label? z.B. "Schwimm-/nbecken"
-- Sind 2 Buchstaben in Mapfile bei "WRAP" möglich?
CREATE OR REPLACE VIEW texte_mit_umbruch 
AS 
 SELECT ogc_fid, schriftinhalt, art
   FROM ap_pto 
  WHERE NOT schriftinhalt IS NULL AND schriftinhalt LIKE '%/n%';

COMMENT ON VIEW texte_mit_umbruch 
 IS 'Sicht fÃŒr Datenanalyse: Vorkommen eines Umbruchs im Label-Text.';

-- EXTENT fÃŒr das Mapfile eines Mandanten ermitteln
CREATE OR REPLACE VIEW flurstuecks_minmax AS 
 SELECT min(st_xmin(wkb_geometry)) AS r_min, 
        min(st_ymin(wkb_geometry)) AS h_min, 
        max(st_xmax(wkb_geometry)) AS r_max, 
        max(st_ymax(wkb_geometry)) AS h_max
   FROM ax_flurstueck f
   WHERE f.endet IS NULL;

COMMENT ON VIEW flurstuecks_minmax 
 IS 'Sicht fÃŒr Datenanalyse: Maximale Ausdehnung von ax_flurstueck fuer EXTENT-Angabe im Mapfile.';

-- Nach Laden der Keytables:
CREATE OR REPLACE VIEW baurecht
AS
  SELECT r.ogc_fid, 
         r.wkb_geometry, 
         r.gml_id, 
         r.artderfestlegung AS adfkey, -- Art der Festlegung - Key 
         r."name",                     -- Eigenname des Gebietes
         r.stelle,                     -- Stelle Key
         r.bezeichnung AS rechtbez,    -- Verfahrensnummer
         a.bezeichner  AS adfbez,      -- Art der Festlegung - Bezeichnung
         d.bezeichnung AS stellbez     -- Stelle Bezeichnung
      -- , d.stellenart                -- weiter entschluesseln?
    FROM ax_bauraumoderbodenordnungsrecht r
    LEFT JOIN v_baurecht_adf a
      ON r.artderfestlegung = a.wert
    LEFT JOIN ax_dienststelle d
      ON r.land=d.land AND r.stelle=d.stelle 
  WHERE r.endet IS NULL AND d.endet IS NULL ;

COMMENT ON VIEW baurecht 
 IS 'Datenanalyse: EnstschlÌsselte Felder zu einer FlÀche des Baurechts.';

-- Man glaubt es kaum, aber im ALKIS haben Gemeinde und Gemarkung keinerlei Beziehung miteinander
-- Nur durch Auswertung der FlurstÃŒcke kann man ermitteln, in welcher Gemeinde eine Gemarkung liegt.
CREATE OR REPLACE VIEW gemarkung_in_gemeinde
AS
  SELECT DISTINCT land, regierungsbezirk, kreis, gemeinde, gemarkungsnummer
  FROM            ax_flurstueck
  WHERE           endet IS NULL
  ORDER BY        land, regierungsbezirk, kreis, gemeinde, gemarkungsnummer;

COMMENT ON VIEW gemarkung_in_gemeinde 
 IS 'Welche Gemarkung liegt in welcher Gemeinde? Durch Verweise aus FlurstÃŒcken ermitteln.';


-- Untersuchen, welche Geometrie-Typen vorkommen
CREATE OR REPLACE VIEW arten_von_flurstuecksgeometrie
AS
 SELECT   count(gml_id) as anzahl,
          st_geometrytype(wkb_geometry)
 FROM     ax_flurstueck
 WHERE    endet IS NULL
 GROUP BY st_geometrytype(wkb_geometry);

COMMENT ON VIEW arten_von_flurstuecksgeometrie IS 'Datenanalyse: vorkommende Geometry-Typen in Tabelle ax_flurstueck.';


-- A d r e s s e n 

-- Verschluesselte Lagebezeichnung (Strasse und Hausnummer) fÃŒr eine Gemeinde
-- SchlÃŒssel der Gemeinde im Filter (WHERE) nach Bedarf anpassen!
CREATE OR REPLACE VIEW adressen_hausnummern
AS
    SELECT 
        s.bezeichnung AS strassenname, 
        g.bezeichnung AS gemeindename, 
        l.land, l.regierungsbezirk, l.kreis, l.gemeinde, 
        l.lage        AS strassenschluessel, l.hausnummer 
    FROM ax_lagebezeichnungmithausnummer l  
    JOIN ax_gemeinde g 
      ON l.kreis=g.kreis AND l.gemeinde=g.gemeinde 
    JOIN ax_lagebezeichnungkatalogeintrag s 
      ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage = s.lage
    WHERE l.gemeinde = '40';  -- '40' = Stadt Lage

COMMENT ON VIEW adressen_hausnummern IS 'Datenanalyse: VerschlÃŒsselte Lagebezeichnung (Straße und Hausnummer) fÃŒr eine Gemeinde. SchlÃŒssel der Gemeinde nach Bedarf anpassen.';

-- Zuordnung Adressen zu Flurstuecken
-- Schluessel der Gemeinde nach Bedarf anpassen!
CREATE OR REPLACE VIEW adressen_zum_flurstueck
AS
    SELECT
           f.gemarkungsnummer, 
           f.flurnummer, 
           f.zaehler, 
           f.nenner,
           g.bezeichnung AS gemeindename, 
           s.bezeichnung AS strassenname, 
           l.lage        AS strassenschluessel, 
           l.hausnummer 
      FROM   ax_flurstueck f 
      JOIN   ax_lagebezeichnungmithausnummer l   ON  l.gml_id = ANY(f.weistauf)
      JOIN   ax_gemeinde g   ON l.kreis=g.kreis  AND l.gemeinde=g.gemeinde 
      JOIN   ax_lagebezeichnungkatalogeintrag s  ON  l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage = s.lage
 --  WHERE l.gemeinde = '40'  -- ggf. Anpassen
     ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;

COMMENT ON VIEW adressen_zum_flurstueck IS 'Datenanalyse: Zuordnung von Adressen zu Flurstuecken. SchlÃŒssel der Gemeinde nach Bedarf anpassen.';

-- Punktförmige  P r À s e n t a t i o n s o b j e k t e  (ap_pto)
-- Ermittlung der vorkommenden Arten
CREATE OR REPLACE VIEW beschriftung_was_kommt_vor 
AS 
  SELECT DISTINCT art, horizontaleausrichtung, vertikaleausrichtung 
    FROM ap_pto 
   WHERE not schriftinhalt is null 
   ORDER BY art;

COMMENT ON VIEW beschriftung_was_kommt_vor IS 'Analyse der vorkommenden Kombinationen in ap_pto (Beschriftung)';

-- FlurstÃŒcke eines EigentÃŒmers
-- ----------------------------

-- Dieser View liefert nur die (einfache) Buchungsart "GrundstÃŒck"
-- Solche FÀlle wie "Erbbaurecht an GrundstÌck" oder "Wohnungs-/Teileigentum an aufgeteiltes GrundstÌck"
-- oder "Miteigentum an aufgeteiltes GrundstÃŒck" fehlen in dieser Auswertung.
-- Dazu siehe: "rechte_eines_eigentuemers".

-- Das Ergebnis ist gedacht fÃŒr den Export als CSV und Weiterverarbeitung mit einer Tabellenkalkulation
-- oder einer einfachen Datenbank.

-- Auch ein Export als Shape ist moeglich (dafÃŒr: geom hinzugefÃŒgt, Feldnamen gekÃŒrzt)
-- Kommando:
--  pgsql2shp -h localhost -p 5432 -f "/data/.../alkis_fs_gemeinde.shp"  [db-name]  public.flurstuecke_eines_eigentuemers

-- Übersicht der Tabellen:
--
-- Person <benennt< NamNum. >istBestandteilVon> Blatt <istBestandteilVon< Stelle >istGebucht> Flurstueck
--                                              *-> Bezirk                *-> Buchungsart     *-> Gemarkung

CREATE OR REPLACE VIEW flurstuecke_eines_eigentuemers 
AS 
   SELECT 
      k.bezeichnung                AS gemarkung, 
      k.gemarkungsnummer           AS gemkg_nr, 
      f.flurnummer                 AS flur, 
      f.zaehler                    AS fs_zaehler, 
      f.nenner                     AS fs_nenner, 
      f.amtlicheflaeche            AS flaeche, 
      f.wkb_geometry               AS geom,  -- fuer Export als Shape
   -- g.bezirk, 
      b.bezeichnung                AS bezirkname,
      g.buchungsblattnummermitbuchstabenerweiterung AS gb_blatt, 
      g.blattart, 
      s.laufendenummer             AS bvnr, 
      art.bezeichner               AS buchgsart, 
   -- s.zaehler || '/' || s.nenner AS buchg_anteil, 
      n.laufendenummernachdin1421  AS name_num, 
   -- n.zaehler || '/' || n.nenner AS nam_anteil, 
      p.nachnameoderfirma          AS nachname --, 
   -- p.vorname 
   FROM   ax_person              p
     JOIN ax_namensnummer        n   -- Namennummer >benennt> Person
       ON p.gml_id = n.benennt
     JOIN ax_buchungsblatt       g   -- Namensnummer >istBestandteilVon> Grundbuch
       ON n.istbestandteilvon = g.gml_id
     JOIN ax_buchungsblattbezirk b    ON g.land = b.land AND g.bezirk = b.bezirk 
     JOIN ax_buchungsstelle      s   -- Buchungs-Stelle >istBestandteilVon> Grundbuch
       ON s.istbestandteilvon = g.gml_id
     JOIN v_bs_buchungsart art 
       ON s.buchungsart = art.wert 
     JOIN ax_flurstueck          f  -- Flurstueck >istGebucht> Buchungs-Stelle
       ON f.istgebucht = s.gml_id
     JOIN ax_gemarkung           k    
       ON f.land = k.land AND f.gemarkungsnummer = k.gemarkungsnummer 
   WHERE p.nachnameoderfirma LIKE 'Stadt %'   -- ** Bei Bedarf anpassen!
     AND p.endet IS NULL AND n.endet IS NULL AND g.endet IS NULL AND b.endet IS NULL
     AND s.endet IS NULL AND f.endet IS NULL AND k.endet IS NULL
   ORDER BY k.bezeichnung, f.flurnummer, f.zaehler, f.nenner, g.bezirk, g.buchungsblattnummermitbuchstabenerweiterung, s.laufendenummer;

COMMENT ON VIEW flurstuecke_eines_eigentuemers 
  IS 'Nur einfache Buchungsart "GrundstÃŒck". Muster fÃŒr Export: Suchkriterium nach Bedarf anpassen.';


-- Rechte eines EigentÃŒmers
-- ------------------------
-- Dieser View sucht speziell die FÀlle wo eine Buchungsstelle ein Recht "an" einer anderen Buchungsstelle hat.
--  - "Erbbaurecht *an* GrundstÃŒck" 
--  - "Wohnungs-/Teileigentum *an* Aufgeteiltes GrundstÃŒck"
--  - "Miteigentum *an* Aufteteiltes GrundstÃŒck"
-- Suchkriterium ist der Name des EigentÃŒmers auf dem "herrschenden" Grundbuch, also dem Besitzer des Rechtes.

-- Diese FÀlle fehlen im View "flurstuecke_eines_eigentuemers".

-- Übersicht der Tabellen:
-- Person <benennt< NamNum. >istBestandteilVon> Blatt <istBestandteilVon< Stelle-h >an> Stelle-d >istGebucht> Flurstueck
-- Wobei ">xxx>" = JOIN ÃŒber die Verbindungs-Tabelle "alkis_beziehungen" mit der Beziehungsart "xxx".

-- DROP VIEW rechte_eines_eigentuemers;
CREATE OR REPLACE VIEW rechte_eines_eigentuemers 
AS
   SELECT 
      k.bezeichnung                AS gemarkung, 
      k.gemarkungsnummer           AS gemkg_nr, 
      f.flurnummer                 AS flur, 
      f.zaehler                    AS fs_zaehler, 
      f.nenner                     AS fs_nenner, 
      f.amtlicheflaeche            AS flaeche, 
      f.wkb_geometry               AS geom,  -- fuer Export als Shape
   -- g.bezirk, 
      b.bezeichnung                AS bezirkname,
      g.buchungsblattnummermitbuchstabenerweiterung AS gb_blatt, 
   -- g.blattart, 
      sh.laufendenummer            AS bvnr_herr, 
      sh.zaehler || '/' || sh.nenner AS buchg_anteil_herr, 
      arth.bezeichner              AS buchgsa_herr, 
      artd.bezeichner              AS buchgsa_dien, 
      sd.laufendenummer            AS bvnr_dien, 
   -- sd.zaehler || '/' || sd.nenner AS buchg_anteil_dien,
      n.laufendenummernachdin1421  AS name_num, 
   -- n.zaehler || '/' || n.nenner AS nam_anteil, 
      p.nachnameoderfirma          AS nachname --,  
   -- p.vorname 
   FROM   ax_person              p
     JOIN ax_namensnummer        n    -- Namennummer >benennt> Person
       ON p.gml_id = n.benennt
     JOIN ax_buchungsblatt       g    -- Namensnummer >istBestandteilVon> Grundbuch
       ON n.istBestandteilVon = g.gml_id
     JOIN ax_buchungsblattbezirk b    
       ON g.land = b.land AND g.bezirk = b.bezirk 
     JOIN ax_buchungsstelle      sh  -- B-Stelle herr >istBestandteilVon> Grundbuch
       ON sh.istbestandteilvon = g.gml_id -- herrschende Buchung
     JOIN v_bs_buchungsart arth 
       ON sh.buchungsart = arth.wert 
     JOIN ax_buchungsstelle      sd   -- B-Stelle herr.  >an/zu> B-Stelle dien.
       ON (sd.gml_id = ANY(sh.an) OR sd.gml_id = ANY(sh.zu))
     JOIN v_bs_buchungsart artd 
       ON sd.buchungsart = artd.wert
     JOIN ax_flurstueck          f    -- Flurstueck  >istGebucht> B-Stelle dien     
       ON f.istgebucht = sd.gml_id
     JOIN ax_gemarkung           k    
       ON f.land = k.land AND f.gemarkungsnummer = k.gemarkungsnummer 
   WHERE p.nachnameoderfirma LIKE 'Stadt %'   -- ** Bei Bedarf anpassen!    
     AND p.endet IS NULL AND n.endet IS NULL AND g.endet IS NULL AND b.endet IS NULL
     AND sh.endet IS NULL AND sd.endet IS NULL AND f.endet IS NULL AND k.endet IS NULL
   ORDER BY k.bezeichnung, f.flurnummer, f.zaehler, f.nenner, g.bezirk, g.buchungsblattnummermitbuchstabenerweiterung, sh.laufendenummer;

COMMENT ON VIEW rechte_eines_eigentuemers IS 'Muster fÌr Export: Suchkriteriumnach Bedarf anpassen. Dies ergÀnzt "flurstuecke_eines_eigentuemers" um die FÀlle mit besonderen Buchungen.';


-- Suche nach Fehlern:
-- Eine Hausnummer darf nur einem Gebaeude zugeordnet werden.
-- Das Verschieben der Relation 
--   ax_gebaeude >zeigtAuf>z ax_lagebezeichnungmithausnummer
-- fuehrt möglicherweise dazu, dass die alte Relation nicht gelöscht wird.
-- Die angezeigten FÀlle sind potentielle Fehler.

CREATE OR REPLACE VIEW fehler_hausnummer_mehrfach_verwendet
AS
 SELECT l.gml_id, l.gemeinde, l.lage, l.hausnummer 
   FROM ax_gebaeude g
   JOIN ax_lagebezeichnungmithausnummer l  
     ON l.gml_id = ANY(g.zeigtauf)
  WHERE g.endet IS NULL AND l.endet IS NULL
  GROUP BY l.gml_id, l.gemeinde, l.lage, l.hausnummer
  HAVING count(g.gml_id) > 1;

COMMENT ON VIEW fehler_hausnummer_mehrfach_verwendet
 IS 'Fehlersuche: Nach replace von ax_lagebezeichnungmithausnummer mit einem neuen ax_gebaeude bleibt die alte Verbindung?';


-- unter Verwendung dieses View weitere Information
CREATE OR REPLACE VIEW fehler_gebaeude_zu_mehrfach_hsnr 
AS 
  SELECT f.gemeinde, f.lage, k.bezeichnung, f.hausnummer,
         g.gml_id, g.beginnt
  FROM ax_gebaeude g
  JOIN fehler_hausnummer_mehrfach_verwendet f
    ON f.gml_id = ANY(g.zeigtauf)
  JOIN ax_lagebezeichnungkatalogeintrag k
    ON f.gemeinde=k.gemeinde AND f.lage=k.lage
    WHERE g.endet IS NULL
  ORDER BY f.gemeinde, f.lage, f.hausnummer, g.gml_id;

COMMENT ON VIEW fehler_hausnummer_mehrfach_verwendet
 IS 'Fehlersuche: Adressen und GebÀude-Objekte zu den Fehlern aus dem View "fehler_hausnummer_mehrfach_verwendet"';


-- Ein GebÀude hat mehrere Nummern.
CREATE OR REPLACE VIEW adressen_zu_gebauede_mit_mehreren_hausnummern
AS
 SELECT g1.gml_id, l1.gemeinde, l1.lage, l1.hausnummer -- Anzeige der Adressfelder
   FROM ax_gebaeude g1
   JOIN ax_lagebezeichnungmithausnummer l1 ON l1.gml_id = ANY(g1.zeigtauf)
  WHERE g1.endet IS NULL AND l1.endet IS NULL 
    AND g1.gml_id IN -- Subquery sucht GebÀude mit meherern Hausnummen
   (SELECT g2.gml_id 
      FROM ax_gebaeude g2
      JOIN ax_lagebezeichnungmithausnummer l2 ON l2.gml_id = ANY(g2.zeigtauf)
     WHERE g2.endet IS NULL AND l2.endet IS NULL
     GROUP BY g2.gml_id 
   HAVING count(l2.gml_id) > 1)
   ORDER BY l1.gemeinde, l1.lage, l1.hausnummer;

COMMENT ON VIEW adressen_zu_gebauede_mit_mehreren_hausnummern
 IS 'GebÀude mit mehreren Hausnummern suchen (ist erlaubt) und dazu die Adressen anzeigen.';


-- Analyse der Buchungs-Arten im Bestand
CREATE OR REPLACE VIEW buchungsarten_vorkommend
AS
  SELECT a.wert, a.bezeichner, 
         count(b.gml_id) AS anzahl_buchungen
    FROM v_bs_buchungsart a
    JOIN ax_buchungsstelle b  ON a.wert = b.buchungsart
   WHERE b.endet IS NULL
GROUP BY a.wert, a.bezeichner
ORDER BY a.wert, a.bezeichner;

COMMENT ON VIEW buchungsarten_vorkommend
 IS 'Welche Arten von Buchungsart kommen in dieser Datenbank tÀtsÀchlich vor?.';


-- Analyse: FÀlle mit Erbbaurecht
-- Benutzt den Baustein-View "doppelverbindung"

--   +++ BESSER: analog doppelverbindung direkt codieren

CREATE OR REPLACE VIEW erbbaurechte_suchen
AS
  SELECT f.gml_id,
         f.gemarkungsnummer || '-' || f.flurnummer || '-' || f.zaehler AS fssuch, 
         f.nenner
   FROM ax_flurstueck    f 
   JOIN doppelverbindung d     -- beide FÀlle Ìber Union-View: direkt und Ìber Recht von BS an BS
     ON d.fsgml = f.gml_id 
   JOIN ax_buchungsstelle s    -- Buchungs-Stelle
     ON d.bsgml = s.gml_id 
   WHERE s.buchungsart = 2101 AND f.endet IS NULL AND s.endet IS NULL;

COMMENT ON VIEW erbbaurechte_suchen
 IS 'Suche nach FÀllen mit Buchungsart 2101=Erbbaurecht';

CREATE OR REPLACE VIEW aufgeteilte_grundstuecke_suchen
AS
  SELECT f.gml_id,
         f.gemarkungsnummer || '-' || f.flurnummer || '-' || f.zaehler AS fssuch, 
         f.nenner,
         s.buchungsart, b.bezeichner AS buchungsart_bezeichnung
   FROM ax_flurstueck    f 
   JOIN doppelverbindung d     -- beide FÀlle Ìber Union-View: direkt und Ìber Recht von BS an BS
     ON d.fsgml = f.gml_id 
   JOIN ax_buchungsstelle s    -- Buchungs-Stelle
     ON d.bsgml = s.gml_id 
   JOIN v_bs_buchungsart b ON b.wert = s.buchungsart
   WHERE s.buchungsart IN (1101, 1102, 1301, 2201, 2203, 2301, 2303) 
    AND f.endet IS NULL AND s.endet IS NULL;

COMMENT ON VIEW aufgeteilte_grundstuecke_suchen
 IS 'Suche nach FÀllen mit besonderen Buchungsarten (nicht GrundstÌck oder Erbbaurecht)';


-- Suchen von Gewannenbezeichnungen, die auch als Straßenname verwendet werden.
-- Diese FÀlle fÃŒhren möglicherweise zu unvollstÀndiger Ausgabe beim Export "alle FlurstÃŒcke an einer Straße"
-- weil nur Lagebezeichnung MIT und OHNE Hausnummer gesucht wird, aber keine gleich lautende Gewanne.

-- DROP VIEW strasse_als_gewanne;
CREATE OR REPLACE VIEW strasse_als_gewanne
AS
  SELECT k.gemeinde, k.lage AS strassenschluessel,
         o.unverschluesselt AS gewanne_und_strasse, -- = k.bezeichnung = Straßenname
         count(f.gml_id) AS anzahl_fs_gewanne
  FROM ax_lagebezeichnungkatalogeintrag k   -- Straßentabelle
  JOIN ax_lagebezeichnungohnehausnummer o   -- Gewanne
    ON k.bezeichnung = o.unverschluesselt   -- Gleiche Namen
  -- Join Gewanne auf FlurstÌcke um nur solche FÀlle anzuzeigen, die hier verwendet werden.
  -- UND die auch in der gleichen Gemeinde liegen.
  -- Sonst könnte zufÀllige Namensgleichheiten aus verschiedenen Gemeinden geben. 
  JOIN ax_flurstueck f               --  Flurst. >zeigtAuf>  Lage
    ON o.gml_id = ANY(f.zeigtauf)  
 WHERE f.gemeinde = k.gemeinde  -- Gewanne wird fÃŒr ein Flst. in gleicher Gemeinde verwendet, wie der StraßenschlÃŒssel
  GROUP BY k.gemeinde, k.lage, o.unverschluesselt
  ORDER BY k.gemeinde, k.lage, o.unverschluesselt;

COMMENT ON VIEW strasse_als_gewanne
 IS 'Gewannenbezeichnungen, die auch als Straßenname verwendet werden. Mit FlurstÃŒcks-ZÀhler.';


-- Wie zuvor, aber die FlurstÌcke werden hier nicht nur gezÀhlt sondern auch aufgelistet.
-- das Format des FlusrtÃŒckskennzeichens kann in die Mapbender-Navigation eingegeben werden.

CREATE OR REPLACE VIEW strasse_als_gewanne_flst
AS
  SELECT fo.gemarkungsnummer || '-' || fo.flurnummer || '-' || fo.zaehler::text || COALESCE ('/' || fo.nenner::text, '') AS flstkennz,
         k.gemeinde, 
         o.unverschluesselt AS gewanne,
         k.lage        -- AS strassen_schluessel
  FROM ax_lagebezeichnungkatalogeintrag k   -- Straßentabelle
  JOIN ax_lagebezeichnungohnehausnummer o   -- Gewanne
    ON k.bezeichnung = o.unverschluesselt   -- Gleiche Namen 
  JOIN ax_flurstueck fo                    --  Flurst. >zeigtAuf>  Lage
    ON o.gml_id = ANY(fo.zeigtauf)  
 WHERE fo.gemeinde = k.gemeinde  -- Gewanne wird fÃŒr ein Flst. in gleicher Gemeinde verwendet, wie der StraßenschlÃŒssel
   AND k.endet IS NULL AND o.endet IS NULL AND fo.endet IS NULL 
  ORDER BY fo.gemarkungsnummer, fo.flurnummer, fo.zaehler, k.gemeinde, k.bezeichnung;

COMMENT ON VIEW strasse_als_gewanne_flst
 IS 'FlurstÃŒcke mit Gewannenbezeichnungen, die auch als Straßenname verwendet werden.';


-- Suche nach Fehlern in den Daten, die moeglicherweise aus der Migration stammen und
-- im Rahmen der Nachmigration noch korrigiert werden muessen.

CREATE OR REPLACE VIEW nachmigration_aehnliche_anschriften
AS
  SELECT DISTINCT p.gml_id, p.nachnameoderfirma, p.vorname, 
         a1.ort_post, a1.strasse AS strasse1, a2.strasse AS strasse2, a1.hausnummer
    FROM ax_person    p
    JOIN ax_anschrift a1 ON a1.gml_id = ANY(p.hat)
    JOIN ax_anschrift a2 ON a2.gml_id = ANY(p.hat)
   WHERE a1.gml_id <> a2.gml_id
      AND a1.ort_post = a2.ort_post
      AND a1.strasse like trim(a2.strasse, '.') || '%'
      AND a1.hausnummer = a2.hausnummer
      AND p.endet IS NULL AND a1.endet IS NULL and a2.endet IS NULL
    ORDER BY p.nachnameoderfirma, p.vorname;

COMMENT ON VIEW nachmigration_aehnliche_anschriften
 IS 'Nachmigration? Zu einer Person gibt es mehrere Anschriften, die in Ort und Hausnummer identisch sind und beim Straßennemen entweder auch identisch sind oder eine AbkÃŒrzung mit Punkt enthalten.';

-- Anteile der Namensnummern am Blatt aufsummieren.
-- BlÀtter mit RechtsverhÀltnis (Beschrieb) nicht beachten.
-- Anzeigen, wenn die Summe nicht 1 ergibt.
-- Keine Angabe in ZÀhler/Nenner wird als 1 gewertet.

-- Anlass zu dieser Auswertung war:
-- Wenn mit PostNAS 0.8 und Trigger "kill" (ohne Historie) eine NBA-Abgabe mit Abgabeart "3100 fallbezogen (mit Historie)"
-- konvertiert wird, dann wird Update nicht richtig verarbeitet.
-- Update setzt z.B. das endet-Datum an einen Namensnummer. Alte Namen verbleiben auf dem Grundbuch.

CREATE OR REPLACE VIEW fehlersuche_namensanteile_je_blatt
AS
  SELECT g.gml_id, g.bezirk || '-' || g.buchungsblattnummermitbuchstabenerweiterung AS kennzeichen, 
         sum(coalesce(n.zaehler/n.nenner, 1.0))::double precision AS summe_der_anteile
  FROM ax_buchungsblatt g
  JOIN ax_namensnummer n 
    ON g.gml_id = n.istbestandteilvon
  WHERE g.endet IS NULL AND n.endet IS NULL
  GROUP BY g.gml_id, g.bezirk || '-' || g.buchungsblattnummermitbuchstabenerweiterung
  HAVING sum(coalesce(n.zaehler/n.nenner, 1)) <> 1.0::double precision
     AND (  -- die FÀlle mit einer Rechtsgemeinschaft nicht verwenden
        SELECT gml_id 
        FROM ax_namensnummer nr 
        WHERE g.gml_id = nr.istbestandteilvon
          AND NOT nr.artderrechtsgemeinschaft IS NULL
          AND nr.endet IS NULL
        LIMIT 1
     ) IS NULL
  LIMIT 100;

COMMENT ON VIEW fehlersuche_namensanteile_je_blatt
 IS 'Suchen nach GB-BlÀttern bei denen die Summe der Anteile der Namensnummern nicht passt.
Mit Ausnahme von RechtsverhÀltnissen sollte sie Summe der BrÌche immer 1/1 ergeben.';


-- PrÃŒfen einer Konvertierung mit historischen Objekten
-- Abgabeart 3100, Trigger "delete_feature_hist()".
-- NICHT anzuwenden bei Abgabeart 1000
-- Siehe auch: FUNCTION "alkis_hist_check()" in Datei "alkis-functions.sql"

-- Spaltenformat kann nicht geÀndert werden, löschen und neu anlegen.
DROP VIEW fehlersuche_hist_beginnt_endet_mischmasch;
DROP VIEW fehlersuche_hist_endet_sortierung_fs;
DROP VIEW hist_mehrere_vorgaenger_fs;

-- Erst mal die betroffenen Objekte identifizieren
CREATE OR REPLACE VIEW hist_mehrere_vorgaenger_fs
AS 
  SELECT gml_id AS gml, count(beginnt) AS anzahl -- 16stellige ID
  FROM ax_flurstueck
  GROUP BY gml_id
  HAVING count(beginnt) > 4 -- mindestens 3 Generationen zur PrÃŒfung notwendig
  ORDER BY count(beginnt) DESC -- die hÀufigsten zuerst
  LIMIT 20;  -- reicht zum gucken
-- bis zu 7 Versionen je FS gefunden

COMMENT ON VIEW hist_mehrere_vorgaenger_fs
 IS 'ALKIS-FlurstÃŒcke suchen, zu denen es inzwischen mehrere Versionen gibt, 
also mehrere inzwischen beendete (historische) VorgÀnger-Versionen';

-- Im zweiten Schritt dazu alle Versionen auflisten.
-- Die Serial "ogc_fid" sollte die EinfÌge-Reihenfolge reprÀsentieren.
-- Je "gml_id" muss "beginnt" und "endet" aufsteigend sein.
-- Das "endet" muss jeweils das "beginnt" der folgenden Version sein.
CREATE OR REPLACE VIEW fehlersuche_hist_endet_sortierung_fs
AS 
  SELECT gml_id AS gml, ogc_fid, beginnt, endet
  FROM ax_flurstueck f
  JOIN hist_mehrere_vorgaenger_fs v -- der vorhergehende View als Filter
    ON f.gml_id = v.gml
  ORDER BY gml_id, ogc_fid;

COMMENT ON VIEW fehlersuche_hist_endet_sortierung_fs
 IS 'Zu den ALKIS-FlurstÃŒcken, zu denen es inzwischen mehrere Versionen gibt, 
werden die beginnt- und  endet-Zeiten angezeigt. Diese sollten streng aufsteigend sein. 
Der endet-Zeitstempel sollte jeweils dem beginnt-Zeitstempel der Folgeversion enstsprechen.
(Nur) das endet der letzten Version sollte leer sein.';

-- Speziell die FÀlle suchen, bei denen die Kombination beginnt/endet-Datum nicht logisch ist
CREATE OR REPLACE VIEW fehlersuche_hist_beginnt_endet_mischmasch
AS 
  SELECT v1.gml_id AS gml, 
        v1.beginnt AS v1_beginnt, 
        v2.beginnt AS v2_beginnt,
     v1.endet   AS v1_endet, 
     v2.endet   AS v2_endet
  FROM ax_gebaeude v1 -- Version 1 -- oder eine andere Objekt-Tabelle
  JOIN ax_gebaeude v2 -- Version 2
    ON v1.gml_id = v2.gml_id   -- gleiches Objekt
   AND v2.beginnt > v1.beginnt -- aufsteigendes Beginn-Datum
   AND v2.endet   < v1.endet   -- aber absteigendes endet-Datum - Fehler!
  ORDER BY v1.gml_id, v1.beginnt, v1.endet
  LIMIT 10; -- Beispiele als Beweis der Fehlerhaftigkeit

COMMENT ON VIEW fehlersuche_hist_beginnt_endet_mischmasch
 IS 'Suche nach verschiedenen historischen Versionen eines Objektes bei denen das beginn-Datum aufsteigend ist, aber das endet-Datum absteigend (Falsch!).';


-- Suchen von großen BestÀnden, z.B. Grundbuch-Blatt mit mehr als 1000 FlurstÃŒcken
-- Diese BlÀtter machen Probleme bei der NW11-Abfrage der FinanzÀmter auf dem ALKIS-Bestand von ibR.
CREATE OR REPLACE VIEW suche_grosse_gb_bestaende
AS 
  -- Blatt  <IstBestandteilVon<  Buchung  <IstGebucht<  FlurstÃŒck
  SELECT b.bezirk || '-' || b.buchungsblattnummermitbuchstabenerweiterung AS bestand,
         count(f.gml_id) AS anz_flurstuecke
  FROM ax_buchungsblatt  b -- Blatt
  JOIN ax_buchungsstelle g -- GrundstÃŒck
    ON b.gml_id = g.istbestandteilvon
  JOIN ax_flurstueck     f -- FlurstÃŒck
    ON f.istgebucht = g.gml_id
  WHERE b.endet IS NULL AND g.endet IS NULL AND f.endet IS NULL 
  GROUP BY b.bezirk || '-' ||b.buchungsblattnummermitbuchstabenerweiterung
  HAVING count(f.gml_id) > 300 
  ORDER BY b.bezirk || '-' ||b.buchungsblattnummermitbuchstabenerweiterung
  LIMIT 30;

COMMENT ON VIEW suche_grosse_gb_bestaende
 IS 'Suche nach GB-Blatt mit vielen FlurstÃŒcken.';


-- Ein typischer Fehler im NBA-Verfahren erzeugt SekundÀrbestÀnde, bei denen EigentÌmer fehlen.
-- Dies kommt so zustande:
--  - FlurstÃŒck und Person sind zum Zeitpunkt der Erstabgabe im Katasterbezirk bereits vorhanden.
--  - Die FlurstÃŒcke werden auf Stadtgebiet gefiltert.
--  - Die Person hat keine Verbindung zu einem FlurstÃŒck im Ausschnitt und wird nicht mit ausgeliefert. 
--  - SpÀter wird eine neue Relation zwischen FS--Buchung--GBBlatt--Namensnummer--Person  gebildet.
--  - Die Relation wird abgegeben (gml_id der ax_person) in "ax_namensnummer.benennt"
--  - Aber die Person fehlt im SekundÀrbestand, sie wurde nicht nachgeliefert.
-- Solche FÀlle sollen hier gezielt gefunden werden:

--           DROP VIEW fehlersuche_nba_person_mit_fs;
CREATE OR REPLACE VIEW fehlersuche_nba_person_mit_fs
AS
 SELECT
  -- FlurstÃŒck
    f.gml_id                             AS fsgml,
  --f.flurstueckskennzeichen,
    f.gemarkungsnummer || '-' ||  f.flurnummer || '-' || f.zaehler ||
      coalesce('/' || f.nenner, '') AS fs_kennz,
  -- Grundbuch
    gb.gml_id                            AS gbgml,
    gb.bezirk || '-' || gb.buchungsblattnummermitbuchstabenerweiterung AS gb_kennz,
  -- Buchungsstelle (GrundstÃŒck)
    s.laufendenummer                     AS bu_lfd,      -- BVNR
  -- NamensNummer (Normalfall mit Person)
    nn.laufendenummernachdin1421         AS nam_lfd,
  -- Person
    nn.benennt                           AS fehlende_person_gmlid
  --p.gml_id                             AS psgml,
  --p.vorname, p.nachnameoderfirma,
  FROM ax_flurstueck    f               -- FlurstÃŒck
  JOIN doppelverbindung d               -- beide FÀlle Ìber Union-View: direkt und Ìber Recht von Buchung an Buchung
    ON d.fsgml = f.gml_id
  JOIN ax_buchungsstelle s              -- Buchungs-Stelle
    ON d.bsgml = s.gml_id
  JOIN ax_buchungsblatt  gb             -- Buchung >istBestandteilVon> Grundbuchblatt
    ON gb.gml_id = s.istbestandteilvon
  JOIN ax_namensnummer nn               -- Blatt <istBestandteilVon< NamNum
    ON  gb.gml_id = nn.istbestandteilvon
  LEFT JOIN ax_person p                 -- NamNum >benennt> Person 
    ON p.gml_id = nn.benennt
  LEFT JOIN ax_anschrift a 
    ON a.gml_id = ANY (p.hat)
  WHERE f.endet IS NULL AND s.endet IS NULL AND gb.endet IS NULL AND nn.endet IS NULL AND p.endet IS NULL
    AND nn.artderrechtsgemeinschaft IS NULL  -- Sonderzeilen ausblenden
    AND p.gml_id IS NULL                     -- Hier sollte eine Person vorhanden sein!!
  ORDER BY f.flurstueckskennzeichen, 
           gb.bezirk, gb.buchungsblattnummermitbuchstabenerweiterung, s.laufendenummer,
           nn.laufendenummernachdin1421;

COMMENT ON VIEW fehlersuche_nba_person_mit_fs 
 IS 'Suche nach typischem Fehler "Person fehlt" nach einer NBA-Aktualisierung mit geometrischen Filter. Mit FlurstÃŒcken.';

-- Durch den JOIN auf FlurstÌcke werden Personen-FÀlle ggf. mehrfach aufgefÌhrt.
-- Um schneller die Übersicht ÃŒber die *Anzahl* zu bekommen, lÀsst man die FS besser weg.

--           DROP VIEW fehlersuche_nba_person;
CREATE OR REPLACE VIEW fehlersuche_nba_person
AS
 SELECT
    gb.gml_id                            AS gbgml,
    gb.bezirk || '-' || gb.buchungsblattnummermitbuchstabenerweiterung AS gb_kennz,
    nn.laufendenummernachdin1421         AS nam_lfd,
    nn.benennt                           AS fehlende_person_gmlid
  FROM ax_buchungsblatt  gb
  JOIN ax_namensnummer nn               -- Blatt <istBestandteilVon< NamNum
    ON  gb.gml_id = nn.istbestandteilvon
  LEFT JOIN ax_person p                 -- NamNum >benennt> Person 
    ON p.gml_id = nn.benennt
  WHERE gb.endet IS NULL AND nn.endet IS NULL AND p.endet IS NULL
    AND nn.artderrechtsgemeinschaft IS NULL  -- Sonderzeilen ausblenden
    AND p.gml_id IS NULL                     -- Hier sollte eine Person vorhanden sein!!
  ORDER BY gb.bezirk, gb.buchungsblattnummermitbuchstabenerweiterung, nn.laufendenummernachdin1421;

COMMENT ON VIEW fehlersuche_nba_person 
 IS 'Suche nach typischem Fehler "Person fehlt" nach einer NBA-Aktualisierung mit geometrischen Filter. OHNE FlurstÃŒcke.';


-- In der SQLite-Version der Datenbank sind die Relationen "hat" und "benennt" nicht gefÃŒllt.
-- Darum ÃŒber die zentrale Beziehungen-Tabelle gehen!
CREATE OR REPLACE VIEW fehlersuche_nba_person_old_Style
AS
 SELECT
    gb.gml_id AS gbgml,
    gb.bezirk || '-' || gb.buchungsblattnummermitbuchstabenerweiterung AS gb_kennz,
    nn.laufendenummernachdin1421  AS nam_lfd,
    a2.beziehung_zu               AS fehlende_person_gmlid
  FROM ax_buchungsblatt  gb  
  JOIN alkis_beziehungen a1 ON a1.beziehung_zu=gb.gml_id  AND a1.beziehungsart='istBestandteilVon'
  JOIN ax_namensnummer   nn ON a1.beziehung_von=nn.gml_id
  JOIN alkis_beziehungen a2 ON a2.beziehung_von=nn.gml_id AND a2.beziehungsart='benennt' 
  LEFT JOIN ax_person p     ON a2.beziehung_zu=p.gml_id 
  WHERE gb.endet IS NULL AND nn.endet IS NULL AND p.endet IS NULL
    AND nn.artderrechtsgemeinschaft IS NULL  AND p.gml_id IS NULL
  ORDER BY gb.bezirk, gb.buchungsblattnummermitbuchstabenerweiterung, nn.laufendenummernachdin1421;

COMMENT ON VIEW fehlersuche_nba_person_old_Style 
 IS 'Suche nach typischem Fehler "Person fehlt" nach einer NBA-Aktualisierung mit geometrischen Filter. Relation ÃŒber alkis_beziehungen, dann klappt das auch in SQLite.';

-- END --