Changeset 417 for trunk/info/info/alkisn/alkisfshist.php

Timestamp:

11/19/18 18:33:36 (5 years ago)

Author:

frank.jaeger

Message:

Korrektur der Auskunft: Vorgängerflurstücke und Fortführungen bei Flurstücks-Historie.

File:

• trunk/info/info/alkisn/alkisfshist.php (modified) (10 diffs)

trunk/info/info/alkisn/alkisfshist.php

@@ -12 +12 @@
         2018-03-16 NULL-Werte in gemeinde und kreis in ax_historischesflurstueck berÃŒcksichtigen
         2018-04-23 &nodebug
-        2018-11-09 Umstellung Full-Schema
+        2018-11-19 Full-Schema: EntschlÃŒsseln "zeigtaufexternes_art" mit function fortfuehrungen(). Tab. "ax_historischesflurstueck" hat kein "vorgaengerflurstueckskennzeichen" mehr.
 */
 
@@ -68 +68 @@
 
 function such_vor_arr($fsk) {
-// Suchen der Vorgaenger zum aktuellen Flurst. Ausgabe von Selbst-Links Zeilenweise in <td>.
-// Akt. FS hat keine Verweise auf Vorgaenger. Darum in den Nachfolger-Verweisen von Hist.-FS suchen.
+// Suchen Vorgaenger zum aktuellen Flurst. Ausgabe von Selbst-Links Zeilenweise in <td>.
+// Akt. FS und hist.FS hat keine Verweise auf Vorgaenger. Darum in den Nachfolger-Verweisen von Hist.-FS suchen.
         global $gkz, $con, $debug, $showkey, $filtkreis, $filtgem;
 
@@ -75 +75 @@
         ."WHERE $1 = ANY (h.nachfolgerflurstueckskennzeichen) AND h.endet IS NULL "
         ."UNION SELECT 'o' AS ftyp, o.gml_id, o.flurstueckskennzeichen FROM ax_historischesflurstueckohneraumbezug o "
-        ."WHERE $1 = ANY (o.nachfolgerflurstueckskennzeichen) AND o.endet IS NULL "
-        ."ORDER BY flurstueckskennzeichen";
+        ."WHERE $1 = ANY (o.nachfolgerflurstueckskennzeichen) AND o.endet IS NULL ORDER BY flurstueckskennzeichen";
 
         $v=array($fsk);
@@ -97 +96 @@
         if ($zv == 0) {
                 echo "(keine)";
-                // if ($debug > 2) {echo "\n<p class='dbg'>SQL='".$sqlv."' FSK='".$fsk."'</p>";}
-        } else {
-                // if ($debug > 2) {echo "\n<p class='dbg'>Treffer=".$zv."</p>";}
         }
         return;
@@ -165 +161 @@
 if ($parmtyp != "") { // einer der beiden erlaubten FÀlle
         // UNION-Abfrage auf 3Àhnliche Tabellen, darin aber immer nur 1 Treffer.
-
         $felder="gml_id, flurnummer, cast(zaehler AS character varying), cast(nenner AS character varying), flurstueckskennzeichen, amtlicheflaeche, to_char(cast(zeitpunktderentstehung AS date),'DD.MM.YYYY') AS zeitpunktderentstehung, gemarkungsnummer, ";
 
@@ -174 +169 @@
         } else { // ZusÀtze zur WHERE-Clausel
                 $wheref=" AND f.gemeindezugehoerigkeit_kreis = '".$filtkreis."' AND f.gemeindezugehoerigkeit_gemeinde = '".$filtgem."' ";
-                $whereh=" AND (h.kreis IS NULL OR h.kreis = '".$filtkreis."' ) AND (h.gemeinde IS NULL OR h.gemeinde = '".$filtgem."') ";
-                $whereo=" AND (o.gemeinde IS NULL OR o.gemeinde = '".$filtgem."') ";
-        }
-
-        $sqlu ="SELECT 'a' AS ftyp, ".$felder."null AS nach, null AS vor, null AS \"name\" FROM ax_flurstueck f ".$whereclause.$wheref." AND f.endet IS NULL "
-        ."UNION SELECT 'h' AS ftyp, ".$felder."nachfolgerflurstueckskennzeichen AS nach, vorgaengerflurstueckskennzeichen AS vor, name FROM ax_historischesflurstueck h ".$whereclause.$whereh." AND h.endet IS NULL "
-        ."UNION SELECT 'o' AS ftyp, ".$felder."nachfolgerflurstueckskennzeichen AS nach, vorgaengerflurstueckskennzeichen AS vor, name FROM ax_historischesflurstueckohneraumbezug o ".$whereclause.$whereo." AND o.endet IS NULL;";
+                $whereh=" AND (h.gemeindezugehoerigkeit_kreis IS NULL OR h.gemeindezugehoerigkeit_kreis = '".$filtkreis."' ) AND (h.gemeindezugehoerigkeit_gemeinde IS NULL OR h.gemeindezugehoerigkeit_gemeinde = '".$filtgem."') ";
+                $whereo=" AND (o.gemeindezugehoerigkeit_gemeinde IS NULL OR o.gemeindezugehoerigkeit_gemeinde = '".$filtgem."') ";
+        }
+
+        $sqlu ="SELECT 'a' AS ftyp, ".$felder."null::character varying[] AS nach, null::character varying[] AS vor, zeigtaufexternes_art AS zart, zeigtaufexternes_name AS zname FROM ax_flurstueck f ".$whereclause.$wheref." AND f.endet IS NULL "
+        ."UNION SELECT 'h' AS ftyp, ".$felder."nachfolgerflurstueckskennzeichen AS nach, null AS vor, zeigtaufexternes_art AS zart, zeigtaufexternes_name AS zname FROM ax_historischesflurstueck h ".$whereclause.$whereh." AND h.endet IS NULL "
+        ."UNION SELECT 'o' AS ftyp, ".$felder."nachfolgerflurstueckskennzeichen AS nach, vorgaengerflurstueckskennzeichen AS vor, zeigtaufexternes_art AS zart, zeigtaufexternes_name AS zname FROM ax_historischesflurstueckohneraumbezug o ".$whereclause.$whereo." AND o.endet IS NULL;";
 
         $resu = pg_prepare("", $sqlu);
@@ -194 +189 @@
                 $fskenn=$rowu["flurstueckskennzeichen"];
                 $flae=number_format($rowu["amtlicheflaeche"],0,",",".") . " m&#178;";
-                $name=$rowu["name"]; // in DB ein Array
-                $arrn=explode(",", trim($name, "{}") ); // PHP-Array 
                 $gemkname= gemkg_name($gmkgnr);
-                $entsteh=$rowu["zeitpunktderentstehung"];
                 $vor=$rowu["vor"];
                 $nach=$rowu["nach"];
+                $entsteh=$rowu["zeitpunktderentstehung"];
+                $zeart=$rowu["zart"];
+                $zename=$rowu["zname"];
                 if ($gmlid == "") {$gmlid=$rowu["gml_id"];} // fuer selbst-link-Umschalter ueber footer
+
+                switch ($ftyp) { // Diff. Hist./Akt.
+                        case 'a': 
+                                $wert = "aktuell";
+                                $ico= "Flurstueck.png";
+                                $cls= "kennzfs";        
+                        break;
+                        case 'h': 
+                                $wert = "historisch<br>(mit Raumbezug)";
+                                $ico= "Flurstueck_Historisch.png"; //
+                                $cls= "kennzfsh";
+                        break;
+                        case 'o': 
+                                $wert = "historisch<br>ohne Raumbezug";
+                                $ico= "Flurstueck_Historisch_oR.png";
+                                $cls= "kennzfsh";
+                        break;
+                        default:
+                                $wert = "<b>nicht gefunden: ".$parmtyp." = '".$parmval."'</b>";
+                                $ico= "Flurstueck_Historisch.png";
+                                $cls= "kennzfsh";
+                        break;
+                }
         } else {
                 if ($debug > 1) {
@@ -211 +229 @@
 }
 
-switch ($ftyp) { // Unterschiede Hist./Aktuell
-        case 'a': 
-                $wert = "aktuell";
-                $ico= "Flurstueck.png";
-                $cls= "kennzfs";        
-        break;
-        case 'h': 
-                $wert = "historisch<br>(mit Raumbezug)";
-                $ico= "Flurstueck_Historisch.png"; //
-                $cls= "kennzfsh";
-        break;
-        case 'o': 
-                $wert = "historisch<br>ohne Raumbezug";
-                $ico= "Flurstueck_Historisch_oR.png";
-                $cls= "kennzfsh";
-        break;
-        default:
-                $wert = "<b>nicht gefunden: ".$parmtyp." = '".$parmval."'</b>";
-                $ico= "Flurstueck_Historisch.png";
-                $cls= "kennzfsh";
-        break;
-}
-
 // Balken
 echo "<p class='fshis'>ALKIS Flurst&uuml;ck ".$gmkgnr."-".$flurnummer."-".$flstnummer."&nbsp;</p>";
-echo "\n<h2><img src='ico/".$ico."' width='16' height='16' alt=''> Flurst&uuml;ck Historie</h2>";
-
-echo "\n<table class='outer'>\n<tr>\n\t<td>";
-        // darin Tabelle Kennzeichen
-        echo "\n\t<table class='".$cls."' title='Flurst&uuml;ckskennzeichen'>\n\t<tr>"
+echo "\n<h2>Flurst&uuml;ck Historie</h2>";
+
+echo "\n<table class='outer'>\n<tr>\n\t<td>"
+        ."\n\t<tr>\n\t\t<td class='ll'><img src='ico/".$ico."' width='16' height='16' alt=''> Kennzeichen:</td>" // Links
+        ."\n\t\t<td>" // Mitte
+        ."\n\t<table class='".$cls."' title='Flurst&uuml;ckskennzeichen'>\n\t<tr>" // innere Tabelle Kennzeichen
                 ."\n\t\t<td class='head'>Gemarkung</td>\n\t\t<td class='head'>Flur</td>\n\t\t<td class='head'>Flurst-Nr.</td>\n\t</tr>"
                 ."\n\t<tr>\n\t\t<td title='Gemarkung'>";
@@ -249 +245 @@
         ."\n\t</table>"
 ."\n\t</td>\n\t<td>";
-        // FS-Daten 2 Spalten
-        echo "\n\t<table class='fsd'>"
-                ."\n\t<tr>\n\t\t<td>Entstehung</td>"
-                        ."\n\t\t<td>".$entsteh."</td>"
-                ."\n\t</tr>\n\t<tr>"
-                        ."\n\t\t<td>letz. Fortf</td>"
-                        ."\n\t\t<td title='Jahrgang / Fortf&uuml;hrungsnummer - Fortf&uuml;hrungsart'>";
-                                foreach($arrn AS $val) { // Zeile f. jedes Element
-                                        echo trim($val, '"')."<br>";
-                                }
-                        echo "</td>"
-                ."\n\t</tr>"
-        ."\n\t</table>"
-."\n\t</td>\n</tr>\n</table>";
+fortfuehrungen($entsteh, $zeart, $zename);
+echo "\n\t</td>\n</tr>\n</table>";
 
 if ($ftyp == "a") { // Aktuell -> Historie
@@ -288 +272 @@
         // Spalte 2: V o r g À n g e r
         echo "\n\t<td>";
-        switch ($ftyp) { // Unterschiede Historisch/Aktuell
+        switch ($ftyp) { // Diff. Hist./Akt.
                 case 'a':
                         such_vor_arr($fskenn);
                 break;
                 case 'h':
-                        if ($vor == "") {
-                                echo "Geometrische Suche<br>(noch nicht m&ouml;glich)";
-                        } else {
-                                vornach($vor);
-                        }
+                        such_vor_arr($fskenn);
                 break;
                 case 'o':