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

Revision 427, 12.3 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/*      alkisinlayausk.php
3
[427]4        ALKIS-Auskunft
5        Author: Frank JÀger, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo)
6
7        Dies Programm wird in einen iFrame im Mapserver-Template der FeatureInfo geladen.
[362]8        Parameter: &gkz, &gml_id
[427]9        Dies Programm gibt einen kurzen Überblick zum FlurstÃŒck, z.B. EigentÃŒmer ohne Adresse.
[362]10        FÃŒr detaillierte Angaben wird zum GB- oder FS-Nachweis verlinkt.
[427]11        Dies ist eine Variante von alkisausk.php welches als vollstÀndige Seite aufgerufen wird.
[362]12
13        Version:
[427]14        2016-02-24 Version fÃŒr norGIS-ALKIS-Import
[422]15        ....
16        2020-02-03 Fenster-Weite
17        2020-02-20 Authentifizierung ausgelagert in Function darf_ich()
18        2020-10-14 include ohne Klammer
19        2020-12-15 Input-Validation und Strict Comparisation (===)
20        2021-03-09 Link zum GebÀudenachweis auch mit "Bauwerke" betiteln
[425]21        2021-12-09 Neue Parameter: $katAmtMix (Kataster-Amt-Mix)
[362]22*/
[422]23ini_set("session.cookie_httponly", 1);
[362]24session_start();
[387]25$cntget = extract($_GET); // Parameter in Variable umwandeln
26
27// strikte Validierung aller Parameter
[422]28if (isset($gmlid)) {
29        if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
30} else {
31        die("Fehlender Parameter");
32}
33if (isset($gkz)) {
34        if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
35} else {
36        die("Fehlender Parameter");
37}
[387]38
[422]39include "alkis_conf_location.php";
40include "alkisfkt.php";
[387]41
[422]42// Wert fÃŒr "width=" aus der Function "imFenster" synchron halten mit "@media screen body width" aus "alkisauszug.css"
[362]43echo <<<END
[377]44<!doctype html>
45<html lang="de">
[362]46<head>
[377]47        <meta charset="utf-8">
[387]48        <meta name="viewport" content="width=device-width, initial-scale=1.0">
[362]49        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
50        <link rel="shortcut icon" type="image/x-icon" href="ico/Flurstueck.ico">
51        <title>ALKIS-Auskunft</title>
[422]52        <script type="text/javascript" language="JavaScript">
[402]53                function imFenster(dieURL) {
54                        var link = encodeURI(dieURL);
55                        window.open(link,'','left=10,top=10,width=750,height=840,resizable=yes,menubar=no,toolbar=no,location=no,status=no,scrollbars=yes');
56                }
[362]57        </script>
58</head>
[422]59<body class ="mbfi">
[362]60END;
[425]61
[422]62$erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); }
[427]63$dbg=$debug;
[422]64
65// Body des Inlay muss in Mapbender-Feature-Info-PopUp passen. Kleiner als 750 aus css.
[377]66$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisinlayausk.php'");
[362]67if (!$con) {echo "<br>Fehler beim Verbinden der DB.\n<br>";}
68
[427]69// F L U R S T Ü C K
[412]70$sql ="SELECT f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche, g.gemarkungsnummer, g.bezeichnung, f.gemeindezugehoerigkeit_regierungsbezirk, f.gemeindezugehoerigkeit_kreis, f.gemeindezugehoerigkeit_gemeinde, f.istgebucht
[425]71FROM ax_flurstueck f LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ".UnqKatAmt("f","g")
72."WHERE f.gml_id= $1 AND f.endet IS NULL AND g.endet IS NULL;";
[412]73
[362]74$v = array($gmlid);
75$res = pg_prepare("", $sql);
76$res = pg_execute("", $v);
77if (!$res) {
[387]78        echo "\n<p class='err'>Fehler bei Flurstuecksdaten.</p>";
[425]79        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
[362]80}
[425]81if ($dbg > 0) {
82        $zeianz=pg_num_rows($res);
83        if ($zeianz > 1){
84                echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Flurst&uuml;cks-Objekt!</p>";
85                if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
86        }
87}
[402]88if ($row = pg_fetch_assoc($res)) {
[362]89        $gemkname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
90        $gmkgnr=$row["gemarkungsnummer"];
91        $flurnummer=$row["flurnummer"];
92        $flstnummer=$row["zaehler"];
93        $nenner=$row["nenner"];
94        if ($nenner > 0) $flstnummer.="/".$nenner; // BruchNr
95        $flae=$row["amtlicheflaeche"];
96        $flae=number_format($flae,0,",",".") . " m&#178;";
[412]97        $fsreg=$row["gemeindezugehoerigkeit_regierungsbezirk"]; // Filter ZustÀndigkeit
98        $fskrs=$row["gemeindezugehoerigkeit_kreis"];
99        $fsgem=$row["gemeindezugehoerigkeit_gemeinde"];
[402]100        $gml_buchungsstelle=$row["istgebucht"];
[362]101} else {
[387]102        echo "\n<p class='err'>Kein Treffer fuer gml_id=".$gmlid."</p>";
[362]103}
104
[377]105// PrÃŒfung der Gebiets-Berechtigung bei gemeinsam genutzten Datenbanken (Kreis und Gemeinde)
106// FÃŒr das gkz (z.B. aus dem Mapfile-Namen) wird in der Konfiguration ein Filter gesetzt.
107if ( ($filtkreis != '' and $filtkreis != $fskrs) or ($filtgem != '' and $filtgem != $fsgem) ) {
108        // Einer der gesetzten Filter passt nicht
[425]109        if ($dbg > 2) {
[387]110                echo "\n<p class='err'>Filter Kreis='".$filtkreis."', Gemeinde='".$filtgem."'</p>";
111                echo "\n<p class='err'>Flstk. Kreis='".$fskrs."', Gemeinde='".$fsgem."'</p>";
[377]112        }
113        echo "\n<br><p class='stop1'>Zugriff nicht erlaubt</p>
114        \n<br><p class='stop2'>Dies Flurst&uuml;ck liegt ausserhalb der zust&auml;ndigen Stadt oder Gemeinde.</p>\n</body>\n</html>";
115        pg_free_result($res);
116        exit;
117}
118
[405]119// Überschrift ist im umgebenden HTML vorhanden
[402]120echo "\n<table class='outer'>"
121."\n\t<tr>"
122        ."\n\t\t<td class='ll'><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Kennzeichen:</td>"
123                ."\n\t\t<td>"
124                ."\n\t\t\t<table class='kennzfs' title='Flurst&uuml;ckskennzeichen'>\n\t\t\t\t<tr>"
[405]125                        ."\n\t\t\t\t\t<td class='head'>Gemarkung</td>\n\t\t\t\t\t<td class='head'>Flur</td>\n\t\t\t\t\t<td class='head'>Flurst-Nr.</td>\n\t\t\t\t</tr>"
[402]126                        ."\n\t\t\t\t<tr>\n\t\t\t\t\t<td title='Gemarkung'>".$gemkname."</td>"
127                        ."\n\t\t\t\t\t<td title='Flurnummer'>".$flurnummer."</td>"
128                        ."\n\t\t\t\t\t<td title='Flurst&uuml;cksnummer (Z&auml;hler / Nenner)'><span class='wichtig'>".$flstnummer."</span></td>\n\t\t\t\t</tr>"
129                ."\n\t\t\t</table>"
130        ."\n\t\t</td>\n\t\t<td>"
[405]131        ."\n\t\t\t<p class='nwlink noprint'>weitere Auskunft:<br>";
[362]132// FlurstÃŒcksnachweis (mit EigentÃŒmer)
[402]133echo "\n\t\t\t\t<a href='javascript:imFenster(\"alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$gmlid."&amp;eig=j\")' "
[362]134        ."title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck&nbsp;"
135        ."<img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''>"
136."</a><br>";
[425]137
[362]138// FS-Historie
[425]139if ($fsHistorie){ // conf
140        echo "\n\t\t\t\t<a href='javascript:imFenster(\"alkisfshist.php?gkz=".$gkz."&amp;gmlid=".$gmlid."\")' "
141                ."title='Vorg&auml;nger des Flurst&uuml;cks'>Historie&nbsp;"
142                ."<img src='ico/Flurstueck_Historisch.png' width='16' height='16' alt=''>"
143        ."</a><br>";
144}
145// GebÀude-NW zum FS
[402]146echo "\n\t\t\t\t<a href='javascript:imFenster(\"alkisgebaeudenw.php?gkz=".$gkz."&amp;gmlid=".$gmlid."\")' "
[425]147        ."title='Geb&auml;ude oder Bauwerke auf oder an diesem Flurst&uuml;ck'>Geb&auml;ude/Bauw.&nbsp;"
[362]148        ."<img src='ico/Haus.png' width='16' height='16' alt=''>"
149."</a>";
[402]150echo "\n\t\t\t</p>\n\t\t</td>\n\t</tr>";
[362]151pg_free_result($res);
152
[398]153// Lage  M I T  HausNr (Adresse)
[362]154$sql ="SELECT DISTINCT s.gml_id AS kgml, l.gml_id, s.bezeichnung, l.hausnummer
155FROM ax_flurstueck f JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(f.weistauf)
156JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage
157WHERE f.gml_id= $1 AND f.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL
158ORDER BY s.bezeichnung, l.hausnummer;";
159$v=array($gmlid); // id FS
160$res=pg_prepare("", $sql);
161$res=pg_execute("", $v);
162if (!$res) {
[387]163        echo "\n<p class='err'>Fehler bei Lagebezeichnung mit Hausnummer.</p>";
[425]164        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
[362]165}
166$j=0;
167$kgmlalt='';
[402]168while($row = pg_fetch_assoc($res)) {
[398]169        $sname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); // Str.-Name
[422]170        if (substr($sname, strlen($sname) -3, 3) === 'weg') { // Versuch fuer korrekten Satzbau
[398]171                $slink=" am ".$sname;
172        } else {
173                $slink=" an der ".$sname;
174        }
175        $hsnr=$row["hausnummer"];
[402]176        echo "\n\t<tr>"
[405]177                ."\n\t\t<td class='ll'>";
[422]178                if ($j === 0) {echo "<img src='ico/Lage_mit_Haus.png' width='16' height='16' alt='MIT'> Lage:";}
[405]179                echo "</td>"
[402]180                ."\n\t\t<td class='lr'>".$sname."&nbsp;".$hsnr."</td>"
181                ."\n\t\t<td>\n\t\t\t<p class='nwlink noprint'>";
[362]182        $kgml=$row["kgml"]; // Wiederholung vermeiden
183        if ($kgml != $kgmlalt) { // NEUE Strasse vor Lage
184                $kgmlalt=$kgml; // Katalog GML-ID
[402]185                echo "\n\t\t\t\t<a title='Flurst&uuml;cke mit oder ohne Hausnummer".$slink."' "
[398]186                ."href='javascript:imFenster(\"alkisstrasse.php?gkz=".$gkz."&amp;gmlid=".$kgml."\")'>Stra&szlig;e "
[362]187                ."<img src='ico/Strassen.png' width='16' height='16' alt='STRA'></a>";
188        }
[402]189        echo "\n\t\t\t\t<a title='Flurst&uuml;cke und Geb&auml;ude mit Hausnummer ".$hsnr."' "
[362]190                ."href='javascript:imFenster(\"alkislage.php?gkz=".$gkz."&amp;ltyp=m&amp;gmlid=".$row["gml_id"]."\")'>Lage "
191                ."<img src='ico/Lage_mit_Haus.png' width='16' height='16' alt='HAUS'></a>&nbsp;"
[402]192        ."\n\t\t\t</p>\n\t\t</td>\n\t</tr>";
[362]193        $j++;
194}
195pg_free_result($res);
[398]196
197// Lage  O H N E   HausNr
198$sql="SELECT DISTINCT s.gml_id AS kgml, l.gml_id, s.bezeichnung, l.unverschluesselt "
[387]199        ."FROM ax_flurstueck f JOIN ax_lagebezeichnungohnehausnummer l ON l.gml_id=ANY(f.zeigtauf) "
200        ."LEFT JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage "
201        ."WHERE f.gml_id= $1 AND f.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL ORDER BY s.bezeichnung;";
[398]202$v=array($gmlid);
203$res=pg_prepare("", $sql);
204$res=pg_execute("", $v);
205if (!$res) {
206        echo "\n<p class='err'>Fehler bei Lagebezeichnung ohne Hausnummer.</p>";
[425]207        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
[398]208}
209$kgmlalt='';
[402]210while($row = pg_fetch_assoc($res)) {
[398]211        $sname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); // Str.-Name
[427]212        if (substr($sname, strlen($sname) -3, 3) === 'weg') { // Versuch fÃŒr korrekten Satzbau
[398]213                $slink=" am ".$sname;
214        } else {
215                $slink=" an der ".$sname;
[362]216        }
[398]217
218        $gewann=htmlentities($row["unverschluesselt"], ENT_QUOTES, "UTF-8");
[402]219        echo "\n\t<tr>";
[398]220        if ($sname != "") { // Typ=Strasse
221                $ico="Lage_an_Strasse.png";
[402]222                echo "\n\t\t<td class='ll'><img src='ico/".$ico."' width='16' height='16' alt='OHNE'> Stra&szlig;e:</td>";
223                echo "\n\t\t<td class='lr' title='An Stra&szlig;e aber ohne Hausnummer'>".$sname."&nbsp;</td>";
[398]224        } else {
225                $ico="Lage_Gewanne.png";
[402]226                echo "\n\t\t<td class='ll'><img src='ico/".$ico."' width='16' height='16' alt='Gewanne'> Gewanne:</td>";
227                echo "\n\t\t<td class='lr' title='Gewanne'>".$gewann."&nbsp;</td>";
[398]228        }
[402]229        echo "\n\t\t<td>\n\t\t\t<p class='nwlink noprint'>";
[425]230        if ($sname != "") { // Typ=Straße
[362]231                $kgml=$row["kgml"]; // Wiederholung vermeiden
[425]232                if ($kgml != $kgmlalt) { // NEUE Straße vor Lage-O
[362]233                        $kgmlalt=$kgml; // Katalog GML-ID
[398]234                        echo "\n\t\t\t<a class='noprint' title='Flurst&uuml;cke mit oder ohne Hausnummer".$slink."' "
235                        ."href='javascript:imFenster(\"alkisstrasse.php?gkz=".$gkz."&amp;gmlid=".$kgml."\")'>Stra&szlig;e "
[362]236                        ."<img src='ico/Strassen.png' width='16' height='16' alt='STRA'></a>";
237                }
[398]238                echo "\n\t\t\t<a class='noprint' title='Flurst&uuml;cke ohne Hausnummer".$slink."' "
[362]239                ."href='javascript:imFenster(\"alkislage.php?gkz=".$gkz."&amp;ltyp=o&amp;gmlid=".$row["gml_id"]."\")'>Lage "
240                ."<img src='ico/".$ico."' width='16' height='16' alt='OHNE'></a>&nbsp;"
241                ."\n\t\t</p>\n\t</td>\n</tr>";
[398]242        } else { // Typ Gewanne
243                echo "\n\t\t\t<a title='Flurst&uuml;cke mit dieser Gewanne als Lagebezeichnung' "
244                ."href='javascript:imFenster(\"alkislage.php?gkz=".$gkz."&amp;ltyp=o&amp;gmlid=".$row["gml_id"]."\")'>Gewanne "
245                ."<img src='ico/".$ico."' width='16' height='16' alt='Gewanne'></a>&nbsp;"
[402]246                ."\n\t\t</p>\n\t\t</td>\n\t</tr>";
[362]247        }
248}
[398]249pg_free_result($res);
[402]250echo "\n</table>\n";
[387]251echo "\n<p class='fsd'>Flurst&uuml;cksfl&auml;che: <b>".$flae."</b></p>";
[362]252
[402]253// B U C H U N G S S T E L L E N  zum FS
254$bartgrp="";    // Buchungsart
255$barttypgrp=""; // Buchungsart Typ
256if ($gml_buchungsstelle == '') {echo "\n<p class='err'>Keine Buchungstelle zum Flurst&uuml;ck gefunden.</p>";}
257echo "\n\n<table class='outer'>";
[427]258        $gezeigt=buchung_anzg($gml_buchungsstelle, 'j', true, "", 1); // direkte Buchung anzeigen
[405]259        $anzber=ber_bs_zaehl($gml_buchungsstelle); // Ber. Buchg., nur Anzahl
[402]260        if ($anzber > 0 ) {
261                if ($gezeigt) {
[405]262                        echo "\n\t<tr>\n\t\t<td colspan='4' title='Komplexe Situationen werden in dieser Vorschau nicht vollst&auml;ndig dargestellt.'><span class='wichtig'>Berechtigte Buchungen siehe Flurst&uuml;ck oder Buchung.</span></td>\n\t</tr>";
[362]263                } else {
[405]264                        $nochmehr=ber_bs_anzg($gml_buchungsstelle, "j", true, "", 1); // wenigstens EINE Buchg. zeigen
[403]265                        if (count($nochmehr) > 0) { // liefert array, hier nicht weiter verfolgen
[402]266                                echo "\n\t<tr>\n\t\t<td colspan='4'><span class='wichtig'>Weitere berechtigte Buchungen siehe Flurst&uuml;cksnachweis.</span></td>\n\t</tr>";
267                        }
268                }
[362]269        }
[402]270echo "\n</table>\n";
[362]271
272?>
273</body>
274</html>
Note: See TracBrowser for help on using the repository browser.