source: trunk/info/info/alkisn/alkisbaurecht.php @ 425

Revision 425, 8.9 KB checked in by frank.jaeger, 2 years ago (diff)

Web-GIS-Auskunft und Mapbender2-Navigation: neue Konfigurations-Parameter und verbessertes Grundbuch-Modul
Line 
1<?php
2/*      alkisbaurecht.php - Baurecht
3        ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo).
4
5        Version:
6        2016-02-24 Version fÃŒr norGIS-ALKIS-Import
7        ....
8        2020-02-20 Authentifizierung ausgelagert in Function darf_ich()
9        2020-12-03 function selbstverlinkung() statt $_SERVER['PHP_SELF']
10        2020-12-15 Input-Validation und Strict Comparisation (===)
11        2021-12-09 Neue Parameter: $katAmtMix (Kataster-Amt-Mix), $PrntBtn (Drucken-SchaltflÀche)
12*/
13ini_set("session.cookie_httponly", 1);
14session_start();
15$showkey="n"; $nodebug=""; // Var. aus Parameter initalisieren
16$cntget = extract($_GET); // Parameter in Variable umwandeln
17
18// strikte Validierung aller Parameter
19if (isset($gmlid)) {
20        if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
21} else {
22        die("Fehlender Parameter");
23}
24if (isset($gkz)) {
25        if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
26} else {
27        die("Fehlender Parameter");
28}
29if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
30if ($showkey === "j") {$showkey=true;} else {$showkey=false;}
31if (!preg_match('#^j{0,1}$#', $nodebug)) {die("Eingabefehler nodebug");}
32
33include "alkis_conf_location.php";
34include "alkisfkt.php";
35
36echo <<<END
37<!doctype html>
38<html lang="de">
39<head>
40        <meta charset="utf-8">
41        <meta name="viewport" content="width=device-width, initial-scale=1.0">
42        <title>ALKIS Bau-, Raum- oder Bodenordnungsrecht</title>
43        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
44        <link rel="shortcut icon" type="image/x-icon" href="ico/Gericht.ico">
45</head>
46<body>
47END;
48
49$erlaubnis = darf_ich(); if ($erlaubnis === 0) {die('<p class="stop1">Abbruch</p></body>');}
50
51$dbg=$debug; // CONF in Arbeits-Variable
52// Mit URL-Parameter "&nodebug=j" kann man die Entwicklungsumgebung (in Conf definiert) ausschalten.
53// Wirkt temporÀr und wird nicht in Links weiter gereicht.
54if ($nodebug === "j") {$dbg=0;}
55
56$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisbaurecht.php'");
57if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
58
59// Spalte "a.dokumentation" ist immer leer
60$sql ="SELECT r.ogc_fid, r.artderfestlegung as adfkey, r.name, r.stelle, r.bezeichnung AS rechtbez,
61a.beschreibung AS adfbez, d.bezeichnung AS stellbez, d.stellenart, wd.beschreibung, wd.dokumentation, round(st_area(r.wkb_geometry)::numeric,0) AS flae
62FROM ax_bauraumoderbodenordnungsrecht r
63LEFT JOIN ax_artderfestlegung_bauraumoderbodenordnungsrecht a ON r.artderfestlegung = a.wert
64LEFT JOIN ax_dienststelle d ON r.land=d.land AND r.stelle=d.stelle ".UnqKatAmt("r","d")
65."LEFT JOIN ax_behoerde wd ON d.stellenart = wd.wert
66WHERE r.gml_id= $1 AND r.endet IS NULL AND d.endet IS NULL;";
67
68$v = array($gmlid);
69$res = pg_prepare("", $sql);
70$res = pg_execute("", $v);
71if (!$res) {
72        echo "\n<p class='err'>Fehler bei Baurecht.</p>";
73        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
74}
75if ($dbg > 0) {
76        $zeianz=pg_num_rows($res);
77        if ($zeianz > 1){
78                echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Baurecht-Objekt!</p>";
79                if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
80        }
81}
82if ($row = pg_fetch_assoc($res)) {
83        $artfest=$row["adfkey"];  // Art der Festlegung, Key
84        $verfnr=$row["rechtbez"]; // Verfahrens-Nummer
85        $enam=$row["name"];
86        $stellb=$row["stellbez"];
87        $stella=$row["stellenart"];
88        $behb=$row["beschreibung"];
89        $behd=$row["dokumentation"];
90
91        echo "<p class='balken recht'>ALKIS Bau-, Raum- oder Bodenordnungsrecht ".$artfest."-".$verfnr."&nbsp;</p>"; // Balken
92        echo "\n<h2><img src='ico/Gericht.png' width='16' height='16' alt=''> Bau-, Raum- oder Bodenordnungsrecht</h2>";
93        echo "\n<table>"
94                ."\n<tr>"
95                        ."\n\t<td class='li'>Art der Festlegung:</td>\n\t<td>";
96                        if ($showkey) {echo "<span class='key'>(".$artfest.")</span> ";}
97                        echo "<span class='wichtig'>".$row["adfbez"]."</span></td>"
98                ."\n</tr>";
99                if ($enam != "") {
100                        echo "\n<tr>"
101                                ."\n\t<td class='li'>Eigenname des Gebietes:</td>"
102                                ."\n\t<td>".$enam."</td>"
103                        . "\n</tr>";
104                }
105                if ($verfnr != "") {
106                        echo "\n<tr>"
107                                ."\n\t<td class='li'>Verfahrensnummer:</td>"
108                                ."\n\t<td>".$verfnr."</td>"
109                        ."\n</tr>";
110                }
111                if ($stellb != "") { // z.B. Umlegung *mit* und Baulast *ohne* Dienststelle, darum bezirk testen
112                        echo "\n<tr>"
113                                ."\n\t<td class='li'>Dienststelle:</td>\n\t<td>";
114                                        if ($showkey) {echo "<span class='key'>(".$row["stelle"].")</span> ";}
115                                        echo $stellb
116                                ."</td>"
117                        ."\n</tr>";
118                        if ($stella != "") {
119                                echo "\n<tr>"
120                                        ."\n\t<td class='li'>Art der Dienststelle:</td>"
121                                        ."\n\t<td>";
122                                                if ($showkey) {echo " <span class='key'>(".$stella.")</span>&nbsp;";}
123                                                echo "<span title='".$behd."'>".$behb."</span>";
124                                        echo "</td>"
125                                ."\n</tr>";
126                        }
127                }
128                echo "\n<tr>"
129                        ."\n\t<td class='li'>Fl&auml;che:</td>";
130                        $flae=number_format($row["flae"],0,",",".")." m&#178;";
131                        echo "\n\t<td>".$flae."</td>"
132                ."\n</tr>"
133        . "\n</table>";
134} else {
135        echo "\n<p class='err'>Fehler! Kein Treffer bei gml_id=".$gmlid."</p>";
136}
137
138echo "\n<h2><img src='ico/Flurstueck.png' width='16' height='16' alt=''> betroffene Flurst&uuml;cke</h2>\n"
139."\n<p>Ermittelt durch geometrische Verschneidung. Nach Gr&ouml;&szlig;e absteigend.</p>";
140
141$sql ="SELECT f.gml_id, g.bezeichnung, f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche, round(st_area(ST_Intersection(r.wkb_geometry,f.wkb_geometry))::numeric,1) AS schnittflae
142FROM ax_flurstueck f 
143JOIN ax_gemarkung g ON f.gemeindezugehoerigkeit_land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ".UnqKatAmt("f","g")
144."JOIN ax_bauraumoderbodenordnungsrecht r
145ON st_intersects(r.wkb_geometry,f.wkb_geometry) = true AND st_area(st_intersection(r.wkb_geometry,f.wkb_geometry)) > 0.05
146WHERE r.gml_id= $1 AND f.endet IS NULL AND r.endet IS NULL ";
147if ($filtgem === '' ) {
148        $v=array($gmlid);
149} else {
150        $sql.="AND f.gemeindezugehoerigkeit_kreis = $2 AND f.gemeindezugehoerigkeit_gemeinde = $3 "; // ZustÀndiges Gebiet
151        $v=array($gmlid, $filtkreis, $filtgem);
152}
153$sql.="ORDER BY schnittflae DESC LIMIT 100;";
154// > 0.0 ist gemeint, Ungenauigkeit durch st_simplify
155// Limit: Flurbereinig. kann groß werden!
156// Trotz Limit lange Antwortzeit, wegen OrderBy -> intersection
157
158$res=pg_prepare("", $sql);
159$res=pg_execute("", $v);
160if (!$res) {
161        echo "\n<p class='err'>Keine Flurst&uuml;cke ermittelt.<br></p>";
162        //if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";} // ggf. mehrere Parameter!
163}
164
165echo "\n<table class='fs'>"
166        ."\n<tr>"
167                ."\n\t<td class='head' title='Gemarkung'>Gemarkung</td>"
168                ."\n\t<td class='head' title='Flurnummer'>Flur</td>"
169                ."\n\t<td class='head' title='Flurst&uuml;cksnummer Z&auml;hler / Nenner'>Flurst&uuml;ck</td>"
170                ."\n\t<td class='heads fla' title='geometrische Schnittfl&auml;che'><img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'>Fl&auml;che</td>"
171                ."\n\t<td class='head fla' title='amtliche Flurst&uuml;cksfl&auml;che, Buchfl&auml;che'>von</td>"
172                ."\n\t<td class='head nwlink' title='Link zum Flurst&uuml;ck'>weitere Auskunft</td>"
173        ."\n</tr>";
174
175        $fscnt=0;
176        while($row = pg_fetch_assoc($res)) {
177                $fscnt++;
178                $gmkgnr=$row["gemarkungsnummer"];
179                $gemarkung=$row["bezeichnung"];
180                $nen=$row["nenner"];
181                echo "\n<tr>"
182                        ."\n\t<td>";
183                        if ($showkey) {echo "<span class='key'>(".$gmkgnr.")</span> ";}
184                        echo $gemarkung."</td>"
185                        ."\n\t<td>".$row["flurnummer"]."</td>"
186                        ."\n\t<td><span class='wichtig'>".$row["zaehler"];
187                                if ($nen != "") {echo "/".$nen;}
188                        echo "</span></td>"
189                        ."\n\t<td class='fla'>".$row["schnittflae"]." m&#178;</td>"
190                        ."\n\t<td class='fla'>".$row["amtlicheflaeche"]." m&#178;</td>"
191                        ."\n\t<td class='nwlink noprint'>"
192                                ."\n\t\t<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$row["gml_id"]."&amp;eig=n' "
193                                        ."title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck "
194                                        ."\n\t\t\t<img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''>"
195                                ."\n\t\t</a>"
196                        ."\n\t</td>"
197                ."\n</tr>";
198        }
199echo "\n</table>";
200
201if ($fscnt === 0) { // nicht gefunden
202        if ($filtgem === '' ) { // ungefiltert
203                echo "\n<p class='err'>Kein Flurst&uuml;ck gefunden.</p>";
204        } else { // Wahrscheinliche Ursache = Filter
205                echo "\n<p class='err'>Kein Flurst&uuml;ck im berechtigten Bereich.</p>";
206        //      if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = ".$gmlid." $2 = ".$filtkreis." $3 = ".$filtgem."</p>";}
207        }
208} elseif ($fscnt === 100) {
209        echo "<p>... und weitere Flurst&uuml;cke (Limit 100 erreicht).</p>";
210}
211
212pg_close($con);
213echo "
214<div class='buttonbereich noprint'>\n<hr>"
215        ."\n\t<a title='zur&uuml;ck' href='javascript:history.back()'><img src='ico/zurueck.png' width='16' height='16' alt='zur&uuml;ck' /></a>&nbsp;";
216if ($PrntBtn==true){echo "\n\t<a title='Drucken' href='javascript:window.print()'><img src='ico/print.png' width='16' height='16' alt='Drucken'></a>&nbsp;";}
217echo "\n</div>";
218
219footer($gmlid, selbstverlinkung()."?", "");
220?>
221
222</body>
223</html>
Note: See TracBrowser for help on using the repository browser.