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