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

Revision 430, 12.5 KB checked in by frank.jaeger, 22 months ago (diff)

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