[66] | 1 | <?php |
---|
[85] | 2 | /* Version vom |
---|
| 3 | 24.03.2011: bei HsNr auch Gemeinde in Where, Anzeige Gemeinde je nach Filter |
---|
| 4 | 25.03.2011: parameter &gemeinde= auch als Liste moeglich |
---|
| 5 | z.B. Wasserverband zustaendig fuer: &gemeinde=12,20,24,28,32 |
---|
[105] | 6 | 11.04.2011 epsg in Link, transform nur wenn notwendig |
---|
| 7 | 25.07.2011 PostNAS 0.5/0.6 Versionen unterscheiden |
---|
[115] | 8 | 24.10.2011 Nach Pos-Klick Highlight erneuern statt hideHighlight |
---|
[105] | 9 | |
---|
| 10 | ToDo: Mouse-Over in StraÃenliste soll Position zeigen, |
---|
| 11 | dazu in der DB eine Tabelle mit Koordinate zum StraÃenschlÃŒssel aufbauen.
|
---|
[85] | 12 | */ |
---|
[68] | 13 | import_request_variables("PG"); |
---|
[66] | 14 | include("../../conf/alkisnav_conf.php");
|
---|
[105] | 15 | $con_string = "host=".$host." port=".$port." dbname=".$dbname.$dbvers.$gkz." user=".$user." password=".$password;
|
---|
| 16 | $con = pg_connect ($con_string) or die ("Fehler bei der Verbindung zur Datenbank ".$$dbname.$dbvers.$gkz); |
---|
[66] | 17 | ?> |
---|
| 18 | |
---|
| 19 | <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
|
---|
| 20 | <html>
|
---|
| 21 | <head>
|
---|
| 22 | <meta http-equiv="cache-control" content="no-cache">
|
---|
| 23 | <meta http-equiv="pragma" content="no-cache">
|
---|
| 24 | <meta http-equiv="expires" content="0">
|
---|
| 25 | <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
|
---|
| 26 | <title>ALKIS-Suche Adressen</title>
|
---|
| 27 | <link rel="stylesheet" type="text/css" href="alkisnav.css">
|
---|
| 28 | </head>
|
---|
| 29 | <body> |
---|
[68] | 30 | <?php |
---|
[66] | 31 | |
---|
| 32 | function suchStrName() { |
---|
[83] | 33 | // Strassen nach Name(-nsanfang) |
---|
[86] | 34 | global $con, $street, $scalestr, $str_schl, $gkz, $gemeinde, $epsg, $gfilter, $debug; |
---|
[66] | 35 | $linelimit=120; // -> in die Conf? |
---|
| 36 | preg_match("/^(\D+)(\d*)(\D*)/",$street,$matches); # 4 matches name/nr/zusatz echo "match: ".$matches[1].",".$matches[2].",".$matches[3];
|
---|
| 37 | $matches[1] = preg_replace("/strasse/i","str", $matches[1]);
|
---|
| 38 | $matches[1] = preg_replace("/str\./i","str", $matches[1]); |
---|
| 39 | if(preg_match("/\*/",$matches[1])){
|
---|
[68] | 40 | $match=trim(preg_replace("/\*/i","%", strtoupper($matches[1])));
|
---|
[66] | 41 | } else {
|
---|
[68] | 42 | $match=trim($matches[1])."%";
|
---|
[66] | 43 | } |
---|
[68] | 44 | $sql ="SELECT g.bezeichnung AS gemname, k.bezeichnung, k.schluesselgesamt, k.lage "; |
---|
[66] | 45 | $sql.="FROM ax_lagebezeichnungkatalogeintrag as k "; |
---|
[68] | 46 | $sql.="JOIN ax_gemeinde g ON k.land=g.land AND k.regierungsbezirk=g.regierungsbezirk AND k.kreis=g.kreis AND k.gemeinde=g.gemeinde "; |
---|
| 47 | $sql.="WHERE k.bezeichnung ILIKE $1 "; |
---|
[85] | 48 | switch ($gfilter) { |
---|
| 49 | case 1: // Einzelwert |
---|
| 50 | $sql.="AND k.gemeinde=".$gemeinde." "; |
---|
| 51 | break; |
---|
| 52 | case 2: // Liste |
---|
| 53 | $sql.="AND k.gemeinde in (".$gemeinde.") "; |
---|
| 54 | break; |
---|
| 55 | default: // kein Filter |
---|
| 56 | break; |
---|
[66] | 57 | } |
---|
[83] | 58 | $sql.="ORDER BY k.bezeichnung, g.bezeichnung, k.lage LIMIT $2 ;";
$v=array($match,$linelimit); |
---|
[68] | 59 | $res=pg_prepare("", $sql); |
---|
| 60 | $res=pg_execute("", $v); |
---|
| 61 | if (!$res) {return "\n<p class='err'>Fehler bei Name</p>";} |
---|
| 62 | $cnt = 0;
while($row = pg_fetch_array($res)) { |
---|
| 63 | $sname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); |
---|
[66] | 64 | $gkey=$row["schluesselgesamt"]; // Land-Kreis-Gem-Strasse |
---|
[68] | 65 | $gemname=htmlentities($row["gemname"], ENT_QUOTES, "UTF-8"); |
---|
[83] | 66 | $skey=$row["lage"]; |
---|
[68] | 67 | echo "\n\t<div class='stl' title='Straßenschlüssel ".$skey."'>"; |
---|
[66] | 68 | if (trim($skey, "0..9") == "") { // Integer |
---|
[68] | 69 | echo "<a class='stl' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&str_schl=".$gkey."'>".$sname."</a>"; |
---|
| 70 | } else { // Klassifizierung? |
---|
[86] | 71 | echo $sname; // nicht brauchbar fuer ax_lagebezeichnungmithausnummer.lage (Integer) |
---|
[68] | 72 | } |
---|
| 73 | switch ($gfilter) { |
---|
[86] | 74 | case 0: // Kein Filter |
---|
[85] | 75 | echo " in ".$gemname; |
---|
| 76 | break; |
---|
| 77 | case 2: // Liste |
---|
| 78 | echo " in ".$gemname; |
---|
| 79 | break; |
---|
| 80 | default: // Einzelwert |
---|
| 81 | break; |
---|
| 82 | } |
---|
| 83 | echo "</div>"; |
---|
| 84 | $cnt++;
|
---|
[66] | 85 | }
|
---|
| 86 | if($cnt == 0) { |
---|
| 87 | echo "<p>Keine Straße.</p>"; |
---|
| 88 | } elseif($cnt == 1) { // Eindeutig |
---|
| 89 | $str_schl=$gkey; // dann gleich weiter |
---|
| 90 | } elseif($cnt >= $linelimit) { |
---|
[68] | 91 | echo "<p>.. und weitere</p>";
|
---|
[66] | 92 | } |
---|
| 93 | return;
|
---|
| 94 | }
|
---|
| 95 | |
---|
| 96 | function suchStrKey() { |
---|
| 97 | // Strassen nach Strassen-Schluessel |
---|
[68] | 98 | global $con, $street, $scalestr, $str_schl, $gkz, $gemeinde, $epsg, $gfilter, $debug; |
---|
[83] | 99 | $linelimit=50; |
---|
[86] | 100 | if(preg_match("/\*/",$street)) {
|
---|
[68] | 101 | $match=trim(preg_replace("/\*/i","%",$street)); |
---|
| 102 | // -> Anwender muss fuehrende Nullen eingeben oder fuehrende Wildcard
|
---|
| 103 | } else {
|
---|
| 104 | $match=str_pad($street, 5, "0", STR_PAD_LEFT); // "Wie eine Zahl" verarbeiten
|
---|
| 105 | } |
---|
| 106 | //if ($debug >= 2) {echo "<p>sql-Match='".$match."'</p>";} |
---|
| 107 | $sql ="SELECT g.bezeichnung AS gemname, k.bezeichnung, k.schluesselgesamt, k.lage "; |
---|
| 108 | $sql.="FROM ax_lagebezeichnungkatalogeintrag as k "; |
---|
| 109 | $sql.="JOIN ax_gemeinde g ON k.land=g.land AND k.regierungsbezirk=g.regierungsbezirk AND k.kreis=g.kreis AND k.gemeinde=g.gemeinde "; |
---|
| 110 | $sql.="WHERE k.lage LIKE $1 "; |
---|
| 111 | |
---|
| 112 | switch ($gfilter) { |
---|
[85] | 113 | case 1: // Einzelwert |
---|
| 114 | $sql.="AND k.gemeinde=".$gemeinde." "; |
---|
| 115 | break; |
---|
| 116 | case 2: // Liste |
---|
| 117 | $sql.="AND k.gemeinde in (".$gemeinde.") "; |
---|
| 118 | break; |
---|
| 119 | default: // kein Filter |
---|
| 120 | break; |
---|
| 121 | } |
---|
| 122 | |
---|
[68] | 123 | $sql.="ORDER BY k.lage, k.bezeichnung LIMIT $2 ;";
$v=array($match,$linelimit); |
---|
[85] | 124 | $res=pg_prepare("", $sql); |
---|
[68] | 125 | $res=pg_execute("", $v); |
---|
| 126 | if (!$res) {return "\n<p class='err'>Fehler bei Schlüssel</p>";} |
---|
| 127 | $cnt = 0;
while($row = pg_fetch_array($res)) { |
---|
| 128 | $sname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); |
---|
| 129 | $gkey=$row["schluesselgesamt"]; |
---|
| 130 | $gemname=htmlentities($row["gemname"], ENT_QUOTES, "UTF-8"); |
---|
| 131 | $skey=$row["lage"]; |
---|
| 132 | echo "\n\t<div class='stl' title='Straßenschlüssel ".$skey."'>"; |
---|
| 133 | echo $skey." <a class='st' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&str_schl=".$gkey."' title='".$gemname."'>".$sname; |
---|
| 134 | echo "</a>"; |
---|
| 135 | |
---|
| 136 | switch ($gfilter) { |
---|
[86] | 137 | case 0: // Kein Filter |
---|
[68] | 138 | echo " in ".$gemname; |
---|
[85] | 139 | break; |
---|
| 140 | case 2: // Liste |
---|
| 141 | echo " in ".$gemname; |
---|
| 142 | break; |
---|
| 143 | default: // Einzelwert |
---|
| 144 | break; |
---|
| 145 | } |
---|
| 146 | |
---|
| 147 | echo "</div>"; |
---|
| 148 | $cnt++;
|
---|
| 149 | }
|
---|
| 150 | if($cnt == 0) { |
---|
[68] | 151 | echo "\n<p>Keine Straße mit Schlüssel ".$match."</p>"; |
---|
| 152 | } elseif($cnt == 1) { // Eindeutig |
---|
| 153 | $str_schl=$gkey; // dann gleich weiter |
---|
| 154 | } elseif($cnt >= $linelimit) { |
---|
| 155 | echo "\n<p>.. und weitere</p>";
|
---|
| 156 | } else { |
---|
| 157 | echo "\n<p class='hilfe'>".$cnt." Straßen</p>"; |
---|
| 158 | } |
---|
| 159 | return;
|
---|
| 160 | } |
---|
| 161 | |
---|
| 162 | function suchHausZurStr($showParent){
|
---|
| 163 | // Haeuser zu einer Strasse |
---|
| 164 | global $con, $str_schl, $gkz, $scalestr, $scalehs, $epsg, $gemeinde, $epsg, $gfilter, $debug; |
---|
| 165 | // Strasse zum Strassenschluessel |
---|
[83] | 166 | $sql ="SELECT g.bezeichnung AS gemname, k.bezeichnung, k.land, k.regierungsbezirk, k.kreis, k.gemeinde, k.lage "; |
---|
| 167 | $sql.="FROM ax_lagebezeichnungkatalogeintrag as k "; |
---|
[86] | 168 | $sql.="JOIN ax_gemeinde g ON k.land=g.land AND k.regierungsbezirk=g.regierungsbezirk AND k.kreis=g.kreis AND k.gemeinde=g.gemeinde "; |
---|
[66] | 169 | $sql.="WHERE k.schluesselgesamt = $1 LIMIT 1"; |
---|
[83] | 170 | |
---|
| 171 | $v=array($str_schl); |
---|
| 172 | $res=pg_prepare("", $sql); |
---|
| 173 | $res=pg_execute("", $v); |
---|
| 174 | if($row = pg_fetch_array($res)) { // Strassenschluessel gefunden
$sname=$row["bezeichnung"]; |
---|
[66] | 175 | $land =$row["land"]; |
---|
| 176 | $regb =$row["regierungsbezirk"]; |
---|
| 177 | $kreis=$row["kreis"]; |
---|
| 178 | $gemnd=$row["gemeinde"]; |
---|
| 179 | $gemname=htmlentities($row["gemname"], ENT_QUOTES, "UTF-8"); |
---|
| 180 | if ($dbvers=="05") { // 2011-07-25 |
---|
| 181 | $nr=ltrim($row["lage"], "0"); |
---|
| 182 | } else { // >= PostNAS 0.6 |
---|
| 183 | $nr=$row["lage"]; |
---|
[83] | 184 | } |
---|
[105] | 185 | |
---|
| 186 | if ($showParent) { |
---|
| 187 | // eine Koordinate zur Strasse besorgen |
---|
| 188 | // ax_Flurstueck >zeigtAuf> ax_LagebezeichnungOhneHausnummer |
---|
| 189 | $sqlko ="SELECT "; |
---|
[83] | 190 | if($epsg == "25832") { // Transform nicht notwendig |
---|
| 191 | $sqlko.="x(st_Centroid(f.wkb_geometry)) AS x, "; |
---|
| 192 | $sqlko.="y(st_Centroid(f.wkb_geometry)) AS y "; |
---|
| 193 | } else { |
---|
| 194 | $sqlko.="x(st_transform(st_Centroid(f.wkb_geometry), ".$epsg.")) AS x, "; |
---|
[86] | 195 | $sqlko.="y(st_transform(st_Centroid(f.wkb_geometry), ".$epsg.")) AS y "; |
---|
| 196 | } |
---|
| 197 | $sqlko.="FROM ax_lagebezeichnungohnehausnummer o "; |
---|
| 198 | $sqlko.="JOIN alkis_beziehungen v ON o.gml_id=v.beziehung_zu "; |
---|
| 199 | $sqlko.="JOIN ax_flurstueck f ON v.beziehung_von=f.gml_id "; |
---|
| 200 | $sqlko.="WHERE o.land= $1 AND o.regierungsbezirk= $2 AND o.kreis= $3 AND o.gemeinde= $4 AND o.lage= $5 "; |
---|
| 201 | $sqlko.="AND v.beziehungsart='zeigtAuf' LIMIT 1;"; // die erstbeste beliebige Koordinate |
---|
[83] | 202 | $v=array($land,$regb,$kreis,$gemnd,$nr); |
---|
| 203 | $resko=pg_prepare("", $sqlko); |
---|
| 204 | $resko=pg_execute("", $v); |
---|
| 205 | if ($resko) { |
---|
| 206 | $rowko=pg_fetch_array($resko); |
---|
| 207 | $x=$rowko["x"]; |
---|
| 208 | $y=$rowko["y"]; |
---|
| 209 | } else { |
---|
| 210 | echo "\n<p class='err'>Fehler bei Koordinate zur Straße</p>"; |
---|
| 211 | } |
---|
| 212 | $sqlko.=""; |
---|
| 213 | |
---|
| 214 | echo "\n<div class='stu'>"; |
---|
| 215 | if ($x > 0) { // Koord. bekommen? |
---|
| 216 | echo "\n\t<a title='Positionieren 1:".$scalestr."' href='javascript:"; // mit Link |
---|
| 217 | echo "parent.parent.parent.mb_repaintScale(\"mapframe1\",".$x.",".$y.",".$scalestr."); "; |
---|
| 218 | echo "parent.parent.showHighlight(".$x.",".$y."); "; |
---|
| 219 | echo "document.location.href=\"".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&str_schl=".$str_schl."\"' ";
echo "\n\t\tonmouseover='parent.parent.showHighlight(" .$x. "," .$y. ")' ";
|
---|
| 220 | echo "\n\t\tonmouseout='parent.parent.hideHighlight()'"; |
---|
[115] | 221 | echo ">\n\t\t".$sname." (".$nr.")\n\t</a>"; |
---|
| 222 | } else { // keine Koord. dazu gefunden |
---|
| 223 | echo $sname." (".$nr.")"; // nur Anzeige, ohne Link |
---|
| 224 | } |
---|
[83] | 225 | |
---|
| 226 | switch ($gfilter) { |
---|
| 227 | case 0: // Kein Filter |
---|
| 228 | echo " in ".$gemname; |
---|
| 229 | break; |
---|
| 230 | case 2: // Liste |
---|
[85] | 231 | echo " in ".$gemname; |
---|
| 232 | break; |
---|
| 233 | default: // Einzelwert |
---|
| 234 | break; |
---|
| 235 | } |
---|
| 236 | echo "\n</div>"; |
---|
| 237 | } |
---|
| 238 | echo "\n<hr>"; |
---|
| 239 | // Haeuser zum Strassenschluessel |
---|
| 240 | $sql ="SELECT replace (h.hausnummer, ' ','') AS hsnr, "; |
---|
| 241 | |
---|
[83] | 242 | if($epsg == "25832") { // Transform nicht notwendig |
---|
[66] | 243 | $sql.="x(st_Centroid(g.wkb_geometry)) AS x, "; |
---|
[83] | 244 | $sql.="y(st_Centroid(g.wkb_geometry)) AS y "; |
---|
[66] | 245 | } |
---|
[68] | 246 | else { |
---|
[86] | 247 | $sql.="x(st_transform(st_Centroid(g.wkb_geometry), ".$epsg.")) AS x, "; |
---|
| 248 | $sql.="y(st_transform(st_Centroid(g.wkb_geometry), ".$epsg.")) AS y "; |
---|
| 249 | } |
---|
| 250 | $sql.="FROM ax_lagebezeichnungmithausnummer h "; |
---|
| 251 | $sql.="JOIN alkis_beziehungen v ON h.gml_id=v.beziehung_zu "; |
---|
| 252 | $sql.="JOIN ax_gebaeude g ON v.beziehung_von=g.gml_id "; |
---|
| 253 | $sql.="WHERE h.land= $1 AND h.regierungsbezirk= $2 AND h.kreis= $3 AND h.gemeinde= $4 AND h.lage= $5 "; // integer |
---|
| 254 | $sql.="AND v.beziehungsart='zeigtAuf' "; |
---|
| 255 | $sql.="ORDER BY lpad(split_part(hausnummer,' ',1), 4, '0'), split_part(hausnummer,' ',2);"; |
---|
[66] | 256 | $v=array($land,$regb,$kreis,$gemnd,$nr); |
---|
| 257 | $resh=pg_prepare("", $sql); |
---|
| 258 | $resh=pg_execute("", $v); |
---|
[83] | 259 | $cnt=0;
|
---|
[66] | 260 | $count=0;
echo "\n<table>";
|
---|
[68] | 261 | // mehrere Hausnummern je Zeile ausgeben
while($rowh = pg_fetch_array($resh)) { |
---|
[83] | 262 | if($count == 0){echo "\n<tr>";} |
---|
[68] | 263 | $gml=$rowh["gml_id"]; |
---|
| 264 | $nr=$rowh["hsnr"]; |
---|
[66] | 265 | $x=$rowh["x"];
|
---|
| 266 | $y=$rowh["y"];
|
---|
[68] | 267 | echo "\n\t<td class='hsnr'>"; |
---|
[66] | 268 | echo "<a href='"; |
---|
| 269 | echo "javascript:parent.parent.parent.mb_repaintScale(\"mapframe1\",".$x.",".$y.",".$scalehs."); "; |
---|
[68] | 270 | echo "parent.parent.showHighlight(".$x.",".$y.");' "; |
---|
[66] | 271 | echo "onmouseover='parent.parent.showHighlight(".$x.",".$y.")' ";
|
---|
[68] | 272 | echo "onmouseout='parent.parent.hideHighlight()"; |
---|
[66] | 273 | echo "'>".$nr."</a>"; |
---|
| 274 | echo "</td>";
|
---|
| 275 | $cnt++;
|
---|
| 276 | $count++;
|
---|
[115] | 277 | if($count == 6) { |
---|
| 278 | echo "\n</tr>"; |
---|
[66] | 279 | $count = 0; |
---|
| 280 | }
|
---|
| 281 | }
|
---|
[68] | 282 | if($count > 0) {echo "\n</tr>";} |
---|
[66] | 283 | echo "\n</table>"; |
---|
| 284 | echo "\n<p class='hilfe'>".$cnt." Hausnummern</p>";
|
---|
| 285 | } else { |
---|
| 286 | echo "\n<p class='err'>Keine Straße.</p>"; |
---|
| 287 | }
|
---|
| 288 | return;
|
---|
| 289 | }
|
---|
| 290 | // =========== |
---|
| 291 | // Start hier! |
---|
| 292 | // =========== |
---|
| 293 | if(isset($epsg)) { |
---|
[83] | 294 | if ($debug >= 2) {echo "\n<p>aktueller EPSG='".$epsg."'</p>";} // aus MB |
---|
[66] | 295 | $epsg = str_replace("EPSG:", "" , $_REQUEST["epsg"]); |
---|
| 296 | } else { |
---|
| 297 | if ($debug >= 1) {echo "\n<p class='err'>kein EPSG gesetzt</p>";} |
---|
| 298 | $epsg=$gui_epsg; // aus Conf |
---|
| 299 | } |
---|
| 300 | if ($debug >= 2) { |
---|
| 301 | echo "<p>Filter Gemeinde = ".$gemeinde."</p>"; |
---|
[68] | 302 | } |
---|
[86] | 303 | if ($gemeinde == "") { |
---|
[66] | 304 | $gfilter = 0; // ungefiltert |
---|
[86] | 305 | } elseif(strpos($gemeinde, ",") === false) { |
---|
[66] | 306 | $gfilter = 1; // Einzelwert |
---|
| 307 | } else { |
---|
| 308 | $gfilter = 2; // Liste |
---|
[85] | 309 | } |
---|
[66] | 310 | if (isset($str_schl)) { // aus Link
|
---|
[85] | 311 | if ($debug >= 2) {echo "\n<p>Link Strassenschluessel '".$str_schl."'</p>";} |
---|
| 312 | suchHausZurStr(true); |
---|
| 313 | } elseif(isset($street)) { // Eingabe in Form
if (trim($street, "*,0..9") == "") { // Zahl mit Wildcard |
---|
| 314 | if ($debug >= 2) {echo "\n<p>Suche Key='".$street."'</p>";}
|
---|
| 315 | suchStrKey(); // Suche nach Schluessel
|
---|
| 316 | } else { |
---|
| 317 | if ($debug >= 2) {echo "\n<p>Suche Name='".$street."'</p>";} |
---|
[83] | 318 | suchStrName(); // Suche nach Name
|
---|
[86] | 319 | }
|
---|
[83] | 320 | if(isset($str_schl)) { // Eindeutiges Ergebnis
|
---|
| 321 | if ($debug >= 2) {echo "\n<p>weitere Suche Haus zu ='".$str_schl."'</p>";} |
---|
| 322 | suchHausZurStr(false);
} |
---|
[68] | 323 | } |
---|
| 324 | ?> |
---|
[66] | 325 | |
---|
[68] | 326 | </body>
|
---|
[66] | 327 | </html> |
---|