source: trunk/data/mapbender/http/nav/alkisnav_fls.php @ 115

Revision 115, 17.0 KB checked in by frank.jaeger, 12 years ago (diff)

ALKIS-Navigation: Nach Positionieren der Karte durch Mausklick das Highlighting (roter Ball) noch beibehalten bis der Mauszeiger abgezogen wird.

RevLine 
[66]1<?php
[85]2/* Version vom
3        13.01.2011
4        25.03.2011 Filter als Gemeinde-Liste
[86]5        12.04.2011 epsg in Link, transform nur wenn notwendig
[95]6        12.05.2011 Syntaxfehler in SQL
[105]7        25.07.2011 PostNAS 0.5/0.6 Versionen unterscheiden
[115]8        24.10.2011 Nach Pos-Klick Highlight erneuern statt hideHighlight
[85]9*/
[66]10import_request_variables("PG");
[68]11include("../../conf/alkisnav_conf.php"); $con_string = "host=".$host." port=".$port." dbname=".$dbname.$dbvers.$gkz." user=".$user." password=".$password;
[105]12$con = pg_connect ($con_string) or die ("Fehler bei der Verbindung zur Datenbank ".$dbname.$dbvers.$gkz);
13?>
[66]14
15<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
16<html>
17<head>
18        <meta http-equiv="cache-control" content="no-cache">
19        <meta http-equiv="pragma" content="no-cache">
20        <meta http-equiv="expires" content="0">
21        <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
22        <title>ALKIS-Suche Flurst&uuml;ck</title>
23        <link rel="stylesheet" type="text/css" href="alkisnav.css">
24</head>
25<body>
26
27<?php
28
29function is_ne_zahl($wert) {
30        // Prueft, ob ein Wert ausschließlich aus den Zahlen 0 bis 9 besteht
31        if (trim($wert, "0..9") == "") {return true;} else {return false;}
32}
33
34function ZerlegungFsKennz($fskennz) {
35// Das eingegebene FlurstÃŒcks-Kennzeichen auseinander nehmen, Erwartet wird gggg-fff-zzzz/nnn
36        global $debug, $zgemkg, $zflur, $zzaehler, $znenner;            $arr = explode("-", $fskennz, 4);
37        $zgemkg=trim($arr[0]);
38        $zflur=trim($arr[1]);
39        $zfsnr=trim($arr[2]);
40        if ($zgemkg == "") {
41                return 0; // Gemeinden oder Gemarkungen listen
42        } elseif ( ! is_ne_zahl($zgemkg)) {
[86]43                return 1; // Such Name
[66]44        } elseif ($zflur == "") {
45                return 2; // G-Nr
46        } elseif ( ! is_ne_zahl($zflur)) {
47                echo "<p class='err>Die Flurnummer '".$zflur."' ist nicht numerisch</p>";
48                return 9;
49        } elseif ($zfsnr == "") {               
[86]50                return 3; // Flur                               
[66]51        } else {
52                $zn=explode("/", $zfsnr, 2);
53                $zzaehler=trim($zn[0]);
54                $znenner=trim($zn[1]);                         
55                if ( ! is_ne_zahl($zzaehler)) {
56                        echo "<p class='err>FlurstÃŒcksnummer '".$zzaehler."' ist nicht numerisch</p>";
57                        return 9;
58                } elseif ($znenner == "") {
[86]59                        return 4;
[66]60                } elseif (is_ne_zahl($znenner)) {
61                        return 5;                                                               
62                } else {
63                        echo "<p class='err>FlurstÃŒcks-Nenner '".$znenner."' ist nicht numerisch</p>";
64                        return 9;
65                }
[86]66        }
[66]67}
68
69function ListGemeinden() {
70        // bei Leereingabe die Gemeinden anlisten
[86]71        global $con, $gkz, $gemeinde, $epsg, $debug, $gfilter;
72        $linelimit=50;
73        $sql ="SELECT DISTINCT g.gemeinde AS key, g.bezeichnung FROM ax_gemeinde g ";
74        $sql.="JOIN gemeinde_gemarkung v ON g.regierungsbezirk=v.regierungsbezirk AND g.kreis=v.kreis AND g.gemeinde=v.gemeinde ";
75        // "ax_gemeinde" enthÀlt mehrfache Gemeinde-Schluessel (Filtern regierungsbezirk, kreis)       
76        // "gemeinde_gemarkung" enthaelt nur gefÃŒllte Gemarkungen aber Gemeinde mehrfach
77        switch ($gfilter) {
78                case 1: // Einzelwert
79                        $sql.="WHERE g.gemeinde=".$gemeinde." ";
80                        break;
81                case 2: // Liste
82                        $sql.="WHERE g.gemeinde in (".$gemeinde.") ";
83                        break;
84                default: // kein Filter
85                        break;
86        }
87        $sql.=" ORDER BY g.bezeichnung LIMIT $1 ;";
88        $res=pg_prepare("", $sql);
89        $res=pg_execute("", array($linelimit));
90        if (!$res) {
91                echo "\n<p class='err'>Fehler bei Gemeinde</p>";
92                if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}
93                return 0;
94        }
95        $cnt = 0;
96        while($row = pg_fetch_array($res)) {
97                $stadt=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
98                $bez=urlencode($row["bezeichnung"]);  // Uebergeben an ListGmkgInGemeinde
99                $gnr=$row["key"];                 echo "\n<div class='gm' title='Gemeinde'>";
100                        echo "\n\t\t<img class='nwlink' src='ico/Gemeinde.ico' width='16' height='16' alt='Stadt'>";
101                        echo " Gem. <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;gm=".$gnr."&amp;bez=".$bez."'>";               
102                        echo  " ".$stadt."</a> (".$gnr.")";
103                echo "\n</div>";
104                $cnt++;
105        }
106        if($cnt == 0){
107                echo "\n<p class='err'>Keine Gemeinde.</p>";
108        } elseif($cnt >= $linelimit) {
109                echo "\n<p title='Bitte eindeutiger qualifizieren'>... und weitere</p>";
110        } elseif($cnt == 1) { // Eindeutig!
111                return $gnr;
112        }
113        return 0;
114}
115
116function ListGmkgInGemeinde($gkey) {
117// Die (gefuellten) Gemarkungen zu einem Gemeinde-Key (aus Link) listen
118        global $con, $gkz, $gemeinde, $epsg, $debug, $gfilter, $bez;
119        $linelimit=70;
120        $sql ="SELECT g.gemarkungsnummer, g.bezeichnung ";
121        $sql.="FROM ax_gemarkung g JOIN gemeinde_gemarkung v ON g.gemarkungsnummer=v.gemarkung ";
122   $sql.="WHERE v.gemeinde= $1 ORDER BY g.bezeichnung LIMIT $2 ;";
123        $res=pg_prepare("", $sql);
124        $res=pg_execute("", array($gkey, $linelimit));
125        if (!$res) {
126                echo "\n<p class='err'>Fehler bei Gemarkungen</p>";
127                if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}
128                return 0;
129        }
130        // Hierarchie Dokumentieren, Gemeinde-Name?
131        echo "\n<div class='gm' title='Gemeinde'>";
132                echo "\n\t\t<img class='nwlink' src='ico/Gemeinde.ico' width='16' height='16' alt='Stadt'>";   
133                echo  " Gem. ".$bez." (".$gkey.")"; // .urldecode($bez). ??
134        echo "\n</div>";
135        $cnt = 0;
136        while($row = pg_fetch_array($res)) {
137                $gnam=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
138                $gnr=$row["gemarkungsnummer"];                 echo "\n<div class='gk' title='Gemarkung'>";
139                        echo "\n\t\t<img class='nwlink' src='ico/Gemarkung.ico' width='16' height='16' alt='Gemarkung'>";
140                        echo " OT <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$gnr."'>";             
141                        echo  " ".$gnam."</a> (".$gnr.")";
142                echo "\n</div>";
143                $cnt++;
144        }
145        if($cnt == 0){
146                echo "\n<p class='err'>Keine Gemarkung.</p>";
147        } elseif($cnt >= $linelimit) {
148                echo "\n<p title='Bitte eindeutiger qualifizieren'>... und weitere</p>";
149        } elseif($cnt == 1) { // Eindeutig!
150                return $gnr;
151        }
152        return 0;
153}
154
155function SuchGmkgName() {
156// Gemarkung suchen nach Name(-nsanfang)
157        global $con, $gkz, $gemeinde, $epsg, $debug, $fskennz, $gfilter;
158        $linelimit=120;
[66]159        if(preg_match("/\*/",$fskennz)){
160                $match = trim(preg_replace("/\*/i","%", strtoupper($fskennz)));
[86]161        } else {
[66]162                $match = trim($fskennz)."%";
163        }       
164        $sql ="SELECT v.gemeindename, g.gemarkungsnummer, g.bezeichnung ";
165        $sql.="FROM ax_gemarkung g JOIN gemeinde_gemarkung v ON g.gemarkungsnummer=v.gemarkung ";
166   $sql.="WHERE bezeichnung ILIKE $1 ";
167        switch ($gfilter) {
168                case 1: // Einzelwert
169                        $sql.="AND v.gemeinde=".$gemeinde." ";
170                        break;
[85]171                case 2: // Liste
172                        $sql.="AND v.gemeinde in (".$gemeinde.") ";
173                        break;
174                default: // kein Filter
175                        break;
176        }
177        $sql.=" ORDER BY g.bezeichnung LIMIT $2 ;";
178        $v=array($match, $linelimit);
179        $res=pg_prepare("", $sql);
180        $res=pg_execute("", $v);
[66]181        if (!$res) {
182                echo "\n<p class='err'>Fehler bei Gemarkung</p>";
183                if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}
184                return 0;
185        }
186        $cnt = 0;
187        while($row = pg_fetch_array($res)) {
188                $gnam=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
189                $gnr=$row["gemarkungsnummer"];
190                $stadt=$row["gemeindename"];                 echo "\n<div class='gk' title='Gemarkung'>";
191                        echo "\n\t\t<img class='nwlink' src='ico/Gemarkung.ico' width='16' height='16' alt='Gemarkung'>";
192                        echo " OT <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$gnr."'>";             
193                        echo  " ".$gnam."</a> (".$gnr.")";
194                        switch ($gfilter) {
195                                case 0: // Kein Filter
[86]196                                        echo " ".$stadt;
197                                        break;
[68]198                                case 2: // Liste
[85]199                                        echo " ".$stadt;
200                                        break;
201                                default: // Einzelwert
202                                        break;
203                        }
204                echo "\n</div>";
205                $cnt++;
206        }
207        if($cnt == 0){
208                echo "\n<p class='err'>Keine Gemarkung.</p>";
[66]209        } elseif($cnt >= $linelimit) {
210                echo "\n<p title='Bitte eindeutiger qualifizieren'>... und weitere</p>";
211        } elseif($cnt == 1) { // Eindeutig!
212                return $gnr;
213        }
214        return 0;
215}
216
217function EineGemarkung($AuchGemkZeile) {
218        // Kennzeichen bestehend nur aus Gemarkung-SchlÃŒssel wurde eingegeben
219        global $con, $gkz, $gemeinde, $epsg, $debug, $zgemkg;
220        $linelimit=120; // max. Fluren je Gemarkung
221        if ($AuchGemkZeile) {
222                $sql ="SELECT bezeichnung FROM ax_gemarkung g WHERE g.gemarkungsnummer= $1 ;"; // WHERE f.land= ?
223                $v=array($zgemkg);
[86]224                $res=pg_prepare("", $sql);
[66]225                $res=pg_execute("", $v);
226                if (!$res) {echo "\n<p class='err'>Fehler bei Gemarkung.</p>";}
227                $zgmk=0;
228                while($row = pg_fetch_array($res)) {   
229                        $gmkg=$row["bezeichnung"];
230                        $zgmk++;
231                }
232                if ($zgmk == 0) {
233                        echo "\n<div class='gk' title='Gemarkung'>";
234                                echo "\n\t\t<p class='err'><img class='nwlink' src='ico/Gemarkung.ico' width='16' height='16' alt='Gemarkung'>";
235                                        echo  " Gemarkung ".$zgemkg." ist unbekannt.</p>";
236                        echo "\n</div>";
237                        return;
238                }
[86]239                // > 1 auch möglich?
[66]240                echo "\n<div class='gk' title='Gemarkung'>";
241                        echo "\n\t\t<img class='nwlink' src='ico/Gemarkung.ico' width='16' height='16' alt='Gemarkung'> ";
242                        echo " OT <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$zgemkg."'>";           
243                        echo $gmkg."</a>  (".$zgemkg.")"; // in Gemeinde?
[86]244                echo "\n</div>";
[66]245        }
[86]246        $sql ="SELECT gemarkungsteilflur AS flur FROM ax_gemarkungsteilflur f ";
247        $sql.="WHERE gemarkung= $1 ORDER BY gemarkungsteilflur LIMIT $2 ;";     // WHERE f.land= ?
[68]248        $v=array($zgemkg, $linelimit);
[66]249        $res=pg_prepare("", $sql);
250        $res=pg_execute("", $v);
251        if (!$res) {echo "\n<p class='err'>Fehler bei Flur.</p>";}
252        $zfl=0;
253        while($row = pg_fetch_array($res)) {   
254                $flur=$row["flur"];
255                echo "\n<div class='fl' title='Flur'>";
256                        echo "\n\t\t<img class='nwlink' src='ico/Flur.ico' width='16' height='16' alt='Flur'> ";
257                        echo "Flur<a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$zgemkg."-".$flur."'>&nbsp;".$flur."&nbsp;</a>";
258                echo "\n</div>";
259                $zfl++;
260        }
261        if($zfl == 0) {
[86]262                echo "\n<p class='err'>Keine Flur.</p>";
[66]263        } elseif($cnt >= $linelimit) {
264                echo "\n<p>... und weitere</p>";
265        }
266        return;
267}
268
269function EineFlur() {
270        // Kennzeichen aus Gemarkung und FlurNr wurde eingegeben
271        global $con, $gkz, $gemeinde, $epsg, $debug, $scalefs, $auskpath, $zgemkg, $zflur;
272        $linelimit=600; // Wie groß kann eine Flur sein?
273        $sql ="SELECT bezeichnung FROM ax_gemarkung g WHERE g.gemarkungsnummer= $1 ;";
274        $v=array($zgemkg);
[68]275        $res=pg_prepare("", $sql);
[86]276        $res=pg_execute("", $v);
[66]277        if (!$res) {echo "\n<p class='err'>Fehler bei Gemarkung.</p>";}
278        $zgmk=0;
279        while($row = pg_fetch_array($res)) {   
280                $gmkg=$row["bezeichnung"];
281                $zgmk++;
282        }
283        if ($zgmk == 0) {
284                echo "\n<div class='gk' title='Gemarkung'>";
285                        echo "\n\t\t<p class='err'><img class='nwlink' src='ico/Gemarkung.ico' width='16' height='16' alt='Gemarkung'>";
286                                echo  " Gemarkung ".$zgemkg." ist unbekannt.</p>";
287                echo "\n</div>";
288                return;
289        }
[86]290        echo "\n<div class='gk' title='Gemarkung'>";
[66]291                echo "\n\t\t<img class='nwlink' src='ico/Gemarkung.ico' width='16' height='16' alt='Gemarkung'>";
292                echo " OT <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$zgemkg."'> ".$gmkg." (".$zgemkg.")</a>";
293        echo "\n</div>";
294        echo "\n<div class='fl' title='Flur'>";
295                echo "\n\t\t<img class='nwlink' src='ico/Flur.ico' width='16' height='16' alt='Flur'> ";
[86]296                echo "Flur <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$zgemkg."-".$zflur."'> ".$zflur."</a>";
297        echo "\n</div>";
[66]298
299        $sql ="SELECT f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.gemeinde, ";
300        //      $sql.="x(st_transform (st_centroid(f.wkb_geometry), ".$epsg.")) AS x, ";
[86]301        //      $sql.="y(st_transform (st_centroid(f.wkb_geometry), ".$epsg.")) AS y ";
[66]302        if($epsg == "25832") { // Transform nicht notwendig
303                $sql.="x(st_Centroid(f.wkb_geometry)) AS x, ";
304                $sql.="y(st_Centroid(f.wkb_geometry)) AS y ";
[86]305        }
306        else { 
307                $sql.="x(st_transform(st_Centroid(f.wkb_geometry), ".$epsg.")) AS x, ";
308                $sql.="y(st_transform(st_Centroid(f.wkb_geometry), ".$epsg.")) AS y ";                 
309        }
310   $sql.="FROM ax_flurstueck f WHERE f.gemarkungsnummer= $1 AND f.flurnummer= $2 ";
311        $sql.="ORDER BY f.zaehler, f.nenner LIMIT $3 ;"; // WHERE f.land= ?
312        $v=array($zgemkg, $zflur, $linelimit);
313        $res=pg_prepare("", $sql);
314        $res=pg_execute("", $v);
[66]315        if (!$res) {echo "\n<p class='err'>Fehler bei Flur.</p>";}
316        $zfs=0;
317        while($row = pg_fetch_array($res)) {   
318                $fs_gml=$row["gml_id"];
319                $flur=$row["flurnummer"];
320                $fskenn=$row["zaehler"];
321                if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // Bruchnummer
322                $x=$row["x"];
323                $y=$row["y"];
324                echo "\n<div class='fs'>";
325                        echo "\n\t<a title='Nachweis' target='_blank' href='".$auskpath."alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$fs_gml."'>";
326                                echo "\n\t\t<img class='nwlink' src='ico/Flurstueck_Link.ico' width='16' height='16' alt='FS'>";
327                        echo "\n\t</a> ";                       
328                        echo "\n\tFlst. <a title='Flurst&uuml;ck positionieren 1:".$scalefs."' href='";
329                                        echo "javascript:parent.parent.parent.mb_repaintScale(\"mapframe1\",".$x.",".$y.",".$scalefs."); ";
330                                        echo "parent.parent.showHighlight(".$x.",".$y.");' ";
331                                echo "onmouseover='parent.parent.showHighlight(".$x.",".$y.")' ";
332                                echo "onmouseout='parent.parent.hideHighlight()'>&nbsp;".$fskenn."&nbsp;</a>";
333                echo "\n</div>";
[115]334                $zfs++;
335        }
[66]336        if($zfs == 0) {
337                echo "\n<p class='err'>Kein Flurst&uuml;ck.</p>";
338        } elseif($zfs >= $linelimit) {
339                echo "\n<p>... und weitere</p>";
340        }
341        return;
342}
343
344function EinFlurstueck() {
345        // FlurstÃŒckskennzeichen komplett bis zum Zaehler eingegeben
346        // Sonderfall: bei Bruchnummer, mehrere Nenner zum Zaehler
347        global $con, $gkz, $debug, $scalefs, $epsg, $auskpath, $zgemkg, $zflur, $zzaehler, $znenner;
348
[68]349        $sql ="SELECT f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.gemeinde, ";
[66]350        //      $sql.="x(st_transform (st_centroid(f.wkb_geometry), ".$epsg.")) AS x, ";
351        //      $sql.="y(st_transform (st_centroid(f.wkb_geometry), ".$epsg.")) AS y, ";
352        if($epsg == "25832") { // Transform nicht notwendig
353                $sql.="x(st_Centroid(f.wkb_geometry)) AS x, ";
354                $sql.="y(st_Centroid(f.wkb_geometry)) AS y, ";
[86]355        }
356        else { 
357                $sql.="x(st_transform(st_Centroid(f.wkb_geometry), ".$epsg.")) AS x, ";
358                $sql.="y(st_transform(st_Centroid(f.wkb_geometry), ".$epsg.")) AS y, ";                 
359        }
360
361        $sql.="g.gemarkungsnummer, g.bezeichnung ";
362   $sql.="FROM ax_flurstueck f JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ";
[95]363        $sql.="WHERE f.gemarkungsnummer= $1 AND f.flurnummer= $2 AND f.zaehler= $3 ";
[86]364        If ($znenner != "") {$sql.="AND f.nenner=".$znenner." ";} // wie prepared?
365        $sql.="ORDER BY f.zaehler, f.nenner;"; // WHERE f.land= ?
[66]366        $v=array($zgemkg, $zflur, $zzaehler);
367        $res=pg_prepare("", $sql);
368        $res=pg_execute("", $v);
369        if (!$res) {echo "\n<p class='err'>Fehler bei Flurst&uuml;ck.</p>";}
[68]370        $zfs=0;
[66]371        while($row = pg_fetch_array($res)) {   
372                $fs_gml=$row["gml_id"];
373                $gmkg=$row["bezeichnung"];
374                $flur=$row["flurnummer"];
375                $fskenn=$row["zaehler"];
376                if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // Bruchnummer
377                $x=$row["x"];
378                $y=$row["y"];
379                echo "\n<div class='fs'>";
380                        echo "\n\t<a title='Nachweis' target='_blank' href='".$auskpath."alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$fs_gml."'>";
381                                echo "\n\t\t<img class='nwlink' src='ico/Flurstueck_Link.ico' width='16' height='16' alt='FS'>";
382                        echo "\n\t</a> ";               
383                        echo "\n\tFlst. <a title='Flurst&uuml;ck positionieren 1:".$scalefs."' href='";
384                                        echo "javascript:parent.parent.parent.mb_repaintScale(\"mapframe1\",".$x.",".$y.",".$scalefs."); ";
385                                        echo "parent.parent.showHighlight(".$x.",".$y.");' ";
386                                echo "onmouseover='parent.parent.showHighlight(".$x.",".$y.")' ";
387                                echo "onmouseout='parent.parent.hideHighlight()'>";
388                        echo $gmkg." ".$flur."-".$fskenn."</a>";
[115]389                echo "\n</div>";
390                $zfs++;
[66]391        }
392        if($zfs == 0) {echo "\n<p class='err'>Kein Flurst&uuml;ck.</p>";}
393        return;
394}
395
396// ===========
397// Start hier!
398// ===========
399if(isset($epsg)) {
400        if ($debug >= 2) {echo "<p>aktueller EPSG='".$epsg."'</p>";     } // aus MB
401        $epsg = str_replace("EPSG:", "" , $_REQUEST["epsg"]);   
402} else {
403        if ($debug >= 1) {echo "<p class='err'>kein EPSG gesetzt</p>";}
404        $epsg=$gui_epsg; // aus Conf
405}
[86]406if ($debug >= 2) {
[66]407        echo "<p>Filter Gemeinde = ".$gemeinde."</p>";
[86]408}
[66]409if ($gemeinde == "") {
410        $gfilter = 0; // ungefiltert
411} elseif(strpos($gemeinde, ",") === false) {
[85]412        $gfilter = 1; // Einzelwert
[66]413} else {
[85]414        $gfilter = 2; // Liste
415}
416
417if(isset($gm)) { // Self-Link aus Gemeinde-Liste
418        $gnr=ListGmkgInGemeinde($gm); // Gemarkungen zu dieser Gemeinde listen
419        if ($gnr > 0) {
420                $zgemkg=$gnr;
[66]421                EineGemarkung(false);
[86]422        };     
423} else {
[66]424        // Die Formular-Eingabe interpretieren (kann auch ein Link sein)
425        switch (ZerlegungFsKennz($fskennz)) {
426        case 0: // leere Eingabe
427                if ($gfilter == 1) { // Die GUI ist bereits auf eine Gemeinde gefiltert
[86]428                        SuchGmkgName(); // Gemarkungen listen
429                } else {
430                        ListGemeinden(); // alle Gemeinden Listen
431                }
432                break;
433        case 1:
434                if ($debug >= 2) {echo "<p>Gemarkungsname ".$zgemkg."</p>";}
435                $gnr=SuchGmkgName();
436                if ($gnr > 0) {
437                        $zgemkg=$gnr;
438                        EineGemarkung(false);
439                };     
440                break;
441        case 2:
442                if ($debug >= 2) {echo "<p>Gemarkungsnummer ".$zgemkg."</p>";} 
443                EineGemarkung(true);
444                break;
445        case 3:
446                if ($debug >= 2) {echo "<p>Gemarkung ".$zgemkg." Flur ".$zflur."</p>";}
447                EineFlur();
448                break;
449        case 4:
450                if ($debug >= 2) {echo "<p>Gemarkung ".$zgemkg." Flur ".$zflur." FlurstÃŒck ".$zzaehler."</p>";}
451                EinFlurstueck();
452                break;
453        case 5:
454                if ($debug >= 2) {echo "<p>Gemarkung ".$zgemkg." Flur ".$zflur." FlurstÃŒck ".$zzaehler."/".$znenner."</p>";}
455                EinFlurstueck();
456                break;
457        case 9:
458                echo "<p class='err'>Bitte ein Flurst&uuml;ckskennzeichen eingegeben, Format 'gggg-fff-zzzz/nnn</p>";
459                break;
460        }
461}
462 ?>
463
464</body>
465</html>
Note: See TracBrowser for help on using the repository browser.