source: trunk/info/info/alkisn/alkislage.php @ 427

Revision 427, 18.4 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/*      alkislage.php
3
4        ALKIS-Auskunft
5        Author: Frank JÀger, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo)
6
7        Kann die 3 Arten von Lagebezeichnung anzeigen und verbundene Objekte verlinken
8
9        Version:
10        2016-02-24 Version fÃŒr norGIS-ALKIS-Import
11        ....
12        2020-02-20 Authentifizierung ausgelagert in Function darf_ich()
13        2020-12-03 function selbstverlinkung() statt $_SERVER['PHP_SELF']
14        2020-12-15 Input-Validation und Strict Comparisation (===)
15        2021-12-09 Neue Parameter: $katAmtMix (Kataster-Amt-Mix), $PrntBtn (Drucken-SchaltflÀche)
16               Gemarkung und Flur bei Gruppenwechsel FETT anzeigen
17        2022-01-12 Neue Functions LnkStf(), DsKy()
18
19ToDo:
20        - Balken-Kennzeichen kompatibel machen mit der Eingabe der Navigation fÃŒr Adresse
21        - das Modul "alkisgebaeudenw" (alle Geb. auf einem FS) verschneidet die FlÀchen und findet damit auch
22        Grenz-Überbauungen und angrenzende GebÀude. Diese fehlen hier, weil nur VerknÃŒpfungen verarbeitet werden.
23        Mit FlÀchen-Verschneidung auch weitere FS anzeigen?
24*/
25ini_set("session.cookie_httponly", 1);
26session_start();
27$showkey="n"; $nodebug=""; // Var. aus Parameter initalisieren
28$cntget = extract($_GET); // Parameter in Variable umwandeln
29
30// strikte Validierung aller Parameter
31if (isset($gmlid)) {
32        if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
33} else {
34        die("Fehlender Parameter");
35}
36if (isset($gkz)) {
37        if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
38} else {
39        die("Fehlender Parameter");
40}
41if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
42if ($showkey === "j") {$showkey=true;} else {$showkey=false;}
43if (!preg_match('#^[m|p|o]{1}$#', $ltyp)) {die ("Eingabefehler ltyp");}
44if (!preg_match('#^j{0,1}$#', $nodebug)) {die("Eingabefehler nodebug");}
45
46include "alkis_conf_location.php";
47include "alkisfkt.php";
48
49switch ($ltyp) {
50        case "m": // "Mit HsNr" = HauptgebÀude
51                $tnam = "ax_lagebezeichnungmithausnummer"; break;
52        case "p": // "mit PseudoNr" = NebengebÀude
53                $tnam = "ax_lagebezeichnungmitpseudonummer"; break;
54        case "o": //"Ohne HsNr" = Gewanne oder Straße
55                $tnam = "ax_lagebezeichnungohnehausnummer"; break;
56        default:
57                $ltyp = "m";
58                $tnam = "ax_lagebezeichnungmithausnummer"; break;
59}
60echo <<<END
61<!doctype html>
62<html lang="de">
63<head>
64        <meta charset="utf-8">
65        <meta name="viewport" content="width=device-width, initial-scale=1.0">
66        <title>ALKIS Lagebezeichnung</title>
67        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
68        <link rel="shortcut icon" type="image/x-icon" href="ico/Lage_mit_Haus.ico">
69</head>
70<body>
71END;
72
73$erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); }
74$dbg=$debug;
75if ($nodebug === "j") {$dbg=0;}
76
77$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkislage.php'");
78if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
79
80// L a g e b e z e i c h n u n g
81$sql ="SELECT s.gml_id AS strgml, s.bezeichnung AS snam, b.bezeichnung AS bnam, r.bezeichnung AS rnam, k.bezeichnung AS knam, g.bezeichnung AS gnam, l.land, l.regierungsbezirk, l.kreis, l.gemeinde, l.lage, ";
82switch ($ltyp) {
83        case "m": // "Mit HsNr"
84                $sql.="l.hausnummer ";
85        break;
86        case "p": // "mit PseudoNr"
87                $sql.="l.pseudonummer, l.laufendenummer ";
88        break;
89        case "o": //"Ohne HsNr"
90                $sql.="l.unverschluesselt ";
91        break;
92}
93// "Left" weil: Bei sub-Typ "Gewanne" von Typ "o" sind keine SchlÃŒsselfelder gefÃŒllt!
94$sql.="FROM ".$tnam." l
95LEFT JOIN ax_gemeinde g ON l.land=g.land AND l.regierungsbezirk=g.regierungsbezirk AND l.kreis=g.kreis AND l.gemeinde=g.gemeinde ".UnqKatAmt("l","g")
96."LEFT JOIN ax_kreisregion k ON l.land=k.land AND l.regierungsbezirk=k.regierungsbezirk AND l.kreis=k.kreis ".UnqKatAmt("l","k")
97."LEFT JOIN ax_regierungsbezirk r ON l.land=r.land AND l.regierungsbezirk=r.regierungsbezirk ".UnqKatAmt("l","r")
98."LEFT JOIN ax_bundesland b ON l.land=b.land ".UnqKatAmt("l","b")
99."LEFT JOIN ax_lagebezeichnungkatalogeintrag s
100ON l.land=s.land AND l.regierungsbezirk=s.regierungsbezirk AND l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage
101WHERE l.gml_id= $1 AND l.endet IS NULL AND g.endet IS NULL AND k.endet IS NULL AND r.endet IS NULL AND b.endet IS NULL AND s.endet IS NULL;";
102
103$v = array($gmlid);
104$res = pg_prepare("", $sql);
105$res = pg_execute("", $v);
106if (!$res) {
107        echo "\n<p class='err'>Fehler bei Lagebezeichnung.</p>";
108        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
109}
110if ($dbg > 0) {
111        $zeianz=pg_num_rows($res);
112        if ($zeianz > 1){
113                echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Lage-Objekt!</p>";
114                if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
115        }
116}
117if ($row = pg_fetch_assoc($res)) {
118        $strgml=$row["strgml"]; // gml_id des Katalogeintrag Straße
119        $land =$row["land"];
120        $regbez=$row["regierungsbezirk"];
121        $kreis=$row["kreis"];
122        $knam=$row["knam"];
123        $rnam=$row["rnam"];
124        $bnam=$row["bnam"];
125        $gem=$row["gemeinde"];
126        $gnam=$row["gnam"];
127        $lage=$row["lage"]; // Strassenschluessel
128        $snam=$row["snam"]; //Strassennamen
129//      $kennz=$land."-".$regbez."-".$kreis. ..
130        $kennz=$gem."-".$lage."-"; // ToDo: Kompatibel machen als Eingabe in Navigation/Adresse
131
132        switch ($ltyp) {
133                case "m": // "Mit HsNr"
134                        $hsnr=$row["hausnummer"];
135                        $kennz.=$hsnr;
136                        $untertitel="Hauptgeb&auml;ude mit Hausnummer";
137                        echo "\n<p class='balken lage'>ALKIS Lagebezeichnung mit Hausnummer ".$kennz."&nbsp;</p>"; // Balken
138                        $osub="";
139                break;
140                case "p": // "mit PseudoNr"
141                        $pseu=$row["pseudonummer"];
142                        $lfd=$row["laufendenummer"];
143                        $kennz.=$pseu."-".$lfd;
144                        $untertitel="NebengebÀude mit laufender Nummer (Lagebezeichnung mit Pseudonummer)";
145                        echo "\n<p class='balken lage'>ALKIS Lagebezeichnung NebengebÀude ".$kennz."&nbsp;</p>"; // Balken
146                        $osub="";
147                break;
148                case "o": // "Ohne HsNr"
149                        $unver=$row["unverschluesselt"]; // Gewanne
150                        // 2 Unterarten bzw. Zeilen-Typen in der Tabelle
151                        if ($lage == "") {
152                                $osub="g"; // Sub-Typ Gewanne
153                                $kennz=" - ".$unver;
154                                $untertitel="Gewanne (unverschl&uuml;sselte Lage)";
155                                echo "\n<p class='balken lage'>ALKIS Lagebezeichnung Ohne Hausnummer ".$kennz."&nbsp;</p>"; // Balken
156                        } else {
157                                $osub="s"; // Sub-Typ Strasse (ohne HsNr)
158                                $kennz.=$unver;
159                                $untertitel="Stra&szlig;e ohne Hausnummer";
160                                echo "\n<p class='balken lage'>ALKIS Lagebezeichnung Ohne Hausnummer ".$kennz."&nbsp;</p>"; // Balken
161                        }
162                break;
163        }
164} else {
165        echo "\n<p class='err'>Fehler! Kein Treffer fuer Lagebezeichnung mit gml_id='".$gmlid."'</p>";
166        if ($dbg > 2) {
167                echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";
168        }
169        echo "\n</body>\n</html>";
170        exit;
171}
172
173echo "\n<h2>Lagebezeichnung</h2>\n<p>Typ: ".$untertitel."</p>";
174echo "\n<table class='outer'>\n<tr>\n\t<td>";   // Tab. Kennz.
175        // ToDo: kleiner, wenn ltyp=0 und die SchlÃŒsselfelder leer sind
176        echo "\n\t\t<table class='kennzla' title='Lage'>"
177                ."\n\t\t<tr>";
178                        if ($osub != "g") { // nicht bei Gewanne
179                                echo "\n\t\t\t<td class='head'>Land</td>"
180                                ."\n\t\t\t<td class='head'>Reg.-Bez.</td>"
181                                ."\n\t\t\t<td class='head'>Kreis</td>"
182                                ."\n\t\t\t<td class='head'>Gemeinde</td>"
183                                ."\n\t\t\t<td class='head'>Stra&szlig;e</td>";
184                        }
185                        switch ($ltyp) {
186                                case "m": // "Mit HsNr"
187                                        echo "\n\t\t\t<td class='head'>Haus-Nr</td>";
188                                break;
189                                case "p": // "mit PseudoNr"
190                                        echo "\n\t\t\t<td class='head'>Haus-Nr</td>"
191                                        ."\n\t\t\t<td class='head'>lfd.-Nr</td>";
192                                break;
193                                case "o": //"Ohne HsNr"
194                                        if ($osub === "g") {
195                                                echo "\n\t\t\t<td class='head'>unverschl&uuml;sselte Lage</td>";
196                                        }
197                                break;
198                        }
199                echo "\n\t\t</tr>\n\t\t<tr>";
200                        if ($osub != "g") { // nicht bei Gewanne
201                                echo "\n\t\t\t<td title='Bundesland'>".DsKy($land, 'Bundesland-*').$bnam."&nbsp;</td>"
202                                ."\n\t\t\t<td title='Regierungsbezirk'>".DsKy($regbez, 'Regierungsbezirk-*').$rnam."&nbsp;</td>"
203                                ."\n\t\t\t<td title='Kreis'>".DsKy($kreis, 'Kreis-*').$knam."&nbsp;</td>"
204                                ."\n\t\t\t<td title='Gemeinde'>".DsKy($gem, 'Gemeinde-*').$gnam."&nbsp;</td>"
205                                ."\n\t\t\t<td title='Stra&szlig;e'>".DsKy($lage, 'Stra&szlig;en-*');
206                                if ($ltyp === "o") {
207                                        echo "<span class='wichtig'>".$snam."</span>";
208                                } else {
209                                        echo $snam;
210                                }       
211                                echo "&nbsp;</td>";
212                        }
213
214                        switch ($ltyp) {
215                                case "m":
216                                        echo "\n\t\t\t<td title='Hausnummer und Zusatz'><span class='wichtig'>".$hsnr."</span></td>";
217                                break;
218                                case "p":
219                                        echo "\n\t\t\t<td title='Pseudonummer - Nebengeb&auml;ude zu dieser Hausnummer'>".$pseu."</td>"
220                                        ."\n\t\t\t<td title='Laufende Nummer Nebengeb&auml;ude'><span class='wichtig'>".$lfd."</span></td>";
221                                break;
222                                case "o":
223                                        if ($osub === "g") {
224                                                echo "\n\t\t\t<td title='Gewanne'><span class='wichtig'>".$unver."</span></td>";
225                                        }
226                                break;
227                        }
228                echo "\n\t\t</tr>"
229        ."\n\t\t</table>";
230
231        echo "\n\t</td>\n\t<td>";
232
233        // Kopf Rechts: weitere Daten?
234        if ($osub != "g") { // Link zu Strasse
235                echo "\n\t\t<p class='nwlink noprint'>"
236                        ."\n\t\t\t<a href='alkisstrasse.php?gkz=".$gkz."&amp;gmlid=".$strgml.LnkStf()
237                        ."' title='Stra&szlig;e'>Stra&szlig;e <img src='ico/Strassen.png' width='16' height='16' alt=''></a>"
238                ."\n\t\t</p>";
239        }
240
241echo "\n\t</td>\n</tr>\n</table>";
242
243// F L U R S T Ü C K E
244// ax_Flurstueck  >weistAuf>  ax_LagebezeichnungMitHausnummer
245// ax_Flurstueck  >zeigtAuf>  ax_LagebezeichnungOhneHausnummer
246// ++ auch FlÀchenverschneidung?
247if ($ltyp != "p") { // Pseudonummer linkt nur GebÀude
248        echo "\n\n<a id='fs'></a>\n<h3><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Flurst&uuml;cke</h3>"
249        ."\n<p>mit dieser Lagebezeichnung.</p>";
250        switch ($ltyp) {
251                case "m": $bezart="weistauf"; break;
252                case "o": $bezart="zeigtauf"; break;
253        }
254
255        $sql ="SELECT g.gemarkungsnummer, g.bezeichnung, f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche
256        FROM ax_flurstueck f LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ".UnqKatAmt("f","g")
257        ."WHERE $1 = ANY(f.".$bezart.") AND f.endet IS NULL AND g.endet IS NULL
258        ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;";
259
260        $v = array($gmlid);
261        $resf = pg_prepare("", $sql);
262        $resf = pg_execute("", $v);
263        if (!$resf) {
264                echo "\n<p class='err'>Fehler bei Flurst&uuml;ck.</p>";
265                if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}     
266        }
267        echo "\n<table class='fs'>"
268        ."\n<tr>"
269                ."\n\t<td class='heads'>Gemarkung<img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'></td>"
270                ."\n\t<td class='heads'>Flur<img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'></td>"
271                ."\n\t<td class='heads fsnr' title='Flurst&uuml;cksnummer (Z&auml;hler / Nenner)'><img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'>Flurst.</td>"
272                ."\n\t<td class='head fla'>Fl&auml;che</td>"
273                ."\n\t<td class='head nwlink noprint' title='Verlinkung zu anderen Nachweis-Arten und verbundenen Objekten'>weitere Auskunft</td>"
274        ."\n</tr>";
275        $j=0;
276        $zpaar=false;
277        $gwgmkg=""; // Gruppenwechsel
278        $gwflur="";
279        while($rowf = pg_fetch_assoc($resf)) {
280                $gmkg=$rowf["bezeichnung"];
281                $flur=str_pad($rowf["flurnummer"], 3, "0", STR_PAD_LEFT);
282                $fskenn=$rowf["zaehler"]; // Bruchnummer
283                if ($rowf["nenner"] != "") {$fskenn.="/".$rowf["nenner"];}
284                $flae=number_format($rowf["amtlicheflaeche"],0,",",".") . " m&#178;";
285
286                if ($zpaar) {$trclass='paa';} else {$trclass='unp';}
287                $zpaar=!$zpaar;
288
289                echo "\n<tr class='".$trclass."'>"
290                        ."\n\t<td>".DsKy($rowf["gemarkungsnummer"], 'Gemarkungsnummer');
291                        if ($gwgmkg != $gmkg) {
292                                echo "<b>".$gmkg."</b></td>";
293                                $gwgmkg=$gmkg;
294                                $gwflur="";
295                        } else {
296                                echo $gmkg."</td>";
297                        }
298                        if ($gwflur != $flur) {
299                                echo "\n\t<td><b>".$flur."</b></td>";
300                                $gwflur=$flur;
301                        } else {
302                                echo "\n\t<td>".$flur."</td>";
303                        }
304                        echo "\n\t<td class='fsnr'><span class='wichtig'>".$fskenn."</span></td>"
305                        ."\n\t<td class='fla'>".$flae."</td>"
306                        ."\n\t<td>\n\t\t<p class='nwlink noprint'>"
307                                ."\n\t\t\t<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$rowf["gml_id"].LnkStf()."&amp;eig=n"
308                                ."' title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck <img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''></a>"
309                        ."\n\t\t</p>\n\t</td>"
310                ."\n</tr>";
311                $j++;
312        }
313        echo "\n</table>";
314        if ($j > 6) {echo "<p class='cnt'>".$j." Flurst&uuml;cke</p>";}
315}
316
317// L A G E
318// andere Lage mit gleicher Hausnummer suchen
319if ($ltyp != "o") { // nicht bei Gewanne (Ohne HsNr)
320        echo "\n\n<a id='lage'></a>\n<h3><img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''> Lage</h3>"
321        ."\n<p>Andere Lagebezeichnungen zur gleichen Hausnummer.</p>";
322        $whereclaus="WHERE land= $1 AND regierungsbezirk= $2 AND kreis= $3 AND gemeinde= $4 AND lage= $5 ";
323        $url=selbstverlinkung()."?gkz=".$gkz.LnkStf()."&amp;gmlid="; // Basis
324
325        switch ($ltyp) {
326                case "m": // aktuell: Hausnummer gefunden (HauptgebÀude)
327                        // dazu alle NebengebÀude suchen
328                        echo "\n<p>Nebengeb&auml;ude:&nbsp;";
329                        $sql ="SELECT l.gml_id, l.laufendenummer FROM ax_lagebezeichnungmitpseudonummer l "
330                        .$whereclaus."AND lage= $6 AND pseudonummer= $7 AND l.endet IS NULL ORDER BY laufendenummer;";
331
332                        $v = array($land,$regbez,$kreis,$gem,$lage,$lage,$hsnr);
333                        $res = pg_prepare("", $sql);
334                        $res = pg_execute("", $v);
335                        if (!$res) {
336                                echo "\n<p class='err'>Fehler bei Nebengeb&auml;ude.</p>";
337                                if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";} // 7 $-Parameter
338                        }
339                        $neb=0;
340                        while($row = pg_fetch_assoc($res)) {
341                                echo "\n\t<a href='".$url.$row["gml_id"].LnkStf()."&amp;ltyp=p'>lfd.-Nr ".$row["laufendenummer"]."</a>&nbsp;&nbsp;";
342                                $neb++;
343                        }
344                        if ($neb === 0) {echo "keine";}
345                        echo "</p>";
346                break;
347
348                case "p": // aktuell NebengebÀude: Haupt- und (andere) NebengebÀude suchen
349                        echo "\n<p>Hauptgeb&auml;ude: ";
350                        $sql ="SELECT l.gml_id FROM ax_lagebezeichnungmithausnummer l ".$whereclaus."AND hausnummer= $6 AND l.endet IS NULL ;";
351
352                        $v = array($land,$regbez,$kreis,$gem,$lage,$pseu);
353                        $res = pg_prepare("", $sql);
354                        $res = pg_execute("", $v);
355
356                        if (!$res) {echo "\n<p class='err'>Fehler bei Hauptgeb&auml;ude.<br>".$sql."</p>";}
357                        $hg=0;
358                        while($row = pg_fetch_assoc($res)) {
359                                echo "\n\t<a href='".$url.$row["gml_id"].LnkStf()."&amp;ltyp=m'>Haus-Nr ".$pseu."</a>&nbsp;&nbsp;";
360                                $hg++;
361                        }
362                        if ($hg === 0) {echo "&nbsp;Kein Hauptgeb&auml;ude gefunden.";}
363                        echo "</p>";
364
365                        echo "\n<p>Weitere Nebengeb&auml;ude:&nbsp;";
366                        $sql ="SELECT l.gml_id, l.laufendenummer FROM ax_lagebezeichnungmitpseudonummer l "
367                        .$whereclaus."AND pseudonummer= $6 AND laufendenummer <> $7 AND l.endet IS NULL ORDER BY laufendenummer;";
368                        $v=array($land,$regbez,$kreis,$gem,$lage,$pseu,$lfd);
369                        $res = pg_prepare("", $sql);
370                        $res = pg_execute("", $v);
371                        if (!$res) {
372                                echo "\n<p class='err'>Fehler bei Nebengeb&auml;ude.</p>";
373                                if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";} // 7 $-Parameter               
374                        }
375                        $neb=0;
376                        while($row = pg_fetch_assoc($res)) {
377                                echo "\n\t<a href='".$url.$row["gml_id"].LnkStf()."&amp;ltyp=p'>lfd.-Nr ".$row["laufendenummer"]."</a>&nbsp;&nbsp;";
378                                $neb++;
379                        }
380                        if ($neb === 0) {echo "keine";}
381                        echo "</p>";
382                break;
383        }
384}
385
386// G E B Ä U D E
387if ($ltyp != "o") { // OhneHsNr linkt nur Flurst.
388        echo "\n\n<a id='geb'></a>\n<h3><img src='ico/Haus.png' width='16' height='16' alt=''> Geb&auml;ude</h3>"
389        ."\n<p>mit dieser Lagebezeichnung.</p>";
390        switch ($ltyp) {
391                case "p": $bezart="g.hat"; break;
392                case "m": $bezart="ANY(g.zeigtauf)"; break; // array
393        }
394
395        $sql ="SELECT g.gml_id, g.gebaeudefunktion, array_to_string(g.name, ',') AS name, g.bauweise, g.grundflaeche, g.zustand, round(st_area(g.wkb_geometry)::numeric,2) AS flaeche,
396        h.beschreibung AS hv, h.dokumentation AS hd, u.beschreibung AS uv, u.dokumentation AS ud, z.beschreibung AS zv, z.dokumentation AS zd FROM ax_gebaeude g
397        LEFT JOIN ax_bauweise_gebaeude h ON g.bauweise = h.wert
398        LEFT JOIN ax_gebaeudefunktion u ON g.gebaeudefunktion = u.wert
399        LEFT JOIN ax_zustand_gebaeude z ON g.zustand = z.wert
400        WHERE $1 = ".$bezart." AND g.endet IS NULL;";
401        // Keine Sortierung (ORDER BY) notwendig weil i.d.R. nur ein (Haupt-)GebÀude diese Hausnummer hat.
402        // FÃŒr weiter Eigenschaften dem Link "Haus" folgen.
403
404        $v = array($gmlid);
405        $res = pg_prepare("", $sql);
406        $res = pg_execute("", $v);
407        if (!$res) {
408                echo "\n<p class='err'>Fehler bei Geb&auml;ude.</p>";
409                if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
410        }
411        echo "\n<table class='geb'>"
412        ."\n<tr>"
413                ."\n\t<td class='head' title='Name ist der Eigenname oder die Bezeichnung des Geb&auml;udes.'>Name</td>"
414                ."\n\t<td class='head fla' title='Fl&auml;che'>Fl&auml;che</td>"
415                ."\n\t<td class='head' title='Geb&auml;udefunktion ist die zum Zeitpunkt der Erhebung vorherrschend funktionale Bedeutung des Geb&auml;udes'>Funktion</td>"
416                ."\n\t<td class='head' title='Bauweise ist die Beschreibung der Art der Bauweise'>Bauweise</td>"
417                ."\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>"
418                ."\n\t<td class='head nwlink' title='Komplette Hausdaten'>Hausdaten</td>"
419        ."\n</tr>";
420        $i=0;
421        while($row = pg_fetch_assoc($res)) {
422                $ggml=$row["gml_id"];
423                $gfla=$row["flaeche"];
424                echo "\n<tr>"
425                ."\n\t<td>".$row["name"]."</td>"
426                ."\n\t<td class='fla'>".$gfla." m&#178;</td>"
427                ."\n\t<td title='".htmlentities($row["ud"], ENT_QUOTES, "UTF-8")."'>".DsKy($row["gebaeudefunktion"], 'Geb&auml;udefunktion-*').$row["uv"]."</td>"
428                ."\n\t<td title='".htmlentities($row["hd"], ENT_QUOTES, "UTF-8")."'>".DsKy($row["bauweise"], 'Bauweise-*').$row["hv"]."</td>"
429                ."\n\t<td title='".htmlentities($row["zd"], ENT_QUOTES, "UTF-8")."'>".DsKy($row["zustand"], 'Zustand-*').$row["zv"]."</td>"
430                ."\n\t<td class='nwlink noprint'>"
431                        ."\n\t\t<a title='komplette Hausdaten' href='alkishaus.php?gkz=".$gkz."&amp;gmlid=".$ggml.LnkStf()
432                        ."'>Haus <img src='ico/Haus.png' width='16' height='16' alt=''></a>"
433                ."\n\t</td>\n</tr>";
434        }
435        echo "\n</table>";
436}
437
438echo "<div class='buttonbereich noprint'>\n<hr>"
439        ."\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;";
440if ($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;";}
441echo "\n</div>";
442
443footer($gmlid, selbstverlinkung()."?", "&amp;ltyp=".$ltyp);
444?>
445
446</body>
447</html>
Note: See TracBrowser for help on using the repository browser.