1 | <?php |
---|
2 | /* alkisgebaeudenw.php - Gebaeudenachweis |
---|
3 | ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo). |
---|
4 | |
---|
5 | Version: |
---|
6 | 2016-02-24 Version fuer norGIS-ALKIS-Import |
---|
7 | .... |
---|
8 | 2020-02-20 Authentifizierung ausgelegert in Function darf_ich() |
---|
9 | 2020-12-03 function selbstverlinkung() statt $_SERVER['PHP_SELF'] |
---|
10 | 2020-12-15 Verschneidung mit "sonstige Bauwerke", Input-Validation und Strict Comparisation |
---|
11 | 2021-03-09 Verschneidung mit weiteren Bauwerks-Tabellen. |
---|
12 | 2021-03-11 Adresse(n) des gehörtZu-Haus zum Bauwerk nicht mehr hier anzeigen sondern im neuen Bauwerk-Modul. |
---|
13 | */ |
---|
14 | |
---|
15 | // Kopf fÌr die Anzeige der GebÀude. Nur wenn tatsÀchlich GebÀude vorkommen. |
---|
16 | function geb_tab_head() { |
---|
17 | // Ãberschrift |
---|
18 | echo "\n\n<h3><img src='ico/Haus.png' width='16' height='16' alt=''> Gebäude</h3>" |
---|
19 | ."\n<p>.. auf oder an dem Flurstück. Ermittelt durch Verschneidung der Geometrie.</p>"; |
---|
20 | |
---|
21 | // Tabellen-Kopf |
---|
22 | echo "\n<hr>\n<table class='geb'>"; |
---|
23 | echo "\n<tr>" |
---|
24 | ."\n\t<td class='head' title='ggf. Gebäudename'>Name</td>" |
---|
25 | ."\n\t<td class='heads fla' title='Schnittfläche zwischen Flurstück und Gebäude'><img src='ico/sortd.png' width='10' height='10' alt='' title='Sortierung (absteigend)'>Fläche</td>" |
---|
26 | ."\n\t<td class='head' title='gesamte Gebäudefläche, liegt teilweise auf Nachbar-Flurstück'> </td>" |
---|
27 | ."\n\t<td class='head' title='Gebäudefunktion ist die zum Zeitpunkt der Erhebung vorherrschend funktionale Bedeutung des Gebäudes'>Funktion</td>" |
---|
28 | ."\n\t<td class='head' title='Bauweise ist die Beschreibung der Art der Bauweise'>Bauweise</td>" |
---|
29 | ."\n\t<td class='head' title='Zustand beschreibt die Beschaffenheit oder die Betriebsbereitschaft von Gebäude. Diese Attributart wird nur dann optional geführt, wenn der Zustand des Gebäudes vom nutzungsfähigen Zustand abweicht.'>Zustand</td>" |
---|
30 | ."\n\t<td class='head nwlink' title='Lagebezeichnung mit Straße und Hausnummer'>Lage</td>" |
---|
31 | ."\n\t<td class='head nwlink' title='Link zu den kompletten Hausdaten'>Haus</td>" |
---|
32 | ."\n</tr>"; |
---|
33 | } |
---|
34 | |
---|
35 | // Kopf fÌr die Anzeige der Bauwerke. Nur wenn tatsÀchlich Bauwerke vorkommen. |
---|
36 | function bauw_tab_head() { |
---|
37 | // Ãberschrift |
---|
38 | echo "\n\n<h3><img src='ico/Haus.png' width='16' height='16' alt=''> Bauwerke</h3>" |
---|
39 | ."\n<p>.. auf oder an dem Flurstück. Ermittelt durch Verschneidung der Geometrie.</p>"; |
---|
40 | |
---|
41 | // Tabellen-Kopf |
---|
42 | echo "\n<hr>\n<table class='geb'>"; |
---|
43 | echo "<tr><td colspan=3></td><td colspan=3 class='heads gw'><img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'>Bauwerks-Typ</td></tr>"; |
---|
44 | echo "\n<tr>"; |
---|
45 | echo "\n\t<td class='head' title='Bezeichnung und/oder Bauwerksname'>Name</td>" |
---|
46 | ."\n\t<td class='heads fla' title='Schnittfläche zwischen Flurstück und Bauwerk'><img src='ico/sortd.png' width='10' height='10' alt='' title='Sortierung (absteigend)'>Fläche</td>" |
---|
47 | ."\n\t<td class='head' title='gesamte Bauwerksfläche, liegt teilweise auf Nachbar-Flurstück'> </td>" |
---|
48 | ."\n\t<td class='head' title='Bauwerksfunktion'>Funktion</td>" |
---|
49 | ."\n\t<td class='head nwlink' title='Daten des zugehörigen Gebäudes'>zum Haus</td>" |
---|
50 | ."\n\t<td class='head nwlink' title='Detaillierte Daten zu diesem Bauwerk'>Bauwerk</td>" |
---|
51 | ."\n</tr>"; |
---|
52 | } |
---|
53 | |
---|
54 | // S T A R T |
---|
55 | |
---|
56 | ini_set("session.cookie_httponly", 1); |
---|
57 | session_start(); |
---|
58 | $showkey="n"; $nodebug=""; // Var. aus Parameter initalisieren |
---|
59 | $cntget = extract($_GET); // Parameter in Variable umwandeln |
---|
60 | |
---|
61 | // strikte Validierung aller Parameter |
---|
62 | if (isset($gmlid)) { |
---|
63 | if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");} |
---|
64 | } else { |
---|
65 | die("Fehlender Parameter"); |
---|
66 | } |
---|
67 | if (isset($gkz)) { |
---|
68 | if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");} |
---|
69 | } else { |
---|
70 | die("Fehlender Parameter"); |
---|
71 | } |
---|
72 | if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");} |
---|
73 | if ($showkey === "j") {$showkey=true;} else {$showkey=false;} |
---|
74 | if (!preg_match('#^j{0,1}$#', $nodebug)) {die("Eingabefehler nodebug");} |
---|
75 | |
---|
76 | include "alkis_conf_location.php"; |
---|
77 | include "alkisfkt.php"; |
---|
78 | |
---|
79 | echo <<<END |
---|
80 | <!doctype html> |
---|
81 | <html lang="de"> |
---|
82 | <head> |
---|
83 | <meta charset="utf-8"> |
---|
84 | <meta name="viewport" content="width=device-width, initial-scale=1.0"> |
---|
85 | <title>ALKIS Gebäudenachweis</title> |
---|
86 | <link rel="stylesheet" type="text/css" href="alkisauszug.css"> |
---|
87 | <link rel="shortcut icon" type="image/x-icon" href="ico/Haus.ico"> |
---|
88 | </head> |
---|
89 | <body> |
---|
90 | END; |
---|
91 | |
---|
92 | $erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); } |
---|
93 | |
---|
94 | // Mit URL-Parameter "&nodebug=j" kann man die Entwicklungsumgebung (in Conf definiert) ausschalten. |
---|
95 | // Manuell an die URL anfÌgen, wirkt nur temporÀr und wird nicht in Links weiter gereicht. |
---|
96 | if ($nodebug === "j") {$debug=0;} |
---|
97 | |
---|
98 | $con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisgebaeudenw.php'"); |
---|
99 | if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>"; |
---|
100 | |
---|
101 | // Flurstueck |
---|
102 | $sqlf="SELECT f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche, g.gemarkungsnummer, g.bezeichnung |
---|
103 | FROM ax_flurstueck f LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer |
---|
104 | WHERE f.gml_id= $1 AND f.endet IS NULL AND g.endet IS NULL;"; |
---|
105 | $v=array($gmlid); |
---|
106 | $resf=pg_prepare("", $sqlf); |
---|
107 | $resf=pg_execute("", $v); |
---|
108 | if (!$resf) { |
---|
109 | echo "\n<p class='err'>Fehler bei Flurstücksdaten.</p>"; |
---|
110 | if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlf)."'</p>";} |
---|
111 | if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resf)."</p>";} |
---|
112 | } |
---|
113 | if ($rowf = pg_fetch_assoc($resf)) { |
---|
114 | $gemkname=htmlentities($rowf["bezeichnung"], ENT_QUOTES, "UTF-8"); |
---|
115 | $gmkgnr=$rowf["gemarkungsnummer"]; |
---|
116 | $flurnummer=$rowf["flurnummer"]; |
---|
117 | $flstnummer=$rowf["zaehler"]; |
---|
118 | $nenner=$rowf["nenner"]; |
---|
119 | if ($nenner > 0) { // BruchNr |
---|
120 | $flstnummer.="/".$nenner; |
---|
121 | } |
---|
122 | $flstflaeche = $rowf["amtlicheflaeche"] ; |
---|
123 | } else { |
---|
124 | echo "\n<p class='err'>Fehler! Kein Treffer fuer gml_id=".$gmlid."</p>"; |
---|
125 | } |
---|
126 | echo "<p class='balken geb'>ALKIS Flurstück (Gebäude und Bauwerke) ".$gmkgnr."-".$flurnummer."-".$flstnummer." </p>"; // Balken |
---|
127 | echo "\n<h2>Flurstück (Gebäude und Bauwerke)</h2>"; |
---|
128 | echo "\n<table class='outer'>" // Kopf |
---|
129 | ."\n<tr>" |
---|
130 | ."\n\t<td>" |
---|
131 | ."\n\t<td class='ll'><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Kennzeichen:</td>" |
---|
132 | ."\n\t<td>" |
---|
133 | ."\n\t\t<table class='kennzfs' title='Flurstückskennzeichen'>" // Kennzeichen in Rahmen |
---|
134 | ."\n\t\t<tr>" |
---|
135 | ."\n\t\t\t<td class='head'>Gemarkung</td>" |
---|
136 | ."\n\t\t\t<td class='head'>Flur</td>" |
---|
137 | ."\n\t\t\t<td class='head'>Flurst-Nr.</td>" |
---|
138 | ."\n\t\t</tr>\n\t\t<tr>" |
---|
139 | ."\n\t\t\t<td title='Gemarkung'>"; |
---|
140 | if ($showkey) {echo "<span class='key'>".$gmkgnr."</span><br>";} |
---|
141 | echo $gemkname." </td>" |
---|
142 | ."\n\t\t\t<td title='Flurnummer'>".$flurnummer."</td>" |
---|
143 | ."\n\t\t\t<td title='Flurstücksnummer (Zähler / Nenner)'><span class='wichtig'>".$flstnummer."</span></td>" |
---|
144 | ."\n\t\t</tr>" |
---|
145 | ."\n\t\t</table>" |
---|
146 | ."\n\t</td>" |
---|
147 | ."\n\t<td>" |
---|
148 | ."\n\t\t<p class='nwlink noprint'>" // Links zu anderem Nachweis |
---|
149 | ."\n\t\t\t<a href='alkisfsnw.php?gkz=".$gkz."&gmlid=".$gmlid; |
---|
150 | if ($showkey) {echo "&showkey=j";} |
---|
151 | echo "&eig=n' title='Flurstücksnachweis'>Flurstück <img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''></a>" |
---|
152 | ."\n\t\t</p>" |
---|
153 | ."\n\t</td>" |
---|
154 | ."\n</tr>" |
---|
155 | ."\n</table>"; |
---|
156 | |
---|
157 | echo "\n<p class='fsd'>Flurstücksfläche: <b>".number_format($flstflaeche,0,",",".") . " m²</b></p>"; |
---|
158 | pg_free_result($resf); |
---|
159 | |
---|
160 | // G e b a e u d e |
---|
161 | |
---|
162 | $sqlg ="SELECT g.gml_id, g.name, g.bauweise, g.gebaeudefunktion, h.beschreibung AS bauweise_beschreibung, u.beschreibung AS bezeichner, u.dokumentation AS gfktd, g.zustand, z.beschreibung AS bzustand, |
---|
163 | round(st_area(g.wkb_geometry)::numeric,2) AS gebflae, "; // GEB-Flaeche, auch ausserhalb des FS |
---|
164 | $sqlg.="round(st_area(ST_Intersection(g.wkb_geometry,f.wkb_geometry))::numeric,2) AS schnittflae, "; // wie viel vom GEB liegt im FS? |
---|
165 | $sqlg.="st_within(g.wkb_geometry,f.wkb_geometry) as drin |
---|
166 | FROM ax_flurstueck f, ax_gebaeude g |
---|
167 | LEFT JOIN ax_bauweise_gebaeude h ON g.bauweise = h.wert |
---|
168 | LEFT JOIN ax_gebaeudefunktion u ON g.gebaeudefunktion = u.wert |
---|
169 | LEFT JOIN ax_zustand_gebaeude z ON g.zustand = z.wert |
---|
170 | WHERE f.gml_id= $1 AND f.endet IS NULL and g.endet IS NULL "; |
---|
171 | |
---|
172 | // "within" -> nur Geb., die komplett im FS liegen. "intersects" -> auch teil-ueberlappende Flst. |
---|
173 | $sqlg.="AND st_intersects(g.wkb_geometry,f.wkb_geometry) = true "; |
---|
174 | // RLP: keine Relationen zu NebengebÀuden. Auf Qualifizierung verzichten, sonst werden NebengebÀude nicht angezeigt |
---|
175 | //$sqlg.="AND (v.beziehungsart='zeigtAuf' OR v.beziehungsart='hat') "; |
---|
176 | $sqlg.="ORDER BY schnittflae DESC;"; |
---|
177 | |
---|
178 | $v=array($gmlid); |
---|
179 | $resg=pg_prepare("", $sqlg); |
---|
180 | $resg=pg_execute("", $v); |
---|
181 | if (!$resg) { |
---|
182 | echo "\n<p class='err'>Fehler bei Gebäude-Verschneidung.</p>"; |
---|
183 | if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlg)."'</p>";} |
---|
184 | if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resg)."</p>";} |
---|
185 | } |
---|
186 | $gebnr=0; |
---|
187 | $gebflsum=0; |
---|
188 | while($rowg = pg_fetch_assoc($resg)) { |
---|
189 | $gebnr++; |
---|
190 | if ($gebnr === 1) {geb_tab_head();} // Tab.-Kopf |
---|
191 | $ggml=$rowg["gml_id"]; |
---|
192 | $gebflsum=$gebflsum + $rowg["schnittflae"]; |
---|
193 | $gnam=trim(trim($rowg["name"], "{}"), '"'); // Gebaeude-Name ist ein Array in der DB: '{"A","B"}' |
---|
194 | // Mehrfachbelegung nur theoretisch. Entklammern reicht. Mal mit und mal ohne "" drum!? |
---|
195 | /* SELECT name FROM ax_gebaeude WHERE NOT name IS NULL AND array_length(name, 1) > 1; */ |
---|
196 | $gfktk=htmlentities($rowg["gebaeudefunktion"], ENT_QUOTES, "UTF-8"); // Geb.-Funktion Key |
---|
197 | $gfktv=htmlentities($rowg["bezeichner"], ENT_QUOTES, "UTF-8"); // Geb.Funktion Value |
---|
198 | $gfktd=htmlentities($rowg["gfktd"], ENT_QUOTES, "UTF-8"); // GebÀude-Funktion-Description |
---|
199 | |
---|
200 | $gbauw=$rowg["bauweise"]; |
---|
201 | $gbauwb=htmlentities($rowg["bauweise_beschreibung"], ENT_QUOTES, "UTF-8"); |
---|
202 | |
---|
203 | $gzus=$rowg["zustand"]; |
---|
204 | $gzustand=htmlentities($rowg["bzustand"], ENT_QUOTES, "UTF-8"); |
---|
205 | |
---|
206 | // 3 FÀlle unterscheiden: |
---|
207 | if ($rowg["drin"] === "t") { // GebÀude liegt komplett in FlurstÌck |
---|
208 | $f1=$rowg["schnittflae"]." m²"; |
---|
209 | $f2=" "; |
---|
210 | $gstyle="gin"; // siehe .css |
---|
211 | } else { |
---|
212 | if ($rowg["schnittflae"] === "0.00") { // GebÀude angrenzend (Grenzbebauung) |
---|
213 | $gstyle="gan"; |
---|
214 | $f1=" "; |
---|
215 | $f2="angrenzend"; |
---|
216 | } else { // Teile des GebÀudes stehen auf dem FlurstÌck |
---|
217 | $gstyle="gtl"; |
---|
218 | $f1=$rowg["schnittflae"]." m²"; |
---|
219 | $f2="(von ".$rowg["gebflae"]." m²)"; |
---|
220 | } |
---|
221 | } |
---|
222 | |
---|
223 | echo "\n<tr>" |
---|
224 | ."\n\t<td>"; |
---|
225 | if ($gnam != "") {echo "<span title='Gebäudename'>".$gnam."</span><br>";} |
---|
226 | echo "</td>"; |
---|
227 | |
---|
228 | echo "\n\t<td class='fla'>".$f1."</td>" |
---|
229 | ."\n\t<td class='".$gstyle."'>".$f2."</td>"; // FlÀchenangaben |
---|
230 | |
---|
231 | echo "\n\t<td title='".$gfktd."'>"; // Funktion |
---|
232 | if ($showkey) {echo "<span class='key'>(".$gfktk.")</span> ";} |
---|
233 | echo $gfktv; |
---|
234 | echo "</td>"; |
---|
235 | |
---|
236 | echo "\n\t<td>"; |
---|
237 | if ($gbauw != "") { |
---|
238 | if ($showkey) {echo "<span class='key'>(".$gbauw.")</span> ";} |
---|
239 | echo $gbauwb; |
---|
240 | } |
---|
241 | echo "</td>"; |
---|
242 | |
---|
243 | echo "\n\t<td>"; |
---|
244 | if ($gzus != "") { |
---|
245 | if ($showkey) {echo "<span class='key'>(".$gzus.")</span> ";} |
---|
246 | echo $gzustand; |
---|
247 | } |
---|
248 | echo "</td>"; |
---|
249 | |
---|
250 | // 2 Spalten mit Links zu anderen Nachweisen: 1. Lage, 2. GebÀude |
---|
251 | echo "\n\t<td class='nwlink noprint'>"; // Link Lage |
---|
252 | |
---|
253 | // Zu EINEM GebÀude mehrere Lagebezeichnungen mit Haus- oder Pseudo-Nummer möglich, alle in ein TD |
---|
254 | // HAUPTgebÀude Geb >zeigtAuf> lage (mehrere) |
---|
255 | $sqll="SELECT 'm' AS ltyp, l.gml_id AS lgml, s.lage, s.bezeichnung, l.hausnummer, '' AS laufendenummer " |
---|
256 | ."FROM ax_gebaeude g JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(g.zeigtauf) " |
---|
257 | ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage " |
---|
258 | ."WHERE g.gml_id= $1 AND g.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL "; |
---|
259 | |
---|
260 | // UNION - oder NEBENgebÀude Geb >hat> Pseudo |
---|
261 | $sqll.="UNION SELECT 'p' AS ltyp, l.gml_id AS lgml, s.lage, s.bezeichnung, l.pseudonummer AS hausnummer, l.laufendenummer " |
---|
262 | ."FROM ax_gebaeude g JOIN ax_lagebezeichnungmitpseudonummer l ON l.gml_id=g.hat " |
---|
263 | ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage " |
---|
264 | ."WHERE g.gml_id= $1 AND g.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL "; // ID des Hauses" |
---|
265 | |
---|
266 | $sqll.="ORDER BY bezeichnung, hausnummer, laufendenummer;"; |
---|
267 | $v = array($ggml); |
---|
268 | $resl = pg_prepare("", $sqll); |
---|
269 | $resl = pg_execute("", $v); |
---|
270 | if (!$resl) { |
---|
271 | echo "\n<p class='err'>Fehler bei Lage mit HsNr.</p>"; |
---|
272 | if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqll)."'</p>";} |
---|
273 | if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resl)."</p>";} |
---|
274 | } |
---|
275 | while($rowl = pg_fetch_assoc($resl)) { // LOOP: Lagezeilen |
---|
276 | $ltyp=$rowl["ltyp"]; // Lagezeilen-Typ |
---|
277 | $skey=$rowl["lage"]; // Str.-Schluessel |
---|
278 | $snam=htmlentities($rowl["bezeichnung"], ENT_QUOTES, "UTF-8"); //-Name |
---|
279 | $hsnr=$rowl["hausnummer"]; |
---|
280 | $hlfd=$rowl["laufendenummer"]; |
---|
281 | $gmllag=$rowl["lgml"]; |
---|
282 | if ($ltyp === "p") { |
---|
283 | $lagetitl="Nebengebäude - Pseudonummer"; |
---|
284 | $lagetxt="Nebengeb. ".$hlfd; // + HausNr?? |
---|
285 | } else { |
---|
286 | $lagetitl="HauptgebÀude - Hausnummer"; |
---|
287 | $lagetxt=$snam." ".$hsnr; |
---|
288 | } |
---|
289 | echo "\n\t\t<a title='".$lagetitl."' href='alkislage.php?gkz=".$gkz."&gmlid=".$gmllag."&ltyp=".$ltyp; |
---|
290 | if ($showkey) {echo "&showkey=j";} |
---|
291 | echo "'>"; |
---|
292 | if ($showkey) {echo "<span class='key'>(".$skey.")</span> ";} |
---|
293 | echo $lagetxt." <img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''></a><br>"; |
---|
294 | } // Ende Loop Lage m.H. |
---|
295 | pg_free_result($resl); |
---|
296 | echo "\n\t</td>"; |
---|
297 | |
---|
298 | echo "\n\t<td class='nwlink noprint'>" // Link Haus |
---|
299 | ."\n\t\t<a title='Daten zum Gebäude-Objekt' href='alkishaus.php?gkz=".$gkz."&gmlid=".$ggml; |
---|
300 | if ($showkey) {echo "&showkey=j";} |
---|
301 | echo "'>Haus <img src='ico/Haus.png' width='16' height='16' alt=''></a>" |
---|
302 | ."\n\t</td>" |
---|
303 | ."\n</tr>"; |
---|
304 | } |
---|
305 | // Footer GebÀude |
---|
306 | if ($gebnr === 0) { |
---|
307 | echo "<p><br>Kein Gebäude auf diesem Flurstück.<br> </p>"; |
---|
308 | //if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".$sqlg."<br>$1 = gml_id = '".$gmlid."'</p>";} |
---|
309 | } else { |
---|
310 | echo "\n<tr>" |
---|
311 | ."\n\t<td>Summe:</td>" |
---|
312 | ."\n\t<td class='fla sum' title='von Gebäuden überbaute Fläche des Flurstücks'>".number_format($gebflsum,0,",",".")." m²</td>" |
---|
313 | ."\n\t<td colspan='6'> </td>" |
---|
314 | ."\n</tr>" |
---|
315 | ."\n</table>"; |
---|
316 | $unbebaut = number_format(($flstflaeche - $gebflsum),0,",",".") . " m²"; |
---|
317 | echo "\n<p>\n<br>Flurstücksfläche abzüglich Gebäudefläche: <b>".$unbebaut."</b></p>\n<br>"; |
---|
318 | } |
---|
319 | pg_free_result($resg); |
---|
320 | |
---|
321 | // B a u w e r k e |
---|
322 | |
---|
323 | // Konstanten fÃŒr Sortierung und Gruppierung |
---|
324 | $btyp_verkehr=1; $btyp_gewaesser=2; $btyp_sonst=3; $btyp_indu=4; $btyp_sport=5; |
---|
325 | $btyp_leitg=6; $btyp_trans=7; $btyp_turm=8; $btyp_vorrat=9; |
---|
326 | |
---|
327 | // Tabllen-Alias, 2stellig. 1. Stelle: f_=FlurstÃŒck, b_=Bauwerk, k_=Key = SchlÃŒsseltabelle. // 2. Stelle: wie Konstante |
---|
328 | |
---|
329 | // 1 -V e r k e h r |
---|
330 | $sqlb="SELECT ".$btyp_verkehr." AS bwtyp, b1.gml_id, |
---|
331 | b1.bauwerksfunktion, k1.beschreibung AS bezeichner, k1.dokumentation AS bfktd, b1.bezeichnung, b1.name, NULL AS gehoertzu, |
---|
332 | round(st_area(b1.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b1.wkb_geometry,f1.wkb_geometry))::numeric,2) AS schnittflae, |
---|
333 | st_within(b1.wkb_geometry,f1.wkb_geometry) as drin, GeometryType(b1.wkb_geometry) as bgeotyp |
---|
334 | FROM ax_flurstueck f1 |
---|
335 | JOIN ax_bauwerkimverkehrsbereich b1 ON st_intersects(b1.wkb_geometry,f1.wkb_geometry) = true |
---|
336 | LEFT JOIN ax_bauwerksfunktion_bauwerkimverkehrsbereich k1 ON b1.bauwerksfunktion = k1.wert |
---|
337 | WHERE f1.gml_id = $1 AND f1.endet IS NULL AND b1.endet IS NULL "; |
---|
338 | // 2 - G e w À s s e r |
---|
339 | $sqlb.="UNION |
---|
340 | SELECT ".$btyp_gewaesser." AS bwtyp, b2.gml_id, b2.bauwerksfunktion, ug.beschreibung AS bezeichner, ug.dokumentation AS bfktd, |
---|
341 | b2.bezeichnung, b2.name, NULL AS gehoertzu, |
---|
342 | round(st_area(b2.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b2.wkb_geometry,f2.wkb_geometry))::numeric,2) AS schnittflae, |
---|
343 | st_within(b2.wkb_geometry,f2.wkb_geometry) as drin, GeometryType(b2.wkb_geometry) as bgeotyp |
---|
344 | FROM ax_flurstueck f2 |
---|
345 | JOIN ax_bauwerkimgewaesserbereich b2 ON st_intersects(b2.wkb_geometry,f2.wkb_geometry) = true |
---|
346 | LEFT JOIN ax_bauwerksfunktion_bauwerkimgewaesserbereich ug ON b2.bauwerksfunktion = ug.wert |
---|
347 | WHERE f2.gml_id = $1 AND f2.endet IS NULL AND b2.endet IS NULL "; |
---|
348 | // 3 - S o n s t i g e Bauwerke |
---|
349 | $sqlb.="UNION |
---|
350 | SELECT ".$btyp_sonst." AS bwtyp, b3.gml_id, b3.bauwerksfunktion, k3.beschreibung AS bezeichner, k3.dokumentation AS bfktd, |
---|
351 | b3.bezeichnung, b3.name, b3.gehoertzu, |
---|
352 | round(st_area(b3.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b3.wkb_geometry,f3.wkb_geometry))::numeric,2) AS schnittflae, |
---|
353 | st_within(b3.wkb_geometry,f3.wkb_geometry) as drin, GeometryType(b3.wkb_geometry) as bgeotyp |
---|
354 | FROM ax_flurstueck f3 |
---|
355 | JOIN ax_sonstigesbauwerkodersonstigeeinrichtung b3 ON st_intersects(b3.wkb_geometry,f3.wkb_geometry) = true |
---|
356 | LEFT JOIN ax_bauwerksfunktion_sonstigesbauwerkodersonstigeeinrichtun k3 ON b3.bauwerksfunktion = k3.wert |
---|
357 | WHERE f3.gml_id = $1 AND f3.endet IS NULL AND b3.endet IS NULL "; |
---|
358 | // 4 - Bauwerk oder Anlage fÃŒr I n d u s t r i e und Gewerbe |
---|
359 | $sqlb.="UNION |
---|
360 | SELECT ".$btyp_indu." AS bwtyp, b4.gml_id, b4.bauwerksfunktion, k4.beschreibung AS bezeichner, k4.dokumentation AS bfktd, |
---|
361 | b4.bezeichnung, b4.name, NULL AS gehoertzu, |
---|
362 | round(st_area(b4.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b4.wkb_geometry,f4.wkb_geometry))::numeric,2) AS schnittflae, |
---|
363 | st_within(b4.wkb_geometry,f4.wkb_geometry) as drin, GeometryType(b4.wkb_geometry) as bgeotyp |
---|
364 | FROM ax_flurstueck f4 |
---|
365 | JOIN ax_bauwerkoderanlagefuerindustrieundgewerbe b4 ON st_intersects(b4.wkb_geometry,f4.wkb_geometry) = true |
---|
366 | LEFT JOIN ax_bauwerksfunktion_bauwerkoderanlagefuerindustrieundgewer k4 ON b4.bauwerksfunktion = k4.wert |
---|
367 | WHERE f4.gml_id = $1 AND f4.endet IS NULL AND b4.endet IS NULL "; |
---|
368 | // 5 - Bauwerk oder Anlage fÃŒr S p o r t , Freizeit und Erholung |
---|
369 | $sqlb.="UNION |
---|
370 | SELECT ".$btyp_sport." AS bwtyp, b5.gml_id, b5.bauwerksfunktion, k5.beschreibung AS bezeichner, k5.dokumentation AS bfktd, |
---|
371 | NULL AS bezeichnung, b5.name, NULL AS gehoertzu, |
---|
372 | round(st_area(b5.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b5.wkb_geometry,f5.wkb_geometry))::numeric,2) AS schnittflae, |
---|
373 | st_within(b5.wkb_geometry,f5.wkb_geometry) as drin, GeometryType(b5.wkb_geometry) as bgeotyp |
---|
374 | FROM ax_flurstueck f5 |
---|
375 | JOIN ax_bauwerkoderanlagefuersportfreizeitunderholung b5 ON st_intersects(b5.wkb_geometry,f5.wkb_geometry) = true |
---|
376 | LEFT JOIN ax_bauwerksfunktion_bauwerkoderanlagefuersportfreizeitunde k5 ON b5.bauwerksfunktion = k5.wert |
---|
377 | WHERE f5.gml_id = $1 AND f5.endet IS NULL AND b5.endet IS NULL "; |
---|
378 | // 6 - L e i t u n g |
---|
379 | $sqlb.="UNION |
---|
380 | SELECT ".$btyp_leitg." AS bwtyp, b6.gml_id, b6.bauwerksfunktion, k6.beschreibung AS bezeichner, k6.dokumentation AS bfktd, |
---|
381 | NULL AS bezeichnung, b6.name, NULL AS gehoertzu, |
---|
382 | round(st_area(b6.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b6.wkb_geometry,f6.wkb_geometry))::numeric,2) AS schnittflae, |
---|
383 | st_within(b6.wkb_geometry,f6.wkb_geometry) as drin, GeometryType(b6.wkb_geometry) as bgeotyp |
---|
384 | FROM ax_flurstueck f6 |
---|
385 | JOIN ax_leitung b6 ON st_intersects(b6.wkb_geometry,f6.wkb_geometry) = true |
---|
386 | LEFT JOIN ax_bauwerksfunktion_leitung k6 ON b6.bauwerksfunktion = k6.wert |
---|
387 | WHERE f6.gml_id = $1 AND f6.endet IS NULL AND b6.endet IS NULL "; |
---|
388 | // 7 - T r a n s p o r t a n l a g e |
---|
389 | $sqlb.="UNION |
---|
390 | SELECT ".$btyp_trans." AS bwtyp, b7.gml_id, b7.bauwerksfunktion, k7.beschreibung AS bezeichner, k7.dokumentation AS bfktd, |
---|
391 | NULL AS bezeichnung, NULL AS name, NULL AS gehoertzu, |
---|
392 | round(st_area(b7.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b7.wkb_geometry,f7.wkb_geometry))::numeric,2) AS schnittflae, |
---|
393 | st_within(b7.wkb_geometry,f7.wkb_geometry) as drin, GeometryType(b7.wkb_geometry) as bgeotyp |
---|
394 | FROM ax_flurstueck f7 |
---|
395 | JOIN ax_transportanlage b7 ON st_intersects(b7.wkb_geometry,f7.wkb_geometry) = true |
---|
396 | LEFT JOIN ax_bauwerksfunktion_transportanlage k7 ON b7.bauwerksfunktion = k7.wert |
---|
397 | WHERE f7.gml_id = $1 AND f7.endet IS NULL AND b7.endet IS NULL "; |
---|
398 | // 8 - T u r m (Sonderfall Array) |
---|
399 | $sqlb.="UNION |
---|
400 | SELECT ".$btyp_turm." AS bwtyp, b8.gml_id, k8.wert AS bauwerksfunktion, k8.beschreibung AS bezeichner, k8.dokumentation AS bfktd, |
---|
401 | NULL AS bezeichnung, b8.name, NULL AS gehoertzu, |
---|
402 | round(st_area(b8.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b8.wkb_geometry,f8.wkb_geometry))::numeric,2) AS schnittflae, |
---|
403 | st_within(b8.wkb_geometry,f8.wkb_geometry) as drin, GeometryType(b8.wkb_geometry) as bgeotyp |
---|
404 | FROM ax_flurstueck f8 |
---|
405 | JOIN ax_turm b8 ON st_intersects(b8.wkb_geometry,f8.wkb_geometry) = true |
---|
406 | LEFT JOIN ax_bauwerksfunktion_turm k8 ON k8.wert =ANY(b8.bauwerksfunktion) |
---|
407 | WHERE f8.gml_id = $1 AND f8.endet IS NULL AND b8.endet IS NULL "; |
---|
408 | // 9 - V o r r a t s b e h À l t e r , S p e i c h e r b a u w e r k |
---|
409 | $sqlb.="UNION |
---|
410 | SELECT ".$btyp_vorrat." AS bwtyp, b9.gml_id, b9.bauwerksfunktion, k9.beschreibung AS bezeichner, k9.dokumentation AS bfktd, |
---|
411 | NULL AS bezeichnung, b9.name, NULL AS gehoertzu, |
---|
412 | round(st_area(b9.wkb_geometry)::numeric,2) AS gebflae, round(st_area(ST_Intersection(b9.wkb_geometry,f9.wkb_geometry))::numeric,2) AS schnittflae, |
---|
413 | st_within(b9.wkb_geometry,f9.wkb_geometry) as drin, GeometryType(b9.wkb_geometry) as bgeotyp |
---|
414 | FROM ax_flurstueck f9 |
---|
415 | JOIN ax_vorratsbehaelterspeicherbauwerk b9 ON st_intersects(b9.wkb_geometry,f9.wkb_geometry) = true |
---|
416 | LEFT JOIN ax_bauwerksfunktion_vorratsbehaelterspeicherbauwerk k9 ON b9.bauwerksfunktion = k9.wert |
---|
417 | WHERE f9.gml_id = $1 AND f9.endet IS NULL AND b9.endet IS NULL "; |
---|
418 | |
---|
419 | // Generell ... |
---|
420 | $sqlb.="ORDER BY bwtyp, schnittflae DESC;"; |
---|
421 | |
---|
422 | $v=array($gmlid); |
---|
423 | $resb=pg_prepare("", $sqlb); |
---|
424 | $resb=pg_execute("", $v); |
---|
425 | if (!$resb) { |
---|
426 | echo "\n<p class='err'>Fehler bei Bauwerke-Verschneidung.</p>"; |
---|
427 | if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlb)."</p>";} |
---|
428 | if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resb)."</p>";} |
---|
429 | } |
---|
430 | $baunr=0; // ZÀhler |
---|
431 | $bauflsum=0; // FlÀchensumme |
---|
432 | $gwbwtyp=0; // Gruppen-Wechsel Bauwerks-Typ |
---|
433 | |
---|
434 | while($rowb = pg_fetch_assoc($resb)) { |
---|
435 | $baunr++; |
---|
436 | $btyp=$rowb["bwtyp"]; // Tabelle |
---|
437 | $bgml=$rowb["gml_id"]; |
---|
438 | $bauflsum=$bauflsum + $rowb["schnittflae"]; |
---|
439 | $bbez=htmlentities($rowb["bezeichnung"], ENT_QUOTES, "UTF-8"); |
---|
440 | $bfktk=htmlentities($rowb["bauwerksfunktion"], ENT_QUOTES, "UTF-8"); |
---|
441 | $bfktv=htmlentities($rowb["bezeichner"], ENT_QUOTES, "UTF-8"); |
---|
442 | $bfktd=htmlentities($rowb["bfktd"], ENT_QUOTES, "UTF-8"); |
---|
443 | $bnam=htmlentities($rowb["name"], ENT_QUOTES, "UTF-8"); |
---|
444 | $bgeb=$rowb["gehoertzu"]; |
---|
445 | $drin=$rowb["drin"]; |
---|
446 | $bgeotyp=$rowb["bgeotyp"]; |
---|
447 | |
---|
448 | // Lage des Bauwerks zum FlurstÃŒck |
---|
449 | if ($bgeotyp === "LINESTRING") { |
---|
450 | if ($drin === "t") { |
---|
451 | $bstyle="gin"; |
---|
452 | } else { |
---|
453 | $bstyle="gtl"; |
---|
454 | } |
---|
455 | $f1=" "; |
---|
456 | $f2="Linie"; |
---|
457 | } elseif ($bgeotyp === "POINT") { |
---|
458 | if ($drin === "t") { |
---|
459 | $bstyle="gin"; |
---|
460 | } else { |
---|
461 | $bstyle="gtl"; |
---|
462 | } |
---|
463 | $f1=" "; |
---|
464 | $f2="Punkt"; |
---|
465 | } else { // FlÀche / Multi- |
---|
466 | if ($drin === "t") { // komplett IM FlurstÃŒck |
---|
467 | $f1=$rowb["schnittflae"]." m²"; |
---|
468 | $f2=" "; |
---|
469 | $bstyle="gin"; // siehe .css |
---|
470 | } else { |
---|
471 | if ($rowb["schnittflae"] === "0.00") { // nur angrenzend |
---|
472 | $bstyle="gan"; |
---|
473 | $f1=" "; |
---|
474 | $f2="angrenzend"; |
---|
475 | } else { // Teile auf FlurstÃŒck |
---|
476 | $bstyle="gtl"; |
---|
477 | $f1=$rowb["schnittflae"]." m²"; |
---|
478 | $f2="(von ".$rowb["gebflae"]." m²)"; |
---|
479 | } |
---|
480 | } |
---|
481 | } |
---|
482 | |
---|
483 | // Gruppenwechsel Bauwerks-Typ (Quell-Tabelle) - Zwischen-Ãberschrift |
---|
484 | If ($btyp != $gwbwtyp) { |
---|
485 | $gwbwtyp = $btyp; |
---|
486 | if ($baunr === 1) {bauw_tab_head();} // Tab.-Kopf |
---|
487 | switch ($btyp) { |
---|
488 | case $btyp_verkehr: |
---|
489 | $btyptitle='Bauwerk im Verkehrsbereich'; break; |
---|
490 | case $btyp_gewaesser: |
---|
491 | $btyptitle='Bauwerk im GewÀsserbereich'; break; |
---|
492 | case $btyp_sonst: |
---|
493 | $btyptitle='Sonstiges Bauwerk oder sonstige Einrichtung'; break; |
---|
494 | case $btyp_indu: |
---|
495 | $btyptitle="Bauwerk oder Anlage fÃŒr Industrie und Gewerbe"; break; |
---|
496 | case $btyp_sport: |
---|
497 | $btyptitle="Bauwerk oder Anlage fÃŒr Sport, Freizeit und Erholung"; break; |
---|
498 | case $btyp_leitg: |
---|
499 | $btyptitle="Leitung"; break; |
---|
500 | case $btyp_trans: |
---|
501 | $btyptitle="Transportanlage"; break; |
---|
502 | case $btyp_turm: |
---|
503 | $btyptitle="Turm"; break; |
---|
504 | case $btyp_vorrat: |
---|
505 | $btyptitle="VorratsbehÀlter, Speicherbauwerk"; break; |
---|
506 | default: |
---|
507 | $btyptitle='Fehler'; break; |
---|
508 | } |
---|
509 | echo "<tr><td colspan=3></td><td colspan=2 class='gw'>".$btyptitle."</td></tr>"; // ++ Symbol? |
---|
510 | } |
---|
511 | |
---|
512 | echo "\n<tr>"; |
---|
513 | echo "\n\t<td>"; |
---|
514 | if ($bbez != "") {echo "<span title='Bezeichnung'>".$bbez."</span> ";} |
---|
515 | if ($bnam != "") {echo "<span title='Name'>".$bnam."</span> ";} |
---|
516 | echo "</td>"; |
---|
517 | echo "\n\t<td class='fla'>".$f1."</td>" |
---|
518 | ."\n\t<td class='".$bstyle."'>".$f2."</td>"; // FlÀchenangaben |
---|
519 | echo "\n\t<td>"; |
---|
520 | if ($showkey) {echo "<span class='key'>(".$bfktk.")</span> ";} // Bauwerksfunktion |
---|
521 | echo "<span title='".$bfktd ."'>".$bfktv."</span>"; |
---|
522 | echo "</td>"; |
---|
523 | |
---|
524 | // Lage / Haus (nur bei Typ 3 sonstige) |
---|
525 | echo "\n\t<td class='nwlink noprint'>"; // Link |
---|
526 | if ($bgeb != "") { // gehört zu GebÀude |
---|
527 | // bw_gz_lage($bgeb); // Function: Lage (Adresse) ausgeben |
---|
528 | echo "\n\t\t<a title='gehört zu' href='alkishaus.php?gkz=".$gkz."&gmlid=".$bgeb; |
---|
529 | if ($showkey) {echo "&showkey=j";} |
---|
530 | echo "'>Haus <img src='ico/Haus.png' width='16' height='16' alt=''></a>"; |
---|
531 | } |
---|
532 | echo "\n\t</td>"; |
---|
533 | |
---|
534 | // Bauwerk Details |
---|
535 | echo "\n\t<td class='nwlink noprint'>"; // Link |
---|
536 | echo "\n\t\t<a title='Bauwerksdaten' href='alkisbauwerk.php?gkz=".$gkz."&btyp=".$btyp."&gmlid=".$bgml; |
---|
537 | if ($showkey) {echo "&showkey=j";} |
---|
538 | echo "'>Bauwerk <img src='ico/Haus.png' width='16' height='16' alt=''></a>"; // +++ Icon fÃŒr Bauwerk schaffen +++ |
---|
539 | echo "\n\t</td>" |
---|
540 | ."\n</tr>"; |
---|
541 | } |
---|
542 | |
---|
543 | // Footer Bauwerk |
---|
544 | if ($baunr === 0) { |
---|
545 | echo "\n<p>Kein Bauwerk auf diesem Flurstück.</p><br>"; |
---|
546 | // if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".$sqlb."<br>$1 = gml_id = '".$gmlid."'</p>";} |
---|
547 | } else { |
---|
548 | echo "\n<tr>" |
---|
549 | ."\n\t<td>Summe:</td>" |
---|
550 | ."\n\t<td class='fla sum' title='von Bauwerken überbaute Fläche des Flurstücks'>".number_format($bauflsum,0,",",".")." m²</td>" |
---|
551 | ."\n\t<td colspan='6'> </td>" |
---|
552 | ."\n</tr>" |
---|
553 | ."\n</table>\n"; |
---|
554 | } |
---|
555 | pg_free_result($resb); |
---|
556 | ?> |
---|
557 | |
---|
558 | <div class='buttonbereich noprint'> |
---|
559 | <hr> |
---|
560 | <a title="zurück" href='javascript:history.back()'><img src="ico/zurueck.png" width="16" height="16" alt="zurück"></a> |
---|
561 | <a title="Drucken" href='javascript:window.print()'><img src="ico/print.png" width="16" height="16" alt="Drucken"></a> |
---|
562 | </div> |
---|
563 | |
---|
564 | <?php footer($gmlid, selbstverlinkung()."?", ""); ?> |
---|
565 | |
---|
566 | </body> |
---|
567 | </html> |
---|