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.
Line 
1<?php
2/*      alkisinlayausk.php
3
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.
8        Parameter: &gkz, &gml_id
9        Dies Programm gibt einen kurzen Überblick zum FlurstÃŒck, z.B. EigentÃŒmer ohne Adresse.
10        FÃŒr detaillierte Angaben wird zum GB- oder FS-Nachweis verlinkt.
11        Dies ist eine Variante von alkisausk.php welches als vollstÀndige Seite aufgerufen wird.
12
13        Version:
14        2016-02-24 Version fÃŒr norGIS-ALKIS-Import
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
21        2021-12-09 Neue Parameter: $katAmtMix (Kataster-Amt-Mix)
22*/
23ini_set("session.cookie_httponly", 1);
24session_start();
25$cntget = extract($_GET); // Parameter in Variable umwandeln
26
27// strikte Validierung aller Parameter
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}
38
39include "alkis_conf_location.php";
40include "alkisfkt.php";
41
42// Wert fÃŒr "width=" aus der Function "imFenster" synchron halten mit "@media screen body width" aus "alkisauszug.css"
43echo <<<END
44<!doctype html>
45<html lang="de">
46<head>
47        <meta charset="utf-8">
48        <meta name="viewport" content="width=device-width, initial-scale=1.0">
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>
52        <script type="text/javascript" language="JavaScript">
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                }
57        </script>
58</head>
59<body class ="mbfi">
60END;
61
62$erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); }
63$dbg=$debug;
64
65// Body des Inlay muss in Mapbender-Feature-Info-PopUp passen. Kleiner als 750 aus css.
66$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisinlayausk.php'");
67if (!$con) {echo "<br>Fehler beim Verbinden der DB.\n<br>";}
68
69// F L U R S T Ü C K
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
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;";
73
74$v = array($gmlid);
75$res = pg_prepare("", $sql);
76$res = pg_execute("", $v);
77if (!$res) {
78        echo "\n<p class='err'>Fehler bei Flurstuecksdaten.</p>";
79        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
80}
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}
88if ($row = pg_fetch_assoc($res)) {
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;";
97        $fsreg=$row["gemeindezugehoerigkeit_regierungsbezirk"]; // Filter ZustÀndigkeit
98        $fskrs=$row["gemeindezugehoerigkeit_kreis"];
99        $fsgem=$row["gemeindezugehoerigkeit_gemeinde"];
100        $gml_buchungsstelle=$row["istgebucht"];
101} else {
102        echo "\n<p class='err'>Kein Treffer fuer gml_id=".$gmlid."</p>";
103}
104
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
109        if ($dbg > 2) {
110                echo "\n<p class='err'>Filter Kreis='".$filtkreis."', Gemeinde='".$filtgem."'</p>";
111                echo "\n<p class='err'>Flstk. Kreis='".$fskrs."', Gemeinde='".$fsgem."'</p>";
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
119// Überschrift ist im umgebenden HTML vorhanden
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>"
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>"
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>"
131        ."\n\t\t\t<p class='nwlink noprint'>weitere Auskunft:<br>";
132// FlurstÃŒcksnachweis (mit EigentÃŒmer)
133echo "\n\t\t\t\t<a href='javascript:imFenster(\"alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$gmlid."&amp;eig=j\")' "
134        ."title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck&nbsp;"
135        ."<img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''>"
136."</a><br>";
137
138// FS-Historie
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
146echo "\n\t\t\t\t<a href='javascript:imFenster(\"alkisgebaeudenw.php?gkz=".$gkz."&amp;gmlid=".$gmlid."\")' "
147        ."title='Geb&auml;ude oder Bauwerke auf oder an diesem Flurst&uuml;ck'>Geb&auml;ude/Bauw.&nbsp;"
148        ."<img src='ico/Haus.png' width='16' height='16' alt=''>"
149."</a>";
150echo "\n\t\t\t</p>\n\t\t</td>\n\t</tr>";
151pg_free_result($res);
152
153// Lage  M I T  HausNr (Adresse)
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) {
163        echo "\n<p class='err'>Fehler bei Lagebezeichnung mit Hausnummer.</p>";
164        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
165}
166$j=0;
167$kgmlalt='';
168while($row = pg_fetch_assoc($res)) {
169        $sname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); // Str.-Name
170        if (substr($sname, strlen($sname) -3, 3) === 'weg') { // Versuch fuer korrekten Satzbau
171                $slink=" am ".$sname;
172        } else {
173                $slink=" an der ".$sname;
174        }
175        $hsnr=$row["hausnummer"];
176        echo "\n\t<tr>"
177                ."\n\t\t<td class='ll'>";
178                if ($j === 0) {echo "<img src='ico/Lage_mit_Haus.png' width='16' height='16' alt='MIT'> Lage:";}
179                echo "</td>"
180                ."\n\t\t<td class='lr'>".$sname."&nbsp;".$hsnr."</td>"
181                ."\n\t\t<td>\n\t\t\t<p class='nwlink noprint'>";
182        $kgml=$row["kgml"]; // Wiederholung vermeiden
183        if ($kgml != $kgmlalt) { // NEUE Strasse vor Lage
184                $kgmlalt=$kgml; // Katalog GML-ID
185                echo "\n\t\t\t\t<a title='Flurst&uuml;cke mit oder ohne Hausnummer".$slink."' "
186                ."href='javascript:imFenster(\"alkisstrasse.php?gkz=".$gkz."&amp;gmlid=".$kgml."\")'>Stra&szlig;e "
187                ."<img src='ico/Strassen.png' width='16' height='16' alt='STRA'></a>";
188        }
189        echo "\n\t\t\t\t<a title='Flurst&uuml;cke und Geb&auml;ude mit Hausnummer ".$hsnr."' "
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;"
192        ."\n\t\t\t</p>\n\t\t</td>\n\t</tr>";
193        $j++;
194}
195pg_free_result($res);
196
197// Lage  O H N E   HausNr
198$sql="SELECT DISTINCT s.gml_id AS kgml, l.gml_id, s.bezeichnung, l.unverschluesselt "
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;";
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>";
207        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
208}
209$kgmlalt='';
210while($row = pg_fetch_assoc($res)) {
211        $sname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); // Str.-Name
212        if (substr($sname, strlen($sname) -3, 3) === 'weg') { // Versuch fÃŒr korrekten Satzbau
213                $slink=" am ".$sname;
214        } else {
215                $slink=" an der ".$sname;
216        }
217
218        $gewann=htmlentities($row["unverschluesselt"], ENT_QUOTES, "UTF-8");
219        echo "\n\t<tr>";
220        if ($sname != "") { // Typ=Strasse
221                $ico="Lage_an_Strasse.png";
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>";
224        } else {
225                $ico="Lage_Gewanne.png";
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>";
228        }
229        echo "\n\t\t<td>\n\t\t\t<p class='nwlink noprint'>";
230        if ($sname != "") { // Typ=Straße
231                $kgml=$row["kgml"]; // Wiederholung vermeiden
232                if ($kgml != $kgmlalt) { // NEUE Straße vor Lage-O
233                        $kgmlalt=$kgml; // Katalog GML-ID
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 "
236                        ."<img src='ico/Strassen.png' width='16' height='16' alt='STRA'></a>";
237                }
238                echo "\n\t\t\t<a class='noprint' title='Flurst&uuml;cke ohne Hausnummer".$slink."' "
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>";
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;"
246                ."\n\t\t</p>\n\t\t</td>\n\t</tr>";
247        }
248}
249pg_free_result($res);
250echo "\n</table>\n";
251echo "\n<p class='fsd'>Flurst&uuml;cksfl&auml;che: <b>".$flae."</b></p>";
252
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'>";
258        $gezeigt=buchung_anzg($gml_buchungsstelle, 'j', true, "", 1); // direkte Buchung anzeigen
259        $anzber=ber_bs_zaehl($gml_buchungsstelle); // Ber. Buchg., nur Anzahl
260        if ($anzber > 0 ) {
261                if ($gezeigt) {
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>";
263                } else {
264                        $nochmehr=ber_bs_anzg($gml_buchungsstelle, "j", true, "", 1); // wenigstens EINE Buchg. zeigen
265                        if (count($nochmehr) > 0) { // liefert array, hier nicht weiter verfolgen
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                }
269        }
270echo "\n</table>\n";
271
272?>
273</body>
274</html>
Note: See TracBrowser for help on using the repository browser.