Changeset 278 for trunk/mapbender/http/nav/alkisnav_grd.php
- Timestamp:
- 04/26/13 13:52:56 (11 years ago)
- File:
-
- 1 edited
-
trunk/mapbender/http/nav/alkisnav_grd.php (modified) (22 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/mapbender/http/nav/alkisnav_grd.php
r276 r278 1 1 <?php 2 2 /* Version vom 3 2011-10-24 Nach Pos-Klick Highlight erneuern statt hideHighlight 4 2011-11-17 Nachweis-Links ÃŒber javascript im neuen Hochformat-Fenster 5 2011-12-14 "window.open(..,width=680" 6 2012-01-16 Blattnummer in 2 Varianten suchen 7 2012-01-17 Blattnummer ohne Buchstabe in 3 Varianten suchen 8 2013-04-16 "import_request_variables" entfÀllt in PHP 5.4 3 2011-10-24 Nach Pos-Klick Highlight erneuern statt hideHighlight 4 2011-11-17 Nachweis-Links ÃŒber javascript im neuen Hochformat-Fenster 5 2011-12-14 "window.open(..,width=680" 6 2012-01-16 Blattnummer in 2 Varianten suchen 7 2012-01-17 Blattnummer ohne Buchstabe in 3 Varianten suchen 8 2013-04-16 "import_request_variables" entfÀllt in PHP 5.4 9 2013-04-26 Ersetzen View "gemeinde_gemarkung" durch Tabelle "pp_gemarkung" 10 Code aus _eig nach_fkt ausgelegert, hier mit nutzen. 11 Dazu Var-Namen harmonisieren: $gblatt wird $blattgml 12 ZurÃŒck-Link, Titel der Transaktion anzeigen. 9 13 */ 10 14 $cntget = extract($_GET); 11 include("../../conf/alkisnav_conf.php"); 15 16 include("../../conf/alkisnav_conf.php"); // Konfigurations-Einstellungen 17 include("alkisnav_fkt.php"); // Funktionen 18 12 19 $con_string = "host=".$host." port=".$port." dbname=".$dbname.$dbvers.$gkz." user=".$user." password=".$password; 13 20 $con = pg_connect ($con_string) or die ("Fehler bei der Verbindung zur Datenbank ".$dbname.$dbvers.$gkz); 14 ?> 15 21 echo <<<END 16 22 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> 17 23 <html> … … 28 34 window.open(link,'','left=10,top=10,width=680,height=800,resizable=yes,menubar=no,toolbar=no,location=no,status=no,scrollbars=yes'); 29 35 } 36 function transtitle(trans) { 37 document.getElementById('transaktiontitle').innerHTML = trans; 38 } 30 39 </script> 31 40 </head> 32 41 <body> 33 34 <?php 42 <a title="zurück" href='javascript:history.back()'> 43 <img src="ico/zurueck.ico" width="16" height="16" alt="<<" /> 44 </a> 45 <dfn class='title' id='transaktiontitle'></dfn> 46 47 END; 48 35 49 function is_ne_zahl($wert) { 36 50 // Prueft, ob ein Wert ausschlieÃlich aus den Zahlen 0 bis 9 besteht … … 116 130 } 117 131 if($cnt == 0){ // falsch configuriert! 118 echo "\n<p class=' err'>Kein Amtsgericht aus Liste ".$$liste_ag.".</p>";132 echo "\n<p class='anz'>Kein Amtsgericht aus Liste ".$$liste_ag.".</p>"; 119 133 } elseif ($cnt >= $linelimit) { 120 echo "\n<p title='Bitte eindeutiger qualifizieren'>... und weitere</p>"; 134 echo "\n<p title='Bitte eindeutiger qualifizieren'>".$cnt." Amtsgerichte ... und weitere</p>"; 135 } elseif ($cnt > 1) { 136 echo "\n<p class='anz'>".$cnt." Amtsgerichte</p>"; 121 137 } 122 138 return 0; … … 125 141 function ListGBBez($liste_ag, $mit_ag) { 126 142 // Grundbuch-Bezirke auflisten. 143 // +++ auch wenn BlÀtter da sind, kann es eine Sackgasse sein. 144 // +++ manchmal haben die BlÀtter keine FlurstÃŒcke. 127 145 global $con, $gkz, $gemeinde, $epsg, $debug, $gbkennz; 128 $linelimit= 70;146 $linelimit=90; 129 147 $sql ="SELECT a.stelle, a.bezeichnung AS ag, g.bezirk, g.bezeichnung FROM ax_buchungsblattbezirk g "; 130 148 $sql.="JOIN ax_dienststelle a ON g.stelle=a.stelle "; 131 149 $sql.="WHERE a.stelle IN (".$liste_ag.") AND a.stellenart = 1000 "; // Amtsgericht aus Liste 150 // Diese Subquery stellt sicher, dass nur Bezirke aufgelistett werden, die auch BlÀtter enthalten: 151 $sql.="AND NOT (SELECT gml_id FROM ax_buchungsblatt b WHERE b.land=g.land and b.bezirk=g.bezirk LIMIT 1) IS NULL "; 132 152 $sql.="ORDER BY g.bezeichnung LIMIT $1 ;"; 133 153 $res = pg_prepare("", $sql); … … 154 174 $cnt++; 155 175 } 156 if($cnt == 0){ // falsch configuriert157 echo "\n<p class=' err'>Kein Grundbuchbezirk zu den Amtsgerichten ".$liste_ag.".</p>";176 if($cnt == 0){ 177 echo "\n<p class='anz'>Kein Bezirk mit Blättern.</p>"; 158 178 } elseif ($cnt >= $linelimit) { 159 echo "\n<p title='Bitte eindeutiger qualifizieren'>... und weitere</p>"; 179 echo "\n<p class='anz' title='Bitte eindeutiger qualifizieren'>".$cnt." Bezirke ... und weitere</p>"; 180 } elseif($cnt > 1) { 181 echo "\n<p class='anz'>".$cnt." Bezirke</p>"; // im Limit 160 182 } 161 183 return 0; … … 194 216 $ag=htmlentities($row["ag"], ENT_QUOTES, "UTF-8"); 195 217 $anr=$row["stelle"]; 196 echo "\n<div class='gk' title='G B-Bezirk'>";218 echo "\n<div class='gk' title='Grundbuch-Bezirk'>"; 197 219 echo "\n\t\t<img class='nwlink' src='ico/GB-Bezirk.ico' width='16' height='16' alt='Gemkg'> "; 198 220 echo "Bezirk <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&gbkennz=".$gnr."'>"; … … 203 225 } 204 226 if($cnt == 0){ 205 echo "\n<p class=' err'>Kein Grundbuchbezirk.</p>";227 echo "\n<p class='anz'>Kein Grundbuchbezirk.</p>"; 206 228 } elseif ($cnt >= $linelimit) { 207 echo "\n<p title='Bitte eindeutiger qualifizieren'> ... und weitere</p>";229 echo "\n<p title='Bitte eindeutiger qualifizieren'>".$cnt." Bezirke ... und weitere</p>"; 208 230 } elseif ($cnt == 1) { 209 231 return $gnr; // Wenn eindeutig, gleich weiter 232 } elseif ($cnt > 1) { 233 echo "\n<p class='anz'>".$cnt." Bezirke</p>"; // im Limit 210 234 } 211 235 return 0; … … 216 240 global $con, $gkz, $gemeinde, $epsg, $debug, $zgbbez, $auskpath; 217 241 $linelimit=250; // max. Blatt je Bezirk 218 // Dies linelimit ist nicht ausreichend fuer alle Blaetter eines Bezirks, aber ...242 // Dies Limit ist nicht ausreichend fÃŒr alle BlÀtter eines Bezirks, aber ... 219 243 // Wenn man die Blatt-Nr nicht kennt, kommt man hier sowieso nicht weiter. 220 // Es nutzt also nichts, hier Tausende Nummern aufzulisten. 244 // Es nutzt also nichts, hier tausende Nummern aufzulisten. 245 // +++ BlÀtter-Funktion einfÃŒhren analog Modul _eig 221 246 if ($showParent) { 222 247 $sql ="SELECT a.stelle, a.bezeichnung AS ag, g.bezeichnung FROM ax_buchungsblattbezirk g "; 223 $sql.="JOIN ax_dienststelle a ON g.stelle=a.stelle "; 224 $sql.="WHERE g.bezirk= $1 ;"; 248 $sql.="JOIN ax_dienststelle a ON g.stelle=a.stelle WHERE g.bezirk= $1 ;"; 225 249 $v=array($zgbbez); 226 250 $res=pg_prepare("", $sql); … … 279 303 echo "\n\t\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt'>"; 280 304 echo "\n\t</a> "; 281 echo "Blatt <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."& gblatt=".$gml."&gbkennz=".$zgbbez."-".$blatt."'> ".$blattd." </a>";305 echo "Blatt <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&blattgml=".$gml."&gbkennz=".$zgbbez."-".$blatt."'> ".$blattd." </a>"; 282 306 echo "\n</div>"; 283 307 $cntbl++; 284 308 } 285 309 if($cntbl == 0) { 286 echo "\n<p class='err'>Kein Blatt im Bezirk.</p>"; 287 } else { 288 if($cntbl >= $linelimit) { 289 echo "\n<p>... und weitere</p>"; 290 echo "\n<p>Geben sie ein: '".$zgbbez."-999A'<br>wobei '999A' = gesuchtes GB-Blatt</p>"; 291 } 310 echo "\n<p class='anz'>Kein Blatt im Bezirk.</p>"; 311 } elseif($cntbl >= $linelimit) { 312 echo "\n<p class='anz'>".$cntbl." Blätter ... und weitere</p>"; 313 // +++ Hier oft ÃŒberschritten! BlÀtter-Funktion einfÃŒhren 314 echo "\n<p>Geben sie ein: '".$zgbbez."-999A'<br>wobei '999A' = gesuchtes GB-Blatt</p>"; 315 } elseif ($cntbl > 1) { 316 echo "\n<p class='anz'>".$cntbl." Blätter</p>"; // im Limit 292 317 } 293 318 return; … … 320 345 if($cntbl == 0) { 321 346 echo "\n<p class='err'>Grundbuchblatt '".$zgbbez."-".$zblatt."' nicht gefunden.</p>"; 322 } elseif ($cntbl == 1) {347 } elseif ($cntbl == 1) { 323 348 return $bl_gml; 324 349 } … … 326 351 } 327 352 328 function EinBlatt($showParent) { 353 /* 354 function EinBlatt_ALT($showParent) { 329 355 // Kennzeichen Bezirk + Blatt wurde eingegeben 330 global $con, $gkz, $debug, $gemeinde, $epsg, $auskpath, $zgbbez, $zblatt, $zblattn, $zblattz, $gblatt, $zbvnr; 331 332 if ($showParent) { 333 echo "\n<div class='gk' title='GB-Bezirk'>"; 356 // UrsprÃŒngliche Version bis 2013-04-24 357 global $con, $gkz, $debug, $gemeinde, $epsg, $auskpath, $zgbbez, $zblatt, $zblattn, $zblattz, $blattgml, $zbvnr; 358 359 if ($showParent) { 360 // +++ nur der Schluessel ist bekannt. Bezirks-Namen und Amtsgericht noch ermitteln ++++ 361 echo "\n<div class='gk' title='Grundbuch-Bezirk'>"; 334 362 echo "\n\t\t<img class='nwlink' src='ico/GB-Bezirk.ico' width='16' height='16' alt='Bez.'> "; 335 363 echo "Bezirk <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&gbkennz=".$zgbbez."'>"; 336 364 echo $zgbbez."</a>"; 337 // Key ist bekannt. Sollte man sich die Muehe machen, Namen und Amtsgericht zu ermitteln?338 365 echo "\n</div>"; 339 366 echo "\n<div class='gb' title='GB-Blatt'>"; 340 echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisbestnw.php?gkz=".$gkz."&gmlid=".$ gblatt."\")'>";367 echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisbestnw.php?gkz=".$gkz."&gmlid=".$blattgml."\")'>"; 341 368 echo "\n\t\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt'>"; 342 369 echo "\n\t</a> "; 343 echo "Blatt <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."& gblatt=".$gblatt."&gbkennz=".$zgbbez."-".$zblatt."'> ".$zblattn.$zblattz." </a>";370 echo "Blatt <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&blattgml=".$blattgml."&gbkennz=".$zgbbez."-".$zblatt."'> ".$zblattn.$zblattz." </a>"; 344 371 echo "\n</div>"; 345 372 } … … 351 378 // +++ Buchungen ohne FLST weglassen? 352 379 // +++ Counter FLST ausgeben, Buchungen mit 0 weglassen 353 $v=array($ gblatt);380 $v=array($blattgml); 354 381 $res=pg_prepare("", $sql); 355 382 $res=pg_execute("", $v); … … 369 396 } 370 397 if($cntbu == 0) { 371 echo "\n<p class=' err'>Keine Buchung gefunden.</p>";398 echo "\n<p class='anz'>Keine Buchung gefunden.</p>"; 372 399 } elseif($cntbu == 1) { 373 400 $zbvnr=$lfd; // mit dieser BVNR gleich weiter machen … … 380 407 $zblattz=strtoupper(substr($zblatt,$len-1,1)); 381 408 } 409 } else { 410 echo "\n<p class='anz'>".$cntbu."Buchungen.</p>"; 382 411 } 383 412 return $cntbu; 413 } 414 */ 415 416 function EinBlatt($showParent) { 417 // Kennzeichen Bezirk + Blatt wurde eingegeben 418 global $con, $gkz, $debug, $gemeinde, $epsg, $auskpath, $zgbbez, $zblatt, $zblattn, $zblattz, $blattgml, $zbvnr; 419 420 if ($showParent) { 421 // +++ nur der Schluessel ist bekannt. Bezirks-Namen und Amtsgericht noch ermitteln ++++ 422 echo "\n<div class='gk' title='Grundbuch-Bezirk'>"; 423 echo "\n\t\t<img class='nwlink' src='ico/GB-Bezirk.ico' width='16' height='16' alt='Bez.'> "; 424 echo "Bezirk <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&gbkennz=".$zgbbez."'>"; 425 echo $zgbbez."</a>"; 426 echo "\n</div>"; 427 echo "\n<div class='gb' title='GB-Blatt'>"; 428 echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisbestnw.php?gkz=".$gkz."&gmlid=".$blattgml."\")'>"; 429 echo "\n\t\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt'>"; 430 echo "\n\t</a> "; 431 echo "Blatt <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&blattgml=".$blattgml."&gbkennz=".$zgbbez."-".$zblatt."'> ".$zblattn.$zblattz." </a>"; 432 echo "\n</div>"; 433 } 434 435 // Blatt -> Buchungsstelle -> Flurstueck 436 $linelimit = 200; // Max. Anzahl FS 437 GB_Buchung_FS($linelimit); // Externe Function 438 439 return 0; 440 384 441 } 385 442 … … 427 484 // Die gml_id der Buchungsstelle ist bekannt. 428 485 global $con, $gkz, $debug, $gemeinde, $epsg, $scalefs, $epsg, $auskpath, $gbuchung, $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr, $gfilter; 486 // NoLimit? 429 487 if ($showParent) { // wenn Kennzeichen bekannt ist, dann auch Blatt ausgeben 430 if (isset($zgbbez) and isset($zblatt)) { 488 489 if ($zgbbez.$zblatt != "") { 490 // +++ SchlÃŒssel ist bekannt. Namen und Amtsgericht dazu ermitteln 491 // +++ oder Namen als &bez= ÃŒbermitteln? 431 492 echo "\n<div class='gk' title='GB-Bezirk'>"; 432 493 echo "\n\t\t<img class='nwlink' src='ico/GB-Bezirk.ico' width='16' height='16' alt='Bez.'> "; 433 494 echo "<a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&gbkennz=".$zgbbez."'>"; 434 495 echo "Bezirk ".$zgbbez."</a>"; 435 // Key ist bekannt. Sollte man sich die Muehe machen, Namen und Amtsgericht zu ermitteln?436 // ++++ Namen als &bez= ÃŒbermitteln?437 496 echo "\n</div>"; 438 497 echo "\n<div class='gb' title='GB-Blatt'>"; … … 443 502 echo "<p class='err'>Kennzeichen Bezirk und Blatt nicht gesetzt</p>"; 444 503 } 504 445 505 echo "\n<div class='gs'>"; 446 506 echo "\n\t\t<img class='nwlink' title='Grundstück' src='ico/Grundstueck.ico' width='16' height='16' alt='GS'> "; … … 452 512 // +++ Filter "Gemeinde" berÃŒcksichtigt!! Wenn gesetzt. 453 513 454 // Buchungsstelle -> Flurstueck455 $sql ="SELECT t.gemeinde, g.bezeichnung, f.gml_id, f.flurnummer, f.zaehler, f.nenner, ";514 // SQL-Bausteine 515 $sql1 ="SELECT g.gemeinde, g.gemarkungsname, f.gml_id, f.flurnummer, f.zaehler, f.nenner, "; 456 516 if($epsg == "25832") { // Transform nicht notwendig 457 $sql .="st_x(st_Centroid(f.wkb_geometry)) AS x, ";458 $sql .="st_y(st_Centroid(f.wkb_geometry)) AS y ";517 $sql1.="st_x(st_Centroid(f.wkb_geometry)) AS x, "; 518 $sql1.="st_y(st_Centroid(f.wkb_geometry)) AS y "; 459 519 } else { 460 $sql.="st_x(st_transform(st_Centroid(f.wkb_geometry),".$epsg.")) AS x, "; 461 $sql.="st_y(st_transform(st_Centroid(f.wkb_geometry),".$epsg.")) AS y "; 462 } 463 $sql.="FROM ax_gemarkung g "; 464 $sql.="JOIN ax_flurstueck f ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer "; 465 $sql.="JOIN alkis_beziehungen v ON f.gml_id=v.beziehung_von "; 466 $sql.="LEFT JOIN gemeinde_gemarkung t ON g.gemarkungsnummer=t.gemarkung "; 467 $sql.="WHERE v.beziehungsart='istGebucht' AND v.beziehung_zu= $1 "; // id buchungsstelle 468 $sql.="ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;"; 520 $sql1.="st_x(st_transform(st_Centroid(f.wkb_geometry),".$epsg.")) AS x, "; 521 $sql1.="st_y(st_transform(st_Centroid(f.wkb_geometry),".$epsg.")) AS y "; 522 } 523 $sql1.="FROM "; 524 525 $sqla1 ="JOIN alkis_beziehungen vfb ON s1.gml_id = vfb.beziehung_zu "; 526 $sqla2 ="JOIN alkis_beziehungen vfb ON s2.gml_id = vfb.beziehung_zu "; 527 528 // Zwischen-JOIN (zusÀtzlich nur bei zweiter Abfrage) 529 $sqlz ="JOIN alkis_beziehungen vss ON vss.beziehung_von = s1.gml_id "; 530 $sqlz.="JOIN ax_buchungsstelle s2 ON vss.beziehung_zu = s2.gml_id "; 531 532 $sql2 ="JOIN ax_flurstueck f ON .... "; 533 $sql2.="JOIN pp_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkung "; 534 $sql2.="WHERE v.beziehungsart='istGebucht' AND v.beziehung_zu= $1 "; // id buchungsstelle 535 switch ($gfilter) { // Filter Gemeinde 536 case 1: // Einzelwert 537 $sql2.="AND g.gemeinde=".$gemeinde." "; break; 538 case 2: // Liste 539 $sql2.="AND g.gemeinde in (".$gemeinde.") "; break; 540 } 541 $sql2.="ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;"; 542 543 $sql=$sql1.$sqla1.$sql2; // Direkte Buchungen 469 544 $v=array($gbuchung); 470 545 $res=pg_prepare("", $sql); … … 478 553 $fs_gml=$row["gml_id"]; 479 554 $gemei=$row["gemeinde"]; 480 $gmkg=$row[" bezeichnung"];555 $gmkg=$row["gemarkungsname"]; 481 556 $flur=$row["flurnummer"]; 482 557 $fskenn=$row["zaehler"]; … … 484 559 $x=$row["x"]; 485 560 $y=$row["y"]; 561 562 // FILTER OBEN, IN SQL - nicht HIER 486 563 if($gemeinde > 0 and $gemeinde != $gemei and $gfilter == 1) { // ex-territorial 487 // +++ Wie Abgleich mit Filter=Gemeinde-Liste? Als Array aufbereiten?488 if ($debug >= 2) {echo "<p class='dbg'>Gemkg ".$gmkg." liegt in Gemeinde '".$gemei."' nicht '".$gemeinde."'</p>";}489 564 if ($debug >= 2) { 565 echo "<p class='dbg'>Gemkg ".$gmkg." liegt in Gemeinde '".$gemei."' nicht '".$gemeinde."'</p>"; 566 } 490 567 echo "\n<div class='fs' title='Kein Zugriff! Liegt außerhalb des Gebietes.'>"; 491 568 echo "\n\t\t<img class='nwlink' src='ico/Flurstueck_Leer.ico' width='16' height='16' alt='FS'> (".$gmkg." ".$flur."-".$fskenn." )"; … … 506 583 $zfs++; 507 584 } 508 if($zfs == 0) {echo "\n<p class='err'>Kein Flurstück.</p>";} 585 if($zfs == 0) { 586 echo "\n<p class='anz'>Kein Flurstück.</p>"; 587 } elseif($zfs > 1) { 588 echo "\n<p class='anz'>".$zfs." Flurstück.</p>"; 589 } 509 590 return; 510 591 } … … 514 595 // =========== 515 596 if(isset($epsg)) { 516 if ($debug >= 2) {echo "<p class='dbg'>aktueller EPSG='".$epsg."'</p>";} // aus MB597 #if ($debug >= 2) {echo "<p class='dbg'>aktueller EPSG='".$epsg."'</p>";} // aus MB 517 598 $epsg = str_replace("EPSG:", "" , $_REQUEST["epsg"]); 518 599 } else { 519 if ($debug >= 1) {echo "<p class='err'>kein EPSG gesetzt</p>";}600 #if ($debug >= 1) {echo "<p class='err'>kein EPSG gesetzt</p>";} 520 601 $epsg=$gui_epsg; // aus Conf 521 602 } 522 if ($debug >= 2) { 523 if(isset($gemeinde)) {echo "<p class='dbg'>Filter Gemeinde = ".$gemeinde."</p>"; 524 } else {echo "<p class='dbg'>Kein Filter Gemeinde</p>";} 525 } 603 526 604 if ($gemeinde == "") { 527 605 $gfilter = 0; // ungefiltert 606 #if ($debug >= 2) {echo "<p class='dbg'>Kein Filter Gemeinde</p>";} 528 607 } elseif(strpos($gemeinde, ",") === false) { 529 608 $gfilter = 1; // Einzelwert 609 #if ($debug >= 2) {echo "<p class='dbg'>Filter Gemeinde Einzelwert = '".$gemeinde."'</p>";} 530 610 } else { 531 611 $gfilter = 2; // Liste 612 #if ($debug >= 2) {echo "<p class='dbg'>Filter Gemeinde Liste = '".$gemeinde."'</p>";} 532 613 } 533 614 534 615 // Auch wenn redundant: Das Kennzeichen fÃŒr Anzeige und weitere Links zerlegen 535 616 $kennztyp=ZerlegungGBKennz($gbkennz); 536 if ($debug >= 2) {echo "<p class='dbg'>GB-Kennzeichen Typ=".$kennztyp."</p>";}617 #if ($debug >= 2) {echo "<p class='dbg'>GB-Kennzeichen Typ=".$kennztyp."</p>";} 537 618 538 619 // Wurde eine gml_id (internes Kennzeichen) aus einem Self-Link verwendet? 539 // Dann hat das Prioritaet, nichtnach $gbkennz suchen.540 if ( isset($gbuchung)) { // gml der Buchungsstelle541 if ($debug >= 2) {echo "<p class='dbg'>Link Buchung(gml)=".$gbuchung."</p>";}620 // Dann hat das Prioritaet, also *nicht* nach $gbkennz suchen. 621 if ($gbuchung != "") { // gml der Buchungsstelle 622 $trans="Buchungsstelle"; 542 623 EinGrundstueck(true); 543 } elseif(isset($gblatt)) { // gml des GB-Blattes 544 if ($debug >= 2) {echo "<p class='dbg'>Link Blatt(gml)=".$gblatt."</p>";} 624 625 } elseif($blattgml != "") { // gml des GB-Blattes 626 627 // neue Version -> function GB_Buchung_FS 628 $trans="GB-Blatt mit Buchungen und Flst."; 629 EinBlatt(true); 630 631 /* alte Version (ohne die Function)) 545 632 if (EinBlatt(true) == 1) { // darauf genau eine Buchung 546 633 $gbuchung=gml_buchungsstelle(); // gml_id zum Kennzeichen 634 $trans="Grundbuch-Blatt und 1 Buchung"; 547 635 EinGrundstueck(false); 548 636 } 549 } elseif(isset($ag)) { // Key 'stelle' des Amtsgerichtes 550 if ($debug >= 2) {echo "<p class='dbg'>Link Amtsgericht=".$ag."</p>";} 637 */ 638 639 } elseif(isset($ag)) { // Key des Amtsgerichtes 640 #if ($debug >= 2) {echo "<p class='dbg'>Link Amtsgericht=".$ag."</p>";} 641 $trans="GB-Bezirke zum Amtsgericht"; 551 642 ListAG( "'".$ag."'" ); // noch mal Kopfzeile 552 643 ListGBBez("'".$ag."'", false); 553 } else { // Kein Self-Link 554 // (manuelle) Eingabe im Formular interpretieren. 555 switch ($kennztyp) { // +++ Wie kann Filter "Gemeinde" berÃŒcksichtigt werden? 556 case 0: // keine Eingabe, 2 Alternativen557 // +++ Alternativen-Auswahl konfigurieren?558 // ListGBBez($ag_liste, true); // gefilterte Liste der Bezirke559 ListAG($ag_liste); // gefilterte Liste der Amtsgerichte644 645 } else { // Kein Self-Link, Eingabe im Formular 646 647 switch ($kennztyp) { 648 case 0: // keine Eingabe 649 $trans="Liste der Amtsgerichte"; 650 ListAG($ag_liste); 560 651 break; 561 652 case 1: // Eingabe Bezirk-Name (-Teil) -> gefilterte Liste der Bezirke 562 if ($debug >= 2) {echo "<p class='dbg'>Eingabe Bez. ".$zgbbez."</p>";}653 $trans="Grundbuchbezirke gefiltert"; 563 654 $beznr=SuchGBBezName(); 564 655 if ($beznr > 0) { // eindeutig 565 656 $zgbbez=$beznr; 657 $trans="Bezirk gefunden, Blätter dazu"; 566 658 EinBezirk(false); // gleich weiter 567 }; 659 }; 568 660 break; 569 661 case 2: // Eingabe Bezirk-Nummer -> Liste der BlÀtter 570 if ($debug >= 2) {echo "<p class='dbg'>Eingabe Bez. ".$zgbbez."</p>";}662 $trans="Blätter im GB-Bezirk"; 571 663 EinBezirk(true); 572 664 break; 573 665 case 3: // Eingabe Blatt -> Liste der Buchungen 574 if ($debug >= 2) {echo "<p class='dbg'>Eingabe Bez. ".$zgbbez." Blatt ".$zblatt."</p>";}575 $ gblatt=gml_blatt(); // gml_id zum Blatt suchen576 if ($ gblatt!= "") { // gefunden666 $trans="Buchungen auf GB-Blatt"; 667 $blattgml=gml_blatt(); // gml_id zum Blatt suchen 668 if ($blattgml != "") { // gefunden 577 669 if (EinBlatt(true) == 1) { // darauf genau eine Buchung 670 $trans="GB-Blatt und 1 Buchung"; 578 671 $gbuchung=gml_buchungsstelle(); // gml_id zum Kennzeichen 579 672 EinGrundstueck(false); … … 582 675 break; 583 676 case 4: // Eingabe Buchung (Grundstueck) -> Liste der Flurstuecke 584 if ($debug >= 2) {echo "<p class='dbg'>Eingabe Bez. ".$zgbbez." Blatt ".$zblatt." BVNR ".$zbvnr."</p>";}677 $trans="Flurst. zur Buchungsstelle"; 585 678 $gbuchung=gml_buchungsstelle(); // gml_id zum Kennzeichen 586 679 if ($gbuchung != "") { // .. wurde geliefert 680 $trans="Buchungsstelle und 1 Flurst."; 587 681 EinGrundstueck(true); 588 682 } 589 683 break; 590 684 case 9: // Fehler 591 echo "<p class='err'>Bitte ein gültiges Grundbuchkennzeichen eingegeben, Format 'gggg-999999A-llll</p>"; 685 $trans="fehlerhafte Eingabe"; 686 echo "\n<p class='err'>Bitte ein gültiges Grundbuchkennzeichen eingegeben, Format 'gggg-999999A-llll</p>"; 592 687 break; 593 688 } 594 689 } 690 // Titel im Kopf anzeigen 691 echo "\n<script type='text/javascript'>\n\ttranstitle('".$trans."')\n</script>"; 595 692 596 693 ?> 694 597 695 </body> 598 696 </html>
Note: See TracChangeset
for help on using the changeset viewer.
