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

Revision 425, 11.8 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/*      alkisstrasse.php
3
4        ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo).
5        Alle FlurstÃŒcke an einer Straße anzeigen, egal ob "mit" oder "ohne" Hausnummer
6        Parameter: "gml_id" aus der Tabelle "ax_lagebezeichnungkatalogeintrag"
7
8        Version:
9        2016-02-24 Version fÃŒr norGIS-ALKIS-Import
10        ...
11        2020-02-20 Authentifizierung ausgelagert in Function darf_ich()
12        2020-12-15 Input-Validation und Strict Comparisation (===)
13        2021-12-09 Neue Parameter: $katAmtMix (Kataster-Amt-Mix), $PrntBtn (Drucken-SchaltflÀche)
14*/
15ini_set("session.cookie_httponly", 1);
16session_start();
17$showkey="n"; $nodebug=""; // Var. aus Parameter initalisieren
18$cntget = extract($_GET); // Parameter in Variable umwandeln
19
20// strikte Validierung aller Parameter
21if (isset($gmlid)) {
22        if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
23} else {
24        die("Fehlender Parameter");
25}
26if (isset($gkz)) {
27        if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
28} else {
29        die("Fehlender Parameter");
30}
31if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
32if ($showkey === "j") {$showkey=true;} else {$showkey=false;}
33if (!preg_match('#^j{0,1}$#', $nodebug)) {die("Eingabefehler nodebug");}
34
35include "alkis_conf_location.php";
36include "alkisfkt.php";
37?>
38<!doctype html>
39<html lang="de">
40<head>
41        <meta charset="utf-8">
42        <meta name="viewport" content="width=device-width, initial-scale=1.0">
43        <title>ALKIS Stra&szlig;e</title>
44        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
45        <link rel="shortcut icon" type="image/x-icon" href="ico/Strassen.ico">
46        <script type="text/javascript">
47                function ALKISexport(phaus) {
48                        window.open(<?php echo "'alkisexport.php?gkz=".$gkz."&tabtyp=strasse&gmlid=".$gmlid."&haus='"; ?> + phaus);
49                }
50        </script>
51</head>
52<body>
53<?php
54$erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); }
55$dbg=$debug; // CONF in Arbeits-Variable
56
57// Mit URL-Parameter "&nodebug=j" kann man die Entwicklungsumgebung (in Conf definiert) ausschalten.
58// Wirkt temporÀr und wird nicht in Links weiter gereicht.
59if ($nodebug === "j") {$dbg=0;}
60
61$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisstrasse.php'");
62if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
63
64$sql ="SELECT s.land, s.regierungsbezirk, s.kreis, s.gemeinde, s.lage, s.bezeichnung AS snam,
65b.bezeichnung AS bnam, r.bezeichnung AS rnam, k.bezeichnung AS knam, g.bezeichnung AS gnam, o.gml_id AS ogml
66FROM ax_lagebezeichnungkatalogeintrag s
67JOIN ax_bundesland b ON s.land=b.land ".UnqKatAmt("s","b")
68."JOIN ax_regierungsbezirk r ON s.land=r.land AND s.regierungsbezirk=r.regierungsbezirk ".UnqKatAmt("s","r")
69."JOIN ax_kreisregion k ON s.land=k.land AND s.regierungsbezirk=k.regierungsbezirk AND s.kreis=k.kreis ".UnqKatAmt("s","k")
70."JOIN ax_gemeinde g ON s.land=g.land AND s.regierungsbezirk=g.regierungsbezirk AND s.kreis=g.kreis AND s.gemeinde=g.gemeinde ".UnqKatAmt("s","g")
71."LEFT JOIN ax_lagebezeichnungohnehausnummer o ON s.land=o.land AND s.regierungsbezirk=o.regierungsbezirk AND s.kreis=o.kreis AND s.gemeinde=o.gemeinde AND s.lage=o.lage
72WHERE s.gml_id= $1 AND s.endet IS NULL AND b.endet IS NULL AND r.endet IS NULL AND k.endet IS NULL AND g.endet IS NULL AND o.endet IS NULL ;";
73
74$v=array($gmlid);
75$res=pg_prepare("", $sql);
76$res=pg_execute("", $v);
77if (!$res) {
78        echo "\n<p class='err'>Fehler bei Lagebezeichnungskatalogeintrag.</p>";
79        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
80}
81if ($dbg > 0) {
82        $zeianz=pg_num_rows($res);
83        if ($zeianz > 1){
84                echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Stra&szlig;en-Objekt!</p>";
85                if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
86        }
87}
88if ($row = pg_fetch_assoc($res)) {
89        $lage=$row["lage"]; // Strassenschluessel
90        $snam=$row["snam"]; // Strassenname
91        $gem=$row["gemeinde"];
92        $kennz=$gem."-".$lage." (".$snam.")"; // Schluessel als Sucheingabe in NAV brauchbar?
93        echo "\n<p class='balken strasse'>ALKIS Stra&szlig;e ".$kennz."&nbsp;</p>"; // Balken
94} else {
95        echo "\n<p class='err'>Kein Treffer bei Lagebezeichnungskatalogeintrag.</p>";
96}
97
98echo "\n<h2>Stra&szlig;e</h2>";
99
100// Tabelle Kennzeichen
101echo "\n<table class='outer'>\n<tr>"
102."\n\t<td class='ll'><img src='ico/Strassen.png' width='16' height='16' alt=''> Stra&szligenname:</td>"
103."\n\t<td>"
104        ."\n\t\t<table class='kennzstra' title='Lage'>"
105                ."\n\t\t<tr>"
106                        ."\n\t\t\t<td class='head'>Land</td>"
107                        ."\n\t\t\t<td class='head'>Reg.-Bez.</td>"
108                        ."\n\t\t\t<td class='head'>Kreis</td>"
109                        ."\n\t\t\t<td class='head'>Gemeinde</td>"
110                        ."\n\t\t<td class='head'>Stra&szlig;e</td>"
111                ."\n\t\t</tr>"
112                ."\n\t\t<tr>";
113                        echo "\n\t\t\t<td title='Bundesland'>";
114                        if ($showkey) {echo "<span class='key'>".$row["land"]."</span><br>";}
115                        echo $row["bnam"]."&nbsp;</td>"
116                        ."\n\t\t\t<td title='Regierungsbezirk'>";
117                        if ($showkey) {echo "<span class='key'>".$row["regierungsbezirk"]."</span><br>";}
118                        echo $row["rnam"]."&nbsp;</td>"
119                        ."\n\t\t\t<td title='Kreis'>";
120                        if ($showkey) {echo "<span class='key'>".$row["kreis"]."</span><br>";}
121                        echo $row["knam"]."&nbsp;</td>"
122                        ."\n\t\t\t<td title='Gemeinde'>";
123                        if ($showkey) {echo "<span class='key'>".$gem."</span><br>";}
124                        echo $row["gnam"]."&nbsp;</td>"
125                        . "\n\t\t\t<td title='Stra&szlig;e'>";
126                        if ($showkey) {echo "<span class='key'>".$lage."</span><br>";}
127                        echo "<span class='wichtig'>".$snam."</span>"
128                        . "&nbsp;</td>"
129                ."\n\t\t</tr>"
130        ."\n\t\t</table>";
131echo "\n\t</td>\n\t<td>";
132
133// Kopf Rechts:
134$ogml=$row["ogml"]; // ID von "Lage Ohne HsNr"
135if ($ogml != "") {
136        echo "\n\t\t<p class='nwlink noprint'>"
137                ."\n\t\t<a href='alkislage.php?gkz=".$gkz."&amp;ltyp=o&amp;gmlid=".$ogml;
138                if ($showkey) {echo "&amp;showkey=j";}
139                echo "' title='Lage Ohne Hausnummer'>Lage <img src='ico/Lage_an_Strasse.png' width='16' height='16' alt=''></a>"
140        ."\n\t\t</p>";
141}
142echo "\n\t</td>\n</tr>\n</table>";
143pg_free_result($res);
144
145// F L U R S T Ü C K E
146echo "\n\n<h3 id='fs'><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Flurst&uuml;cke</h3>"
147."\n<p>Zusammenfassung von 'Lage mit Hausnummer' und 'Lage ohne Hausnummer' an dieser Straße</p>";
148
149// ax_Flurstueck >weistAuf> ax_LagebezeichnungMitHausnummer  > = h = Hauptgebaeude
150// ax_Flurstueck >zeigtAuf> ax_LagebezeichnungOhneHausnummer > = s = Strasse
151// Suchkriterium: gml_id aus Katalog
152$sql ="SELECT fh.gemarkungsnummer, gh.bezeichnung, fh.gml_id, fh.flurnummer, fh.zaehler, fh.nenner, fh.amtlicheflaeche, lh.gml_id AS lgml, lh.hausnummer, 'm' AS ltyp
153 FROM ax_flurstueck fh
154 JOIN ax_lagebezeichnungmithausnummer lh ON lh.gml_id=ANY(fh.weistAuf)
155 JOIN ax_gemarkung gh ON fh.land=gh.land AND fh.gemarkungsnummer=gh.gemarkungsnummer ".UnqKatAmt("fh","gh")
156."JOIN ax_lagebezeichnungkatalogeintrag sh ON lh.land=sh.land AND lh.regierungsbezirk=sh.regierungsbezirk AND lh.kreis=sh.kreis AND lh.gemeinde=sh.gemeinde AND lh.lage=sh.lage
157 WHERE sh.gml_id = $1 AND fh.endet IS NULL AND lh.endet IS NULL AND gh.endet IS NULL AND sh.endet IS NULL
158UNION SELECT fs.gemarkungsnummer, gs.bezeichnung, fs.gml_id, fs.flurnummer, fs.zaehler, fs.nenner, fs.amtlicheflaeche, ls.gml_id AS lgml, '' AS hausnummer, 'o' AS ltyp
159 FROM ax_flurstueck fs
160 JOIN ax_lagebezeichnungohnehausnummer ls ON ls.gml_id=ANY(fs.zeigtauf)
161 JOIN ax_gemarkung gs ON fs.land=gs.land AND fs.gemarkungsnummer=gs.gemarkungsnummer ".UnqKatAmt("fs","gs")
162."JOIN ax_lagebezeichnungkatalogeintrag ss ON ls.land=ss.land AND ls.regierungsbezirk=ss.regierungsbezirk AND ls.kreis=ss.kreis AND ls.gemeinde=ss.gemeinde AND ls.lage=ss.lage
163 WHERE ss.gml_id = $1 AND fs.endet IS NULL AND ls.endet IS NULL AND gs.endet IS NULL AND ss.endet IS NULL
164ORDER BY gemarkungsnummer, flurnummer, zaehler, nenner;";
165
166$v=array($gmlid);
167$resf=pg_prepare("", $sql);
168$resf=pg_execute("", $v);
169if (!$resf) {
170        echo "\n<p class='err'>Fehler bei Flurst&uuml;ck.</p>";
171        if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}     
172}
173
174echo "\n<table class='fs'>"
175."\n<tr>"
176        ."\n\t<td class='heads' title='Name der Gemarkung (Ortsteil)'>Gemarkung<img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'></td>"
177        ."\n\t<td class='heads' title='Flur-Nummer'>Flur<img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'></td>"
178        ."\n\t<td class='heads' title='Flurst&uuml;cksnummer (Z&auml;hler / Nenner)'><img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'>Flurst.</td>"
179        ."\n\t<td class='head fla' title='amtliche Fl&auml;che in Quadratmeter'>Fl&auml;che</td>"
180        ."\n\t<td class='head hsnr' title='Hausnummer aus der Lagebezeichnung des Flurst&uuml;cks'>HsNr.</td>"
181        ."\n\t<td class='head nwlink noprint' title='Verlinkung zu anderen Nachweis-Arten und verbundenen Objekten'>weitere Auskunft</td>"
182."\n</tr>";
183$j=0;
184$gwgmkg=""; // Gruppenwechsel
185$gwflur="";
186$cnths=0; // Count Haus-Lagebez.
187
188$zpaar=false; // Zeilen-Farbwechsel
189while($rowf = pg_fetch_assoc($resf)) {
190        $gmkg=$rowf["bezeichnung"];
191        $flur=str_pad($rowf["flurnummer"], 3, "0", STR_PAD_LEFT);
192        $fskenn=$rowf["zaehler"]; // Bruchnummer
193        if ($rowf["nenner"] != "") {$fskenn.="/".$rowf["nenner"];}
194        $flae=number_format($rowf["amtlicheflaeche"],0,",",".") . " m&#178;";
195        $lgml=$rowf["lgml"]; // ID von "Lage Mit/Ohne"
196        $ltyp=$rowf["ltyp"]; // mit/ohne HsNr
197
198        if ($zpaar) {$trclass='paa';} else {$trclass='unp';}
199        $zpaar=!$zpaar;
200        echo "\n<tr class='".$trclass."'>"
201                ."\n\t<td>";
202                if ($showkey) {echo "<span class='key'>".$rowf["gemarkungsnummer"]."</span> ";}
203                if ($gwgmkg != $gmkg) {
204                        echo "<b>".$gmkg."</b></td>";
205                        $gwgmkg=$gmkg;
206                        $gwflur="";
207                } else {
208                        echo $gmkg."</td>";
209                }
210
211                if ($gwflur != $flur) {
212                        echo "\n\t<td><b>".$flur."</b></td>";
213                        $gwflur=$flur;
214                } else {
215                        echo "\n\t<td>".$flur."</td>";
216                }
217
218                echo "\n\t<td><span class='wichtig'>".$fskenn."</span></td>"
219                ."\n\t<td class='fla'>".$flae."</td>"
220                ."\n\t<td class='hsnr'>".$rowf["hausnummer"]."</td>"
221                ."\n\t<td>\n\t\t<p class='nwlink noprint'>";
222                        if ($ltyp === 'm') { // nur Typ "Mit Haus" anzeigen. Dar Typ 'o' ist immer gleich und identisch mit dem Link im Kopf
223                                echo "\n\t\t<a href='alkislage.php?gkz=".$gkz."&amp;ltyp=".$ltyp."&amp;gmlid=".$lgml;
224                                if ($showkey) {echo "&amp;showkey=j";}
225                                echo "' title='Lagebezeichnung mit Hausnummer'>Lage <img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''></a>&nbsp;";
226                                $cnths++;
227                        }
228                        // Link FlurstÃŒcksnachweis
229                        echo "\n\t\t<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$rowf["gml_id"]."&amp;eig=n";
230                        if ($showkey) {echo "&amp;showkey=j";}
231                        echo "' title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck <img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''></a>";
232                echo "\n\t\t</p>\n\t</td>"
233        ."\n</tr>";
234        $j++;
235}
236echo "\n</table>";
237if ($j > 6) {
238        echo "<p class='cnt'>".$j." Flurst&uuml;cke";
239        if ($cnths > 1) {echo " und ".$cnths." Hauptgeb&auml;ude";}
240        echo " mit dieser Straße in der Lagebezeichnung</p>";
241}
242pg_free_result($resf);
243
244echo "\n<div class='buttonbereich noprint'>\n<hr>"
245        ."\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;";
246if ($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;";}
247echo "\n\t<a title='Export als CSV' href=\"javascript:ALKISexport('')\">alle<img src='ico/download.png' width='16' height='16' alt='Export'></a>&nbsp;"
248        ."\n\t<a title='CSV - nur Flurst&uuml;cke mit Hausnummer' href=\"javascript:ALKISexport('m')\">mit HsNr<img src='ico/download.png' width='16' height='16' alt='Export'></a>&nbsp;"
249        ."\n\t<a title='CSV - nur Flurst&uuml;cke ohne Hausnummer' href=\"javascript:ALKISexport('o')\">ohne<img src='ico/download.png' width='16' height='16' alt='Export'></a>&nbsp;"
250."\n</div>";
251
252footer($gmlid, selbstverlinkung()."?", "");
253?>
254
255</body>
256</html>
Note: See TracBrowser for help on using the repository browser.