Changeset 284 for trunk/mapbender/http/nav/alkisnav_grd.php
- Timestamp:
- 05/14/13 18:26:41 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
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.