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