Changeset 425 for trunk/mapbender/http/nav/alkisnav_fls.php

Timestamp:

12/30/21 17:49:00 (2 years ago)

Author:

frank.jaeger

Message:

Web-GIS-Auskunft und Mapbender2-Navigation: neue Konfigurations-Parameter und verbessertes Grundbuch-Modul

File:

• trunk/mapbender/http/nav/alkisnav_fls.php (modified) (11 diffs)

trunk/mapbender/http/nav/alkisnav_fls.php

@@ -10 +10 @@
         2018-11-12 Full-Schema
         2019-02-12 Sortierung FlurstÃŒcksnummer wieder hergestellt (kaputt gegangen bei Umstellung Full-Schema)
+        2021-11-24 fÌhrende '0' Trimmen bei Flur, ZÀhler, Nenner in der Zerlegung
+        2021-12-29 Sortierung der Nachfolger eines hist. FS
+        
+ToDo:
+        Vermeiden der Tabellen "gema_shl" und "gem_shl". Das sind NorBIT/ALB-Relikte, die irgendwann entfallen werden.
+        Besser primÀre ax_*-Tabellen verwenden.
 */
 
@@ -129 +135 @@
 
         if (count($arr) > 1) {
-                $zflur=h_hinten($arr[1]);
+                $zflur=ltrim(h_hinten($arr[1]), '0');
                 if (count($arr) > 2) {
                         $zfsnr=trim($arr[2]);
@@ -172 +178 @@
         } else {
                 $zn=explode("/", $zfsnr, 2); // Bruchnummer?
-                $zzaehler=h_hinten(trim($zn[0]));
-                if (count($zn) > 1) {$znenner=h_hinten(trim($zn[1]));} else {$znenner="";}
+                $zzaehler=ltrim(h_hinten(trim($zn[0])), '0');
+                if (count($zn) > 1) {
+                        $znenner=ltrim(h_hinten(trim($zn[1])), '0');
+                } else {
+                        $znenner="";
+                }
+        //      if ($debug > 1) {echo "<p class='dbg'>Gemkg: '".$gemkg."' Flur: '".$zflur."' Zaehler: '".$zzaehler."' Nenner: '".$znenner."'</p>";}
                 if ( ! is_ne_zahl($zzaehler)) {
                         echo "<p class='err'>FlurstÃŒcksnummer '".$zzaehler."' ist nicht numerisch</p>";
@@ -283 +294 @@
                 echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath.$auskprog.".php?gkz=".$gkz."&amp;gmlid=".$gml."\")'>";
                         echo "\n\t\t<img class='nwlink' src='ico/".$ico."' width='16' height='16' alt='FS' title='Nachweis'>";
-                echo "\n\t</a> ";               
-                echo "Flst. <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$fs.$hisparm."'>".$fskenn."</a>";                                     
+                echo "\n\t</a>&nbsp;";          
+                echo "hist. Flst. <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$fs.$hisparm."'>".$fskenn."</a>";                                       
         echo "\n</div>";
         return;
@@ -418 +429 @@
                 echo "\n<p class='anz'>Keine Gemarkung.</p>";
                 if ($debug > 1) {
-/*
-                        // Nach Umstellung auf NorGIS-Struktur muss im Mapbender die Gemeinde 3stellig konfiguriert werden
+/*                      // Nach Umstellung auf NorGIS-Struktur muss im Mapbender die Gemeinde 3stellig konfiguriert werden
                         if (strlen($gemeinde) < 3) {
                                 echo "<p class='err'>URL-Parameter &gemeinde=nnn im Mapbender gazetteer_alkis.SRC muss 3stellig sein!<br>Ist aber '".$gemeinde."'.</p>";
-                        }
-*/
+                        } */
                         if ($debug > 2) {echo "<p class='dbg'>SQL=<br>".$sql."<br>$1 = ".$match."</p>";}
                 }
@@ -473 +482 @@
         if ($AuchGemkZeile) { // Kopf davor ausgeben
                 if (! gg_head($zgemkg6, true)) {
-                        if ($debug >= 1) {echo "\n<p class='dbg'>Gem.-Gemkg.-Kopf abgebrochen</p>";}    
+                        if ($debug > 0) {echo "\n<p class='dbg'>Gem.-Gemkg.-Kopf abgebrochen</p>";}     
                         return false;
                 } 
@@ -479 +488 @@
 
         // Body
+        // ++ ToDo: (optional) nur Fluren ausgeben, in denen auch FlurstÃŒcke enthalten sind.
         $sql ="SELECT gemarkungsteilflur AS flur FROM ax_gemarkungsteilflur f WHERE gemarkung= $1 ORDER BY gemarkungsteilflur LIMIT $2 ;";
         $v=array($zgemkg4, $linelimit);
@@ -621 +631 @@
         }
         $sql.="FROM ax_flurstueck f WHERE f.gemarkungsnummer= $1 AND f.flurnummer= $2 AND f.zaehler= $3 ";
-
         If ($znenner != "") {
-                $suchnenn = ltrim($znenner, '0');
-                If ($suchnenn != "") {
-                        $sql.="AND f.nenner='".$suchnenn."' ";
-                }
+                $sql.="AND f.nenner='".$znenner."' ";
         }
         $sql.="AND endet IS NULL ORDER BY cast(f.zaehler AS integer), cast(f.nenner AS integer);";
@@ -732 +738 @@
                         $nasql ="SELECT 'a' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_flurstueck ".$nawhcl
                         ."UNION SELECT 'h' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_historischesflurstueck ".$nawhcl
-                        ."UNION SELECT 'o' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_historischesflurstueckohneraumbezug ".$nawhcl;
+                        ."UNION SELECT 'o' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_historischesflurstueckohneraumbezug ".$nawhcl
+                        ."ORDER BY gemarkungsnummer, flurnummer, zaehler, nenner";
 
                         $v=array();
@@ -773 +780 @@
 }
 
-// ===========
 // Start hier!
-// ===========
-if ($debug >= 1) {echo "\n<p class='dbg'>gemeinde='".$gemeinde."'. gfilter='".$gfilter."'</p>";}
+
+// if ($debug >= 1) {echo "\n<p class='dbg'>gemeinde='".$gemeinde."'. gfilter='".$gfilter."'</p>";}
 
 // Validation: Eingabefeld aus Formular.
@@ -800 +806 @@
 } else { // Die Formular-Eingabe interpretieren (kann auch ein Link sein)
         $retzer=ZerlegungFsKennz($fskennz);
-        if ($debug >= 1) {echo "\n<p class='dbg'>Return Zerlegung: ".$retzer."</p>";}   
+        if ($debug > 1) {echo "\n<p class='dbg'>Return Zerlegung: ".$retzer."</p>";}    
         switch ($retzer) { // Returnwert der Zerlegung des FS-Kennz.
         case 0: // leere Eingabe