source: trunk/info/info/alkisn/alkisgebaeudenw.php @ 418

Revision 418, 13.1 KB checked in by frank.jaeger, 5 years ago (diff)

Korrektur Auskunft Gebäude-Modul.
Line 
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        2016-11-29 HTML5, Gemeinsam genutzte Datenbanken ermöglichen
8        2016-12-05 Array-Behandlung ax_gebaeude.name
9        2017-06-08 Validierung Eingabeparameter, Feinkorrekturen
10        2017-06-19 Tool-Tip GebÀudefunktion
11        2018-04-23 Kennzeichen eingerÃŒckt, &nodebug
12        2018-11-09 Umstellung Full-Schema
13        2018-11-21 Korrektur LEFT Join Bauweise
14*/
15session_start();
16$showkey="n"; $nodebug=""; // Var. aus Parameter initalisieren
17$cntget = extract($_GET); // Parameter in Variable umwandeln
18
19// strikte Validierung aller Parameter
20if (!isset($gmlid) or !preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
21if (!isset($gkz) or !preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
22if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
23if ($showkey == "j") {$showkey=true;} else {$showkey=false;}
24if (!preg_match('#^j{0,1}$#', $nodebug)) {die("Eingabefehler nodebug");}
25
26require_once("alkis_conf_location.php");
27if ($auth == "mapbender") {require_once($mapbender);}
28include("alkisfkt.php");
29echo <<<END
30<!doctype html>
31<html lang="de">
32<head>
33        <meta charset="utf-8">
34        <meta name="viewport" content="width=device-width, initial-scale=1.0">
35        <title>ALKIS Geb&auml;udenachweis</title>
36        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
37        <link rel="shortcut icon" type="image/x-icon" href="ico/Haus.ico">
38</head>
39<body>
40END;
41// Mit URL-Parameter "&nodebug=j" kann man die Entwicklungsumgebung (in Conf definiert) ausschalten.
42// Manuell an die URL anfÌgen, wirkt nur temporÀr und wird nicht in Links weiter gereicht.
43if ($nodebug == "j") {$debug=0;}
44
45$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisgebaeudenw.php'");
46if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
47
48// Flurstueck
49$sqlf="SELECT f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche, g.gemarkungsnummer, g.bezeichnung
50FROM ax_flurstueck f LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer
51WHERE f.gml_id= $1 AND f.endet IS NULL AND g.endet IS NULL;";
52$v=array($gmlid);
53$resf=pg_prepare("", $sqlf);
54$resf=pg_execute("", $v);
55if (!$resf) {
56        echo "\n<p class='err'>Fehler bei Flurst&uuml;cksdaten.</p>";
57        if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".$sqlf."<br>$1 = gml_id = '".$gmlid."'</p>";}
58}
59if ($rowf = pg_fetch_assoc($resf)) {
60        $gemkname=htmlentities($rowf["bezeichnung"], ENT_QUOTES, "UTF-8");
61        $gmkgnr=$rowf["gemarkungsnummer"];
62        $flurnummer=$rowf["flurnummer"];
63        $flstnummer=$rowf["zaehler"];
64        $nenner=$rowf["nenner"];
65        if ($nenner > 0) { // BruchNr
66                $flstnummer.="/".$nenner;
67        }
68        $flstflaeche = $rowf["amtlicheflaeche"] ;
69} else {
70        echo "\n<p class='err'>Fehler! Kein Treffer fuer gml_id=".$gmlid."</p>";
71}
72echo "<p class='geb'>ALKIS Flurst&uuml;ck (Geb&auml;ude) ".$gmkgnr."-".$flurnummer."-".$flstnummer."&nbsp;</p>"; // Balken
73echo "\n<h2>Flurst&uuml;ck (Geb&auml;ude)</h2>";
74echo "\n<table class='outer'>" // Kopf
75        ."\n<tr>"
76                ."\n\t<td>"
77                ."\n\t<td class='ll'><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Kennzeichen:</td>"
78                ."\n\t<td>"
79                        ."\n\t\t<table class='kennzfs' title='Flurst&uuml;ckskennzeichen'>" // Kennzeichen in Rahmen
80                                ."\n\t\t<tr>"
81                                        ."\n\t\t\t<td class='head'>Gemarkung</td>"
82                                        ."\n\t\t\t<td class='head'>Flur</td>"
83                                        ."\n\t\t\t<td class='head'>Flurst-Nr.</td>"
84                                ."\n\t\t</tr>\n\t\t<tr>"
85                                        ."\n\t\t\t<td title='Gemarkung'>";
86                                        if  ($showkey) {echo "<span class='key'>".$gmkgnr."</span><br>";}
87                                        echo $gemkname."&nbsp;</td>"
88                                        ."\n\t\t\t<td title='Flurnummer'>".$flurnummer."</td>"
89                                        ."\n\t\t\t<td title='Flurst&uuml;cksnummer (Z&auml;hler / Nenner)'><span class='wichtig'>".$flstnummer."</span></td>"
90                                ."\n\t\t</tr>"
91                        ."\n\t\t</table>"
92                ."\n\t</td>"
93                ."\n\t<td>"
94                        ."\n\t\t<p class='nwlink noprint'>" // Links zu anderem Nachweis
95                                ."\n\t\t\t<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$gmlid;
96                                if ($showkey) {echo "&amp;showkey=j";}
97                                echo "&amp;eig=n' title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck <img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''></a>"
98                        ."\n\t\t</p>"
99                ."\n\t</td>"
100        ."\n</tr>"
101."\n</table>";
102
103echo "\n<p class='fsd'>Flurst&uuml;cksfl&auml;che: <b>".number_format($flstflaeche,0,",",".") . " m&#178;</b></p>";
104pg_free_result($resf);
105
106echo "\n\n<h3><img src='ico/Haus.png' width='16' height='16' alt=''> Geb&auml;ude</h3>"
107."\n<p>.. auf oder an dem Flurst&uuml;ck. Ermittelt durch Verschneidung der Geometrie.</p>";
108
109// G e b a e u d e
110$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,
111round(st_area(g.wkb_geometry)::numeric,2) AS gebflae, "; // GEB-Flaeche komplett auch die Fl. ausserhalb des FS
112$sqlg.="round(st_area(ST_Intersection(g.wkb_geometry,f.wkb_geometry))::numeric,2) AS schnittflae, "; // wie viel vom GEB liegt im FS?
113$sqlg.="st_within(g.wkb_geometry,f.wkb_geometry) as drin "; // liegt das GEB komplett im FS?
114$sqlg.="FROM ax_flurstueck f, ax_gebaeude g
115LEFT JOIN ax_bauweise_gebaeude h ON g.bauweise = h.wert
116LEFT JOIN ax_gebaeudefunktion u ON g.gebaeudefunktion = u.wert
117LEFT JOIN ax_zustand_gebaeude z ON g.zustand = z.wert
118WHERE f.gml_id= $1 AND f.endet IS NULL and g.endet IS NULL "; // ID des akt. FS
119
120// "within" -> nur Geb., die komplett im FS liegen. "intersects" -> auch teil-ueberlappende Flst.
121$sqlg.="AND st_intersects(g.wkb_geometry,f.wkb_geometry) = true ";
122// RLP: keine Relationen zu NebengebÀuden. Auf Qualifizierung verzichten, sonst werden NebengebÀude nicht angezeigt
123//$sqlg.="AND (v.beziehungsart='zeigtAuf' OR v.beziehungsart='hat') ";
124$sqlg.="ORDER BY schnittflae DESC;";
125
126$v=array($gmlid);
127$resg=pg_prepare("", $sqlg);
128$resg=pg_execute("", $v);
129if (!$resg) {
130        echo "\n<p class='err'>Fehler bei Geb&auml;ude-Verschneidung.</p>";
131        if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".$sqlg."<br>$1 = gml_id = '".$gmlid."'</p>";}
132}
133$gebnr=0;
134$gebflsum=0;
135echo "\n<hr>\n<table class='geb'>";
136        echo "\n<tr>" // T-Header
137                ."\n\t<td class='head' title='ggf. Geb&auml;udename'>Name</td>"
138                ."\n\t<td class='heads fla' title='Schnittfl&auml;che zwischen Flurst&uuml;ck und Geb&auml;ude'><img src='ico/sortd.png' width='10' height='10' alt='' title='Sortierung (absteigend)'>Fl&auml;che</td>"
139                ."\n\t<td class='head' title='gesamte Geb&auml;udefl&auml;che, liegt teilweise auf Nachbar-Flurst&uuml;ck'>&nbsp;</td>"
140                ."\n\t<td class='head' title='Geb&auml;udefunktion ist die zum Zeitpunkt der Erhebung vorherrschend funktionale Bedeutung des Geb&auml;udes'>Funktion</td>"
141                ."\n\t<td class='head' title='Bauweise ist die Beschreibung der Art der Bauweise'>Bauweise</td>"
142                ."\n\t<td class='head' title='Zustand beschreibt die Beschaffenheit oder die Betriebsbereitschaft von Geb&auml;ude. Diese Attributart wird nur dann optional gef&uuml;hrt, wenn der Zustand des Geb&auml;udes vom nutzungsf&auml;higen Zustand abweicht.'>Zustand</td>"
143                ."\n\t<td class='head nwlink' title='Lagebezeichnung mit Stra&szlig;e und Hausnummer'>Lage</td>"
144                ."\n\t<td class='head nwlink' title='Link zu den kompletten Hausdaten'>Haus</td>"
145        ."\n</tr>";
146        while($rowg = pg_fetch_assoc($resg)) { // T-Body
147                $gebnr = $gebnr + 1;
148                $ggml=$rowg["gml_id"];
149                $gebflsum=$gebflsum + $rowg["schnittflae"];
150                $gnam=trim(trim($rowg["name"], "{}"), '"'); // Gebaeude-Name ist ein Array in der DB: '{"A","B"}'
151                // Mehrfachbelegung nur theoretisch. Entklammern reicht. Mal mit und mal ohne "" drum!?
152                /* SELECT name FROM ax_gebaeude WHERE NOT name IS NULL AND array_length(name, 1) > 1; */
153                $gfktk=htmlentities($rowg["gebaeudefunktion"], ENT_QUOTES, "UTF-8");  // Geb.-Funktion Key
154                $gfktv=htmlentities($rowg["bezeichner"], ENT_QUOTES, "UTF-8"); // Geb.Funktion Value
155                $gfktd=htmlentities($rowg["gfktd"], ENT_QUOTES, "UTF-8"); // GebÀude-Funktion-Description
156                $gzus=htmlentities($rowg["zustand"], ENT_QUOTES, "UTF-8");
157                $gzustand=htmlentities($rowg["bzustand"], ENT_QUOTES, "UTF-8");
158
159                // 3 FÀlle unterscheiden:
160                if ($rowg["drin"] == "t") { // GebÀude liegt komplett in FlurstÃŒck
161                        $f1=$rowg["schnittflae"]." m&#178;";
162                        $f2="&nbsp;";
163                        $gstyle="gin"; // siehe .css
164                } else {
165                if ($rowg["schnittflae"] == "0.00") { // GebÀude angrenzend (Grenzbebauung)
166                                $gstyle="gan";
167                                $f1="&nbsp;";
168                                $f2="angrenzend";
169                        } else { // Teile des GebÀudes stehen auf dem FlurstÃŒck
170                                $gstyle="gtl";
171                                $f1=$rowg["schnittflae"]." m&#178;";
172                                $f2="(von ".$rowg["gebflae"]." m&#178;)";
173                        }
174                }
175
176                echo "\n<tr>"
177                        ."\n\t<td class='".$gstyle."'>"; // Sp. 1 Name
178                        if ($gnam != "") {echo "<span title='Geb&auml;udename'>".$gnam."</span><br>";}
179                        echo "</td>";
180
181                        echo "\n\t<td class='fla'>".$f1."</td>" // Sp. 2
182                        ."\n\t<td class='".$gstyle."'>".$f2."</td>"; // FlÀchenangaben
183
184                        echo "\n\t<td class='".$gstyle."' title='".$gfktd."'>"; // Sp. 3 Funktion
185                        if ($showkey) {echo "<span class='key'>".$gfktk."</span>&nbsp;";}
186                        echo $gfktv."</td>";
187
188                        echo "\n\t<td class='".$gstyle."'>";
189                        if ($showkey) {echo "<span class='key'>".$rowg["bauweise"]."</span>&nbsp;";}
190                        echo $rowg["bauweise_beschreibung"]."&nbsp;</td>";
191
192                        echo "\n\t<td class='".$gstyle."'>";
193                        if ($showkey) {echo "<span class='key'>".$gzus."</span>&nbsp;";}
194                        echo $gzustand."&nbsp;</td>";
195
196                        // 2 Spalten mit Links zu anderen Nachweisen: 1. Lage, 2. GebÀude
197                        echo "\n\t<td class='nwlink noprint'>"; // Link Lage
198
199                        // Zu EINEM GebÀude mehrere Lagebezeichnungen mit Haus- oder Pseudo-Nummer möglich, alle in ein TD
200                        // HAUPTgebÀude  Geb >zeigtAuf> lage (mehrere)
201                        $sqll="SELECT 'm' AS ltyp, l.gml_id AS lgml, s.lage, s.bezeichnung, l.hausnummer, '' AS laufendenummer "
202                        ."FROM ax_gebaeude g JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(g.zeigtauf) "
203                        ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage "
204                        ."WHERE g.gml_id= $1 AND g.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL ";
205
206                        // UNION - oder NEBENgebÀude  Geb >hat> Pseudo
207                        $sqll.="UNION SELECT 'p' AS ltyp, l.gml_id AS lgml, s.lage, s.bezeichnung, l.pseudonummer AS hausnummer, l.laufendenummer "
208                        ."FROM ax_gebaeude g JOIN ax_lagebezeichnungmitpseudonummer l ON l.gml_id=g.hat "
209                        ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage "
210                        ."WHERE g.gml_id= $1 AND g.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL "; // ID des Hauses"
211               
212                        $sqll.="ORDER BY bezeichnung, hausnummer;";
213                        $v = array($ggml);
214                        $resl = pg_prepare("", $sqll);
215                        $resl = pg_execute("", $v);
216                        if (!$resl) {
217                                echo "\n<p class='err'>Fehler bei Lage mit HsNr.</p>";
218                                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".$sqll."<br>$1 = gml_id = '".$gmlid."'</p>";}
219                        }
220                        while($rowl = pg_fetch_assoc($resl)) { // LOOP: Lagezeilen
221                                $ltyp=$rowl["ltyp"]; // Lagezeilen-Typ
222                                $skey=$rowl["lage"]; // Str.-Schluessel
223                                $snam=htmlentities($rowl["bezeichnung"], ENT_QUOTES, "UTF-8"); //-Name
224                                $hsnr=$rowl["hausnummer"];
225                                $hlfd=$rowl["laufendenummer"];
226                                $gmllag=$rowl["lgml"];
227                                if ($ltyp == "p") {
228                                        $lagetitl="NebengebÀude - Pseudonummer";
229                                        $lagetxt="Nebengeb&auml;ude Nr. ".$hlfd;
230                                } else {
231                                        $lagetitl="HauptgebÀude - Hausnummer";
232                                        $lagetxt=$snam."&nbsp;".$hsnr;
233                                }
234                                echo "\n\t\t<a title='".$lagetitl."' href='alkislage.php?gkz=".$gkz."&amp;gmlid=".$gmllag."&amp;ltyp=".$ltyp;
235                                        if ($showkey) {echo "&amp;showkey=j";}
236                                        echo "'>";
237                                        if ($showkey) {echo "<span class='key'>(".$skey.")</span>&nbsp;";}
238                                echo $lagetxt."&nbsp;<img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''></a><br>";
239                        } // Ende Loop Lage m.H.
240            pg_free_result($resl);
241                        echo "\n\t</td>";
242
243                        echo "\n\t<td class='nwlink noprint'>" // Link Haus
244                                ."\n\t\t<a title='Daten zum Geb&auml;ude-Objekt' href='alkishaus.php?gkz=".$gkz."&amp;gmlid=".$ggml;
245                                if ($showkey) {echo "&amp;showkey=j";}
246                                echo "'>Haus&nbsp;<img src='ico/Haus.png' width='16' height='16' alt=''></a>"
247                        ."\n\t</td>"
248                ."\n</tr>";
249        } // Ende GebÀude
250
251        // Footer
252        if ($gebnr == 0) {
253                echo "\n</table>"
254                ."<p class='err'><br>Keine Geb&auml;ude auf diesem Flurst&uuml;ck.<br>&nbsp;</p>";
255                //if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".$sqlg."<br>$1 = gml_id = '".$gmlid."'</p>";}
256        } else {
257                echo "\n<tr>"
258                        ."\n\t<td>Summe:</td>"
259                        ."\n\t<td class='fla sum' title='von Geb&auml;uden &uuml;berbaute Fl&auml;che des Flurst&uuml;cks'>".number_format($gebflsum,0,",",".")."&nbsp;&nbsp;&nbsp;&nbsp;m&#178;</td>"
260                        ."\n\t<td colspan='6'>&nbsp;</td>"
261                ."\n</tr>"
262        ."\n</table>";
263        $unbebaut = number_format(($flstflaeche - $gebflsum),0,",",".") . " m&#178;";
264        echo "\n<p>\n<br>Flurst&uuml;cksfl&auml;che abz&uuml;glich Geb&auml;udefl&auml;che: <b>".$unbebaut."</b></p>\n<br>";
265}
266pg_free_result($resg);
267?>
268 
269<div class='buttonbereich noprint'>
270        <hr>
271        <a title="zur&uuml;ck" href='javascript:history.back()'><img src="ico/zurueck.png" width="16" height="16" alt="zur&uuml;ck"></a>&nbsp;
272        <a title="Drucken" href='javascript:window.print()'><img src="ico/print.png" width="16" height="16" alt="Drucken"></a>
273</div>
274
275<?php footer($gmlid, $_SERVER['PHP_SELF']."?", ""); ?>
276
277</body>
278</html>
Note: See TracBrowser for help on using the repository browser.