source: trunk/info/info/alkisn/alkisausk.php @ 427

Revision 427, 10.6 KB checked in by frank.jaeger, 2 years ago (diff)

Überarbeitung der Auskunft: Durch Functions den Code verdichtet. Drei neue Arten von Bauwerken.
RevLine 
[362]1<?php
2/*      alkisausk.php
3
[427]4        ALKIS-Auskunft
5        Author: Frank JÀger, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo)
6
[362]7        Dies Programm wird aus dem Mapserver-Template (FeatureInfo) aufgerufen.
8        Parameter: &gkz, &gml_id (optional &id)
9        Dies Programm gibt einen kurzen Überblick zum FlurstÃŒck, z.B. Eigentuemer ohne Adresse
10        FÃŒr detaillierte Angaben wird zum GB- oder FS-Nachweis verlinkt.
11        Siehe auch alkisinlayausk.php - eine Variante fÃŒr den Einbau in einen iFrame
12
13        Version:
[425]14        2016-02-24 Version fÃŒr norGIS-ALKIS-Import
[422]15        ....
16        2020-12-03 function selbstverlinkung() statt $_SERVER['PHP_SELF']
17        2020-12-15 Input-Validation und Strict Comparisation (===)
[427]18        2022-01-13 Neue Functions LnkStf(), DsKy()
[387]19
[425]20H i n w e i s :  Dies Modul wird beim Entwickler nicht mehr produktiv eingesetzt.
[387]21                Statt dessen wird "alkisinlayausk.php" verwendet um von einer WMS-FeatureInfo in ein Fenster ÃŒberzuleiten.
[427]22                Mangels Praxiseinsatz bleiben Fehler möglicherweise unerkannt.
[362]23*/
[422]24ini_set("session.cookie_httponly", 1);
[362]25session_start();
26$cntget = extract($_GET);
[422]27if (isset($gkz)) {
28        if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
29} else {
30        die("Fehlender Parameter");
31}
32include "alkis_conf_location.php";
33include "alkisfkt.php";
[387]34
[362]35$keys = isset($_GET["showkey"]) ? $_GET["showkey"] : "n";
[422]36if ($keys === "j") {$showkey=true;} else {$showkey=false;}
[362]37echo <<<END
[377]38<!doctype html>
39<html lang="de">
[362]40<head>
[377]41        <meta charset="utf-8">
[362]42        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
43        <link rel="shortcut icon" type="image/x-icon" href="ico/Flurstueck.ico">
44        <title>ALKIS-Auskunft</title>
45</head>
46<body>
47END;
[422]48
49$erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); }
[427]50$dbg=$debug;
[377]51$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisausk.php'");
[362]52if (!$con) {echo "<br>Fehler beim Verbinden der DB.\n<br>";}
53
[427]54// F L U R S T Ü C K
[412]55$sql ="SELECT f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche, g.gemarkungsnummer, g.bezeichnung, f.gemeindezugehoerigkeit_regierungsbezirk, f.gemeindezugehoerigkeit_kreis, f.gemeindezugehoerigkeit_gemeinde
[362]56FROM ax_flurstueck f LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer
[389]57WHERE f.gml_id= $1 AND f.endet IS NULL AND g.endet IS NULL;";
[362]58
59$v = array($gmlid);
60$res = pg_prepare("", $sql);
61$res = pg_execute("", $v);
62if (!$res) {
[387]63        echo "\n<p class='err'>Fehler bei Flurstuecksdaten.</p>";
[425]64        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".$sql."<br>$1 = gml_id = '".$gmlid."'</p>";}
[362]65}
66
67if ($row = pg_fetch_array($res)) {
68        $gemkname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
69        $gmkgnr=$row["gemarkungsnummer"];
70        $flurnummer=$row["flurnummer"];
71        $flstnummer=$row["zaehler"];
72        $nenner=$row["nenner"];
73        if ($nenner > 0) $flstnummer.="/".$nenner; // BruchNr
74        $flae=$row["amtlicheflaeche"];
75        $flae=number_format($flae,0,",",".") . " m&#178;";
[412]76        $fsreg=$row["gemeindezugehoerigkeit_regierungsbezirk"]; // Filter ZustÀndigkeit
77        $fskrs=$row["gemeindezugehoerigkeit_kreis"];
78        $fsgem=$row["gemeindezugehoerigkeit_gemeinde"];
[362]79} else {
[387]80        echo "\n<p class='err'>Kein Treffer fuer gml_id=".$gmlid."</p>";
[362]81}
82
83// Balken
84echo "\n<p class='fsausk'>ALKIS-Auskunft Flurst&uuml;ck-&Uuml;bersicht ".$gmkgnr."-".$flurnummer."-".$flstnummer."</p>";
85
[377]86// PrÃŒfung der Gebiets-Berechtigung bei gemeinsam genutzten Datenbanken (Kreis und Gemeinde)
87// FÃŒr das gkz (z.B. aus dem Mapfile-Namen) wird in der Konfiguration ein Filter gesetzt.
88if ( ($filtkreis != '' and $filtkreis != $fskrs) or ($filtgem != '' and $filtgem != $fsgem) ) {
89        // Einer der gesetzten Filter passt nicht
[425]90        if ($dbg > 2) {
[427]91                echo "\n<p class='err'>Filter Kreis='".$filtkreis."', Gemeinde='".$filtgem."'</p>"
92                ."\n<p class='err'>Flstk. Kreis='".$fskrs."', Gemeinde='".$fsgem."'</p>";
[377]93        }
94        echo "\n<br><p class='stop1'>Zugriff nicht erlaubt</p>
95        \n<br><p class='stop2'>Dies Flurst&uuml;ck liegt ausserhalb der zust&auml;ndigen Stadt oder Gemeinde.</p>\n</body>\n</html>";
96        pg_free_result($res);
97        exit;
98}
99
[427]100echo "\n<table class='outer'>\n<tr><td>"
101        ."\n<h1>ALKIS-Auskunft</h1>"
[362]102        ."\n<h2><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Flurst&uuml;ck - &Uuml;bersicht</h2>";
[427]103echo "</td><td align='right'>"
104        ."<img src='pic/AAA.gif' alt=''>"
[362]105."</td></tr></table>";
106
107echo "\n<table class='outer'>\n<tr>\n<td>"
108        ."\n\t<table class='kennzfs' title='Flurst&uuml;ckskennzeichen'>\n\t<tr>"
[427]109        ."\n\t\t<td class='head'>Gemarkung</td>\n\t\t<td class='head'>Flur</td>\n\t\t<td class='head'>Flurst-Nr.</td>\n\t</tr>"
110        ."\n\t<tr>\n\t\t<td title='Gemarkung'>".DsKy($gmkgnr, 'Gemarkungsnummer').$gemkname."</td>"
111        ."\n\t\t<td title='Flurnummer'>".$flurnummer."</td>"
[362]112        ."\n\t\t<td title='Flurst&uuml;cksnummer (Z&auml;hler / Nenner)'><span class='wichtig'>".$flstnummer."</span></td>\n\t</tr>"
113        ."\n\t</table>"
114."\n</td>\n<td>"
115."\n\t<p class='nwlink'>weitere Auskunft:<br>";
116
[427]117// FlurstÃŒcksnachweis (o. Eigent.)
118echo "\n\t<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$gmlid."&amp;eig=n".LnkStf()
119        ."' title='Flurst&uuml;cksnachweis, alle Flurst&uuml;cksdaten'>Flurst&uuml;ck "
[362]120        ."<img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''>"
121."</a><br>";
122
123// FS- u. Eigent.-NW
[427]124echo "\n\t\t<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$gmlid."&amp;eig=j".LnkStf()
125        ."' title='Flurst&uuml;ck mit Eigent&uuml;mer'>Flurst&uuml;ck mit Eigent&uuml;mer "
[362]126        ."<img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''>"
127."</a><br>";
128
129// FS-Historie
[427]130echo "\n\t\t<a href='alkisfshist.php?gkz=".$gkz."&amp;gmlid=".$gmlid.LnkStf()
131        ."' title='Vorg&auml;nger des Flurst&uuml;cks'>Historie "
[362]132        ."<img src='ico/Flurstueck_Historisch.png' width='16' height='16' alt=''>"
133."</a><br>";
134
[427]135// GebÀude-NW
136echo "\n\t\t<a href='alkisgebaeudenw.php?gkz=".$gkz."&amp;gmlid=".$gmlid.LnkStf()
137        ."' title='Geb&auml;udenachweis'>Geb&auml;ude "
[362]138        ."<img src='ico/Haus.png' width='16' height='16' alt=''>"
139."</a>"
140. "\n\t</p>\n</td>";
141
142// Lagebezeichnung MIT Hausnummer (Adresse)
143$sql ="SELECT DISTINCT l.gml_id, s.gml_id AS kgml, l.gemeinde, l.lage, l.hausnummer, s.bezeichnung
144FROM ax_flurstueck f JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(f.weistauf)
145LEFT JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage
146WHERE f.gml_id= $1 AND f.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL ORDER BY l.gemeinde, l.lage, l.hausnummer;";
147
148$v = array($gmlid);
149$res = pg_prepare("", $sql);
150$res = pg_execute("", $v);
151if (!$res) {
[387]152        echo "\n<p class='err'>Fehler bei Lagebezeichnung mit Hausnummer.</p>";
[425]153        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".$sql."<br>$1 = gml_id = '".$gmlid."'</p>";}
[362]154}
155$j=0;
156while($row = pg_fetch_array($res)) {
157        $sname = htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); // Str.-Name
158        echo "\n<tr>\n\t"
159                ."\n\t<td class='lr'>".$sname."&nbsp;".$row["hausnummer"]."</td>"
160                ."\n\t<td>\n\t\t<p class='nwlink noprint'>"
161                        ."\n\t\t\t<a title='Lagebezeichnung mit Hausnummer' href='alkislage.php?gkz=".$gkz."&amp;ltyp=m&amp;gmlid=".$row["gml_id"]."'>Lage "
162                        ."<img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''></a>&nbsp;"
163                        ."\n\t\t\t<a href='alkisstrasse.php?gkz=".$gkz."&amp;gmlid=".$row["kgml"]
164                        ."' title='Stra&szlig;e'>Stra&szlig;e <img src='ico/Strassen.png' width='16' height='16' alt=''></a>"
165                ."\n\t\t</p>\n\t</td>"
166        ."\n</tr>";
167        $j++;
168}
[387]169echo "\n</tr>\n</table>";
[362]170
[427]171// FlurstÌcksflÀche
[387]172echo "\n<p class='fsd'>Flurst&uuml;cksfl&auml;che: <b>".$flae."</b></p>";
[362]173
[427]174// G R U N D B U C H
[362]175echo "\n<h2><img src='ico/Grundbuch_zu.png' width='16' height='16' alt=''> Grundbuch</h2>";
176// ALKIS: FS >istgebucht> GS >istBestandteilVon> GB.
[412]177$sql ="SELECT b.gml_id, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung as blatt, b.blattart, wa.beschreibung AS blattartv,
178s.gml_id AS s_gml, s.buchungsart, s.laufendenummer, s.zaehler, s.nenner, z.bezeichnung, wb.beschreibung AS bart
[362]179FROM ax_flurstueck f
180JOIN ax_buchungsstelle s ON f.istgebucht=s.gml_id
181JOIN ax_buchungsblatt b ON s.istbestandteilvon=b.gml_id
182LEFT JOIN ax_buchungsblattbezirk z ON z.land=b.land AND z.bezirk=b.bezirk
[412]183LEFT JOIN ax_blattart_buchungsblatt wa ON b.blattart = wa.wert
184LEFT JOIN ax_buchungsart_buchungsstelle wb ON s.buchungsart = wb.wert
[389]185WHERE f.gml_id= $1 AND f.endet IS NULL AND s.endet IS NULL AND b.endet IS NULL AND z.endet IS NULL
[362]186ORDER BY b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung, s.laufendenummer;";
187
188$v = array($gmlid);
189$resg = pg_prepare("", $sql);
190$resg = pg_execute("", $v);
191if (!$resg) {
[387]192        echo "\n<p class='err'>Keine Buchungen.</p>";
[425]193        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".$sql."<br>$1 = gml_id = '".$gmlid."'</p>";}
[362]194}
195
196$j=0; // Z.Blatt
197while($rowg = pg_fetch_array($resg)) {
198        $beznam=$rowg["bezeichnung"];
199        echo "\n<table class='outer'>\n<tr>\n<td>";
200                $blattkey=$rowg["blattart"];
201                $blattart=$rowg["blattartv"];
[422]202                if ($blattkey === 1000) {
[362]203                        echo "\n\t<table class='kennzgb' title='Bestandskennzeichen'>";
204                } else {
205                        echo "\n\t<table class='kennzgbf' title='Bestandskennzeichen'>"; // dotted
206                }
207                        echo "\n\t<tr>"
208                                ."\n\t\t<td class='head'>Bezirk</td>"
209                                ."\n\t\t<td class='head'>".$blattart."</td>"
[373]210                                ."\n\t\t<td class='head'>Lfd-Nr.</td>"
[362]211                                ."\n\t\t<td class='head'>Buchungsart</td>"
212                        ."\n\t</tr>";
213                        echo "\n\t<tr>"
[427]214                                ."\n\t\t<td title='Grundbuchbezirk'>".DsKy($rowg["bezirk"], 'Grundbuch-Bezirk-*').$beznam."</td>"
[362]215                                ."\n\t\t<td title='Grundbuch-Blatt'><span class='wichtig'>".$rowg["blatt"]."</span></td>"
216                                ."\n\t\t<td title='Bestandsverzeichnis-Nummer (BVNR, Grundst&uuml;ck)'>".$rowg["laufendenummer"]."</td>"
[427]217                                ."\n\t\t<td title='Buchungsart'>".DsKy($rowg["buchungsart"], 'Buchungsart-*').$rowg["bart"]."</td>"
[362]218                        ."\n\t</tr>"
219                ."\n\t</table>";
220
[422]221                if ($rowg["zaehler"] != "") {
[373]222                        echo "\n<p class='ant'>".$rowg["zaehler"]."/".$rowg["nenner"]."&nbsp;Anteil am Flurst&uuml;ck</p>";
[362]223                }
224                echo "\n</td>\n<td>"
225                ."\n\t<p class='nwlink'>weitere Auskunft:<br>"
[427]226                        ."\n\t\t<a href='alkisbestnw.php?gkz=".$gkz."&amp;gmlid=".$rowg[0].LnkStf()
227                        ."' title='Grundbuchnachweis'>".$blattart." <img src='ico/GBBlatt_link.png' width='16' height='16' alt=''></a>"
[362]228                ."\n\t</p>"
229        ."\n</td>\n</tr>\n</table>";
230
[427]231        // E I G E N T Ü M E R
[422]232        if ($blattkey === 5000) { // SchlÃŒssel Blatt-Art
[362]233                echo "\n<p>Keine Angaben zum Eigentum bei fiktivem Blatt</p>\n"
[387]234                ."\n<p>Siehe weitere Grundbuchbl&auml;tter mit Rechten an dem fiktiven Blatt.</p>";
[362]235        } else { // kein Eigent. bei fiktiv. Blatt
236                // Ausgabe Name in Function
[427]237                $n = eigentuemer($rowg["gml_id"], false, true); // ohne Adressen
[362]238
[422]239                if ($n === 0) { // keine NamNum, kein Eigent.
[362]240                        echo "\n<p class='err'>Keine Eigent&uuml;mer gefunden.</p>"
241                        ."\n<p class='err'>Bezirk ".$rowg["bezirk"]." Blatt ".$rowg["blatt"]." Blattart ".$blattkey." (".$blattart.")</p>";
242                }
243        }
244        $j++;
245}
[422]246if ($j === 0) {echo "\n<p class='err'>Keine Buchungen gefunden.</p>";}
[362]247echo "\n<hr>";
248
[422]249footer($gmlid, selbstverlinkung()."?", "");
[362]250
251?>
252</body>
253</html>
Note: See TracBrowser for help on using the repository browser.