Changeset 283 for trunk/mapbender/http/nav/alkisnav_grd.php
- Timestamp:
- 05/08/13 16:44:28 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/mapbender/http/nav/alkisnav_grd.php
r282 r283 8 8 2013-04-29 Test mit IE 9 9 2013-05-07 Strukturierung des Programms, redundanten Code in Functions zusammen fassen 10 2013-05-08 Hervorhebung aktuelles Objekt, in Arbeit ... 10 11 */ 11 12 $cntget = extract($_GET); … … 59 60 // Das eingegebene Grundbuch-Kennzeichen auseinander nehmen (gggg-999999z-BVNR) 60 61 // Return: 9=Fehler, 0=Listen alle Bezirke 1=Such Bezirk-Name 61 // 2=Such Bezirk-Nummer $zgbbez, 3=Such Blatt $zblatt, 4=Such BVNR $zbvnr62 // 2=Such Bezirk-Nummer, 3=Such Blatt, 4=Such Buchung BVNR 62 63 global $debug, $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr; 63 64 $arr=explode("-", $gbkennz, 3); … … 71 72 } elseif ($zblatt == "") { 72 73 return 2; // Such Bezirk-NUMMER 73 } else 74 } else { // Format von BlattNr pruefen 74 75 //'19' linksbÃŒndig 75 76 //'000019 ' gefÃŒllt 6 + blank … … 108 109 } 109 110 110 function ListAG($liste_ag ) {111 function ListAG($liste_ag, $aktuell) { 111 112 // Amtsgerichte (Grundbuch) auflisten, dazu als Filter eine AG-Liste 112 global $ con, $gkz, $gemeinde, $epsg, $debug, $gbkennz;113 global $debug; 113 114 $linelimit=40; 114 115 $sql ="SELECT a.stelle, a.bezeichnung AS ag FROM ax_dienststelle a "; … … 119 120 if (!$res) { 120 121 echo "\n<p class='err'>Fehler bei Amtsgerichte</p>"; 121 if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}122 #if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";} 122 123 return 0; 123 124 } … … 126 127 $anr=$row["stelle"]; 127 128 $ag=$row["ag"]; 128 zeile_ag ($ag, $anr );129 zeile_ag ($ag, $anr, $aktuell); 129 130 $cnt++; 130 131 } … … 144 145 // Auch wenn BlÀtter da sind, kann es eine Sackgasse sein. 145 146 // Manchmal haben die BlÀtter keine FlurstÃŒcke im Filter-Bereich 146 global $ con, $gkz, $gemeinde, $epsg, $debug, $gbkennz;147 global $debug; 147 148 $linelimit=100; // Bezirke/AG 149 148 150 // Head 149 ListAG( "'".$agkey."'" ); // hier nur fÃŒr 1 151 ListAG("'".$agkey."'", true); // hier nur fÃŒr 1 152 150 153 // Body 151 154 $sql ="SELECT g.bezirk, g.bezeichnung FROM ax_buchungsblattbezirk g "; … … 167 170 $gnam=$row["bezeichnung"]; 168 171 $gnr=$row["bezirk"]; 169 zeile_gbbez($gnam, $gnr );172 zeile_gbbez($gnam, $gnr, false); 170 173 $cnt++; 171 174 } … … 181 184 } 182 185 183 function ag_bez_head($gbbez ) {186 function ag_bez_head($gbbez, $bezaktuell) { 184 187 // Zu einem Grundbuchbezirks-SchlÃŒssel die Zeilen AG und Bezirk ausgeben 185 188 // Parameter = SchlÃŒssel des Bezirks 189 #global $debug; 186 190 $sql ="SELECT a.stelle, a.bezeichnung AS ag, g.bezeichnung FROM ax_buchungsblattbezirk g "; 187 191 $sql.="JOIN ax_dienststelle a ON g.stelle=a.stelle WHERE g.bezirk= $1 LIMIT 1;"; … … 198 202 $ag=$row["ag"]; // AG Bezeichnung 199 203 $anr=$row["stelle"]; // AG Key 200 zeile_ag($ag, $anr ); // Amtsgericht201 zeile_gbbez($gnam, $gbbez ); // Bezirk204 zeile_ag($ag, $anr, false); // Amtsgericht 205 zeile_gbbez($gnam, $gbbez, $bezaktuell); // Bezirk 202 206 } else { 203 207 echo "\n<div class='gk' title='Grundbuchbezirk'>"; … … 212 216 function SuchGBBezName() { 213 217 // Grundbuch-Bezirk suchen nach Name(-nsanfang) 214 global $ con, $gkz, $gemeinde, $debug, $gbkennz;218 global $gkz, $gemeinde, $debug, $gbkennz; 215 219 $linelimit=80; 216 220 $sql ="SELECT a.stelle, a.bezeichnung AS ag, g.bezirk, g.bezeichnung FROM ax_buchungsblattbezirk g "; … … 241 245 $gwag = $anr; 242 246 $ag=$row["ag"]; 243 zeile_ag($ag, $anr );247 zeile_ag($ag, $anr, false); 244 248 } 245 249 $gnam=$row["bezeichnung"]; 246 250 $gnr=$row["bezirk"]; 247 zeile_gbbez ($gnam, $gnr );251 zeile_gbbez ($gnam, $gnr, false); 248 252 $cnt++; 249 253 } … … 263 267 function EinBezirk($showParent) { 264 268 // Kennzeichen bestehend nur aus GB-Bezirk-SchlÃŒssel wurde eingegeben 265 global $ con, $gkz, $gemeinde, $epsg, $debug, $zgbbez, $auskpath;269 global $gemeinde, $debug, $zgbbez, $auskpath; 266 270 $linelimit=300; // max. Blatt je Bezirk 267 271 // Dies Limit ist nicht ausreichend fÃŒr alle BlÀtter eines Bezirks, aber ... … … 272 276 // Head 273 277 if ($showParent) { 274 ag_bez_head($zgbbez ); // AG und BEZ ausgeben278 ag_bez_head($zgbbez, true); // AG und BEZ ausgeben 275 279 } 276 280 // Body … … 288 292 $blatt=$row["blatt"]; 289 293 $blattgml=$row["gml_id"]; 290 zeile_blatt($zgbbez, $gnam, $blattgml, $blatt, false, "" );294 zeile_blatt($zgbbez, $gnam, $blattgml, $blatt, false, "", false); 291 295 $cntbl++; 292 296 } … … 298 302 // +++ Hier oft ÃŒberschritten! BlÀtter-Funktion einfÃŒhren 299 303 echo "\n<p>Geben sie ein: '".$zgbbez."-999A'<br>wobei '999A' = gesuchtes GB-Blatt</p>"; 300 301 // Vorbelegen des Eingabefeldes fÃŒr neue Suche? 302 echo "<script type='text/javascript'>parent.GrdGazetteerFrame.gbkennz.value='".$zgbbez."-??';</script>"; 303 304 // Vorbelegen des Eingabefeldes fÃŒr neue Suche 305 echo "<script type='text/javascript'>parent.GrdGazetteerFrame.gbkennz.value='".$zgbbez."-?';</script>"; 304 306 } elseif ($cntbl > 1) { 305 307 echo "\n<p class='anz'>".$cntbl." Blätter</p>"; // im Limit … … 310 312 function gml_blatt() { 311 313 // Kennzeichen "Bezirk + Blatt" eingegeben. Dazu die gml_id des Blattes ermitteln. 312 global $ con, $gkz, $debug, $zgbbez, $zblatt, $zblattn, $zblattz;314 global $debug, $zgbbez, $zblatt, $zblattn, $zblattz; 313 315 $sql ="SELECT b.gml_id, b.buchungsblattnummermitbuchstabenerweiterung AS blatt FROM ax_buchungsblatt b "; 314 316 $sql.="WHERE b.bezirk= $1 AND b.buchungsblattnummermitbuchstabenerweiterung "; … … 342 344 function EinBlatt($showParent) { 343 345 // Kennzeichen Bezirk + Blatt wurde eingegeben oder verlinkt 344 global $ con, $gkz, $debug, $gemeinde, $epsg, $zgbbez, $zblatt, $blattgml, $gbbeznam;346 global $debug, $gemeinde, $zgbbez, $zblatt, $blattgml, $gbbeznam; 345 347 // Head 346 348 if ($showParent) { 347 ag_bez_head($zgbbez ); // AG + BEZ348 zeile_blatt ($zgbbez, $gbbeznam, $blattgml, $zblatt, false, "" );349 ag_bez_head($zgbbez, false); // AG + BEZ 350 zeile_blatt ($zgbbez, $gbbeznam, $blattgml, $zblatt, false, "", true); 349 351 } 350 352 // Body 351 GB_Buchung_FS(200 ); // Blatt -> Buchung -> Flurstueck (max. 200)353 GB_Buchung_FS(200, $zgbbez."-".$zblatt); // Blatt -> Buchung -> Flurstueck (max. 200) 352 354 return; 353 355 } … … 356 358 // Kennzeichen "Bezirk + Blatt + BVNR" wurde eingegeben. 357 359 // Dazu die gml_id der Buchungsstelle ermitteln, um "function EinGrundstueck" benutzen zu können. 358 global $ con, $gkz, $debug, $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr;360 global $debug, $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr; 359 361 // Blatt -> B u c h u n g s s t e l l e 360 362 $sql ="SELECT s.gml_id FROM ax_buchungsstelle s "; … … 394 396 // Die gml_id der Buchungsstelle (BVNR, GrundstÃŒck) ist bekannt = $buchunggml 395 397 // Die gebuchten FlurstÃŒcke und dienende/herrschenden Buchungen werden ausgegeben. 396 global $ con, $gkz, $debug, $gemeinde, $epsg, $scalefs, $epsg, $auskpath, $buchunggml, $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr, $gfilter;398 global $debug, $gemeinde, $epsg, $buchunggml, $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr, $gfilter; 397 399 // NoLimit? 400 401 // Head 398 402 if ($showParent) { // wenn Kennzeichen bekannt ist, dann auch Blatt ausgeben 399 403 if ($zgbbez.$zblatt != "") { 400 ag_bez_head($zgbbez ); // AG + BEZ401 zeile_blatt ($zgbbez, $gnam, "", $zblatt, false, "" );404 ag_bez_head($zgbbez, false); // AG + BEZ 405 zeile_blatt ($zgbbez, $gnam, "", $zblatt, false, "", false); 402 406 // $gnam leer lassen Knoten "Bezirk" steht drÃŒber 403 407 } else { 404 408 echo "<p class='err'>Kennzeichen Bezirk und Blatt nicht gesetzt</p>"; 405 // +++ Dann suche sie !! 406 } 407 zeile_buchung ($buchunggml, $zbvnr, $zgbbez."-".$zblattn.$zblattz."-".$zbvnr, false); 408 } 409 409 } // ++ suchen! 410 zeile_buchung($buchunggml, $zbvnr, $zgbbez."-".$zblattn.$zblattz, false, true); 411 } 410 412 // SQL-Bausteine 411 413 // dienend $1 gml_id von 412 414 // Buchungsstelle <vs/an< Buchungsstelle sh 413 415 // (dienend) (herrschend) 414 //415 416 // direkt $1 gml_id von 416 417 // Buchungsstelle <vs/istGebucht< FlurstÃŒck > Gemarkung 417 //418 418 // Recht $1 gml_id von 419 419 // Buchungsstelle >vs/an> Buchungsstelle sd <vf/istGebucht< FlurstÃŒck > Gemarkung 420 // (herrschend) (dienend) 421 // sd >vd/istBestandteilVon> bd > gd 422 423 // Anfang gleich (Select-Liste)420 // (herrschend) (dienend) sd >vd/istBestandteilVon> bd > gd 421 422 // Body 423 // Anfang (Select-Liste) gleich 424 424 $sqlanf ="SELECT g.gemeinde, g.gemarkungsname, f.gml_id, f.flurnummer, f.zaehler, f.nenner, "; 425 425 if($epsg == "25832") { // Transform nicht notwendig … … 461 461 $fskenn=$row["zaehler"]; 462 462 if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // BruchNr 463 zeile_flurstueck ($fs_gml, $fskenn, $row["x"], $row["y"], $gmkg, $flur 463 zeile_flurstueck ($fs_gml, $fskenn, $row["x"], $row["y"], $gmkg, $flur, false); 464 464 $zfs1++; 465 465 } 466 // Zwischen-Foot 466 467 if($zfs1 == 0) { 467 468 echo "\n<p class='anz'>Kein Flurstück direkt</p>"; … … 512 513 if ($gwblatt != $dienblatt) { // Gruppierung Blatt - dienend 513 514 $gwblatt = $dienblatt; // Steuerg GW Blatt 514 zeile_blatt 515 zeile_blatt($dienbezirk, $diengbbez, $dienbltgml, $dienblatt, true, ""); 515 516 $gwbvnr=""; 516 517 } 517 518 if ($gwbvnr != $dienlfd) { // Gruppierung Buchung (BVNR) - dienend 518 519 $gwbvnr = $dienlfd; // Steuerg GW BVNR 519 zeile_buchung($diengml, $dienlfd, $dienbezirk."-".$dienblatt lnk."-".$dienlfd, true);520 zeile_buchung($diengml, $dienlfd, $dienbezirk."-".$dienblatt, true); 520 521 } // ++ Buchungsart? Welches Recht? 521 522 $fs_gml=$row["gml_id"]; … … 525 526 $fskenn=$row["zaehler"]; 526 527 if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // BruchNr 527 zeile_flurstueck ($fs_gml, $fskenn, $row["x"],$row["y"], $gmkg, $flur 528 zeile_flurstueck ($fs_gml, $fskenn, $row["x"],$row["y"], $gmkg, $flur, false); 528 529 $zfs2++; 529 530 } 531 532 // Teil 3 533 // ++ Wenn nur 1 GrundstÃŒck untersucht wird, dann dazu auch die 534 // berechtigten (herrschenden) GrundbÃŒcher anzeigen und verlinken (ohne FS)) 535 536 // Foot 530 537 if($zfs2 == 0 AND $zfs1 == 0) { 531 538 echo "\n<p class='anz'>Kein Recht an Flst.</p>"; … … 559 566 // Dann hat das Prioritaet, also *nicht* nach $gbkennz suchen. 560 567 if ($buchunggml != "") { // gml der Buchungsstelle 561 $trans="Flurst . zur Buchungsstelle (Link)";568 $trans="Flurstücke zur Buchungsstelle"; // Link 562 569 EinGrundstueck(true); 563 570 … … 575 582 case 0: // keine Eingabe 576 583 $trans="Liste der Amtsgerichte"; 577 ListAG($ag_liste );584 ListAG($ag_liste, false); 578 585 break; 579 586 case 1: // Eingabe Bezirk-Name (-Teil) -> gefilterte Liste der Bezirke … … 604 611 $buchunggml=gml_buchungsstelle(); // gml_id zum Kennzeichen 605 612 if ($buchunggml != "") { // .. wurde geliefert 606 $trans="Flurst . zur Buchungsstelle (Eingabe)";613 $trans="Flurstücke zur Buchungsstelle"; // Eingabe 607 614 EinGrundstueck(true); // mit Backlink 608 615 } else{ … … 617 624 } 618 625 // Titel im Kopf anzeigen 619 echo "\n<script type='text/javascript'>\n\ttranstitle('".$trans."')\n</script>"; 626 echo " 627 <script type='text/javascript'> 628 transtitle('".$trans."'); 629 </script>"; 620 630 621 631 ?>
Note: See TracChangeset
for help on using the changeset viewer.