Changeset 284
- Timestamp:
- 05/14/13 18:26:41 (11 years ago)
- Location:
- trunk/mapbender/http/nav
- Files:
-
- 7 edited
-
alkisnav.css (modified) (1 diff)
-
alkisnav_adr.php (modified) (1 diff)
-
alkisnav_eig.php (modified) (18 diffs)
-
alkisnav_fkt.php (modified) (11 diffs)
-
alkisnav_fls.htm (modified) (1 diff)
-
alkisnav_fls.php (modified) (12 diffs)
-
alkisnav_grd.php (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/mapbender/http/nav/alkisnav.css
r283 r284 40 40 div.fs {color: navy; margin-left: 20px; margin-top: 0px;} /* Flurstueck */ 41 41 div.hi {color: gray; margin-left: 20px; margin-top: 0px;} /* Historie */ 42 div.hn 42 div.hn, p.hn {color: gray; margin-left: 20px; margin-top: 0px;} /* Historie-Nachfolger */ 43 43 44 44 div.stu {color: maroon; font-size: 13px;} /* Strasse - Ueberschrift */ -
trunk/mapbender/http/nav/alkisnav_adr.php
r283 r284 5 5 2013-04-29 Test mit IE 6 6 2013-05-07 Strukturierung des Programms 7 2013-05- 08 in Arbeit ...7 2013-05-14 Feinkorrekturen. 8 8 9 9 ToDo: -
trunk/mapbender/http/nav/alkisnav_eig.php
r283 r284 10 10 2013-04-29 Darstellung mit IE 11 11 2013-05-07 Strukturierung des Programms, redundanten Code in Functions zusammen fassen 12 2013-05-08 Hervorhebung aktuelles Objekt, in Arbeit ... 12 2013-05-14 Hervorhebung aktuelles Objekt, Parameter "gbkennz" auswerten, 13 Title auch auf Icon, IE zeigt sonst alt= als Title dar. 13 14 */ 14 15 $cntget = extract($_GET); … … 50 51 if(isset($name)) { // Familiensuche 51 52 echo "\n<div class='back' title='Andere Personen mit diesem Nachnamen'>"; 52 echo "\n\t\t<img class='nwlink' src='ico/Eigentuemer_2.ico' width='16' height='16' alt='FAM' > ";53 echo "\n\t\t<img class='nwlink' src='ico/Eigentuemer_2.ico' width='16' height='16' alt='FAM' title='Andere Personen mit diesem Nachnamen'> "; 53 54 echo "\n<a class='back' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&name=".$name."'>\"".$name."\"</a>"; 54 55 echo "\n</div>\n<br>"; … … 92 93 <td valign='top'> 93 94 <a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisnamstruk.php?gkz=".$gkz."&gemeinde=".$gemeinde."&gmlid=".$person."\")'> 94 <img class='nwlink' src='ico/Eigentuemer.ico' width='16' height='16' alt='EIG' >95 <img class='nwlink' src='ico/Eigentuemer.ico' width='16' height='16' alt='EIG' title='Nachweis'> 95 96 </a> 96 97 </td> … … 177 178 // Alternativ wÃŒrde eine Hilfstabelle benötigt, in der im PostProcessing 178 179 // das GB-zu-Gemeinde-VerhÀltnis vorbereitet wird. 179 global $gkz, $gemeinde, $epsg, $name, $person, $blattgml, $debug, $bltbez, $bltblatt, $bltseite; 180 global $gkz, $gemeinde, $epsg, $name, $person, $blattgml, $debug, $bltbez, $bltblatt, $bltseite, $kennztyp, $zgbbez; 181 # $zblatt, $zblattn, $zblattz, $zbvnr; 180 182 $linelimit=150; 183 184 // Head 181 185 familiensuche(); 182 186 personendaten(); 187 188 // Body 183 189 // Suche nach GrundbÃŒchern der Person 184 $sql ="SELECT gb.gml_id AS gml_g, gb.buchungsblattnummermitbuchstabenerweiterung as blatt, b.bez eichnung AS beznam ";190 $sql ="SELECT gb.gml_id AS gml_g, gb.buchungsblattnummermitbuchstabenerweiterung as blatt, b.bezirk, b.bezeichnung AS beznam "; 185 191 $sql.="FROM alkis_beziehungen bpn "; 186 192 $sql.="JOIN ax_namensnummer n ON bpn.beziehung_von=n.gml_id "; … … 189 195 $sql.="JOIN ax_buchungsblattbezirk b ON gb.land = b.land AND gb.bezirk = b.bezirk "; 190 196 $sql.="WHERE bpn.beziehung_zu= $1 AND bpn.beziehungsart='benennt' AND bng.beziehungsart='istBestandteilVon' "; 197 198 // Parameter $gbkennz, z.B. nach Klick auf Zeile "Bezirk" 199 if ($kennztyp > 1) { // 2=Such Bezirk-Nummer, 3=Such Blatt, 4=Such Buchung BVNR 200 #if ($debug > 0) {echo "<p class='dbg'>Filter Bezirk '".$zgbbez."'<p>";} 201 $sql.="AND b.bezirk = ".$zgbbez." "; 202 $bezirkaktuell = true; 203 } else { 204 $bezirkaktuell = false; 205 } 206 191 207 if ($bltbez.$bltblatt != "") { // BlÀttern, Fortsetzen bei ... 192 208 $sql.="AND ((b.bezeichnung > '".$bltbez."') "; 193 209 $sql.="OR (b.bezeichnung = '".$bltbez."' AND gb.buchungsblattnummermitbuchstabenerweiterung > '".$bltblatt."')) "; 194 210 } 211 195 212 $sql.="ORDER BY b.bezeichnung, gb.buchungsblattnummermitbuchstabenerweiterung LIMIT $2 ;"; 196 213 … … 208 225 } 209 226 $cnt = 0; 227 $gwbez=""; 210 228 while($row = pg_fetch_array($res)) { 229 $beznr=$row["bezirk"]; 230 if ($gwbez != $beznr) { // Gruppenwechsel Bezirk 231 $beznam=$row["beznam"]; 232 $gwbez=$beznr; 233 zeile_gbbez ($beznam, $beznr, $bezirkaktuell); 234 } 211 235 $gml=$row["gml_g"]; 212 $beznam=$row["beznam"];213 236 $blatt=$row["blatt"]; 214 237 zeile_blatt($zgbbez, $beznam, $gml, $blatt, false, $person, false); 215 238 $cnt++; 216 239 } 240 241 // Foot 217 242 if($cnt == 0) { 218 243 echo "\n<p class='anz'>Kein Grundbuch zum Eigentümer</p>"; 219 244 } elseif($cnt >= $linelimit) { 220 245 echo "\n<p class='blt'>".$cnt." Grundb. zum Eigent."; 246 247 // BlÀttern 221 248 $nxtbltbez=urlencode($beznam); 222 249 $nxtbltblatt=urlencode($blatt); … … 241 268 global $gkz, $gemeinde, $name, $person, $blattgml, $epsg, $gfilter, $debug; 242 269 if($backlink) { // Erneuter Ansatz bei Person oder GB möglich. 270 243 271 // Namen ermitteln 244 272 $sql ="SELECT nachnameoderfirma, vorname FROM ax_person WHERE gml_id = $1 "; … … 248 276 if (!$res) {echo "\n<p class='err'>Fehler bei Eigentümer</p>";} 249 277 $row = pg_fetch_array($res); // nur eine Zeile 250 $nnam=htmlentities($row["nachnameoderfirma"], ENT_QUOTES, "UTF-8"); 251 $vnam=htmlentities($row["vorname"], ENT_QUOTES, "UTF-8"); 252 253 // +++ Function zeile_person nutzen ? 254 echo "\n\t<div class='back' title='zurück zur Person'>"; 255 echo "\n\t\t<img class='nwlink' src='ico/Eigentuemer.ico' width='16' height='16' alt='EIG'> "; 256 echo "\n\t<a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&person=".$person."'>"; 257 echo $nnam.", ".$vnam."</a><br>"; 258 echo "</div>"; 278 zeile_person($person, $row["nachnameoderfirma"], $row["vorname"]); 259 279 260 280 // Grundbuch-Daten ermitteln 261 281 $sql ="SELECT gb.gml_id AS gml_g, gb.buchungsblattnummermitbuchstabenerweiterung as blatt, b.bezirk, b.bezeichnung AS beznam "; 262 282 $sql.="FROM ax_buchungsblatt gb JOIN ax_buchungsblattbezirk b ON gb.land=b.land AND gb.bezirk=b.bezirk "; 263 $sql.="WHERE gb.gml_id= $1 ;";283 $sql.="WHERE gb.gml_id= $1 LIMIT 1 ;"; 264 284 $v=array($blattgml); 265 285 $res=pg_prepare("", $sql); … … 271 291 $beznam=$row["beznam"]; 272 292 $blatt=$row["blatt"]; 293 zeile_gbbez ($beznam, $bezirk, false); 273 294 zeile_blatt($bezirk, $beznam, $blattgml, $blatt, false, $person, true); 274 295 } 275 #GB_Buchung_FS(200, $bezirk."-".$blatt); // Blatt > GrundstÃŒck > Flurst. (max. 200) 276 GB_Buchung_FS(200, ""); // ohne den Link auf "Buchung" 296 GB_Buchung_FS(250, ""); // Blatt > Grundst. > FS, max. 250, ohne Link "Buchung" 277 297 return; 278 298 } … … 288 308 // Stufe 2 und 3 nacheinander verwendet werden. Dies ist wahrscheinlich ÃŒbersichtlicher, 289 309 // weil "ungefiltert" in "2+3" zu lange Listen entstehen wÃŒrden, die durchblÀttert werden mÃŒssen. 290 global $gkz, $gemeinde, $epsg, $name, $person, $blattgml, $gfilter, $debug, $bltbez, $bltblatt, $bltbvnr, $bltseite, $bltrecht ;310 global $gkz, $gemeinde, $epsg, $name, $person, $blattgml, $gfilter, $debug, $bltbez, $bltblatt, $bltbvnr, $bltseite, $bltrecht, $kennztyp, $zgbbez; 291 311 $linelimit=80; // als Limit "Anzahl FlurstÃŒcke" in den beiden folgenden Abfragen 292 312 // darf nun etwas knapper sein, weil man jetzt blÀttern kann … … 336 356 $sql2.="WHERE bpn.beziehung_zu= $1 AND bpn.beziehungsart='benennt' AND bng.beziehungsart='istBestandteilVon' "; 337 357 $sql2.="AND vbg.beziehungsart='istBestandteilVon' AND vfb.beziehungsart='istGebucht' "; 358 359 // Parameter $gbkennz nach Klick auf Zeile "Bezirk" 360 if ($kennztyp > 1) { // 2=Such Bezirk-Nummer, 3=Such Blatt, 4=Such Buchung BVNR 361 #if ($debug > 0) {echo "<p class='dbg'>Filter Bezirk '".$zgbbez."'<p>";} 362 $sql2.="AND b.bezirk = ".$zgbbez." "; 363 $bezirkaktuell = true; 364 } else { 365 $bezirkaktuell = false; 366 } 367 338 368 switch ($gfilter) { // Gemeinde-Filter 339 369 case 1: // Einzelwert … … 387 417 $beznam=$row["beznam"]; 388 418 $gwgb=""; 389 # Zeile ausgeben? 390 if($debug > 0) {echo "<p class='dbg'>Bezirk ".$bezirk."</p<>";} 419 zeile_gbbez($beznam, $gwbez, $bezirkaktuell); 391 420 } 392 421 $gb_gml=$row["gml_g"]; … … 401 430 $gwbv = $bvnr; 402 431 $bsgml=$row["bsgml"]; 403 zeile_buchung($bsgml, $bvnr, "", false, false); // ohne Link! 404 # zeile_buchung($bsgml, $bvnr, $bezirk."-".$blatt, false, false); 432 zeile_buchung($bsgml, $bvnr, "", false, false); //ohne Link 405 433 } 406 434 $fs_gml=$row["gml_id"]; … … 414 442 if($zfs1 == 0) { 415 443 if ($bltrecht == "ohne") {echo "\n<p class='anz'>Keine direkte Buchung gefunden.</p>";} 416 } elseif($zfs1 >= $linelimit) { // das Limit war zu knapp, das B l À t t e r n anbieten 417 echo "\n<p class='blt'>".$zfs1." Flurstücke"; 444 } elseif($zfs1 >= $linelimit) { // das Limit war zu knapp 445 echo "\n<p class='blt'>"; 446 if ($bltseite > 1) {echo "weitere ";} 447 echo $zfs1." Flurstücke"; 448 // B l À t t e r n (eine Folgeseite anbieten) 418 449 $nxtbltbez=urlencode($beznam); 419 450 $nxtbltblatt=urlencode($blatt); 420 451 $nxtbltseite=$bltseite + 1; 421 echo "\n - <a class='blt' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&person=".$person."&bltbez=".$nxtbltbez."&bltblatt=".$nxtbltblatt."&bltbvnr=".$bvnr."&bltseite=".$nxtbltseite."&bltrecht=ohne' "; 452 echo "\n - <a class='blt' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&person=".$person; 453 echo "&gbkennz=".$zgbbez; // Filter Bezirk 454 echo "&bltbez=".$nxtbltbez."&bltblatt=".$nxtbltblatt."&bltbvnr=".$bvnr."&bltseite=".$nxtbltseite."&bltrecht=ohne' "; 422 455 echo "title='Blättern ab ".htmlentities($beznam)." Blatt ".$blatt." BVNR ".$bvnr."'>weitere</a>"; 423 456 echo "</p>"; 424 } elseif($zfs1 > 1) { // Meldung (Plural) ab 2 425 echo "\n<p class='anz'>".$zfs1." Flurstücke zum Eigentümer</p>"; // im Limit 457 } elseif($zfs1 > 1) { // Meldung (Plural) ab 2, im Limit 458 echo "\n<p class='anz'>"; 459 if ($bltseite > 1) {echo "weitere ";} 460 echo $zfs1; 461 if ($kennztyp > 1) { 462 echo " Flurst. zum Eigent. im GB-Bezirk</p>"; 463 } else { 464 echo " Flurstücke zum Eigentümer</p>"; 465 } 426 466 } 427 467 } … … 443 483 } 444 484 $zfs2=0; 445 $gwgb=""; 485 $gwbez=""; 486 #gwgb=""; 446 487 while($row = pg_fetch_array($res)) { 488 $bezirk=$row["bezirk"]; 489 if ($gwbez != $bezirk) { // Gruppierung Bezirk 490 $gwbez=$bezirk; 491 $beznam=$row["beznam"]; 492 $gwgb=""; 493 zeile_gbbez($beznam, $gwbez, $bezirkaktuell); 494 } 447 495 $gb_gml=$row["gml_g"]; 448 496 if ($gwgb != $gb_gml) { // Gruppierung Blatt (Grundbuch) … … 475 523 } 476 524 } elseif($zfs2 >= $linelimit) { // das Limit war zu knapp, das B l À t t e r n anbieten 477 echo "\n<p class='blt'>".$zfs2." Rechte an Flurst."; 525 echo "\n<p class='blt'>"; 526 if ($bltseite > 1) {echo "weitere ";} 527 echo $zfs2." Rechte an Flurst."; 478 528 $nxtbltbez=urlencode($beznam); 479 529 $nxtbltblatt=urlencode($blatt); 480 530 $nxtbltseite=$bltseite + 1; 481 echo "\n - <a class='blt' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&person=".$person."&bltbez=".$nxtbltbez."&bltblatt=".$nxtbltblatt."&bltbvnr=".$bvnr."&bltseite=".$nxtbltseite."&bltrecht=nur' "; 531 echo "\n - <a class='blt' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&person=".$person; 532 echo "&gbkennz=".$zgbbez; // Filter Bezirk 533 echo "&bltbez=".$nxtbltbez."&bltblatt=".$nxtbltblatt."&bltbvnr=".$bvnr."&bltseite=".$nxtbltseite."&bltrecht=nur' "; 482 534 echo "title='Blättern ab ".htmlentities($beznam)." Blatt ".$blatt." BVNR ".$bvnr."'>weitere</a>"; 483 535 echo "</p>"; 484 536 } elseif($zfs2 > 1) { // ab 2 485 echo "\n<p class='anz'>".$zfs2." Rechte an Flurst.</p>"; // im Limit 537 echo "\n<p class='anz'>"; 538 if ($bltseite > 1) {echo "weitere ";} 539 echo $zfs2." Rechte an Flurst.</p>"; // im Limit 486 540 } 487 541 } // ENDE FÀlle mit "Rechte an" … … 510 564 } 511 565 512 ## Aus Link "Buchung" kommen folgende Parameter: 513 # ?gkz=250&gemeinde=20&epsg=31467 514 # &buchunggml=DENW15AL1000Bj2m 515 # &gbkennz=2619-000025+-8 516 ## Weder buchunggml noch gbkennz werden ausgewertet. 517 ## Name fehlt (zum drÃŒber setzen) 518 ## vorlÀufige Lösung: Link verhindern. 566 $kennztyp=ZerlegungGBKennz($gbkennz); // Grundbuch-Kennzeichen aus Parameter zerlegen: $z__ 567 // 2=Such Bezirk-Nummer, 3=Such Blatt, 4=Such Buchung BVNR 519 568 520 569 // Quo Vadis? … … 532 581 // Die Filtereinstellung beeinflusst die Such-Strategie: 533 582 if ($gfilter == 0) { // Keine Filterung auf "Gemeinde": groÃe Datenmenge 534 535 $trans="Grundbücher zum Eigentümer"; 583 if ($kennztyp > 1) { 584 $trans = "Grundbücher in ".$zgbbez." von .."; // Filter GB-Bez 585 } else { 586 $trans = "Grundbücher von .."; // Name steht darunter 587 } 536 588 getGBbyPerson(); 537 589 // Also schrittweise erst mal Stufe 2 = GrundbÃŒcher zur Person suchen. 538 590 if(isset($blattgml) ) { // Es wurde nur EIN Grundbuch zu der Person gefunden. 539 $trans ="1 Blatt zum Eigentümer";591 $trans = "1 Blatt zum Eigentümer"; 540 592 getFSbyGB(false); // Dann dazu auch gleich die Stufe 3 hinterher, aber ohne Backlink. 541 } 542 593 } 543 594 } else { // mit Filter auf Gemeinde: weniger Daten? 544 $trans="Grundb. und Flurst. zum Eigentümer"; 595 if ($kennztyp > 1) { 596 #trans="Grundb. und Flurst. in ".$zgbbez." von .. "; // zu lang 597 $trans="Grdb. und Flst. von .. in .."; // Filter GB-Bez, 598 // darunter sind dann Name und Bezirk farblich markiert 599 } else { 600 $trans="Grundb. und Flurst. von .."; // der EigentÃŒmer steht darunter 601 } 545 602 getGBuFSbyPerson(); // Schritte 2+3 gleichzeitig, dabei Gemeinde-Filter auf Stufe 3 546 603 } -
trunk/mapbender/http/nav/alkisnav_fkt.php
r283 r284 2 2 /* Version vom 3 3 2013-05-07 Strukturierung des Programms, redundanten Code in Functions zusammen fassen 4 2013-05- 08 Hervorhebung aktuelles Objekt, in Arbeit ...4 2013-05-14 Hervorhebung aktuelles Objekt, Title auch auf Icon, IE zeigt sonst alt= als Title dar. 5 5 */ 6 6 … … 10 10 // Hierin die Encodierung fÃŒr url und HTML. 11 11 12 function is_ne_zahl($wert) { 13 // Prueft, ob ein Wert ausschlieÃlich aus den Zahlen 0 bis 9 besteht 14 if (trim($wert, "0..9") == "") {return true;} else {return false;} 15 } 16 17 function ZerlegungGBKennz($gbkennz) { 18 // Das eingegebene Grundbuch-Kennzeichen auseinander nehmen (gggg-999999z-BVNR) 19 // Return: 9=Fehler, 0=Listen alle Bezirke 1=Such Bezirk-Name 20 // 2=Such Bezirk-Nummer, 3=Such Blatt, 4=Such Buchung BVNR 21 global $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr; 22 $arr=explode("-", $gbkennz, 3); 23 $zgbbez=trim($arr[0]); 24 $zblatt=trim($arr[1]); 25 $zbvnr=trim($arr[2]); 26 if ($zgbbez == "") { // keine Eingabe 27 return 0; // Amtsgerichte oder Bezirke listen 28 } elseif ( ! is_ne_zahl($zgbbez)) { // Alphabetische Eingabe 29 return 1; // Such Bezirk-NAME 30 } elseif ($zblatt == "") { 31 return 2; // Such Bezirk-NUMMER 32 } else { // Format von BlattNr pruefen 33 //'19' linksbÃŒndig 34 //'000019 ' gefÃŒllt 6 + blank 35 //'000019A' .. mit Zusatzbuchstabe 36 //'0300001' gefÃŒllt 7, bei Blattart 5000 "fiktives Blatt" 37 $len=strlen($zblatt); 38 if ($len > 0 AND $len < 8) { 39 if (trim($zblatt, "0..9 ") == "") { // Normalfall: nur Zahlen (und Blank)) 40 $zblattn= rtrim(ltrim($zblatt, "0"), " "); 41 $zblattz=""; 42 } else { // Sonderfall: Zusatz-Buchstabe am Ende 43 $zblattn=substr($zblatt,0,$len-1); 44 $zblattz=strtoupper(substr($zblatt,$len-1,1)); 45 if ((trim($zblattn, "0..9") == "") and (trim($zblattz, "A..Z") == "")) { 46 $zblattn= ltrim($zblattn, "0"); // ohne fuehrende Nullen 47 } else { 48 echo "<p class='err>Format 'Blatt': bis zu 6 Zahlen und ggf. ein Buchstabe</p>"; 49 return 9; 50 } 51 } 52 if ($zbvnr == "") { 53 return 3; // Such BLATT 54 } elseif (is_ne_zahl($zbvnr)) { 55 // $zbvnr=ltrim($zbvnr,"0"); // DB-Format ist integer 56 // Vorsicht, Wert "0" ist moeglich und gueltig 57 return 4; // Such Grundstueck 58 } else { 59 echo "<p class='err>Die Buchungsstelle (BVNR) '".$zbvnr."' ist nicht numerisch</p>"; 60 return 9; 61 } 62 } else { 63 echo "<p class='err>Das Grundbuch-Blatt '".$zblatt."' ist ungültig.</p>"; 64 return 9; 65 } 66 } 67 } 68 69 function suchfeld($suchstring) { // Suchstring Ausgeben UND das Eingabeformular damit belegen 70 $out="<a title='Dies als Suchbegriff setzen' href='javascript:formular_belegung(\"".$suchstring."-\")'>".$suchstring."</a>"; 71 return $out; 72 } 73 12 74 function zeile_ag ($ag, $anr, $aktuell) { // Zeile A m t s g e r i c h t 13 75 global $gkz, $gemeinde, $epsg, $auskpath; … … 19 81 if ($aktuell) {$cls=" aktuell";} 20 82 echo "\n<div class='ga".$cls."' title='Amtsgericht'>"; 21 echo "\n\t\t<img class='nwlink' src='ico/Gericht.ico' width='16' height='16' alt='A mtsgericht'> ";83 echo "\n\t\t<img class='nwlink' src='ico/Gericht.ico' width='16' height='16' alt='AG' title='Amtsgericht'> "; 22 84 echo "AG <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&ag=".$anr."'>"; 23 85 echo $agd."</a> (".$anr.")"; … … 27 89 28 90 function zeile_gbbez ($gnam, $zgbbez, $aktuell) { // Zeile Grundbuch - B e z i r k 29 global $gkz, $gemeinde, $epsg, $auskpath; 91 // Parameter: aktuell = Bool fÃŒr farbliche Markierung der Zeile als aktuell angeklicktes Obj. 92 global $gkz, $gemeinde, $epsg, $person; 30 93 $gnamd=htmlentities($gnam, ENT_QUOTES, "UTF-8"); 31 94 if ($aktuell) {$cls=" aktuell";} 32 95 echo "\n<div class='gk".$cls."' title='GB-Bezirk'>"; 33 echo "\n\t\t<img class='nwlink' src='ico/GB-Bezirk.ico' width='16' height='16' alt='Bez.'> "; 34 echo "<a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&gbkennz=".$zgbbez."'>"; 35 echo "Bezirk ".$gnamd."</a> (".suchfeld($zgbbez).")"; 96 echo "\n\t\t<img class='nwlink' src='ico/GB-Bezirk.ico' width='16' height='16' alt='Bez.' title='GB-Bezirk'> "; 97 echo "<a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&gbkennz=".$zgbbez; 98 echo "&gbbeznam=".urlencode($gnam); 99 if ($person != "") { // EigentÃŒmer-Suche 100 echo "&person=".$person."'>"; 101 echo "Bezirk ".$gnamd."</a> (".$zgbbez.")"; 102 } else { // Grundbuch-Suche 103 echo "'>"; 104 echo "Bezirk ".$gnamd."</a> (".suchfeld($zgbbez).")"; 105 } 36 106 echo "\n</div>"; 37 38 107 return; 39 108 } … … 47 116 if ($beznam != "") {$nam = $beznam." ";} 48 117 if ($aktuell) {$cls=" aktuell";} 118 49 119 echo "\n<div class='gb".$cls."' title='".$dientxt."GB-Blatt'>"; 120 121 // Icon / Nachweis 50 122 if ($blattgml == "") { // Link zum Nachweis nur wenn GML bekannt 51 echo "\n\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt' >";123 echo "\n\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt' title='".$dientxt."GB-Blatt'>"; 52 124 } else { 53 125 echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisbestnw.php?gkz=".$gkz."&gmlid=".$blattgml."\")'>"; 54 echo "\n\t\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt' >";126 echo "\n\t\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt' title='Nachweis'>"; 55 127 echo "\n\t</a> "; 56 128 } 129 130 // Text, Self-Link 57 131 echo $nam." <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg; 58 132 echo "&blattgml=".$blattgml."&gbkennz=".$bezirk."-".$blattlnk; … … 82 156 if ($aktuell) {$cls=" aktuell";} 83 157 echo "\n<div class='gs".$cls."' title='".$ti."Grundstück'>"; 84 echo "\n\t<img class='nwlink' src='ico/Grundstueck.ico' width='16' height='16' alt='GS' > ".$re;158 echo "\n\t<img class='nwlink' src='ico/Grundstueck.ico' width='16' height='16' alt='GS' title='".$ti."Grundstück'> ".$re; 85 159 if ($blattkennz == "") { // ohne Link 86 160 echo "Buchung ".$bvnra; … … 100 174 echo "\n<div class='fs".$cls."'>"; 101 175 echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisfsnw.php?gkz=".$gkz."&gmlid=".$fs_gml."\")'>"; 102 echo "\n\t\t<img class='nwlink' src='ico/Flurstueck_Link.ico' width='16' height='16' alt='FS' >";176 echo "\n\t\t<img class='nwlink' src='ico/Flurstueck_Link.ico' width='16' height='16' alt='FS' title='Nachweis'>"; 103 177 echo "\n\t</a>\n\t"; 104 178 … … 129 203 // Link zur Auskunft Person ++ Icon differenzieren? Firma/Person 130 204 131 // 2013-05-08 DIV statt br132 205 echo "<div class='pe'> 133 206 <a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisnamstruk.php?gkz=".$gkz."&gemeinde=".$gemeinde."&gmlid=".$gml."\")'> 134 <img class='nwlink' src='ico/Eigentuemer.ico' width='16' height='16' alt='EIG' >207 <img class='nwlink' src='ico/Eigentuemer.ico' width='16' height='16' alt='EIG' title='Nachweis'> 135 208 </a> 136 209 <a title='Person' href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&person=".$persongml."&name=".$namlnk."'>".$nnam.", ".$vnam."</a> … … 140 213 141 214 function GB_Buchung_FS ($linelimit, $blattgbkenn) { 142 // Zu einem Grundbuch-Blatt (identifiziert ÃŒber seine gml_id) suchen der143 // Buchungen (Gruppenwechsel) und FlurstÃŒcke (Links)215 // Zu einem Grundbuch-Blatt (identifiziert ÃŒber seine gml_id) suchen der 216 // Buchungen (Gruppenwechsel) und FlurstÃŒcke (Links) 144 217 global $gemeinde, $blattgml, $epsg, $gfilter, $debug; 145 218 … … 208 281 $zfs1++; 209 282 } 210 #if($zfs1 == 0) { // "nichts gefunden" erst melden, wenn auch Teil 2 (Rechte an) nichts findet 211 #} else 212 if($zfs1 >= $linelimit) { 213 echo "\n<p class='anz'>... und weitere</p>"; // +++ BlÀttern einfÃŒhren? 214 } elseif($zfs1 > 1) { // ab 2 215 echo "\n<p class='anz'>".$zfs1." Flurstücke zum Grundbuch</p>"; 283 // "nichts gefunden" erst melden, wenn auch Teil 2 (Rechte an) nichts findet 284 if($zfs1 > 1) { // ab 2 285 echo "\n<p class='anz'>".$zfs1." Flurstücke zum Grundbuch"; 286 if($zfs1 >= $linelimit) { 287 echo "... und weitere"; //++ BlÀttern einfÃŒhren? 288 } 289 echo "</p>"; 216 290 } 217 291 if($zfs1 > 0) {echo "<hr>";} // Trennen … … 246 320 if($zfs1 + $zfs2 == 0) { 247 321 echo "\n<p class='anz'>Kein Flurstück im berechtigten Bereich.</p>"; 248 } elseif($zfs >= $linelimit) {249 echo "\n<p class='anz'>... und weitere</p>"; // BlÀttern einfÃŒhren?250 322 } elseif($zfs2 > 1) { // keine Meldung "nichts gefunden - Rechte an" wenn Treffer in Teil 1 251 echo "\n<p class='anz'>".$zfs2." Rechte an Flurst.</p>"; 323 echo "\n<p class='anz'>".$zfs2." Rechte an Flurst."; 324 if($zfs2 >= $linelimit) { 325 echo "... und weitere"; // BlÀttern einfÃŒhren? 326 } 327 echo "</p>"; 252 328 } 253 329 return; -
trunk/mapbender/http/nav/alkisnav_fls.htm
r95 r284 37 37 <ul> 38 38 <script type="text/javascript" language="JavaScript"> 39 document.writeln("<li><a target='_self' href='alkisnav_ eig.htm?gkz=" + gkz + "&gemeinde=" + gem + "'>Adresse</a></li>");39 document.writeln("<li><a target='_self' href='alkisnav_adr.htm?gkz=" + gkz + "&gemeinde=" + gem + "'>Adresse</a></li>"); 40 40 document.writeln("<li><a target='_self' href='alkisnav_eig.htm?gkz=" + gkz + "&gemeinde=" + gem + "'>Name</a></li>"); 41 41 document.writeln("<li class='aktiveTab'>Flurstück</li>"); -
trunk/mapbender/http/nav/alkisnav_fls.php
r283 r284 7 7 2013-04-29 Test mit IE 8 8 2013-05-07 Strukturierung des Programms, redundanten Code in Functions zusammen fassen 9 2013-05- 08 Variablen-Namen geordnet, Hervorhebung aktuelles Objekt, in Arbeit ...9 2013-05-14 Variablen-Namen geordnet, Hervorhebung aktuelles Objekt, Title auch auf Icon, IE zeigt sonst alt= als Title dar. 10 10 */ 11 11 $cntget = extract($_GET); … … 41 41 42 42 END; 43 44 function is_ne_zahl($wert) {45 // Prueft, ob ein Wert ausschlieÃlich aus den Zahlen 0 bis 9 besteht46 if (trim($wert, "0..9") == "") {return true;} else {return false;}47 }48 43 49 44 function h_hinten($zahl) { … … 158 153 if ($aktuell) {$cls=" aktuell";} 159 154 echo "\n<div class='gk".$cls."' title='Gemarkung'>"; 160 echo "\n\t\t<img class='nwlink' src='ico/Gemarkung.ico' width='16' height='16' alt='G emarkung'>";155 echo "\n\t\t<img class='nwlink' src='ico/Gemarkung.ico' width='16' height='16' alt='GKG' title='Gemarkung'>"; 161 156 echo " OT <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&fskennz=".$gkgnr."'>"; 162 157 echo " ".$gnam."</a> (".$gkgnr.")"; … … 169 164 if ($aktuell) {$cls=" aktuell";} 170 165 echo "\n<div class='fl".$cls."' title='Flur'>"; 171 echo "\n\t\t<img class='nwlink' src='ico/Flur.ico' width='16' height='16' alt='F lur'> ";166 echo "\n\t\t<img class='nwlink' src='ico/Flur.ico' width='16' height='16' alt='FL' title='Flur'> "; 172 167 $url=$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&fskennz=".$gkgnr."-".$flurnr; 173 168 echo "<a title='Aktuelle Flurstücke suchen' href='".$url."'>Flur ".$flurnr." </a>"; … … 194 189 // Icon -> Buchnachweis 195 190 echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath."alkisfshist.php?gkz=".$gkz."&gmlid=".$fs_gml."\")'>"; 196 echo "\n\t\t<img class='nwlink' src='ico/".$ico."' width='16' height='16' alt='Hist' >";191 echo "\n\t\t<img class='nwlink' src='ico/".$ico."' width='16' height='16' alt='Hist' title='".$titl."'>"; 197 192 echo "\n\t</a>"; 198 193 … … 232 227 echo "\n<div class='hn' title='Nachfolger: ".$titl."'>"; 233 228 echo "\n\t<a title='Nachweis' href='javascript:imFenster(\"".$auskpath.$auskprog.".php?gkz=".$gkz."&gmlid=".$gml."\")'>"; 234 echo "\n\t\t<img class='nwlink' src='ico/".$ico."' width='16' height='16' alt='FS' >";229 echo "\n\t\t<img class='nwlink' src='ico/".$ico."' width='16' height='16' alt='FS' title='Nachweis'>"; 235 230 echo "\n\t</a> "; 236 231 echo "Flst. <a href='".$_SERVER['SCRIPT_NAME']."?gkz=".$gkz."&gemeinde=".$gemeinde."&epsg=".$epsg."&fskennz=".$fs.$hisparm."'>".$fskenn."</a>"; … … 464 459 465 460 function HistFlur() { 466 // Kennzeichen aus Gemarkung und FlurNr wurde eingegeben 461 // Kennzeichen aus Gemarkung und FlurNr wurde eingegeben. 467 462 // Die Flur nach historischen FlurstÃŒcken durchsuchen 468 463 global $con, $gkz, $gemeinde, $epsg, $debug, $scalefs, $auskpath, $land, $zgemkg, $zflur; … … 506 501 507 502 function EinFlurstueck() { 508 // FlurstÃŒckskennzeichen wurde komplett bis zum Zaehler eingegeben509 // Sonderfall: bei Bruchnummer, mehrere Nenner zum Zaehler 503 // FlurstÃŒckskennzeichen wurde komplett bis zum Zaehler (oder Nenner) eingegeben 504 // Sonderfall: bei Bruchnummer, mehrere Nenner zum Zaehler suchen wenn kein Nenner eingegeben wurde. 510 505 global $con, $gkz, $debug, $epsg, $gemeinde, $fskennz, $zgemkg, $zflur, $zzaehler, $znenner; 511 506 … … 555 550 556 551 function HistFlurstueck() { 557 // Die Nachfolger-FS-Kennzeichen sollen recherchiert werden.552 // Die Nachfolger-FS-Kennzeichen zu einem Historischen FS sollen recherchiert werden. 558 553 global $debug, $land, $zgemkg, $zflur, $zzaehler, $znenner; 559 554 … … 561 556 gg_head($zgemkg, false); 562 557 zeile_flur($zgemkg, $zflur, true, false); 558 echo "\n<hr>"; 563 559 564 560 // Body 565 561 // Suche ueber das Flurstueckskennzeichen, gml unbekannt 566 $fldlist=" AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner, ";567 $whcl.="WHERE flurstueckskennzeichen= $1 ";568 $sql ="SELECT 'a'".$fldlist."null as nachf FROM ax_flurstueck ".$whcl;569 $sql.="UNION SELECT 'h'".$fldlist."nachfolgerflurstueckskennzeichen as nachf FROM ax_historischesflurstueck ".$whcl;570 $sql.="UNION SELECT 'o'".$fldlist."nachfolgerflurstueckskennzeichen as nachf FROM ax_historischesflurstueckohneraumbezug ".$whcl;571 562 $fskzwhere =$land.$zgemkg; // Flurst-Kennz. f. Where 572 563 $fskzwhere.=str_pad($zflur, 3, "0", $STR_PAD_LEFT); 573 564 $fskzwhere.=str_pad($zzaehler, 5, "0", $STR_PAD_LEFT); 574 if ($znenner == "") {$fskzwhere.="______";} 575 else {$fskzwhere.=str_pad($znenner, 4, "0", $STR_PAD_LEFT)."__";} 565 if ($znenner == "") { // Wenn kein Nenner angegeben wurde, 566 //wird mit Wildcard und like nach allen Nennern gesucht. 567 $fskzwhere.="____\_\_"; // fÃŒr like 568 // Das Wildcard-Zeichen "_" ist dummerweise mit FÃŒllzeichen im Feldinhalt identisch 569 $whereop=" like "; 570 } else { // Ein Nenner wurde angegeben 571 $fskzwhere.=str_pad($znenner, 4, "0", $STR_PAD_LEFT)."__"; 572 $whereop=" = "; 573 } 574 $whcl.="WHERE flurstueckskennzeichen ".$whereop." $1 "; 575 576 $fldlist=" AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner, "; 577 578 // NICHT in aktuell suchen wenn explizit historisch gesucht wird 579 #$sql ="SELECT 'a'".$fldlist."null as nachf FROM ax_flurstueck ".$whcl." UNION "; 580 $sql ="SELECT 'h'".$fldlist."nachfolgerflurstueckskennzeichen as nachf FROM ax_historischesflurstueck ".$whcl; 581 $sql.="UNION SELECT 'o'".$fldlist."nachfolgerflurstueckskennzeichen as nachf FROM ax_historischesflurstueckohneraumbezug ".$whcl; 582 576 583 $v=array($fskzwhere); 584 #echo "<p class='dbg'>SQL=".$sql."<br>WHERE=".$fskzwhere."</p>"; // ++++ TEST 577 585 578 586 $res=pg_prepare("", $sql); … … 581 589 $zfs=0; 582 590 583 while($row = pg_fetch_array($res)) { 591 while($row = pg_fetch_array($res)) { // Schleife Hist-FS 584 592 $ftyp=$row["ftyp"]; 585 593 $fs_gml=$row["gml_id"]; … … 589 597 $nachf=$row["nachf"]; 590 598 if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} 591 if ($ftyp == "a") { // als aktuelles FS gefunden, das "h" war also unnötig! 592 $koor=flurstueckskoordinaten($fs_gml);593 echo "\n<p>Flurstück ".$fskenn." ist aktuell, nicht historisch</p>";594 zeile_flurstueck ($fs_gml, $fskenn, $koor["x"], $koor["y"], $gknr, $flur, true);595 } else { // Historisches FS gefunden (h oder o)596 zeile_hist_fs($fs_gml, $fskenn, $ftyp, $gknr, $flur, true);597 if ($nachf == "") { 598 echo "\n<p class='err'>keine Nachfolger</p>";599 } else{600 echo "\n<p>Nachfolger-Flurstücke:</p>";601 // Direkte Nachfolger ermitteln. In $nachf steht ein Array von FS-Kennzeichen.602 // Von den einzelnen Kennz. ist unbekannt, ob diese noch aktuell sind603 // oder auch schon wieder historisch.604 // Nachfolger in DB suchen um den Status aktuell/historisch zu ermitteln605 $stri=trim($nachf, "{}");606 $stri="'".str_replace(",", "','", $stri)."'";607 $whcln.="WHERE flurstueckskennzeichen IN ( ".$stri." ) ";608 $nasql ="SELECT 'a' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_flurstueck ".$whcln;609 $nasql.="UNION SELECT 'h' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_historischesflurstueck ".$whcln; 610 $nasql.="UNION SELECT 'o' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_historischesflurstueckohneraumbezug ".$whcln;611 $v=array(); 612 $nares=pg_prepare("", $nasql);613 $nares=pg_execute("", $v);614 if (!$nares) {echo "\n<p class='err'>Fehler bei Nachfolger.</p>";}615 $zfsn=0; 616 while($narow = pg_fetch_array($nares)) {617 $naftyp=$narow["ftyp"];618 $nagml=$narow["gml_id"];619 $nagknr=$narow["gemarkungsnummer"];620 $naflur=$narow["flurnummer"];621 $nafskenn=$narow["zaehler"];622 if ($narow["nenner"] != "") {$nafskenn.="/".$narow["nenner"];}623 zeile_nachf_fs ($nagml, $nagknr, $naflur, $nafskenn, $naftyp);624 $zfsn++;625 }626 if ($zfsn == 0) {627 echo "\n<p class='anz'>keine Nachfolger gefunden</p>";628 } else { // if($zfsn > 1)629 echo "\n<p class='anz'>".$zfsn." Nachfolger-Flurstücke</p>";630 }599 600 #if ($ftyp == "a") { // als aktuelles FS gefunden, das "h" war also unnötig! 601 # $koor=flurstueckskoordinaten($fs_gml); 602 # echo "\n<p>Flurstück ".$fskenn." ist aktuell, nicht historisch</p>"; 603 # zeile_flurstueck ($fs_gml, $fskenn, $koor["x"], $koor["y"], $gknr, $flur, true); 604 #} else { // Historisches FS gefunden (h oder o) 605 606 zeile_hist_fs($fs_gml, $fskenn, $ftyp, $gknr, $flur, true); 607 if ($nachf == "") { 608 echo "\n<p class='anz'>keine Nachfolger</p>"; 609 } else { 610 echo "\n<p class='hn'>Nachfolger-Flurstücke:</p>"; 611 // Direkte Nachfolger ermitteln. In $nachf steht ein Array von FS-Kennzeichen. 612 // Von den einzelnen Kennz. ist unbekannt, ob diese noch aktuell sind 613 // oder auch schon wieder historisch. 614 // Nachfolger in DB suchen um den Status aktuell/historisch zu ermitteln 615 $stri=trim($nachf, "{}"); 616 $stri="'".str_replace(",", "','", $stri)."'"; 617 618 $nawhcl="WHERE flurstueckskennzeichen IN ( ".$stri." ) "; 619 620 $nasql ="SELECT 'a' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_flurstueck ".$nawhcl; 621 $nasql.="UNION SELECT 'h' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_historischesflurstueck ".$nawhcl; 622 $nasql.="UNION SELECT 'o' AS ftyp, gml_id, gemarkungsnummer, flurnummer, zaehler, nenner FROM ax_historischesflurstueckohneraumbezug ".$nawhcl; 623 624 $v=array(); 625 $nares=pg_prepare("", $nasql); 626 $nares=pg_execute("", $v); 627 if (!$nares) {echo "\n<p class='err'>Fehler bei Nachfolger.</p>";} 628 $zfsn=0; 629 // inner Body 630 while($narow = pg_fetch_array($nares)) { 631 $naftyp=$narow["ftyp"]; 632 $nagml=$narow["gml_id"]; 633 $nagknr=$narow["gemarkungsnummer"]; 634 $naflur=$narow["flurnummer"]; 635 $nafskenn=$narow["zaehler"]; 636 if ($narow["nenner"] != "") {$nafskenn.="/".$narow["nenner"];} 637 zeile_nachf_fs ($nagml, $nagknr, $naflur, $nafskenn, $naftyp); 638 $zfsn++; 631 639 } 632 } 640 // inner Footer 641 if ($zfsn == 0) { 642 echo "\n<p class='anz'>keine Nachfolger</p>"; 643 } elseif ($zfsn > 1) { 644 echo "\n<p class='anz'>".$zfsn." Nachfolger-Flst.</p>"; 645 } 646 echo "\n<hr>"; 647 } 648 #} // aktuell ... 633 649 $zfs++; 634 650 } -
trunk/mapbender/http/nav/alkisnav_grd.php
r283 r284 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 2013-05-14 Hervorhebung aktuelles Objekt. Title "Nachweis" auch auf Icon. 11 11 */ 12 12 $cntget = extract($_GET); … … 46 46 47 47 END; 48 49 function suchfeld($suchstring) { // Suchstring Ausgeben UND das Eingabeformular damit belegen50 $out="<a title='Dies als Suchbegriff setzen' href='javascript:formular_belegung(\"".$suchstring."-\")'>".$suchstring."</a>";51 return $out;52 }53 54 function is_ne_zahl($wert) {55 // Prueft, ob ein Wert ausschlieÃlich aus den Zahlen 0 bis 9 besteht56 if (trim($wert, "0..9") == "") {return true;} else {return false;}57 }58 59 function ZerlegungGBKennz($gbkennz) {60 // Das eingegebene Grundbuch-Kennzeichen auseinander nehmen (gggg-999999z-BVNR)61 // Return: 9=Fehler, 0=Listen alle Bezirke 1=Such Bezirk-Name62 // 2=Such Bezirk-Nummer, 3=Such Blatt, 4=Such Buchung BVNR63 global $debug, $zgbbez, $zblatt, $zblattn, $zblattz, $zbvnr;64 $arr=explode("-", $gbkennz, 3);65 $zgbbez=trim($arr[0]);66 $zblatt=trim($arr[1]);67 $zbvnr=trim($arr[2]);68 if ($zgbbez == "") { // keine Eingabe69 return 0; // Amtsgerichte oder Bezirke listen70 } elseif ( ! is_ne_zahl($zgbbez)) { // Alphabetische Eingabe71 return 1; // Such Bezirk-NAME72 } elseif ($zblatt == "") {73 return 2; // Such Bezirk-NUMMER74 } else { // Format von BlattNr pruefen75 //'19' linksbÃŒndig76 //'000019 ' gefÃŒllt 6 + blank77 //'000019A' .. mit Zusatzbuchstabe78 //'0300001' gefÃŒllt 7, bei Blattart 5000 "fiktives Blatt"79 $len=strlen($zblatt);80 if ($len > 0 AND $len < 8) {81 if (trim($zblatt, "0..9 ") == "") { // Normalfall: nur Zahlen (und Blank))82 $zblattn= rtrim(ltrim($zblatt, "0"), " ");83 $zblattz="";84 } else { // Sonderfall: Zusatz-Buchstabe am Ende85 $zblattn=substr($zblatt,0,$len-1);86 $zblattz=strtoupper(substr($zblatt,$len-1,1));87 if ((trim($zblattn, "0..9") == "") and (trim($zblattz, "A..Z") == "")) {88 $zblattn= ltrim($zblattn, "0"); // ohne fuehrende Nullen89 } else {90 echo "<p class='err>Format 'Blatt': bis zu 6 Zahlen und ggf. ein Buchstabe</p>";91 return 9;92 }93 }94 if ($zbvnr == "") {95 return 3; // Such BLATT96 } elseif (is_ne_zahl($zbvnr)) {97 // $zbvnr=ltrim($zbvnr,"0"); // DB-Format ist integer98 // Vorsicht, Wert "0" ist moeglich und gueltig99 return 4; // Such Grundstueck100 } else {101 echo "<p class='err>Die Buchungsstelle (BVNR) '".$zbvnr."' ist nicht numerisch</p>";102 return 9;103 }104 } else {105 echo "<p class='err>Das Grundbuch-Blatt '".$zblatt."' ist ungültig.</p>";106 return 9;107 }108 }109 }110 48 111 49 function ListAG($liste_ag, $aktuell) {
Note: See TracChangeset
for help on using the changeset viewer.
