source: trunk/info/info/alkisn/alkisfsnw.php @ 390

Revision 390, 43.2 KB checked in by frank.jaeger, 6 years ago (diff)

Nachbesserung: Format der Bodenschätzung-Zeilen

Line 
1<?php
2/*      Modul: alkisfsnw.php
3
4        ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo).
5        FlurstÃŒcksnachweis fuer ein FlurstÃŒckskennzeichen aus ALKIS PostNAS
6
7        Version:
8        2016-02-24 Version fuer norGIS-ALKIS-Import
9        2016-03-14 Korrekturen
10        2016-12-01 HTML5, Gemeinsam genutzte Datenbanken ermöglichen
11        2016-12-05 Nutzungsart-Kategorie ist nun in Text enthalten, nicht mehr aus der Definition ausschneiden
12        2017-06-08 optional "berechtigte Buchungen" anzeigen, Function "eigentuemer" ohne Parameter $con,
13                                Validierung Eingabeparameter, Feinkorrekturen
14        2017-10-11 Sauber filtern auf 'endet IS NULL', Ausgabe der BodenschÀtzung
15        2017-10-11 Nachbesserung Formatierung der SchÀtzungs-Zeilen
16
17        ToDo:
18        - Parameter zum Umschalten mit/ohne BodenschÀtzung?
19        - Bessere Differenzierung bei den Nutzungsarten (Tabelle dafÃŒr aufbauen)
20*/
21session_start();
22
23// Var. aus Parameter initalisieren
24$eig="n";
25$berbu="n";
26$showkey="n";
27
28// alle Parameter in Variable umwandeln
29$cntget = extract($_GET);
30
31// strikte Validierung aller Parameter
32if (isset($gmlid)) {
33        if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
34        $fskennz='';
35} else { // Alternativ
36        $gmlid='';
37        if (isset($fskennz)) { // llgggg-fff-11111/222 oder z.B.'052647002001910013__' oder '05264700200012______'
38                if (!preg_match('#^[0-9\-_/]{8,20}$#', $fskennz)) {die ("Eingabefehler fskennz");}
39        } else {
40                $fskennz='';
41        }
42}
43if (!isset($gkz) or !preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
44if (!preg_match('#^[j|n]{0,1}$#', $eig)) {die("Eingabefehler eig");}
45if (!preg_match('#^[j|n]{0,1}$#', $berbu)) {die ("Eingabefehler berbu");}
46if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
47if ($showkey == "j") {$showkey=true;} else {$showkey=false;} // "j"/"n" als boolean umwandeln, ist praktischer abzufragen, wird oft gebraucht
48
49require_once("alkis_conf_location.php");
50if ($auth == "mapbender") {require_once($mapbender);}
51include("alkisfkt.php");
52?>
53<!doctype html>
54<html lang="de">
55<head>
56        <meta charset="utf-8">
57        <meta name="viewport" content="width=device-width, initial-scale=1.0">
58        <title>ALKIS Flurst&uuml;cksnachweis</title>
59        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
60        <link rel="shortcut icon" type="image/x-icon" href="ico/Flurstueck.ico">
61        <script type="text/javascript">
62                function ALKISexport() {
63                        window.open(<?php echo "'alkisexport.php?gkz=".$gkz."&tabtyp=flurstueck&gmlid=".$gmlid."'"; ?>);
64                }
65        </script>
66</head>
67<body>
68<?php
69// S t a r t
70$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisfsnw.php'");
71if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
72
73// Ein (ALB- ?) FlurstÃŒcks-Kennzeichen wurde alternativ zur gml_id ÃŒbermittelt
74if ($fskennz != '') {
75        // Übergabe Format z.B. "llgggg-fff-nnnn/zz.nn" oder "gggg-ff-nnn/zz"
76        $arr=explode("-", $fskennz, 4);
77        $zgemkg=trim($arr[0]);
78        if (strlen($zgemkg) == 20 and !isset($arr[1])) { // Oh, ist wohl schon das Datenbank-Feldformat
79                $fskzdb=$zgemkg;
80        } else { // Nö, ist wohl eher ALB-Format
81                // Das Kennzeichen auseinander nehmen.
82                if (strlen($zgemkg) == 6) {
83                        $land=substr($zgemkg, 0, 2);
84                        $zgemkg=substr($zgemkg, 2, 4);
85                } else { // kein schöner Land ..
86                        $land=$defland; // Default-Land aus config
87                }
88                $zflur=str_pad($arr[1], 3 , "0", STR_PAD_LEFT); // Flur-Nr
89                $zfsnr=trim($arr[2]); // FlurstÃŒcke-Nr
90                $zn=explode("/", $zfsnr, 2); // Bruch?
91                $zzaehler=str_pad(trim($zn[0]), 5 , "0", STR_PAD_LEFT);
92                if (isset($zn[1])) {
93                        $znenner=trim($zn[1]);
94                } else {
95                        $znenner="";
96                }
97                if (trim($znenner, " 0.") == "") { // kein Bruch oder nur Nullen
98                        $znenner="____"; // in DB-Spalte mit Tiefstrich aufgefÃŒllt
99                } else {
100                        $zn=explode(".", $znenner, 2); // .00 wegwerfen
101                        $znenner=str_pad($zn[0], 4 , "0", STR_PAD_LEFT);
102                }
103                // nun die Teile stellengerecht wieder zusammen setzen         
104                $fskzdb=$land.$zgemkg.$zflur.$zzaehler.$znenner.'__'; // FS-Kennz. Format Datenbank
105        }
106        // Spalte "flurstueckskennzeichen" ist in DB indiziert
107        // Format z.B.'052647002001910013__' oder '05264700200012______'
108        $sql ="SELECT gml_id FROM ax_flurstueck WHERE flurstueckskennzeichen= $1 AND endet IS NULL ;";
109
110        $v = array($fskzdb);
111        $res = pg_prepare("", $sql);
112        $res = pg_execute("", $v);
113        if ($row = pg_fetch_array($res)) {
114                $gmlid=$row["gml_id"];
115        } else {
116                echo "\n<p class='err'>Fehler! Kein Treffer f&uuml;r Flurst&uuml;ckskennzeichen='".$fskennz."' (".$fskzdb.")</p>";
117                echo "<p>Kennzeichen veraltet? <a href='./alkisfshist.php?gkz=".$gkz."&fskennz=".$fskennz."'>Suche in der Flurst&uuml;cks-Historie</a></p>";
118                echo "\n</body>\n</html>";
119                return;
120        }
121        pg_free_result($res);
122}
123
124// F L U R S T U E C K
125$sql ="SELECT f.name, f.flurnummer, f.zaehler, f.nenner, f.regierungsbezirk, f.kreis, f.gemeinde, f.amtlicheflaeche, st_area(f.wkb_geometry) AS fsgeomflae, f.zeitpunktderentstehung, g.gemarkungsnummer, g.bezeichnung
126FROM ax_flurstueck f LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer
127WHERE f.gml_id= $1 AND f.endet IS NULL AND g.endet IS NULL;";
128
129$v = array($gmlid); // mit gml_id suchen
130$res = pg_prepare("", $sql);
131$res = pg_execute("", $v);
132
133if (!$res) {
134        echo "\n<p class='err'>Fehler bei Flurstuecksdaten</p>";
135        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
136}
137if ($row = pg_fetch_array($res)) {
138        $gemkname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
139        $gmkgnr=$row["gemarkungsnummer"];
140        $bezirk=$row["regierungsbezirk"];
141        $kreis=$row["kreis"];
142        $gemeinde=$row["gemeinde"];
143        $flurnummer=$row["flurnummer"];
144        $zaehler=$row["zaehler"];
145        $nenner=$row["nenner"];
146        $flstnummer=$zaehler;
147        if ($nenner > 0) {$flstnummer.="/".$nenner;} // BruchNr
148        $fsbuchflae=$row["amtlicheflaeche"]; // amtliche Fl. aus DB-Feld
149        $fsgeomflae=$row["fsgeomflae"]; // aus Geometrie ermittelte FlÀche
150        $the_Xfactor = $fsbuchflae / $fsgeomflae; // Multiplikator zur Umrechnung geometrische AbschnittsflÀchen in BuchflÀche
151        $fsbuchflaed=number_format($fsbuchflae,0,",",".") . " m&#178;"; // Display-Format dazu
152        $fsgeomflaed=number_format($fsgeomflae,0,",",".") . " m&#178;";
153        $entsteh=$row["zeitpunktderentstehung"];
154        $name=$row["name"]; // Fortfuehrungsnummer(n)
155        $arrn = explode(",", trim($name, "{}") ); // PHP-Array
156} else {
157        echo "\n<p class='err'>Fehler! Kein Treffer f&uuml;r Flurst&uuml;ck mit gml_id=".$gmlid."</p>";
158        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
159        echo "\n</body>\n</html>";
160        return;
161}
162pg_free_result($res);
163
164// Balken
165if ($eig=="j") {
166        echo "<p class='fsei'>ALKIS Flurst&uuml;ck ".$gmkgnr."-".$flurnummer."-".$flstnummer."&nbsp;</p>"
167        ."\n<h2><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Flurst&uuml;ck mit Eigent&uuml;mer</h2>";
168} else {
169        echo "<p class='fskennz'>ALKIS Flurst&uuml;ck ".$gmkgnr."-".$flurnummer."-".$flstnummer."&nbsp;</p>"
170        ."\n<h2><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Flurst&uuml;ck</h2>";
171}
172
173// PrÃŒfung der Gebiets-Berechtigung bei gemeinsam genutzten Datenbanken (Kreis und Gemeinde)
174// FÃŒr das gkz (z.B. aus dem Mapfile-Namen) wird in der Konfiguration ein Filter gesetzt.
175if ( ($filtkreis != '' and $filtkreis != $kreis) or ($filtgem != '' and $filtgem != $gemeinde) ) {
176        // Einer der gesetzten Filter passt nicht
177        if ($debug > 2) {
178        //++ Schönes Bild? Stop-Zeichen?
179                echo "\n<p class='err'>Filter Kreis='".$filtkreis."', Gemeinde='".$filtgem."'</p>"
180                ."\n<p class='err'>Flstk. Kreis='".$fskrs."', Gemeinde='".$fsgem."'</p>";
181        }
182        echo "\n<br><p class='stop1'>Zugriff nicht erlaubt</p>"
183        ."\n<br><p class='stop2'>Dies Flurst&uuml;ck liegt ausserhalb der zust&auml;ndigen Stadt oder Gemeinde.</p>\n</body>\n</html>";
184        exit;
185}
186
187echo "\n<table class='outer'>\n<tr>\n\t<td>" // linke Seite
188        ."\n\t\t<table class='kennzfs' title='Flurst&uuml;ckskennzeichen'>\n\t\t<tr>" // darin Tabelle Kennzeichen
189                ."\n\t\t\t<td class='head'>Gmkg</td>\n\t\t\t<td class='head'>Flur</td>\n\t\t\t<td class='head'>Flurst-Nr.</td>\n\t\t</tr>"
190                ."\n\t\t<tr>\n\t\t\t<td title='Gemarkung'>";
191                if ($showkey) {
192                        echo "<span class='key'>".$gmkgnr."</span><br>";
193                }
194                echo $gemkname."&nbsp;</td>"
195                ."\n\t\t\t<td title='Flurnummer'>".$flurnummer."</td>"
196                ."\n\t\t\t<td title='Flurst&uuml;cksnummer (Z&auml;hler / Nenner)'><span class='wichtig'>".$flstnummer."</span></td>\n\t\t</tr>"
197        ."\n\t\t</table>"
198."\n\t</td>\n\t<td>" // rechte Seite
199        ."\n\t\t<table class='fsd'>" // FS-Daten 2 Spalten
200                ."\n\t\t<tr>\n\t\t\t<td>Entstehung</td>"
201                ."\n\t\t\t<td>".$entsteh."</td>\n\t\t</tr>"
202                ."\n\t\t<tr>"
203                        ."\n\t\t\t<td>letz. Fortf</td>"
204                        ."\n\t\t\t<td title='Jahrgang / Fortf&uuml;hrungsnummer - Fortf&uuml;hrungsart'>";
205                                foreach($arrn AS $val) { // Zeile f. jedes Element des Array
206                                        echo trim($val, '"')."<br>";
207                                }
208                        echo "</td>"
209                ."\n\t\t</tr>"
210        ."\n\t\t</table>"
211."\n\t</td>\n</tr>\n</table>";
212//      echo "\n<tr>\n\t<td>Finanzamt</td>\n\t<td>".$finanzamt." ".$finame  . "</td>\n</tr>";
213// Ende Seitenkopf
214
215echo "\n<hr>"
216."\n<p class='nwlink noprint'>weitere Auskunft:</p>" // oben rechts von der Tabelle
217."\n<table class='fs'>";
218
219// ** G e b i e t s z u g e h o e r i g k e i t **
220// eine Tabellenzeile mit der Gebietszugehoerigkeit eines Flurstuecks wird ausgegeben
221// Schluessel "land" wird nicht verwendet, gibt es Bestaende wo das nicht einheitlich ist?
222echo "\n<tr>\n\t<td class='ll'><img title='Im Gebiet von' src='ico/Gemeinde.png' width='16' height='16' alt=''> Gebiet:</td>";
223
224// G e m e i n d e
225$sql="SELECT bezeichnung FROM ax_gemeinde WHERE regierungsbezirk= $1 AND kreis= $2 AND gemeinde= $3 AND endet IS NULL;";
226
227$v = array($bezirk,$kreis,$gemeinde);
228$res = pg_prepare("", $sql);
229$res = pg_execute("", $v);
230if (!$res) {
231        echo "\n<p class='err'>Fehler bei Gemeinde</p>";
232        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";}
233}
234$row = pg_fetch_array($res);
235$gnam = htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
236echo "\n\t<td class='lr'>Gemeinde</td>\n\t<td class='lr' colspan='3'>";
237if ($showkey) {echo "<span class='key'>(".$gemeinde.")</span> ";}
238// Link zur FS-Historie (passt nicht ganz in die Zeile "Gemeinde", aber gut unter "weitere Auskunft")
239echo $gnam."</td>\n\t<td class='nwlink'>"
240        ."\n\t\t<p class='nwlink noprint'>"
241                ."\n\t\t\t<a href='alkisfshist.php?gkz=".$gkz."&amp;gmlid=".$gmlid;
242                        if ($showkey) {echo "&amp;showkey=j";}
243                        echo "' title='Vorg&auml;nger-Flurst&uuml;cke'>Historie "
244                        ."<img src='ico/Flurstueck_Historisch.png' width='16' height='16' alt=''>"
245                ."</a>"
246        ."\n\t\t</p>"
247. "\n\t</td>\n</tr>";
248pg_free_result($res);
249
250// K r e i s
251$sql="SELECT bezeichnung FROM ax_kreisregion WHERE regierungsbezirk= $1 AND kreis= $2 AND endet IS NULL;";
252$v = array($bezirk,$kreis);
253$res = pg_prepare("", $sql);
254$res = pg_execute("", $v);
255if (!$res) {
256        echo "\n<p class='err'>Fehler bei Kreis</p>";
257        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";}
258}
259$row = pg_fetch_array($res);
260$knam = htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
261echo "\n<tr>\n\t<td>&nbsp;</td>\n\t<td>Kreis</td>\n\t<td class='lr' colspan='3'>";
262if ($showkey) {echo "<span class='key'>(".$kreis.")</span> ";}
263echo $knam."</td>\n\t<td>&nbsp;</td>\n</tr>";
264pg_free_result($res);
265
266// R e g - B e z
267$sql="SELECT bezeichnung FROM ax_regierungsbezirk WHERE regierungsbezirk= $1 AND endet IS NULL;";
268$v = array($bezirk);
269$res = pg_prepare("", $sql);
270$res = pg_execute("", $v);
271if (!$res) {
272        echo "\n<p class='err'>Fehler bei Regierungsbezirk</p>";
273        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";}
274}
275$row=pg_fetch_array($res);
276$bnam=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
277echo "\n<tr>\n\t<td>&nbsp;</td>\n\t<td>Regierungsbezirk</td>\n\t<td class='lr' colspan='3'>";
278if ($showkey) {echo "<span class='key'>(".$bezirk.")</span> ";}
279echo $bnam."</td>\n\t<td>&nbsp;</td>\n</tr>";
280pg_free_result($res);
281// ENDE G e b i e t s z u g e h o e r i g k e i t
282
283// ** L a g e b e z e i c h n u n g **
284
285// Lagebezeichnung MIT Hausnummer
286// ax_flurstueck  >weistAuf>  AX_LagebezeichnungMitHausnummer
287$sql="SELECT DISTINCT l.gml_id, l.gemeinde, l.lage, l.hausnummer, s.bezeichnung
288FROM ax_flurstueck f JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(f.weistauf) 
289JOIN ax_lagebezeichnungkatalogeintrag s ON l.land=s.land AND l.regierungsbezirk=s.regierungsbezirk AND l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage
290WHERE f.gml_id= $1 AND f.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL   
291ORDER BY l.gemeinde, l.lage, l.hausnummer;";
292
293$v = array($gmlid);
294$res = pg_prepare("", $sql);
295$res = pg_execute("", $v);
296
297if (!$res) {
298        echo "\n<p class='err'>Fehler bei Lagebezeichnung mit Hausnummer</p>";
299        if ($debug > 1) {
300                echo "\n<p class='dbg'>Fehler:".pg_last_error()."</p>";
301                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
302        }
303} else {
304        $j=0;
305        while($row = pg_fetch_array($res)) {
306                $sname = htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); // Str.-Name
307                echo "\n<tr>\n\t";
308                        if ($j == 0) {
309                                echo "\n\t<td class='ll'><img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''> Adresse:</td>";
310                        } else {
311                                echo "\n\t<td>&nbsp;</td>";
312                        }
313                        echo "\n\t<td>&nbsp;</td>"
314                        ."\n\t<td class='lr' colspan='3'>";
315                        if ($showkey) {
316                                echo "<span class='key' title='Straßenschl&uuml;ssel'>(".$row["lage"].")</span>&nbsp;";
317                        }
318                        echo $sname."&nbsp;".$row["hausnummer"]."</td>"
319                        ."\n\t<td>\n\t\t<p class='nwlink noprint'>"
320                                ."\n\t\t\t<a title='Lagebezeichnung mit Hausnummer' href='alkislage.php?gkz=".$gkz."&amp;ltyp=m&amp;gmlid=".$row["gml_id"];
321                                if ($showkey) {echo "&amp;showkey=j";}
322                                echo "'>Lage <img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''></a>"
323                        ."\n\t\t</p>\n\t</td>"
324                ."\n</tr>";
325                $j++;
326        }
327        $cnt_adressen=$j;
328        pg_free_result($res);
329}
330// +++ Verbesserung: mehrere HsNr zur gleichen Straße als Liste?
331
332// Lagebezeichnung OHNE Hausnummer  (Gewanne oder nur Strasse)
333// ax_flurstueck  >zeigtAuf>  AX_LagebezeichnungOhneHausnummer
334$sql ="SELECT l.gml_id, l.unverschluesselt, l.gemeinde, l.lage, s.bezeichnung
335FROM ax_flurstueck f JOIN ax_lagebezeichnungohnehausnummer l ON l.gml_id=ANY(f.zeigtauf)
336LEFT JOIN ax_lagebezeichnungkatalogeintrag s ON l.land=s.land AND l.regierungsbezirk=s.regierungsbezirk AND l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage
337WHERE f.gml_id = $1 AND f.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL;";
338
339$v = array($gmlid);
340$res = pg_prepare("", $sql);
341$res = pg_execute("", $v);
342if (!$res) {
343        echo "\n<p class='err'>Fehler bei Lagebezeichnung ohne Hausnummer</p>";
344        //if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($res)."</p>";}
345        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
346}
347$j=0;
348// Es wird auch eine Zeile ausgegeben, wenn kein Eintrag gefunden!
349while($row = pg_fetch_array($res)) {
350        $gewann = htmlentities($row["unverschluesselt"], ENT_QUOTES, "UTF-8");
351        $skey=$row["lage"]; // Strassenschl.
352        $lgml=$row["gml_id"]; // key der Lage
353        if (!$gewann == "") {
354                echo "\n<tr>"
355                        ."\n\t<td class='ll' title='Lagebezeichnung'><img src='ico/Lage_Gewanne.png' width='16' height='16' alt=''> Gewanne:</td>"
356                        ."\n\t<td></td>"
357                        ."\n\t<td class='lr' colspan='3'>".$gewann."</td>"
358                        ."\n\t<td>\n\t\t<p class='nwlink noprint'>"
359                                ."\n\t\t\t<a title='Lagebezeichnung Ohne Hausnummer' href='alkislage.php?gkz=".$gkz."&amp;ltyp=o&amp;gmlid=".$lgml;
360                                if ($showkey) {echo "&amp;showkey=j";}                         
361                                echo "'>\n\t\t\tLage <img src='ico/Lage_Gewanne.png' width='16' height='16' alt=''></a>"
362                        ."\n\t\t</p>\n\t</td>"
363                ."\n</tr>";
364        }
365        // Gleicher DB-Eintrag in zwei HTML-Zeilen, besser nur ein Link
366        if ($skey > 0) {
367                echo "\n<tr>"
368                        ."\n\t<td class='ll'><img src='ico/Lage_an_Strasse.png' width='16' height='16' alt=''> Stra&szlig;e:</td>"
369                        ."\n\t<td></td>"
370                        ."\n\t<td class='lr' colspan='3'>";
371                        if ($showkey) {
372                                echo "<span class='key'>(".$skey.")</span>&nbsp;";
373                        }
374                        echo $row["bezeichnung"]."</td>"
375                        ."\n\t<td>\n\t\t<p class='nwlink noprint'>"
376                                ."\n\t\t\t<a title='Lagebezeichnung Ohne Hausnummer' href='alkislage.php?gkz=".$gkz."&amp;ltyp=o&amp;gmlid=".$lgml;
377                                if ($showkey) {echo "&amp;showkey=j";}                         
378                                echo "'>\n\t\t\tLage <img src='ico/Lage_an_Strasse.png' width='16' height='16' alt=''>\n\t\t\t</a>"
379                        ."\n\t\t</p>\n\t</td>"
380                ."\n</tr>";
381        }
382        $j++;
383}
384pg_free_result($res);
385// ENDE  L a g e b e z e i c h n u n g
386
387// ** N U T Z U N G ** Gemeinsame FlÀche von NUA und FS
388// Tabellenzeilen (3 Spalten) mit tats. Nutzung zu einem FS ausgeben
389
390/* N U T Z U N G   C l a s s i c (alt)
391$sql ="SELECT m.title, m.fldclass, m.fldinfo, n.gml_id, n.nutz_id, n.class, n.info, n.zustand, n.name, n.bezeichnung, m.gruppe,
392st_area(st_intersection(n.wkb_geometry,f.wkb_geometry)) AS schnittflae, c.label, c.blabla
393FROM ax_flurstueck f, nutzung n JOIN nutzung_meta m ON m.nutz_id=n.nutz_id
394LEFT JOIN nutzung_class c ON c.nutz_id=n.nutz_id AND c.class=n.class
395WHERE f.gml_id= $1 AND st_intersects(n.wkb_geometry,f.wkb_geometry) = true
396AND st_area(st_intersection(n.wkb_geometry,f.wkb_geometry)) > 0.05
397AND f.endet IS NULL ORDER BY schnittflae DESC;";
398
399$v = array($gmlid);
400$res = pg_prepare("", $sql);
401$res = pg_execute("", $v);
402if (!$res) {
403        echo "\n<p class='err'>Fehler bei Suche tats. Nutzung</p>";
404        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
405}
406$the_Xfactor=$fsbuchflae / $fsgeomflae; // geom. ermittelte FlÀche auf amtl. BuchflÀche angleichen
407$j=0;
408while($row = pg_fetch_array($res)) {
409        $grupp=$row["gruppe"]; // 4 Gruppen
410        $nutzid=$row["nutz_id"]; // 27 Tabellen, num. Key
411        $title=htmlentities($row["title"], ENT_QUOTES, "UTF-8"); // Titel der 27 Tabellen
412        $fldclass=$row["fldclass"]; // Name 1. Zusatzfeld
413        $fldinfo= $row["fldinfo"];  // Name 2. Zus.
414        $gml=$row["gml_id"];
415        $class=$row["class"]; // 1. Zusatzfeld verschlÃŒsselt -> nutzung_class
416        $info=$row["info"]; // 2. Zus. verschlÃŒsselt (noch keine Info zum entschl.)
417        $schnittflae=$row["schnittflae"];
418        $label=$row["label"]; // Nutzungsart entschlÃŒsselt
419        $zus=$row["zustand"]; // im Bau
420        $nam=$row["name"]; // Eigenname
421        $bez=$row["bezeichnung"]; // weiterer Name (unverschl.)
422        $blabla=htmlentities($row["blabla"], ENT_QUOTES, "UTF-8");
423        $label=str_replace("/", "<br>", $label); // Ersetzt "/" durch html-Zeilenwechsel
424
425        echo "\n<tr>\n\t";
426                if ($j == 0) {
427                        echo "<td class='ll' title='Abschnitt der tats&auml;chlichen Nutzung'><img src='ico/Abschnitt.png' width='16' height='16' alt=''> Nutzung:</td>";
428                } else {
429                        echo "<td>&nbsp;</td>";
430                }
431                $absflaebuch = $schnittflae * $the_Xfactor; // angleichen geometrisch an amtliche FlÀche
432                $schnittflae = number_format($schnittflae,1,",",".") . " m&#178;"; // geometrisch
433                $absflaebuch = number_format($absflaebuch,0,",",".") . " m&#178;"; // Abschnitt an BuchflÀche angeglichen
434                echo "\n\t<td class='fla' title='geometrisch berechnet: ".$schnittflae."'>".$absflaebuch."</td>";
435
436                echo "\n\t<td class='lr' colspan='3'>";
437                        if ($class == 0) {
438                                if ($showkey) {echo "<span class='key'>(".$nutzid.")</span> ";}
439                                echo $title; // Name der Tabelle
440                        } elseif ( ($fldclass == "Funktion" OR $fldclass == "Vegetationsmerkmal") AND $label != "") { // Kurze Anzeige
441                                if ($showkey) {echo "<span class='key' title='".$fldclass."'>(".$nutzid."-".$class.")</span> ";}
442                                if ($blabla = "") {
443                                        echo $label;
444                                } else {
445                                        echo "<span title='".$blabla."'>".$label."</span>";
446                                }
447                        } else { // ausfuehrlichere Anzeige
448                                echo $title; // NUA-Tabelle
449                                if ($class != "") { // NUA-SchlÃŒssel
450                                        echo ", ".$fldclass.": "; // Feldname
451                                        if ($showkey) {echo "<span class='key' title='".$fldclass."'>(".$nutzid."-".$class.")</span> ";}
452                                        if ($label != "") { // Bedeutung dazu wurde erfasst
453                                                if ($blabla = "") {
454                                                        echo $label;
455                                                } else {
456                                                        echo "<span title='".$blabla."'>".$label."</span>";
457                                                }
458                                        } else { // muss noch erfasst werden
459                                                echo $class." "; // SchlÃŒssel als Ersatz fÃŒr Bedeutung
460                                        }
461                                }
462                        }
463                        if ($info != "") { // manchmal ein zweites Zusatzfeld (wie entschlÃŒsseln?)
464                                echo ", ".$fldinfo."=".$info;
465                        }
466                        if ($zus != "") { // Zustand
467                                echo "\n\t\t<br>";
468                                if ($showkey) {echo "<span class='key'>(".$zus.")</span> ";}
469                                echo "<span title='Zustand'>";                         
470                                switch ($zus) {
471                                        case 2100: echo "Außer Betrieb, stillgelegt, verlassen"; break;
472                                        case 4000: echo "Im Bau"; break;
473                                        case 8000: echo "Erweiterung, Neuansiedlung"; break;
474                                        default: echo "Zustand: ".$zus; break;
475                                }
476                                echo "</span>";
477                        }
478                        if ($nam != "") {echo "<br>Name: ".$nam;}
479                        if ($bez != "") {echo "<br>Bezeichnung: ".$bez;}
480
481                echo "</td>";
482                echo "\n\t<td>";
483                        switch ($grupp) { // Icon nach 4 Objektartengruppen
484                                case "Siedlung":   $ico = "Abschnitt.png"; break;
485                                case "Verkehr":    $ico = "Strassen_Klassifikation.png"; break;
486                                case "Vegetation": $ico = "Wald.png"; break;
487                                case "GewÀsser":   $ico = "Wasser.png";        break;
488                                default:        $ico = "Abschnitt.png"; break;
489                        }
490                        // Icon ist auch im Druck sichtbar, class='noprint' ?           
491                        echo "<p class='nwlink'><img title='".$title."' src='ico/".$ico."' width='16' height='16' alt='NUA'></p>";
492                echo "</td>";
493        echo "\n</tr>";
494        $j++;
495}
496  E N D E   N U T Z U N G   C l a s s i c  */
497
498/* Status "Nutzung":
499
500 Die Classic-Tabelle "nutzung" ist eine Zusammenfassung aller Tabellen mit Nutzungs-FlÀchen
501 Die Classic-Tabelle "nutzung_meta" zeigt die Kategorie und Gruppe des Nutzungs-Abschnitts an.
502
503 Aus der norGIS-Struktur wird ersatzweise VORLÄUFIG die Tabelle "nutz_21" verwendet,
504 die das alte ALB-Format der Nutzungs-Abschnitte von FlurstÃŒcken simuliert.
505 Hier finden sich bereits verschnittene FlÀchen, aber die gml_id fehlt.
506
507 Die EntschlÃŒsselung der Nutzungsart in den verschiedenen ALKIS-Varianten ist darin unterentwickelt.
508 Diese ist eigentlich fÃŒr jede der getrennten Tabellen der Gruppe Nutzungsart individuell.
509 Die Classic-Lösung mit 2 Zusatzfeldern war schon sehr pauschalisiert, aber
510 durch die RÃŒck-Konvertierung in ALB-Strukturen in der norGIS-Version ist das zu stark vereinfacht.
511 z.B. wird "WohnbauflÀche" mit der Zusatzeigenschaft "Art der Bebauung": 'Offen'
512 nun zur Nutzungsart "Offen".
513 Durch JOIN auf die "alkis_elemente" mit einem Teil des SchlÃŒssels wird das zur "WohnbauflÀche, Offen".
514 Es sollte eine Tabellen-Struktur bereit gestellt werden, die auch aussagt, dass der Wert "Offen" zur
515 Zusatz-Eigenschaft "Art der Bebauung" gehört. Dazu muss das PostProcessing erweitert werden. */
516
517
518$sql="SELECT e.definition, trim(both FROM n.nutzsl) AS nutzsl, trim(both FROM n.fl) AS fl, trim(both FROM s.nutzung) AS nutzung
519 FROM nutz_21 n JOIN nutz_shl s ON n.nutzsl = s.nutzshl
520 JOIN alkis_elemente e ON e.kennung = substring(n.nutzsl from 1 for 5)
521WHERE n.flsnr = $1 ORDER BY cast(n.fl AS integer) DESC;";
522// Flurstueckskennzeichen mit Trennzeichen im ALB-Format wie 'llgggg-fff-zzzzz/nnn'
523$fskennzalb=$defland.$gmkgnr."-".str_pad($flurnummer,3,"0",STR_PAD_LEFT)."-".str_pad($zaehler,5,"0",STR_PAD_LEFT)."/".str_pad($nenner,3,"0",STR_PAD_LEFT);
524$v = array($fskennzalb);
525$res = pg_prepare("", $sql);
526$res = pg_execute("", $v);
527if (!$res) {
528        echo "\n<p class='err'>Fehler bei Suche tats. Nutzung</p>";
529        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = FS-Kennz = '".$fskennzalb."'</p>";}
530}
531
532$j=0;
533while($row = pg_fetch_array($res)) {
534        $flae=$row["fl"]; // BuchflÀche
535        $nutzsl=$row["nutzsl"]; // SchlÃŒssel
536        $nutzung=$row["nutzung"]; // Bezeichnung aus ALB-Tabelle, "fein"
537        $defi=$row["definition"]; // Langer Text mit Beschreibung
538        $title=htmlentities($defi, ENT_QUOTES, "UTF-8"); // .. fÃŒr Anzeige aufbereitet
539
540        echo "\n<tr>\n\t";
541                if ($j == 0) {
542                        echo "<td class='ll' title='Abschnitt der tats&auml;chlichen Nutzung'><img src='ico/Abschnitt.png' width='16' height='16' alt=''> Nutzung:</td>";
543                } else {
544                        echo "<td>&nbsp;</td>";
545                }
546                $absflaebuch = number_format($flae,0,",",".") . " m&#178;"; // Formatierte Abschnitts-Buch-FlÀche
547                echo "\n\t<td class='fla' title='Buchfl&auml;che des Abschnitts'>".$absflaebuch."</td>";
548
549                echo "\n\t<td class='lr' colspan='3' title='".$title."'>";
550                        if ($showkey) {echo "<span class='key'>(".$nutzsl.")</span> ";}
551                        echo $nutzung
552                ."</td>"
553                ."\n\t<td>";
554/*              // Derzeit ist keine Gruppe zugeordnet
555                        switch ($grupp) { // Icon nach 4 Objektartengruppen
556                                case "Siedlung":   $ico = "Abschnitt.png"; break;
557                                case "Verkehr":    $ico = "Strassen_Klassifikation.png"; break;
558                                case "Vegetation": $ico = "Wald.png"; break;
559                                case "GewÀsser":   $ico = "Wasser.png";        break;
560                                default:        $ico = "Abschnitt.png"; break;
561                        }
562                        // Icon ist auch im Druck sichtbar, class='noprint' ?           
563                        echo "<p class='nwlink'><img title='".$title."' src='ico/".$ico."' width='16' height='16' alt='NUA'></p>";
564*/
565                echo "</td>"
566        ."\n</tr>";
567        $j++;
568}
569pg_free_result($res);
570
571echo "\n<tr>" // Summenzeile
572        ."\n\t<td class='re' title='amtliche Fl&auml;che (Buchfl&auml;che)'>Fl&auml;che:</td>"
573        ."\n\t<td class='fla sum'>"
574        ."<span title='geometrisch berechnete Fl&auml;che = ".$fsgeomflaed."' class='flae'>".$fsbuchflaed."</span></td>";
575
576        // Flaeche und Link auf GebÀude-Auswertung
577        echo "\n\t<td colspan='3'>&nbsp;</td>\n\t<td>"
578                ."\n\t\t<p class='nwlink noprint'>" // Gebaeude-Verschneidung
579                        ."\n\t\t\t<a href='alkisgebaeudenw.php?gkz=".$gkz."&amp;gmlid=".$gmlid;
580                        if ($showkey) {echo "&amp;showkey=j";}
581                        if ($cnt_adressen > 0) { // wenn Adresse vorgekommen ist
582                                echo "' title='Geb&auml;udenachweis'>Geb&auml;ude ";
583                        } else { // GebÀude mit Adresse gibt es NICHT, das ist klar
584                                echo "' title='Suche Geb&auml;ude ohne Adresse auf dem Flurst&uuml;ck oder angrenzende Geb&auml;ude'>Suche ";
585                        }
586                        echo "<img src='ico/Haus.png' width='16' height='16' alt=''></a>"
587                ."\n\t\t</p>"
588        ."\n\t</td>"
589."\n</tr>";
590// ENDE  N U T Z U N G
591
592
593// K L A S S I F I Z I E R U N G
594
595// Klassifizierung nach  W a s s e rrecht
596/*
597        // Tabelle immer leer?
598$sql="SELECT h.v, w.artderfestlegung, st_area(st_intersection(w.wkb_geometry, f.wkb_geometry)) AS schnittflae, f.amtlicheflaeche, st_area(f.wkb_geometry) as fsgeomflae
599FROM ax_flurstueck f
600JOIN ax_klassifizierungnachwasserrecht w
601 ON st_intersects(w.wkb_geometry, f.wkb_geometry) AND st_area(st_intersection(w.wkb_geometry, f.wkb_geometry)) > 0.05
602LEFT JOIN alkis_wertearten h
603 ON cast(w.artderfestlegung AS character varying) = h.k AND h.element='ax_klassifizierungnachwasserrecht' AND h.bezeichnung='artderfestlegung'
604WHERE f.gml_id = $1 AND f.endet IS NULL AND w.endet IS NULL ORDER BY schnittflae DESC";
605
606$v = array($gmlid);
607$res = pg_prepare("", $sql);
608$res = pg_execute("", $v);
609if (!$res) {echo "\n<p class='err'>Fehler bei DB-Abfrage zur Klassifizierung Wasser</p>\n";}
610
611if(!empty($res) && pg_num_rows($res) > 0) {
612        echo "\n<table>";
613        while($row = pg_fetch_array($res)) {
614                $fsbuchflae=$row["amtlicheflaeche"];
615                $fsgeomflae=$row["fsgeomflae"];
616                $the_Xfactor=$fsbuchflae / $fsgeomflae; // ++ nicht in Loop, ist konst. je FS
617                $absflaebuch = $row['schnittflae'] * $the_Xfactor;
618                echo"\n<tr><td></td><td></td></tr>"
619                ."\n<tr><td><b>FlÀche</b></td><td class='klassifizerung'><span class=''>".number_format(intval($absflaebuch),0,",",".")." m²</span></td></tr>"       
620                ."\n<tr><td><b>Bezeichnung</b></td><td class='klassifizerung'><span class=''>".$row['v']."</span></td></tr>"
621                ."\n<tr><td></td><td></td></tr>";       
622        }
623        echo "</table>";
624}
625// Klassifizierung nach  S t r a ß e n recht
626        // Tabelle immer leer?
627*/
628
629// B o d e n s c h À t z u n g
630// ---------------------------
631// Tabelle "klas_3x" (norbit-ALB): Dort fehlen Bodenart und Zustandsstufe, es ist aber bereits auf BuchflÀche umgerechnet.
632
633$sql="SELECT
634 kulturart.k as kulturartk, kulturart.v as kulturartv, bodenart.k as bodenartk, bodenart.v as bodenartv, zustbod.v AS zustbodv,
635 b.bodenzahlodergruenlandgrundzahl as bodenzahl, b.ackerzahlodergruenlandzahl AS ackerzahl,
636 b.jahreszahl, st_area(st_intersection(b.wkb_geometry, f.wkb_geometry)) AS schnittflae
637FROM ax_flurstueck f
638JOIN ax_bodenschaetzung b ON st_intersects(b.wkb_geometry, f.wkb_geometry) AND st_area(st_intersection(b.wkb_geometry, f.wkb_geometry)) > 0.05
639LEFT JOIN alkis_wertearten AS bodenart  ON cast(b.bodenart  AS character varying) = bodenart.k  AND bodenart.element='ax_bodenschaetzung'  AND bodenart.bezeichnung='bodenart'
640LEFT JOIN alkis_wertearten AS kulturart ON cast(b.kulturart AS character varying) = kulturart.k AND kulturart.element='ax_bodenschaetzung' AND kulturart.bezeichnung='kulturart'
641LEFT JOIN alkis_wertearten AS zustbod   ON cast(b.zustandsstufeoderbodenstufe AS character varying) = zustbod.k AND zustbod.element='ax_bodenschaetzung' AND zustbod.bezeichnung='zustandsstufeoderbodenstufe'
642WHERE f.gml_id = $1 AND f.endet IS NULL AND b.endet IS NULL ORDER BY schnittflae DESC";
643
644$v = array($gmlid);
645$res = pg_prepare("", $sql);
646$res = pg_execute("", $v);
647if (!$res) {echo "\n<p class='err'>Fehler bei DB-Abfrage zur Klassifizierung Boden</p>\n";}
648
649$gesertragsmz = 0; // Gesamt-ErtragsMesszahl
650$klasflae = 0; // Summe klassifizierte FlÀche
651$j=0;
652if(!empty($res) && pg_num_rows($res) > 0) {
653        while ($row = pg_fetch_array($res)) {
654                $kulturartk=$row['kulturartk']; // Key  -
655                $kulturartv=$row['kulturartv']; //              - Value
656                // 1000="Ackerland (A)", 2000="Acker-GrÃŒnland (AGr)", 3000="GrÃŒnland (Gr)", 4000="GrÃŒnland-Acker (GrA)"             
657                if (substr($kulturartv, 0, 3) == 'Ack') { // A
658                        $kbez1="Bodenzahl";
659                        $kbez2="Ackerzahl";
660                } else { // Gr
661                        $kbez1="Gr&uuml;nlandgrundzahl";
662                        $kbez2="Gr&uuml;nlandzahl";
663                }
664                $absflae = $row['schnittflae'];
665                $absbuchflae = $absflae * $the_Xfactor;
666                $klasflae+=$absbuchflae;
667                $ertragszahl = intval($absbuchflae * $row['ackerzahl'] / 100);
668                $gesertragsmz+=$ertragszahl;
669        //      $absflaedis = number_format($absflae,0,",",".")." m&#178;";  // als Tool-Tip ?
670                $absbuchflaedis = number_format($absbuchflae,0,",",".")." m&#178;";
671                $boedenzahl=ltrim($row['bodenzahl'], '0');
672                $ackerzahl=ltrim($row['ackerzahl'], '0');
673
674                // Sp. 1/4
675                if ($j == 0) {
676                        echo "\n<tr>\n\t<td class='ll' title='Abschnitt Bodensch&auml;tzung'><img src='ico/Landwirt.png' width='16' height='16' alt=''> Bodensch&auml;tzung:</td>";
677                } else {
678                        echo "\n<tr>\n\t<td>&nbsp;</td>";
679                }
680
681                // Sp. 2/4
682                echo "\n\t<td class='fla' title='Ertragsmesszahl: Produkt von ".$kbez2."/100 und Fl&auml;che.'>EMZ ".$ertragszahl."</td>";
683
684                // Sp. 3/4 - unterteilt in 3 Sp.
685                echo "\n\t<td class='re' title='Fl&auml;che des Sch&auml;tzungsabschnitts'>".$absbuchflaedis."</td>";
686                echo "\n\t<td class='lr'><span title='".$kbez1."'>".$boedenzahl."</span>/<span title='".$kbez2."'>".$ackerzahl."</span></td>";
687                echo "\n\t<td class='lr'>";
688                        if ($showkey) {echo "\n\t\t<span class='key'>(".$kulturartk.")</span> ";}
689                        echo "\n\t\t<span title='Kulturart'>".$kulturartv."</span> ";
690                        if ($showkey) {echo "\n\t\t<span class='key'>(".$row['bodenartk'].")</span> ";}
691                        echo "\n\t\t<span title='Bodenart'>".$row['bodenartv']."</span> ";
692                        echo "\n\t\t<span title='Zustandsstufe'>".$row['zustbodv']."</span>";
693                        if (isset($row['jahreszahl'])) {echo "\n\t\t <span title='Jahreszahl'>".$row['jahreszahl']."</span>";}
694                //      ++ Entstehungsart (Array) derzeit leer. 1:N entschlÃŒsseln. entstehungsartoderklimastufewasserverhaeltnisse
695                // $ent = explode(",", trim($entsteh, "{}") ); // [] --> PHP-Array
696                //      if (isset($row['sonstiges'])) {echo "\n\t\t, <span title='Sonstige Angaben'>".$row['sonstiges']."</span>";} -- immer leer (Konverter-Fehler?)
697                echo "\n\t</td>";
698
699                // Sp. 4/4 - leer, keine Links
700                echo "\n\t<td>&nbsp;</td>\n</tr>";
701                $j++;
702        }
703        // Summenzeile
704        $klasflaedis = number_format($klasflae,0,",",".")." m&#178;";
705        echo "\n<tr>\n\t<td class='re'>Ertragsmesszahl:</td>"
706        ."\n\t<td class='fla sum' title='Summe der Ertragsmesszahlen f&uuml;r dies Flurst&uuml;ck'>".$gesertragsmz."</td>"
707        ."\n\t<td class='re'>".$klasflaedis."</td>\n\t<td colspan='3'>&nbsp;</td>\n</tr>";
708}
709
710// H i n w e i s  auf Bodenneuordnung oder eine strittige Grenze
711// b.name, b.artderfestlegung,
712$sql_boden ="SELECT a.k AS wert, a.v AS art_verf, b.gml_id AS verf_gml, b.bezeichnung AS verf_bez,
713b.name AS verf_name, d.bezeichnung AS stelle_bez, d.stelle AS stelle_key
714FROM ax_bauraumoderbodenordnungsrecht b
715LEFT JOIN alkis_wertearten a ON cast(b.artderfestlegung AS character varying)=a.k AND a.element='ax_bauraumoderbodenordnungsrecht' AND a.bezeichnung='artderfestlegung'
716LEFT JOIN ax_dienststelle d ON b.stelle=d.stelle
717WHERE b.endet IS NULL AND d.endet IS NULL 
718AND (ST_Within((SELECT wkb_geometry FROM ax_flurstueck WHERE gml_id = $1 AND endet IS NULL ), wkb_geometry)
719 OR ST_Overlaps((SELECT wkb_geometry FROM ax_flurstueck WHERE gml_id = $1 AND endet IS NULL), wkb_geometry));";
720
721pg_prepare($con, "bodeneuordnung", $sql_boden);
722$res_bodeneuordnung = pg_execute($con, "bodeneuordnung", array($gmlid));
723if (!$res_bodeneuordnung) {
724        echo "\n<p class='err'>Fehler bei Bau-, Raum- oder Bodenordnungsrecht</p>";
725        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".$sql_boden."<br>$1 = gml_id = '".$gmlid."'</p>";}
726}
727
728$sql_str="SELECT gml_id FROM ax_besondereflurstuecksgrenze WHERE endet IS NULL AND 1000 = ANY(artderflurstuecksgrenze)
729AND ST_touches((SELECT wkb_geometry FROM ax_flurstueck WHERE gml_id = $1 AND endet IS NULL),wkb_geometry);";
730
731pg_prepare($con, "strittigeGrenze", $sql_str);
732$res_strittigeGrenze = pg_execute($con, "strittigeGrenze", array($gmlid));
733if (!$res_strittigeGrenze) {
734        echo "\n<p class='err'>Fehler bei strittige Grenze</p>";
735        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".$sql_str."<br>$1 = gml_id = '".$gmlid."'</p>";}
736}
737
738if (pg_num_rows($res_bodeneuordnung) > 0 OR pg_num_rows($res_strittigeGrenze) > 0) {
739        echo "\n<tr>"
740        ."\n\t<td title='Hinweise zum Flurst&uuml;ck'><h6><img src='ico/Hinweis.png' width='16' height='16' alt=''> "
741        ."Hinweise:</h6></td>\n\t<td colspan='5'>&nbsp;</td>"
742        ."\n</tr>";
743
744        if (pg_num_rows($res_bodeneuordnung) > 0) {
745
746                while ($row = pg_fetch_array($res_bodeneuordnung)) { // 3 Zeilen je Verfahren
747
748                        // Zeile 1 - kommt immer, darum hier den Link
749                        echo "\n<tr title='Bau-, Raum- oder Bodenordnungsrecht'>"
750                                ."\n\t<td>Bodenrecht</td>"
751                                ."\n\t<td class='re'>Festlegung: </td>" // "Art der Festlegung" zu lang
752                                ."\n\t<td colspan='3'>";
753                                        if ($showkey) {echo "<span class='key'>(".$row['wert'].")</span> ";}
754                                        echo $row['art_verf']
755                                ."</td>";
756                                // LINK:
757                                echo "\n\t<td>"
758                                        ."\n\t\t<p class='nwlink noprint'>"
759                                        ."\n\t\t\t<a href='alkisbaurecht.php?gkz=".$gkz."&amp;gmlid=".$row['verf_gml'];
760                                        if ($showkey) {echo "&amp;showkey=j";}
761                                        echo "' title='Bau-, Raum- oder Bodenordnungsrecht'>Recht <img src='ico/Gericht.png' width='16' height='16' alt=''></a>"
762                                        ."\n\t\t</p>"           
763                                ."\n\t</td>"
764                        ."\n</tr>";
765
766                        // Zeile 2
767                        $dstell=$row['stelle_key'];
768                        if ($dstell != "") { // Kann auch leer sein
769                                echo "\n<tr title='Flurbereinigungsbeh&ouml;rde'>"
770                                        ."\n\t<td>&nbsp;</td>"
771                                        ."\n\t<td class='re'>Dienststelle: </td>"
772                                        ."\n\t<td colspan='3'>";
773                                                if ($showkey) {echo "<span class='key'>(".$dstell.")</span> ";}
774                                                echo $row['stelle_bez']
775                                        ."</td>"
776                                        ."\n\t<td>&nbsp;</td>"
777                                ."\n</tr>";
778                        }
779
780                        // Zeile 3
781                        $vbez=$row['verf_bez']; // ist nicht immer gefÃŒllt
782                        $vnam=$row['verf_name']; // noch seltener
783                        if ($vbez != "") {
784                                echo "\n<tr title='Verfahrensbezeichnung'>"
785                                        ."\n\t<td>&nbsp;</td>"
786                                        ."\n\t<td class='re'>Verfahren: </td>"
787                                        ."\n\t<td colspan='3'>";
788                                                if ($vnam == "") {
789                                                        echo $vbez; // nur die Nummer
790                                                } else {        // Name oder beides
791                                                        if ($showkey) {echo "<span class='key'>(".$vbez.")</span> ";}
792                                                        echo $vnam;
793                                                }
794                                        echo "</td>"
795                                        ."\n\t<td>&nbsp;</td>"
796                                ."\n</tr>";
797                        }
798                }
799        }
800        if (pg_num_rows($res_strittigeGrenze) > 0) { // 1 Zeile
801                echo "\n<tr>\n<td>Strittige Grenze:</td>"
802                ."<td colspan=4>Mindestens eine Flurst&uuml;cksgrenze ist als <b>strittig</b> zu bezeichnen. Sie kann nicht festgestellt werden, weil die Beteiligten sich nicht &uuml;ber den Verlauf einigen. Nach sachverst&auml;ndigem Ermessen der Katasterbeh&ouml;rde ist anzunehmen, dass das Liegenschaftskataster nicht die rechtm&auml;&szlig;ige Grenze nachweist.</td>"
803                ."\n<td>&nbsp;</td>\n</tr>";
804        }
805}
806echo "\n</table>";
807
808// G R U N D B U C H
809echo "\n\n<table class='outer'>"
810        ."\n<tr>"
811                ."\n\t<td>"
812                        ."\n\t\t<h3 id='gb'><img src='ico/Grundbuch_zu.png' width='16' height='16' alt=''> Grundb&uuml;cher</h3>"
813                ."\n\t</td>"
814                ."\n\t<td>"
815                        ."\n\t\t<p class='nwlink noprint'>"
816                                ."\n\t\t\t<a href='".$_SERVER['PHP_SELF']. "?gkz=".$gkz."&amp;gmlid=".$gmlid."&amp;berbu=".$berbu;
817                                if ($showkey) {echo "&amp;showkey=j";}
818
819                                // Umschalter: FS-Nachweis ruft sich selbst mit geaendertem Parameter auf. Positionierung auf Marke "#gb"
820                                if ($eig=="j") {
821                                        echo "&amp;eig=n#gb' title='Flurst&uuml;cksnachweis'>ohne Eigent&uuml;mer</a>";
822                                } else {
823                                        echo "&amp;eig=j#gb' title='Flurst&uuml;cks- und Eigent&uuml;mernachweis'>mit Eigent&uuml;mer "
824                                        ."<img src='ico/EigentuemerGBzeile.png' width='16' height='16' alt=''></a>";
825                                }
826                        echo "\n\t\t</p>"
827                ."\n\t</td>"
828        ."\n</tr>"
829."\n</table>";
830
831// B U C H U N G S S T E L L E N  zum FS (istGebucht)
832$sql ="SELECT s.gml_id, s.buchungsart, s.laufendenummer as lfd, s.zaehler, s.nenner, s.nummerimaufteilungsplan as nrpl, s.beschreibungdessondereigentums as sond, b.v AS bart, b.d AS barttitle
833FROM ax_flurstueck f JOIN ax_buchungsstelle s ON s.gml_id=f.istgebucht
834LEFT JOIN alkis_wertearten b ON cast(s.buchungsart AS character varying)=b.k AND b.element='ax_buchungsstelle' AND b.bezeichnung='buchungsart'
835WHERE f.gml_id= $1 AND f.endet IS NULL AND s.endet IS NULL ORDER BY s.laufendenummer;";
836
837$v = array($gmlid);
838$ress = pg_prepare("", $sql);
839$ress = pg_execute("", $v);
840if (!$ress) {
841        echo "\n<p class='err'>Keine Buchungsstelle.</p>";
842        if ($debug > 1) {
843                echo "<p class='dbg'>Fehler:".pg_result_error($ress)."</p>";
844                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
845        }
846}
847$bs=0; // Z.BuchungsStelle
848while($rows = pg_fetch_array($ress)) {  // Schleife Buchungs-Stelle
849        $gmls=$rows["gml_id"]; // gml b-Stelle
850        $lfd=$rows["lfd"]; // BVNR
851        $barttitle=htmlentities($rows["barttitle"], ENT_QUOTES, "UTF-8"); // .. fÃŒr Anzeige aufbereitet
852
853        // B U C H U N G S B L A T T  zur Buchungsstelle (istBestandteilVon)
854        $sql="SELECT b.gml_id, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung as blatt, b.blattart, wb.v AS blattartv, wb.d AS blattartd, z.bezeichnung
855        FROM ax_buchungsstelle s JOIN ax_buchungsblatt b ON b.gml_id=s.istbestandteilvon
856        LEFT JOIN ax_buchungsblattbezirk z ON z.land=b.land AND z.bezirk=b.bezirk
857        LEFT JOIN alkis_wertearten wb ON cast(b.blattart AS character varying)=wb.k AND wb.element='ax_buchungsblatt' AND wb.bezeichnung='blattart'
858        WHERE s.gml_id = $1 AND s.endet IS NULL AND b.endet IS NULL AND z.endet IS NULL
859        ORDER BY b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung ;";
860
861        $v=array($gmls);
862        $resg=pg_prepare("", $sql);
863        $resg=pg_execute("", $v);
864        if (!$resg) {
865                echo "\n<p class='err'>Kein Buchungsblatt.</p>";
866                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmls."'</p>";}
867        }
868        $bl=0; // Z.Blatt
869        while($rowg = pg_fetch_array($resg)) {
870                $gmlg=$rowg["gml_id"];
871                $beznam=$rowg["bezeichnung"];
872                $blattkeyg=$rowg["blattart"]; // Key
873                $blattartg=$rowg["blattartv"]; // Value
874                $blatt=$rowg["blatt"];
875                echo "\n<hr>"
876                ."\n<table class='outer'>"
877                ."\n<tr>"; // 1 row only
878                        echo "\n\t<td>"; // Outer linke Spalte:
879
880                                // Rahmen mit GB-Kennz
881                                if ($blattkeyg == 1000) {
882                                        echo "\n\t\t<table class='kennzgb' title='Bestandskennzeichen'>";
883                                }else {
884                                        echo "\n\t\t<table class='kennzgbf' title='Bestandskennzeichen'>"; // GB fiktiv = Rahmen dotted
885                                }
886                                        echo "\n\t\t<tr>\n\t\t\t<td class='head'>Bezirk</td>"
887                                                ."\n\t\t\t<td class='head' title='".$rowg["blattartd"]."'>";
888                                                if ($showkey) {echo "<span class='key'>".$blattkeyg."</span>&nbsp;";}
889                                                echo $blattartg."</td>"
890                                                ."\n\t\t\t<td class='head'>Lfd-Nr.</td>"
891                                                ."\n\t\t\t<td class='head'>Buchungsart</td>"
892                                        ."\n\t\t</tr>"
893                                        ."\n\t\t<tr>"
894                                                ."\n\t\t\t<td title='Grundbuchbezirk'>";
895                                                if ($showkey) {echo "<span class='key'>".$rowg["bezirk"]."</span><br>";}
896                                                echo $beznam."&nbsp;</td>"
897                                                ."\n\t\t\t<td title='Grundbuch-Blatt'><span class='wichtig'>".$blatt."</span></td>"
898                                                ."\n\t\t\t<td title='Bestandsverzeichnis-Nummer (BVNR, Grundst&uuml;ck)'>".$lfd."</td>"
899                                                ."\n\t\t\t<td title='".$barttitle."'>";
900                                                if ($showkey) {echo "<span class='key'>".$rows["buchungsart"]."</span><br>";}
901                                                echo $rows["bart"]."</td>"
902                                        ."\n\t\t</tr>"
903                                ."\n\t\t</table>";
904
905                                // Miteigentumsanteil
906                                if ($rows["zaehler"] <> "") {
907                                        echo "\n<p class='ant'>".$rows["zaehler"]."/".$rows["nenner"]."&nbsp;Anteil am Flurst&uuml;ck</p>";
908                                }
909                        echo "\n\t</td>\n\t<td>"; // Outer rechte Spalte: NW-Links
910
911                                echo "\n\t\t<p class='nwlink noprint'>weitere Auskunft:<br>";
912                                        if ($showkey) {echo "<span class='key'>".$blattkeyg."</span> ";}
913                                        echo "\n\t\t\t<a href='alkisbestnw.php?gkz=".$gkz."&amp;gmlid=".$gmlg;
914                                                if ($showkey) {echo "&amp;showkey=j";}
915                                                echo "#bvnr".$lfd; // Die # hinter die &-Paramter
916                                                if ($blattkeyg == 1000) {
917                                                        echo "' title='Grundbuchnachweis mit kompletter Eigent&uuml;merangabe'>";
918                                                } else {
919                                                        echo "' title='Grundbuchnachweis'>";
920                                                }
921                                                echo $blattartg." <img src='ico/GBBlatt_link.png' width='16' height='16' alt=''>"
922                                        ."</a>"
923                                ."\n\t\t</p>";
924
925                                // berechtigte Buchungstellen (im rechten Teil der Àußeren Tab.
926                                $cnt_ber = ber_bs_hinw($gmls, $gmlid); // Hinweis ausgeben, zÀhlen
927
928                        echo "\n\t</td>" // ende aussen rechts
929                ."\n</tr>"
930                ."\n</table>";
931
932                // +++ Weitere Felder ausgeben? BeschreibungDesUmfangsDerBuchung
933                if ($rows["sond"] != "") {
934                        echo "\n<p class='sond' title='Sondereigentum'>Verbunden mit dem Sondereigentum<br>".$rows["sond"]."</p>";
935                }
936                if ($rows["nrpl"] != "") {
937                        echo "\n<p class='nrap' title='Nummer im Aufteilungsplan'>Nummer <span class='wichtig'>".$rows["nrpl"]."</span> im Aufteilungsplan.</p>";
938                }
939
940                // E I G E N T U E M E R, zum GB
941                // Person <-benennt< AX_Namensnummer  >istBestandteilVon-> AX_Buchungsblatt
942                if ($eig=="j") { // Wahlweise mit/ohne EigentÃŒmer
943                        $n = eigentuemer($gmlg, false, ""); // hier ohne Adresse
944                        if ($n == 0) {
945                                if ($blattkeyg == 1000) {
946                                        echo "\n<p class='err'>Keine Namensnummer gefunden.</p>";
947                                } else {
948                                        echo "\n<p>ohne Eigent&uuml;mer.</p>";
949                                }
950                        }
951                }
952
953                // B e r e c h t i g t e   B u c h u n g e n  ... zu dieser Buchungs-Stelle. Optional.
954                if ($berbu=="j") { // Wahlweise anzeigen
955                        echo "\n<hr>\n<h3 id='berbu'><img src='ico/Grundbuch.png' width='16' height='16' alt=''> Berechtigte Buchungen</h3>"
956                        ."\n<p>".$cnt_ber." Buchungen mit Rechten an der Buchung ".$lfd." auf ".$blattartg." ".$blatt." von ".$beznam.":</p>";
957                        ber_bs_anz($gmls, $eig); // berechtigte Buchungstellen und GB-BlÀtter Anzeigen, und ggf. auch mit EigentÃŒmer
958                }
959                $bl++; // ZÀhl Blatt
960        }
961        if ($bl == 0) {echo "\n<p class='err'>Kein Buchungsblatt zur Buchungstelle gefunden.</p>";}
962        $bs++; // ZÀhl Buchungs-Stelle
963}
964
965pg_free_result($resg);
966if ($bs == 0) {echo "\n<p class='err'>Keine Buchungstelle zum Flurst&uuml;ck gefunden.</p>";}
967pg_close($con);
968echo <<<END
969
970<div class='buttonbereich noprint'>
971<hr>
972        <a title="zur&uuml;ck" href='javascript:history.back()'><img src="ico/zurueck.png" width="16" height="16" alt="zur&uuml;ck"></a>&nbsp;
973        <a title="Drucken" href='javascript:window.print()'><img src="ico/print.png" width="16" height="16" alt="Drucken"></a>&nbsp;
974        <a title="Export als CSV" href='javascript:ALKISexport()'><img src="ico/download_fs.png" width="32" height="16" alt="Export"></a>&nbsp;
975</div>
976END;
977footer($gmlid, $_SERVER['PHP_SELF']."?", "&amp;eig=".$eig."&amp;berbu=".$berbu);
978?>
979</body>
980</html>
Note: See TracBrowser for help on using the repository browser.