source: trunk/info/info/alkis/alkisbaurecht.php @ 376

Revision 376, 6.9 KB checked in by frank.jaeger, 7 years ago (diff)

Verbesserungen an der ALKIS-Buchauskunft (Geschwindigkeit, Fehlerkorrekturen, Mandantenfähigkeit) und an der Mapbender2-Navigation.

Line 
1<?php
2/*      alkisbaurecht.php - Baurecht
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*/
9session_start();
10$cntget = extract($_GET);
11require_once("alkis_conf_location.php");
12if ($auth == "mapbender") {require_once($mapbender);}
13include("alkisfkt.php"); // f. Footer
14$keys = isset($_GET["showkey"]) ? $_GET["showkey"] : "n";
15if ($keys == "j") {$showkey=true;} else {$showkey=false;}
16echo <<<END
17<!doctype html>
18<html lang="de">
19<head>
20        <meta charset="utf-8">
21        <title>ALKIS Bau-, Raum- oder Bodenordnungsrecht</title>
22        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
23        <link rel="shortcut icon" type="image/x-icon" href="ico/Gericht.ico">
24</head>
25<body>
26END;
27
28
29$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisbaurecht.php'");
30if (!$con) echo "<p class='err'>Fehler beim Verbinden der DB</p>\n";
31
32// Spalte "a.d" ist immer leer
33$sql ="SELECT r.ogc_fid, r.artderfestlegung as adfkey, r.name, r.stelle, r.bezeichnung AS rechtbez,
34a.v AS adfbez, d.bezeichnung AS stellbez, d.stellenart, wd.v, wd.d, round(st_area(r.wkb_geometry)::numeric,0) AS flae
35FROM ax_bauraumoderbodenordnungsrecht r
36LEFT JOIN alkis_wertearten a ON cast(r.artderfestlegung AS character varying)=a.k AND a.element='ax_bauraumoderbodenordnungsrecht' AND a.bezeichnung='artderfestlegung'
37LEFT JOIN ax_dienststelle d ON r.land=d.land AND r.stelle=d.stelle
38LEFT JOIN alkis_wertearten wd ON cast(d.stellenart AS character varying)=wd.k AND wd.element='ax_dienststelle' AND wd.bezeichnung='stellenart'
39WHERE r.gml_id= $1 AND r.endet IS NULL AND d.endet IS NULL;";
40
41$v = array($gmlid);
42$res = pg_prepare("", $sql);
43$res = pg_execute("", $v);
44if (!$res) {
45        echo "\n<p class='err'>Fehler bei Baurecht.</p>\n";
46        if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".$sql."<br>$1 = ".$gmlid."</p>\n";}
47}
48if ($row = pg_fetch_array($res)) {
49        $artfest=$row["adfkey"];  // Art der Festlegung, Key
50        $verfnr=$row["rechtbez"]; // Verfahrens-Nummer
51        $enam=$row["name"];
52        $stellb=$row["stellbez"];
53        $stella=$row["stellenart"];
54
55        // Balken
56        echo "<p class='recht'>ALKIS Bau-, Raum- oder Bodenordnungsrecht ".$artfest."-".$verfnr."&nbsp;</p>\n";
57
58        echo "\n<h2><img src='ico/Gericht.png' width='16' height='16' alt=''> Bau-, Raum- oder Bodenordnungsrecht</h2>\n";
59
60        echo "\n<table>"
61                ."\n<tr>"
62                        ."\n\t<td class='li'>Art der Festlegung:</td>\n\t<td>";
63                        if ($showkey) {echo "<span class='key'>(".$artfest.")</span> ";}
64                        echo "<span class='wichtig'>".$row["adfbez"]."</span></td>"
65                ."\n</tr>";
66                if ($enam != "") {
67                        echo "\n<tr>"
68                                ."\n\t<td class='li'>Eigenname des Gebietes:</td>"
69                                ."\n\t<td>".$enam."</td>"
70                        . "\n</tr>";
71                }
72                if ($verfnr != "") {
73                        echo "\n<tr>"
74                                ."\n\t<td class='li'>Verfahrensnummer:</td>"
75                                ."\n\t<td>".$verfnr."</td>"
76                        ."\n</tr>";
77                }
78                if ($stellb != "") { // z.B. Umlegung *mit* und Baulast *ohne* Dienststelle, darum bezirk testen
79                        echo "\n<tr>"
80                                ."\n\t<td class='li'>Dienststelle:</td>\n\t<td>";
81                                        if ($showkey) {echo "<span class='key'>(".$row["stelle"].")</span> ";}
82                                        echo $stellb
83                                ."</td>"
84                        ."\n</tr>";
85                        if ($stella != "") {
86                                echo "\n<tr>"
87                                        ."\n\t<td class='li'>Art der Dienststelle:</td>"
88                                        ."\n\t<td>";
89                                                if ($showkey) {echo " <span class='key'>(".$stella.")</span>";}
90                                                echo "<span title='".$row["d"]."'>".$row["v"]."</span>";
91                                        echo "</td>"
92                                ."\n</tr>";
93                        }
94                }
95                echo "\n<tr>"
96                        ."\n\t<td class='li'>Fl&auml;che:</td>";
97                        $flae=number_format($row["flae"],0,",",".")." m&#178;";
98                        echo "\n\t<td>".$flae."</td>"
99                ."\n</tr>"
100        . "\n</table>";
101} else {
102        echo "\n<p class='err'>Fehler! Kein Treffer bei gml_id=".$gmlid."</p>";
103}
104
105echo "\n<h2><img src='ico/Flurstueck.png' width='16' height='16' alt=''> betroffene Flurst&uuml;cke</h2>\n"
106."\n<p>Ermittelt durch geometrische Verschneidung. Nach Gr&ouml;&szlig;e absteigend.</p>";
107
108$sql ="SELECT f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche, round(st_area(ST_Intersection(r.wkb_geometry,f.wkb_geometry))::numeric,1) AS schnittflae
109FROM ax_flurstueck f, ax_bauraumoderbodenordnungsrecht r
110WHERE r.gml_id= $1 AND f.endet IS NULL AND r.endet IS NULL ";
111if ($filtgem == '' ) { // ungefiltert
112        $v=array($gmlid);
113} else {
114        $sql.="AND f.kreis = $2 AND f.gemeinde = $3 "; // Zuständiges Gebiet
115        $v=array($gmlid, $filtkreis, $filtgem);
116}
117$sql.="AND st_intersects(r.wkb_geometry,f.wkb_geometry) = true
118AND st_area(st_intersection(r.wkb_geometry,f.wkb_geometry)) > 0.05
119ORDER BY schnittflae DESC LIMIT 50;";
120// > 0.0 ist gemeint, Ungenauigkeit durch st_simplify
121// Limit: Flurbereinig. kann gross werden!
122// Trotz Limit lange Antwortzeit, wegen OrderBy -> intersection
123
124$res=pg_prepare("", $sql);
125$res=pg_execute("", $v);
126if (!$res) {
127        echo "\n<p class='err'>Keine Flurst&uuml;cke ermittelt.<br>\nSQL=<br></p>\n";
128//      if ($debug > 2) {echo "<p class='err'>SQL=<br>".$sql."<br>$1 = ".$gmlid."</p>\n";}
129}
130
131echo "\n<table class='fs'>"
132        ."\n<tr>"
133                ."\n\t<td class='head' title='Flur- und Flurst&uuml;cksnummer'>Flurst&uuml;ck</td>"
134                ."\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>"
135                ."\n\t<td class='head fla' title='amtliche Flurst&uuml;cksfl&auml;che, Buchfl&auml;che'>von</td>"
136                ."\n\t<td class='head nwlink' title='Link zum Flurst&uuml;ck'>weitere Auskunft</td>"
137        ."\n</tr>";
138
139        $fscnt=0;
140        while($row = pg_fetch_array($res)) {
141                $fscnt++;
142                echo "\n<tr>"
143                        ."\n\t<td>".$row["flurnummer"]."-<span class='wichtig'>".$row["zaehler"];
144                                $nen=$row["nenner"];
145                                if ($nen != "") {echo "/".$nen;}
146                        echo "</span></td>"
147                        ."\n\t<td class='fla'>".$row["schnittflae"]." m&#178;</td>"
148                        ."\n\t<td class='fla'>".$row["amtlicheflaeche"]." m&#178;</td>"
149                        ."\n\t<td class='nwlink noprint'>"
150                                ."\n\t\t<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$row["gml_id"]."&amp;eig=n' "
151                                        ."title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck "
152                                        ."\n\t\t\t<img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''>"
153                                ."\n\t\t</a>"
154                        ."\n\t</td>"
155                ."\n</tr>";
156        }
157echo "\n</table>";
158
159if ($fscnt == 0) { // nicht gefunden
160        if ($filtgem == '' ) { // ungefiltert
161                echo "<p class='err'>Kein Flurst&uuml;ck gefunden.</p>";
162        } else { // Wahrscheinliche Ursache = Filter
163                echo "<p class='err'>Kein Flurst&uuml;ck im berechtigten Bereich.</p>";
164        //      if ($debug > 2) {echo "<p class='err'>SQL=<br>".$sql."<br>$1 = ".$gmlid." $2 = ".$filtkreis." $3 = ".$filtgem."</p>\n";}
165        }
166} elseif ($fscnt == 50) {
167        echo "<p>... und weitere Flurst&uuml;cke (Limit 50 erreicht).</p>";
168}
169
170pg_close($con);
171echo <<<END
172
173<div class='buttonbereich noprint'>
174<hr>
175        <a title="zur&uuml;ck" href='javascript:history.back()'><img src="ico/zurueck.png" width="16" height="16" alt="zur&uuml;ck" /></a>&nbsp;
176        <a title="Drucken" href='javascript:window.print()'><img src="ico/print.png" width="16" height="16" alt="Drucken" /></a>&nbsp;
177</div>
178END;
179
180footer($gmlid, $_SERVER['PHP_SELF']."?", "");
181
182?>
183
184</body>
185</html>
Note: See TracBrowser for help on using the repository browser.