source: trunk/data/mapbender/http/nav/alkisnav_grd.php @ 66

Revision 66, 17.5 KB checked in by frank.jaeger, 13 years ago (diff)
Line 
1<?php
2// Version vom 10.01.2011 
3$gkz = urldecode($_REQUEST["gkz"]); // Mandant
4include("../../conf/alkisnav_conf.php");
5import_request_variables("PG");
6
7// Datenbank-Connection
8$con_string = "host=".$host." port=".$port." dbname=".$dbname.$gkz." user=".$user." password=".$password;
9$con = pg_connect ($con_string) or die ("Fehler bei der Verbindung zur Datenbank ".$dbname);
10
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 Grundbuch</title>
21        <link rel="stylesheet" type="text/css" href="alkisnav.css">
22</head>
23<body>
24
25<?php
26function is_ne_zahl($wert) {
27        // Prueft, ob ein Wert ausschließlich aus den Zahlen 0 bis 9 besteht
28        if (trim($wert, "0..9") == "") {return true;} else {return false;}
29}
30
31function is_blatt(&$wert) {
32        // Prueft, ob eine Eingabe dem Format von Grundbuch-Blatt entspricht.
33        // Die Blatt-Nummern wird dabei auf das Datenbank-Format mit fuehrenden Nullen ergaenzt (&).
34        // +++ Nur ein Aufruf der Function. In aufrufendes Programm integrieren?       
35        $len=strlen($wert);
36        if ($len < 1 or $len > 7) {return false;};
37        if (trim($wert, "0..9") == "") { // Normalfall: nur Zahlen
38                If (strlen($wert) < 6) {
39                        $wert = str_pad($wert, 6, "0", STR_PAD_LEFT);
40                }       
41                return true;
42        } else { // Sonderfall Zusatz-Buchstabe am Ende
43                $zahl=substr($wert,0,$len-1);
44                $zus=strtoupper(substr($wert,$len-1,1));
45                if ( (trim($zahl, "0..9") == "") and (trim($zus, "A..Z") == "")) {
46                        If (strlen($zahl) < 6) {
47                                $zahl = str_pad($zahl, 6, "0", STR_PAD_LEFT);
48                        }
49                        $wert=$zahl.$zus;       
50                        return true;           
51                } else {               
52                        return false;
53                }
54        }
55}
56
57function ZerlegungGBKennz($gbkennz) {
58// Das eingegebene Grundbuch-Kennzeichen auseinander nehmen (gggg-999999z-BVNR)
59// Return: 0=Fehler, 1=Such Bezirk-Name oder Listen alle Bezirke
60//         2=Such Bezirk-Nummer $zgbbez, 3=Such Blatt $zblatt, 4=Such BVNR $zbvnr
61        global $debug, $zgbbez, $zblatt, $zbvnr;                $arr = explode("-", $gbkennz, 3);
62        $zgbbez=trim($arr[0]);
63        $zblatt=trim($arr[1]);
64        $zbvnr=trim($arr[2]);
65        if ($zgbbez == "") { // keine Eingabe
66                return 1; // alle Bezirke listen
67        } elseif ( ! is_ne_zahl($zgbbez)) {
68                return 1; // Such Bezirk-NAME
69        } elseif ($zblatt == "") {
70                return 2; // Such Bezirk-NUMMER
71        } elseif (is_blatt($zblatt)) {
72                if ($zbvnr == "") {
73                        return 3; // Such BLATT
74                } elseif (is_ne_zahl($zbvnr)) {         
75                        // $zbvnr=ltrim($zbvnr,"0"); // DB-Format ist integer
76                        // Vorsicht, Wert "0" ist moeglich und gueltig
77                        return 4; // Such Grundstueck
78                } else {
79                        echo "<p class='err>Die Buchungsstelle (BVNR) '".$zbvnr."' ist nicht numerisch</p>";
80                        return 0;
81                }
82        } else {
83                echo "<p class='err>Das Grundbuch-Blatt '".$zblatt."' ist ung&uuml;ltig.</p>";
84                return 0;
85        }
86}
87
88function SuchGBBezName() {
89// Grundbuch-Bezirk suchen nach Name(-nsanfang)
90        global $con, $gkz, $gemeinde, $debug, $gbkennz;
91        $linelimit=50;
92        $sql ="SELECT a.bezeichnung AS ag, g.bezirk, g.bezeichnung FROM ax_buchungsblattbezirk g ";
93        $sql.="JOIN ax_dienststelle a ON g.stelle=a.stelle ";
94        $sql.="WHERE g.bezeichnung ILIKE $1 "; //       "AND a.stellenart=1000 " // Amtsgericht
95        $sql.="ORDER BY g.bezeichnung LIMIT $2 ;";
96        if ( $gbkennz == "") {
97                $match = "%";
98        } else {       
99                if(preg_match("/\*/",$gbkennz)){
100                        $match = trim(preg_replace("/\*/i","%", strtoupper($gbkennz)));
101                } else {
102                        $match = trim($gbkennz)."%";
103                }       
104        }
105        $v = array($match, $linelimit);
106        $res = pg_prepare("", $sql);
107        $res = pg_execute("", $v);
108        if (!$res) {
109                echo "\n<p class='err'>Fehler bei Grundbuch-Bezirk</p>";
110                if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}
111                return 0;
112        }
113        $cnt = 0;
114        // Loop  B E Z I R K     
115        // +++ Sortierung und Gruppierung nach Amtsgericht ??
116        while($row = pg_fetch_array($res)) {
117                $gnam=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
118                $gnr=$row["bezirk"];
119                $ag=htmlentities($row["ag"], ENT_QUOTES, "UTF-8");             
120                echo "\n<div class='gk' title='GB-Bezirk'>";
121                        echo "\n\t\t<img class='nwlink' src='ico/Gericht.ico' width='16' height='16' alt='Gemkg'> ";
122                        echo "<a href='alkisnav_grd.php?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;gbkennz=".$gnr."'>";               
123                                echo $gnam."</a> (".$gnr.") AG ".$ag;
124                echo "\n</div>";
125                $cnt++;
126        }
127        if($cnt == 0){
128                echo "\n<p class='err'>Kein Grundbuchbezirk.</p>";
129        } elseif ($cnt >= $linelimit) {
130                echo "\n<p title='Bitte eindeutiger qualifizieren'>... und weitere</p>";
131        } elseif ($cnt == 1) {
132                return $gnr; // Wenn eindeutig, gleich weiter
133        }
134        return 0;
135}
136 
137function EinBezirk($showParent) {
138        // Kennzeichen bestehend nur aus GB-Bezirk-SchlÃŒssel wurde eingegeben
139        global $con, $gkz, $gemeinde, $debug, $zgbbez, $auskpath;
140        $linelimit=200; // max. Blatt je Bezirk
141        // Dies linelimit nicht ausreichend fuer alle Blaetter eines Bezirks, aber ...
142        //  Wenn man die Blatt-Nr nicht kennt, kommt man hier sowieso nicht weiter.
143        //  Es nutzt also nichts, hier Tausende Nummern aufzulisten.
144        // +++ Wildcard in Blatt zulassen? Schwiegig bei numerischem Wert mit fuehrenden Nullen.
145        if ($showParent) {
146                $sql ="SELECT a.bezeichnung AS ag, g.bezeichnung FROM ax_buchungsblattbezirk g ";
147                $sql.="JOIN ax_dienststelle a ON g.stelle=a.stelle ";
148                $sql.="WHERE g.bezirk= $1 ;";
149                $v=array($zgbbez);
150                $res=pg_prepare("", $sql);
151                $res=pg_execute("", $v);
152                if (!$res) {
153                        echo "\n<p class='err'>Fehler bei Brundbuchbezirk.</p>";
154                        if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}
155                }
156                $zgmk=0;
157                while($row = pg_fetch_array($res)) {   
158                        $gnam=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
159                        $gnr=$row["bezirk"];
160                        $ag=htmlentities($row["ag"], ENT_QUOTES, "UTF-8");     
161                        $zgmk++;
162                }
163                if ($zgmk == 0) {
164                        echo "\n<div class='gk' title='Grundbuchbezirk'>";
165                                echo "\n\t\t<p class='err'><img class='nwlink' src='ico/Gericht.ico' width='16' height='16' alt='Bez.'>";
166                                        echo  " Bezirk ".$zgbbez." ist unbekannt.</p>";
167                        echo "\n</div>";
168                        return;
169                }
170                // > 1 auch möglich ???
171                echo "\n<div class='gk' title='GB-Bezirk'>";
172                        echo "\n\t\t<img class='nwlink' src='ico/Gericht.ico' width='16' height='16' alt='Bez.'> ";
173                        echo "<a href='alkisnav_grd.php?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;gbkennz=".$zgbbez."'>";             
174                        echo $gnam."</a> (".$zgbbez.") AG ".$ag;
175                echo "\n</div>";
176        }
177        $sql ="SELECT b.gml_id, b.buchungsblattnummermitbuchstabenerweiterung AS blatt FROM ax_buchungsblatt b ";
178        $sql.="WHERE b.bezirk= $1 ORDER BY b.buchungsblattnummermitbuchstabenerweiterung LIMIT $2 ;";
179        $v=array($zgbbez, $linelimit);
180        $res=pg_prepare("", $sql);
181        $res=pg_execute("", $v);
182        if (!$res) {
183                echo "\n<p class='err'>Fehler bei Bezirk.</p>";
184                if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}
185        }
186        $cntbl=0; // Counter Blatt/Bezirk
187        // Loop  B L A T T     
188        while($row = pg_fetch_array($res)) {   
189                $blatt=$row["blatt"];
190                $gml=$row["gml_id"];
191                echo "\n<div class='gb' title='GB-Blatt'>";
192                        echo "\n\t<a title='Nachweis' target='_blank' href='".$auskpath."alkisbestnw.php?gkz=".$gkz."&amp;gmlid=".$gml."'>";
193                                echo "\n\t\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt'>";
194                        echo "\n\t</a> ";
195                        echo "Blatt <a href='alkisnav_grd.php?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;gblatt=".$gml."&amp;gbkennz=".$zgbbez."-".$blatt."'>&nbsp;".$blatt."&nbsp;</a>";
196                echo "\n</div>";
197                $cntbl++;
198        }
199        if($cntbl == 0) {
200                echo "\n<p class='err'>Kein Blatt im Bezirk.</p>";
201        } else {
202                if($cntbl >= $linelimit) {
203                        echo "\n<p>... und weitere</p>";
204                        echo "\n<p>Geben sie ein: '".$zgbbez."-999999A'<br>wobei '999999A' = gesuchtes GB-Blatt</p>";
205                }
206        }
207        return;
208}
209
210function gml_blatt() {
211        // Komplettes Kennzeichen "Bezirk + Blatt" wurde eingegeben.
212        // Dazu die gml_id des GB-Blattes ermitteln.
213        global $con, $gkz, $debug, $zgbbez, $zblatt;
214
215        // Blatt ->  B u c h u n g s s t e l l e
216        // ax_buchungsblatt   <istBestandteilVon<  ax_buchungsstelle   
217        $sql ="SELECT b.gml_id FROM ax_buchungsblatt b ";
218        $sql.="WHERE b.bezirk= $1 AND b.buchungsblattnummermitbuchstabenerweiterung= $2 ;";
219        $v=array($zgbbez, $zblatt);
220        $res=pg_prepare("", $sql);
221        $res=pg_execute("", $v);
222        if (!$res) {
223                echo "\n<p class='err'>Fehler bei Blatt (Kennzeichen).</p>";
224                return;
225        }
226        $cntbl=0; // Counter Blatt
227        while($row = pg_fetch_array($res)) {   
228                $bl_gml=$row["gml_id"];
229                $cntbl++;
230        }
231        if($cntbl == 0) {
232                echo "\n<p class='err'>Grundbuchblatt '".$zgbbez."-".$zblatt."' nicht gefunden.</p>";
233        } elseif($cntbl == 1) {
234                return $bl_gml;
235        }
236        return;
237}
238
239function EinBlatt($showParent) {
240        // Kennzeichen Bezirk + Blatt wurde eingegeben
241        global $con, $gkz, $debug, $gemeinde, $auskpath, $zgbbez, $zblatt, $gblatt, $zbvnr;
242
243        if ($showParent) {     
244                echo "\n<div class='gb' title='GB-Blatt'>";
245                        echo "\n\t<a title='Nachweis' target='_blank' href='".$auskpath."alkisbestnw.php?gkz=".$gkz."&amp;gmlid=".$gblatt."'>";
246                                echo "\n\t\t<img class='nwlink' src='ico/GBBlatt_link.ico' width='16' height='16' alt='Blatt'>";
247                        echo "\n\t</a> ";
248                        echo "Blatt <a href='alkisnav_grd.php?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;gblatt=".$gblatt."&amp;gbkennz=".$zgbbez."-".$zblatt."'> ".$zblatt."</a>";
249                echo "\n</div>";
250        }
251        // Blatt ->  B u c h u n g s s t e l l e
252        // ax_buchungsblatt   <istBestandteilVon<  ax_buchungsstelle
253        $sql ="SELECT s.gml_id, s.laufendenummer AS lfd ";
254        $sql.="FROM ax_buchungsstelle s ";
255        $sql.="JOIN alkis_beziehungen v ON s.gml_id=v.beziehung_von ";
256        $sql.="JOIN ax_buchungsblatt b ON v.beziehung_zu=b.gml_id ";
257        $sql.="WHERE v.beziehungsart='istBestandteilVon' AND b.gml_id= $1 ";
258        $sql.="ORDER BY s.laufendenummer;";
259        // +++ Buchungen ohne FLST weglassen ??
260        // +++ Counter FLST ausgeben, Buchungen mit 0 weglassen
261        $v=array($gblatt);
262        $res=pg_prepare("", $sql);
263        $res=pg_execute("", $v);
264        if (!$res) {
265                echo "\n<p class='err'>Fehler bei Blatt.</p>";
266                if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}
267        }
268        $cntbu=0; // Counter Buchung/Blatt
269        while($row = pg_fetch_array($res)) {   
270                $bs_gml=$row["gml_id"];         
271                $lfd=$row["lfd"];
272                echo "\n<div class='gs'>";
273                        echo "\n\t\t<img class='nwlink' title='Grundst&uuml;ck' src='ico/Grundstueck.ico' width='16' height='16' alt='GS'> ";
274                        echo "Buchung <a href='alkisnav_grd.php?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;gbuchung=".$bs_gml."&amp;gbkennz=".$zgbbez."-".$zblatt."-".$lfd."'>".$lfd."</a>";
275                echo "\n</div>";
276                $cntbu++;
277        }
278        if($cntbu == 0) {
279                echo "\n<p class='err'>Keine Buchung gefunden.</p>";
280        } elseif($cntbu = 1) {
281                //echo "\n<p>genau EINE Buchung gefunden".$lfd."</p>";
282                $zbvnr=$lfd; // mit dieser BVNR gleich weiter machen
283        }
284        return $cntbu;
285}
286
287function gml_buchungsstelle() {
288        // Komplettes Kennzeichen "Bezirk + Blatt + BVNR" wurde eingegeben.
289        // Dazu die gml_id der Buchungsstelle ermitteln fuer die weitere Verfolgung der Beziehungen.
290        global $con, $gkz, $debug, $zgbbez, $zblatt, $zbvnr;
291
292        // Blatt ->  B u c h u n g s s t e l l e
293        // ax_buchungsblatt   <istBestandteilVon<  ax_buchungsstelle   
294        $sql ="SELECT s.gml_id FROM ax_buchungsstelle s ";
295        $sql.="JOIN alkis_beziehungen v ON s.gml_id=v.beziehung_von ";
296        $sql.="JOIN ax_buchungsblatt b ON b.gml_id=v.beziehung_zu ";
297        $sql.="WHERE v.beziehungsart='istBestandteilVon' ";
298        $sql.="AND b.bezirk= $1 AND b.buchungsblattnummermitbuchstabenerweiterung= $2 AND s.laufendenummer= $3 ;";
299        $v=array($zgbbez, $zblatt, $zbvnr);
300        $res=pg_prepare("", $sql);
301        $res=pg_execute("", $v);
302        if (!$res) {
303                echo "\n<p class='err'>Fehler bei Buchungsstelle (Kennzeichen).</p>";
304                return;
305        }
306        $zbs=0;
307        while($row = pg_fetch_array($res)) {   
308                $bs_gml=$row["gml_id"];
309                $zbs++;
310        }
311        if($zbs == 0) {
312                echo "\n<p class='err'>Die Buchungsstelle wurde nicht gefunden.</p>";
313                return;
314        } elseif($zbs > 1) { // nur TEST
315                echo "\n<p class='err'>Buchungsstelle mehrfach gefunden.</p>";
316                return;
317        } else {
318                return $bs_gml;
319        }
320}
321
322function EinGrundstueck($showParent) {
323        // Die gml_id der Buchungsstelle ist bekannt.
324        global $con, $gkz, $debug, $gemeinde, $scalefs, $epsg, $auskpath, $gbuchung, $zgbbez, $zblatt, $zbvnr;
325
326        if ($showParent) {     
327                // wenn Kennzeichen bekannt ist, dann auch Blatt ausgeben
328                if (isset($zgbbez) and isset($zblatt)) {
329                        echo "\n<div class='gb' title='GB-Blatt'>";
330                                echo "\n\t\t<img class='nwlink' src='ico/GBBlatt.ico' width='16' height='16' alt='Blatt'>";
331                                echo "Blatt <a href='alkisnav_grd.php?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;gbkennz=".$zgbbez."-".$zblatt."'>&nbsp;".$zblatt."&nbsp;</a>";
332                        echo "\n</div>";
333                } else {
334                        echo "<p class='err'>Kennzeichen Bezirk und Blatt nicht gesetzt</p>";
335                }
336                echo "\n<div class='gs'>";
337                        echo "\n\t\t<img class='nwlink' title='Grundst&uuml;ck' src='ico/Grundstueck.ico' width='16' height='16' alt='GS'> ";
338                        echo "Buchung <a href='alkisnav_grd.php?gkz=".$gkz."&amp;gemeinde=".$gemeinde."&amp;gbuchung=".$gbuchung."&amp;gbkennz=".$zgbbez."-".$zblatt."-".$zbvnr."'>&nbsp;".$zbvnr."&nbsp;</a>";
339                echo "\n</div>";
340        }
341        // +++ Ermitteln anderer Buchungsstellen mit Rechten an dieser
342        // +++ Ermitteln anderer Buchungsstellen wo diese Rechte hat
343
344        // +++ Filter "Gemeinde" berÃŒcksichtigt!! Wenn gesetzt.
345
346        // Buchungsstelle -> Flurstueck
347        $sql ="SELECT t.gemeinde, g.bezeichnung, f.gml_id, f.flurnummer, f.zaehler, f.nenner, ";
348        $sql.="x(st_transform (st_centroid(f.wkb_geometry),".$epsg.")) AS x, ";
349        $sql.="y(st_transform (st_centroid(f.wkb_geometry),".$epsg.")) AS y ";
350        $sql.="FROM ax_gemarkung g ";
351        $sql.="JOIN ax_flurstueck f ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ";
352        $sql.="JOIN alkis_beziehungen v ON f.gml_id=v.beziehung_von ";
353        $sql.="LEFT JOIN gemeinde_gemarkung t ON g.gemarkungsnummer=t.gemarkung ";
354        $sql.="WHERE v.beziehungsart='istGebucht' AND v.beziehung_zu= $1 "; // id buchungsstelle
355        $sql.="ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;";
356        $v=array($gbuchung);
357        $res=pg_prepare("", $sql);
358        $res=pg_execute("", $v);
359        if (!$res) {
360                echo "\n<p class='err'>Fehler bei Buchungsstelle (gml).</p>";
361                if ($debug >= 3) {echo "\n<p class='err'>".$sql."</p>";}
362        }
363        $zfs=0;
364        while($row = pg_fetch_array($res)) {   
365                $fs_gml=$row["gml_id"];
366                $gemei=$row["gemeinde"];
367                $gmkg=$row["bezeichnung"];
368                $flur=$row["flurnummer"];
369                $fskenn=$row["zaehler"];
370                if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // Bruchnummer
371                $x=$row["x"];
372                $y=$row["y"];
373                if($gemeinde > 0 and $gemeinde != $gemei) { // ex-territorial
374                        echo "\n<div class='fs' title='Kein Zugriff! Liegt au&szlig;erhalb des Gebietes.'>";
375                                echo "\n\t\t<img class='nwlink' src='ico/Flurstueck.ico' width='16' height='16' alt='FS'> ".$gmkg." ".$flur."-".$fskenn;
376                        echo "\n</div>";                       
377                } else {
378                        echo "\n<div class='fs'>";
379                                echo "\n\t<a title='Nachweis' target='_blank' href='".$auskpath."alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$fs_gml."'>";
380                                        echo "\n\t\t<img class='nwlink' src='ico/Flurstueck_Link.ico' width='16' height='16' alt='FS'>";
381                                echo "\n\t</a>";
382                                echo "\n\t<a title='Flurst&uuml;ck positionieren 1:".$scalefs."' href='";
383                                        echo "javascript:parent.parent.parent.mb_repaintScale(\"mapframe1\",".$x.",".$y.",".$scalefs."); ";
384                                        echo "parent.parent.hideHighlight();' ";
385                                        echo "onmouseover='parent.parent.showHighlight(".$x.",".$y.")' ";
386                                        echo "onmouseout='parent.parent.hideHighlight()'>";
387                                echo $gmkg." ".$flur."-".$fskenn."</a>";
388                        echo "\n</div>";
389                }
390                $zfs++;
391        }
392        if($zfs == 0) {echo "\n<p class='err'>Kein Flurst&uuml;ck.</p>";}
393        return;
394}
395
396// ===========
397// Start hier!
398// ===========
399if(isset($epsg)) {
400        if ($debug >= 2) {echo "<p>aktueller EPSG='".$epsg."'</p>";} // aus MB
401        If (substr($epsg, 0, 5) == "EPSG:") {$epsg=substr($epsg, 5);}
402} else {
403        if ($debug >= 2) {echo "<p class='err'>kein EPSG gesetzt</p>";}
404        $epsg=$gui_epsg; // aus Conf
405}
406if ($debug >= 2) {
407        if(isset($gemeinde)) {echo "<p>Filter Gemeinde = ".$gemeinde."</p>";
408        } else {echo "<p>Kein Filter Gemeinde</p>";}
409}
410
411// Auch wenn redundant: Das Kennzeichen fÃŒr Anzeige und weitere Links zerlegen
412$kennztyp=ZerlegungGBKennz($gbkennz);
413if ($debug >= 2) {echo "<p>GB-Kennzeichen Typ=".$kennztyp."</p>";}
414// Wurde eine gml_id (internes Kennzeichen) aus einem Link verwendet?
415If (isset($gbuchung)) { // gml der Buchungsstelle
416        if ($debug >= 2) {echo "<p>Link Buchung(gml)=".$gbuchung."</p>";}
417        EinGrundstueck(true);
418} elseif(isset($gblatt)) { // gml des GB-Blattes
419        if ($debug >= 2) {echo "<p>Link Blatt(gml)=".$gblatt."</p>";}
420        if (EinBlatt(true) == 1) { // darauf genau eine Buchung
421                $gbuchung=gml_buchungsstelle(); // gml_id zum Kennzeichen
422                EinGrundstueck(false);
423        };
424} else {
425        // Kein internes Kennzeichen (gml_id), also nur die (manuelle) Eingabe interpretieren.
426        switch ($kennztyp) {
427        // +++ Ersten Schritt "Suche Amtsgericht" voranstellen?
428        // +++ Wie kann Filter "Gemeinde" berÃŒcksichtigt werden?
429        case 0: // Fehler
430                echo "<p class='err'>Bitte ein Grundbuchkennzeichen eingegeben, Format 'gggg-999999A-llll</p>";
431                break;
432        case 1: // Eingabe Bezirk-Name (-Teil) -> Liste der Bezirke
433                if ($debug >= 2) {echo "<p>Eingabe Bez. ".$zgbbez."</p>";}
434                $beznr=SuchGBBezName();
435                if ($beznr > 0) {
436                        $zgbbez=$beznr;
437                        EinBezirk(false);
438                };     
439                break;
440        case 2: // Eingabe Bezirk-Nummer -> Liste der BlÀtter
441                if ($debug >= 2) {echo "<p>Eingabe Bez. ".$zgbbez."</p>";}     
442                EinBezirk(true);
443                break;
444        case 3: // Eingabe Blatt -> Liste der Buchungen
445                if ($debug >= 2) {echo "<p>Eingabe Bez. ".$zgbbez." Blatt ".$zblatt."</p>";}
446                $gblatt=gml_blatt(); // gml_id zum Blatt suchen
447                if ($gblatt != "") { // gefunden               
448                        if (EinBlatt(true) == 1) { // darauf genau eine Buchung
449                                $gbuchung=gml_buchungsstelle(); // gml_id zum Kennzeichen
450                                EinGrundstueck(false);
451                        }
452                }
453                break;
454        case 4: // Eingabe Buchung (Grundstueck) -> Liste der Flurstuecke
455                if ($debug >= 2) {echo "<p>Eingabe Bez. ".$zgbbez." Blatt ".$zblatt." BVNR ".$zbvnr."</p>";}
456                $gbuchung=gml_buchungsstelle(); // gml_id zum Kennzeichen
457                EinGrundstueck(true);
458                break;
459        }
460}
461 ?>
462</body>
463</html>
Note: See TracBrowser for help on using the repository browser.