source: trunk/mapbender/http/nav/alkisnav_fkt.php @ 405

Revision 405, 16.4 KB checked in by frank.jaeger, 2 years ago (diff)

Die Buchauskunft bekommt ein neues Modul Grundstücksnachweis (Buchung). Andere Module verlinken darauf.

Line 
1<?php
2/*      Navigation mit ALKIS-Daten im Mapbender 2 - Teil "Funktionen"
3        (Wird nicht direkt aufgerufen sonden in den anderen Modulen eingebunden).
4        Datenbank-Struktur aus dem norGIS-ALKIS-Importer.
5Version vom
6        2016-02-11 Version fÃŒr norGIS-ALKIS-Import aus Version Classic abgeleitet.
7        2016-11-28 Gemeinsam genutzte Datenbanken ermöglichen
8        2018-02-15 Überarbeitung des Code
9        2018-05-02 Link "Buchung" zum neuen GrundstÃŒcks-Nachweis
10*/
11
12function is_ne_zahl($wert) {
13        // PrÃŒft, ob ein Wert ausschließlich aus den Zahlen 0 bis 9 besteht
14        if (trim($wert, "0..9") == "") {return true;} else {return false;}
15}
16
17function ZerlegungGBKennz($gbkennz) {
18        // Das eingegebene Grundbuch-Kennzeichen auseinander nehmen (gggg-999999z-BVNR)
19        // Return: 9=Fehler, 0=Listen alle Bezirke 1=Such Bezirk-Name
20        //  2=Such Bezirk-Nummer, 3=Such Blatt, 4=Such Buchung BVNR
21        global $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr;
22        $arr=explode("-", $gbkennz, 3);
23        $zgbbez=trim($arr[0]);
24        if (count($arr) > 1) {
25                $zblatt=trim($arr[1]);
26                if (count($arr) > 2) {
27                        $zbvnr=trim($arr[2]);
28                } else {
29                        $zbvnr="";
30                }
31        } else {
32                $zblatt="";
33                $zbvnr="";
34        }
35        if ($zgbbez == "") { // keine Eingabe
36                return 0; // Amtsgerichte oder Bezirke listen
37        } elseif ( ! is_ne_zahl($zgbbez)) { // Alphabetische Eingabe
38                return 1; // Such Bezirk-NAME
39        } elseif ($zblatt == "") {
40                return 2; // Such Bezirk-NUMMER
41        } else { // Format von BlattNr pruefen
42        //'19'      linksbÃŒndig
43        //'000019 ' gefÃŒllt 6 + blank
44        //'000019A' .. mit Zusatzbuchstabe
45        //'0300001' gefÃŒllt 7, bei Blattart 5000 "fiktives Blatt"
46                $len=strlen($zblatt);
47                if ($len > 0 AND $len < 8) {           
48                        if (trim($zblatt, "0..9 ") == "") { // Normalfall: nur Zahlen (und Blank))
49                                $zblattn= rtrim(ltrim($zblatt, "0"), " ");
50                                $zblattz="";
51                        } else { // Sonderfall: Zusatz-Buchstabe am Ende
52                                $zblattn=substr($zblatt,0,$len-1);
53                                $zblattz=strtoupper(substr($zblatt,$len-1,1));
54                                if ((trim($zblattn, "0..9") == "") and (trim($zblattz, "A..Z") == "")) {
55                                        $zblattn= ltrim($zblattn, "0"); // ohne fuehrende Nullen
56                                } else {
57                                        echo "<p class='err>Format 'Blatt': bis zu 6 Zahlen und ggf. ein Buchstabe</p>";       
58                                        return 9;
59                                }
60                        }
61                        if ($zbvnr == "") {
62                                return 3; // Such BLATT
63                        } elseif (is_ne_zahl($zbvnr)) {         
64                                // $zbvnr=ltrim($zbvnr,"0"); // DB-Format ist integer
65                                // Vorsicht, Wert "0" ist moeglich und gueltig
66                                return 4; // Such Grundstueck
67                        } else {
68                                echo "<p class='err>Die Buchungsstelle (BVNR) '".$zbvnr."' ist nicht numerisch</p>";
69                                return 9;
70                        }
71                } else {
72                        echo "<p class='err>Das Grundbuch-Blatt '".$zblatt."' ist ung&uuml;ltig.</p>";
73                        return 9;
74                }
75        }
76}
77
78function suchfeld($suchstring) {        // Suchstring Ausgeben UND das Eingabeformular damit belegen
79        $out="<a title='Dies als Suchbegriff setzen' href='javascript:formular_belegung(\"".$suchstring."-\")'>".$suchstring."</a>";
80        return $out;
81}
82
83// function Typ "zeile_**"  = Ausgabe eines Knotens
84// - Icon,  ggf. mit Link zur Buchauskunft
85// - Zeile, ggf. mit Link zur weiteren Auflösung untergeordneter Knoten
86// Hierin die Encodierung fÃŒr url und HTML.
87
88function zeile_ag ($ag, $anr, $aktuell) {
89        // Zeile  A m t s g e r i c h t
90        global $gkz, $gemeinde, $epsg, $auskpath;
91        if ($ag == "") {
92                $agd=$anr; // Ersatz: Nummer statt Name. Besser: Name immer fÃŒllen
93        } else {
94                $agd=htmlentities($ag, ENT_QUOTES, "UTF-8");
95        }
96        if ($aktuell) {$cls=" aktuell";} else {$cls="";}
97        echo "\n<div class='ga".$cls."' title='Amtsgericht'>"
98                ."\n\t\t<img class='nwlink' src='ico/Gericht.png' width='16' height='16' alt='AG' title='Amtsgericht'> "
99                ."AG <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;ag=".$anr."'>"
100                .$agd."</a> (".$anr.")"
101        ."\n</div>";
102        return;
103}
104
105function zeile_gbbez ($gnam, $zgbbez, $aktuell) {
106        // Zeile Grundbuch - B e z i r k
107        // Parameter: aktuell = Bool fÃŒr farbliche Markierung der Zeile als aktuell angeklicktes Obj.
108        global $gkz, $gemeinde, $epsg, $person;
109        $gnamd=htmlentities($gnam, ENT_QUOTES, "UTF-8");
110        if ($aktuell) {$cls=" aktuell";} else {$cls="";}
111        echo "\n<div class='gk".$cls."' title='GB-Bezirk'>"
112                ."\n\t\t<img class='nwlink' src='ico/GB-Bezirk.png' width='16' height='16' alt='Bez.' title='GB-Bezirk'> "
113                ."<a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;gbkennz=".$zgbbez
114                ."&amp;gbbeznam=".urlencode($gnam);
115                if ($person != "") { // EigentÃŒmer-Suche
116                        echo "&amp;person=".$person."'>"
117                        ."Bezirk ".$gnamd."</a> (".$zgbbez.")";         
118                } else {  // Grundbuch-Suche
119                        echo "'>"
120                        ."Bezirk ".$gnamd."</a> (".suchfeld($zgbbez).")";               
121                }
122        echo "\n</div>";
123        return;
124}
125
126function zeile_blatt ($bezirk, $beznam, $blattgml, $blatt, $dienend, $person, $aktuell) {
127        // Zeile Grundbuch - B l a t t
128        // Aufruf aus Teil "Grundbuch" und Teil "EigentÃŒmer"
129        // Parameter $beznam = Name des GB-Bezirks. Sollte nur gefÃŒllt sein, bei dienendem Blatt ("Recht an").
130        //              sonst steht der Bezirk als Header-Zeile darÃŒber.
131        global $gkz, $gemeinde, $epsg, $auskpath;
132
133        $blattd=ltrim($blatt, "0"); // Display-Version ohne fÃŒhrende Nullen
134        if ($dienend) {$dientxt="dienendes ";} else {$dientxt="";}
135        $blattlnk=urlencode($blatt); // trailing Blank
136        if ($beznam != "") {$nam = $beznam." ";} else {$nam="";}
137        if ($aktuell) {$cls=" aktuell";} else {$cls="";}
138
139        echo "\n<div class='gb".$cls."' title='".$dientxt."GB-Blatt'>";
140
141        // Icon / Nachweis
142        if ($blattgml == "") { // Link zum Nachweis nur wenn GML bekannt
143                echo "\n\t<img class='nwlink' src='ico/GBBlatt.png' width='16' height='16' alt='Blatt' title='".$dientxt."GB-Blatt'>";
144        } else {
145                echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisbestnw.php?gkz=".$gkz."&amp;gmlid=".$blattgml."\")'>"
146                        ."\n\t\t<img class='nwlink' src='ico/GBBlatt_link.png' width='16' height='16' alt='Blatt' title='Nachweis'>"
147                ."\n\t</a> ";
148        }
149
150        // Text, Self-Link
151        echo $nam." <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg
152        ."&amp;blattgml=".$blattgml."&amp;gbkennz=".$bezirk."-".$blattlnk;
153
154        echo "&amp;gbbeznam=".urlencode($beznam);
155
156        if ($person != "") {echo "&amp;person=".$person;} // nur fÃŒr EigentÃŒmer-Suche
157        echo "'>Blatt&nbsp;".$blattd."</a>\n</div>";
158        return;
159}
160
161function zeile_buchung($buchunggml, $bvnr, $blattkennz, $dienend, $aktuell) {
162        // Zeile  B u c h u n g s s t e l l e  -  GrundstÃŒck ausgeben
163        global $gkz, $gemeinde, $epsg, $auskpath, $debug;
164        //if ($debug > 1) {echo "<p class='dbg'>function zeile_buchung()<p>";} // Ablauf-Verfolgung
165
166        if ($bvnr == 0) { // Keine echten BVNR vergeben (z.B. Lippe)
167                $bvnra = "-"; // Fehlanzeige
168        } else {
169                $bvnra = str_pad($bvnr, 4, "0", STR_PAD_LEFT); // auf 4 Stellen
170        }
171        if ($dienend) {
172                $ti="dienendes&nbsp;";
173                $re="Recht an ";
174        } else {
175                $ti="";
176                $re="";
177        }
178        if ($aktuell) {$cls=" aktuell";} else {$cls="";}
179        echo "\n<div class='gs".$cls."' title='".$ti."Grundst&uuml;ck'>";
180
181        // Icon / Nachweis
182        if ($buchunggml == "") { // Link zum Nachweis nur wenn GML bekannt
183                echo "\n\t<img class='nwlink' src='ico/Grundstueck.png' width='16' height='16' alt='GS'  title='".$ti."Grundst&uuml;ck'> ".$re;
184        } else {
185                echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisgsnw.php?gkz=".$gkz."&amp;gmlid=".$buchunggml."\")'>"
186                        ."\n\t\t<img class='nwlink' src='ico/Grundstueck_Link.png' width='16' height='16' alt='Buchung' title='".$ti."Grundst&uuml;ck'> ".$re
187                ."\n\t</a> ";
188        }
189
190        if ($blattkennz == "") { // ohne Link
191                echo "Buchung ".$bvnra;
192        } else {
193                $gbkennlnk=urlencode($blattkennz."-".$bvnr); // Trailing Blanks!
194                echo "<a href='".$_SERVER['SCRIPT_NAME']. "?gkz=". $gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;buchunggml=".$buchunggml
195                ."&amp;gbkennz=".$gbkennlnk."'>Buchung ".$bvnra."</a>";
196        }
197        echo "\n</div>";
198        return;
199}
200
201function zeile_gemeinde ($gmdnr, $gmdname, $aktuell) {
202        // Eine Kopf-Zeile zu Gemeinde ausgeben
203        global $gkz, $gemeinde, $epsg;
204        $stadt=htmlentities($gmdname, ENT_QUOTES, "UTF-8");
205        $bez=urlencode($gmdname);
206        if ($aktuell) {$cls=" aktuell";} else {$cls="";}
207        echo "\n<div class='gm".$cls."' title='Gemeinde'>"
208                ."\n\t\t<img class='nwlink' src='ico/Gemeinde.png' width='16' height='16' alt='Stadt'>"
209                ." Gem. <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;gm=".$gmdnr."&amp;bez=".$bez."'>"
210                ." ".$stadt."</a> (".substr($gmdnr, 5).")"
211        ."\n</div>";
212        return;
213}
214
215function zeile_gemarkung($gkgnr, $gkgname, $aktuell) {
216        // Eine Kopf-Zeile zur Gemarkung ausgeben
217        global $con, $gkz, $gemeinde, $epsg, $gfilter;
218
219        if ($gkgname == "") { // Falls Gem.-Name fehlt, in DB nachschlagen
220                $sql ="SELECT bezeichnung FROM ax_gemarkung WHERE gemarkungsnummer = $1 LIMIT 1;";
221                $v=array($gnr);
222                $res=pg_prepare("", $sql);
223                $res=pg_execute("", $v);
224                if (!$res) {echo "\n<p class='err'>Fehler bei Gemarkungsname.</p>";}
225                $row = pg_fetch_array($res);
226                $gkgname=$row["bezeichnung"];
227        }
228
229        if ($gkgname == "") {$gkgname = "(unbekannt)";}
230        $gnam=htmlentities($gkgname, ENT_QUOTES, "UTF-8");
231        if ($aktuell) {$cls=" aktuell";} else {$cls="";}
232
233        echo "\n<div class='gk".$cls."' title='Gemarkung'>"
234                ."\n\t\t<img class='nwlink' src='ico/Gemarkung.png' width='16' height='16' alt='GKG' title='Gemarkung'>"
235                ." OT <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;fskennz=".$gkgnr."'>"
236                ." ".$gnam."</a> (".substr($gkgnr, 2).")"
237        ."\n</div>";
238        return;
239}
240
241function zeile_flurstueck ($fs_gml, $fskenn, $x, $y, $gmkg, $flur, $aktuell) {
242        // Zeile mit Icon (Link zum Buch-Nachweis) und Text (Link zum Positionieren)
243        global $gkz, $gemeinde, $epsg, $auskpath, $scalefs;
244
245        if ($aktuell) {$cls=" aktuell";} else {$cls="";}
246        echo "\n<div class='fs".$cls."'>"
247        ."\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$fs_gml."\")'>"
248                ."\n\t\t<img class='nwlink' src='ico/Flurstueck_Link.png' width='16' height='16' alt='FS' title='Nachweis'>"
249        ."\n\t</a>\n\t";               
250
251        echo "&nbsp;<a title='Flurst&uuml;ck positionieren 1:".$scalefs."' href='"
252        ."javascript:transtitle(\"auf Flurst&uuml;ck positioniert\"); "
253                ."parent.parent.parent.mb_repaintScale(\"mapframe1\",".$x.",".$y.",".$scalefs."); "
254                ."parent.parent.showHighlight(".$x.",".$y.");' "
255        ."onmouseover='parent.parent.showHighlight(".$x.",".$y.")' "
256        ."onmouseout='parent.parent.hideHighlight()'>";
257
258        if ($gmkg == "" ) {
259                echo "Flst. "; // Im FS-Teil: Gem+Flur als Knoten darÃŒber ($gmkg und $flur leer)
260        } else {
261                echo $gmkg." "; // Im GB-und Nam-Teil in der Zeile angezeigt
262        }
263        if ($flur != "" ) {echo $flur."-";}
264        echo $fskenn."</a>\n</div>";
265        return;
266}
267
268function zeile_person ($persongml, $nachname, $vorname) {
269        // Zeile  P e r s o n (oder Firma)
270        global $gkz, $gemeinde, $epsg, $auskpath;
271
272        $nnam=htmlentities($nachname, ENT_QUOTES, "UTF-8");
273        $namlnk=urlencode(substr($nachname,0,50));
274        $vnam=htmlentities($vorname, ENT_QUOTES, "UTF-8");
275        // Link zur Auskunft Person, Icon differenzieren nach Eigentuemerart?
276        echo "<div class='pe'>"
277                ."\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisnamstruk.php?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;gmlid=".$persongml."\")'>"
278                        ."\n\t\t<img class='nwlink' src='ico/Eigentuemer.png' width='16' height='16' alt='EIG' title='Nachweis'>"
279                ."\n\t</a>"             
280                ."\n\t<a title='Person' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;person=".$persongml."&amp;name=".$namlnk."'>".$nnam.", ".$vnam."</a>"
281        ."</div>";
282return;
283}
284
285function zeile_strasse ($gkey, $skey, $sname, $kgml, $gemname) {
286        // Listen-Zeile (nicht Kopfzeile) fÃŒr eine gefundenen Straße ausgeben.
287        // Die Kopfzeile ÃŒber den Hausnummern hat einen zusÀtzlichen Koordinaten-Map-Link, das ist in der Liste zu aufwÀndig?
288        global $gkz, $gemeinde, $epsg, $auskpath, $gfilter, $debug;
289
290        echo "\n\t<div class='stl' title='Stra&szlig;enschl&uuml;ssel ".$skey."'>";
291
292        // Icon -> Buchnachweis
293        echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisstrasse.php?gkz=".$gkz."&amp;gmlid=".$kgml."\")'>"
294                ."\n\t\t<img class='nwlink' src='ico/Lage_mit_Haus.png' width='16' height='16' alt='STR' title='Auskunft Stra&szlig;e'>"
295        ."\n\t</a>";
296        // Zeile -> Suche HsNr
297        echo " <a class='st' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;epsg=".$epsg."&amp;str_schl=".$gkey."' title='in ".$gemname."'>".$sname
298        ."</a> (".$skey.")";
299
300        // Die Gemeinde dahinter falls mehrere möglich
301        switch ($gfilter) {
302                case 0: // Kein Filter
303                        echo " in ".$gemname; break;
304                case 2: // Liste
305                        echo " in ".$gemname; break;
306        }
307        echo "</div>";
308        return;
309}
310
311function GB_Buchung_FS ($linelimit, $blattgbkenn) {
312        // Zu einem Grundbuch-Blatt (identifiziert ÃŒber seine gml_id) suchen der
313        // Buchungen (Gruppenwechsel) und FlurstÃŒcke (Links)
314        global $gemeinde, $blattgml, $epsg, $gfilter, $debug;
315
316        // SQL-Bausteine
317        // vorne gleich
318        $sql1 ="SELECT s1.laufendenummer AS lfd, s1.gml_id AS bsgml, f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.gemeinde, ";
319        if($epsg == "25832") { // Transform nicht notwendig
320                $sql1.="st_x(st_centroid(f.wkb_geometry)) AS x, st_y(st_centroid(f.wkb_geometry)) AS y, ";
321        } else { 
322                $sql1.="st_x(st_transform(st_centroid(f.wkb_geometry), ".$epsg.")) AS x, "
323                        ."st_y(st_transform(st_centroid(f.wkb_geometry), ".$epsg.")) AS y, ";                   
324        }
325        $sql1.="g.bezeichnung FROM ax_buchungsstelle s1 ";
326
327        // zwischen, Variante 1.
328    $sqlz1="JOIN ax_flurstueck f ON f.istgebucht=s1.gml_id ";
329
330        // zwischen, Variante 2. Nur an oder "an" und "zu"?
331        $sqlz2 ="JOIN ax_buchungsstelle s2 ON s2.gml_id=ANY(s1.an) "
332                ."JOIN ax_flurstueck f ON f.istgebucht=s2.gml_id ";
333
334        // hinten gleich
335        $sql2="JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer "
336                ."WHERE s1.istbestandteilvon = $1 AND f.endet IS NULL AND s1.endet IS NULL ";
337
338        switch ($gfilter) {
339                case 1: // Einzelwert
340                        $sql2.="AND f.gemeinde='".$gemeinde."' "; break;
341                case 2: // Liste
342                        $sql2.="AND f.gemeinde in ('".str_replace(",", "','", $gemeinde)."') "; break;
343        }
344
345        // WHERE-Zusatz bei 2
346        $sqlw2=" AND s2.endet IS NULL ";
347
348        $sqlord="ORDER BY cast(s1.laufendenummer AS integer), f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner LIMIT $2 ;";
349
350        // d i r e k t e  B u c h u n g e n
351        // Blatt <istBestandteilVon<  Buchungsstelle <istGebucht< FlurstÃŒck
352        $v=array($blattgml, $linelimit); // Rel. istBestandteilVon
353        $res=pg_prepare("", $sql1.$sqlz1.$sql2.$sqlord);
354        $res=pg_execute("", $v);
355        if (!$res) {
356                echo "\n<p class='err'>Fehler bei Buchung und Flurst&uuml;ck.</p>";
357                if ($debug >= 3) {echo "\n<p class='err'>SQL='".$sql1.$sqlz1.$sql2.$sqlord."'<br>$1 = '".$blattgml."'</p>";}
358                return;
359        }
360        $zfs1=0;
361        $gwbv="";
362        while($row = pg_fetch_array($res)) {   
363                $bvnr=$row["lfd"];
364                $bsgml=$row["bsgml"]; // Buchungsstelle gml_id
365                if ($gwbv != $bvnr) { // Gruppierung Buchungs-Stelle (BVNR)
366                        $gwbv = $bvnr;
367                        zeile_buchung($bsgml, $bvnr, $blattgbkenn, false, false);
368                }
369                $fs_gml=$row["gml_id"];
370                $gmkg=$row["bezeichnung"];
371                $flur=$row["flurnummer"];
372                $fskenn=$row["zaehler"];
373                if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // BruchNr
374                $x=$row["x"];
375                $y=$row["y"];
376                zeile_flurstueck ($fs_gml, $fskenn, $x, $y, $gmkg, $flur, false);
377                $zfs1++;
378        }
379        // "nichts gefunden" erst melden, wenn auch Teil 2 (Rechte an) nichts findet
380        if($zfs1 > 1) { // ab 2
381                echo "\n<p class='anz'>".$zfs1." Flurst&uuml;cke zum Grundbuch";
382                if($zfs1 >= $linelimit) {
383                        echo "... und weitere"; //++ BlÀttern einfÃŒhren?
384                }
385                echo "</p>";
386        }
387        if($zfs1 > 0) {echo "<hr>";} // Trennen
388
389        // Rechte "an"  (dienende  Buchungen)
390        $v=array($blattgml, $linelimit);
391        $res=pg_prepare("", $sql1.$sqlz2.$sql2.$sqlw2.$sqlord);
392        $res=pg_execute("", $v);
393        if (!$res) {
394                echo "\n<p class='err'>Fehler bei Recht an Buchung.</p>";
395                #if ($debug >= 3) {echo "\n<p class='dbg'>".$sql1.$sqlz2.$sql2.$sqlw2.$sqlord."</p>";}
396                return;
397        }
398        $zfs2=0;
399        $gwbv="";
400        while($row = pg_fetch_array($res)) {   
401                $bvnr=$row["lfd"];
402                $bsgml=$row["bsgml"]; // Buchungsstelle gml_id
403                if ($gwbv != $bvnr) { // Gruppierung Buchung (BVNR) - dienend
404                        $gwbv = $bvnr;
405                        zeile_buchung($bsgml, $bvnr, $blattgbkenn, true, false);
406                }
407                $fs_gml=$row["gml_id"];
408                $gmkg=$row["bezeichnung"];
409                $flur=$row["flurnummer"];
410                $fskenn=$row["zaehler"];
411                if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // Bruchnummer
412                zeile_flurstueck ($fs_gml, $fskenn, $row["x"], $row["y"], $gmkg, $flur, false);
413                $zfs2++;
414        }
415        // Foot
416        if($zfs1 + $zfs2 == 0) {
417                echo "\n<p class='anz'>Kein Flurst&uuml;ck im berechtigten Bereich.</p>";
418        } elseif($zfs2 > 1) { // keine Meldung "nichts gefunden - Rechte an" wenn Treffer in Teil 1
419                echo "\n<p class='anz'>".$zfs2." Rechte an Flurst.";
420                if($zfs2 >= $linelimit) {
421                        echo "... und weitere"; // BlÀttern einfÃŒhren?
422                }
423                echo "</p>";
424        }
425        return;
426}
427
428?>
Note: See TracBrowser for help on using the repository browser.