source: trunk/info/info/alkisn/alkisbestnw.php @ 387

Revision 387, 22.0 KB checked in by frank.jaeger, 7 years ago (diff)

Überarbeitung der Buchauskunft: FS-Nachweis enthält optional die berechtigten Buchungen, Input-Validation, Styling, kleinere Korrekturen, HTML-Profilierung

Line 
1<?php
2/*      Modul: alkisbestnw.php
3
4        ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo).
5        Bestandsnachweis fÃŒr ein Grundbuch aus ALKIS PostNAS
6
7        Version:
8        2016-02-24 Version fuer norGIS-ALKIS-Import
9        2016-11-29 HTML5, Gemeinsam genutzte Datenbanken ermöglichen, Markierung der Sortierung
10        2017-06-01 Function "eigentuemer" ohne Parameter $con
11        2017-06-08 Validierung Eingabeparameter, Farbwechsel der Tabelle je GrundstÃŒck, Feinschliff und HTML-Profilierung
12*/
13session_start();
14
15$showkey="n"; // Var. initalisieren
16$cntget = extract($_GET); // Parameter in Variable umwandeln
17
18// strikte Validierung aller Parameter
19if (!isset($gmlid) or !preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
20if (!isset($gkz) or !preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
21if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
22if ($showkey == "j") {$showkey=true;} else {$showkey=false;}
23
24require_once("alkis_conf_location.php");
25if ($auth == "mapbender") {require_once($mapbender);}
26include("alkisfkt.php");
27?>
28<!doctype html>
29<html lang="de">
30<head>
31        <meta charset="utf-8">
32        <meta name="viewport" content="width=device-width, initial-scale=1.0">
33        <title>ALKIS Bestandsnachweis</title>
34        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
35        <link rel="shortcut icon" type="image/x-icon" href="ico/Grundbuch.ico">
36        <script type="text/javascript">
37                function ALKISexport() {
38                        window.open(<?php echo "'alkisexport.php?gkz=".$gkz."&tabtyp=grundbuch&gmlid=".$gmlid."'"; ?>);
39                }
40        </script>
41</head>
42<body>
43<?php
44$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisbestnw.php'");
45if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
46
47// G R U N D B U C H
48$sql="SELECT g.gml_id, g.bezirk, g.buchungsblattnummermitbuchstabenerweiterung AS nr, g.blattart, wb.v AS blattartv, wb.d AS blattartd,
49b.gml_id, b.bezirk, b.bezeichnung AS beznam, d.gml_id, d.land, d.bezeichnung, d.stelle, d.stellenart, wd.v AS stellev
50FROM ax_buchungsblatt g
51LEFT JOIN ax_buchungsblattbezirk b ON g.land=b.land AND g.bezirk=b.bezirk
52LEFT JOIN ax_dienststelle d ON b.land=d.land AND b.stelle=d.stelle
53LEFT JOIN alkis_wertearten wb ON cast(g.blattart AS character varying)=wb.k AND wb.element='ax_buchungsblatt' AND wb.bezeichnung='blattart'
54LEFT JOIN alkis_wertearten wd ON cast(d.stellenart AS character varying)=wd.k AND wd.element='ax_dienststelle' AND wd.bezeichnung='stellenart'
55WHERE g.gml_id= $1 AND g.endet IS NULL AND d.endet IS NULL;";
56// .. AND d.stellenart=1000
57
58$v = array($gmlid);
59$res = pg_prepare("", $sql);
60$res = pg_execute("", $v);
61if (!$res) {
62        echo "\n<p class='err'>Fehler bei Grundbuchdaten.</p>";
63        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
64}
65if ($row = pg_fetch_array($res)) {
66        $blattkey=$row["blattart"];
67        $blattart=$row["blattartv"];
68
69        echo "<p class='gbkennz'>ALKIS Bestand ".$row["bezirk"]." - ".$row["nr"]."&nbsp;</p>"; // Balken
70        echo "\n<h2><img src='ico/Grundbuch.png' width='16' height='16' alt=''> Grundbuch</h2>"
71        ."\n<table class='outer'>\n<tr>\n\t<td>"; // Kennz. im Rahmen
72                if ($blattkey == 1000) {
73                        echo "\n\t\t<table class='kennzgb' title='Bestandskennzeichen'>";
74                } else {
75                        echo "\n\t\t<table class='kennzgbf' title='Bestandskennzeichen'>"; // dotted
76                }
77                        echo "\n\t\t<tr>"
78                                ."\n\t\t\t<td class='head'>"; // .d nicht gefÃŒllt
79                                if ($showkey) {echo "<span class='key'>".$row["stellenart"]."&nbsp;</span>";}
80                                echo $row["stellev"]."</td>";
81                                echo "\n\t\t\t<td class='head'>Bezirk</td>"
82                                ."\n\t\t\t<td class='head' title='".htmlentities($row["blattartd"], ENT_QUOTES, "UTF-8")."'>";
83                                if ($showkey) {echo "<span class='key'>".$blattkey."&nbsp;</span>";}
84                                echo $blattart."</td>"
85                        ."\n\t\t</tr>\n\t\t<tr>"
86                                ."\n\t\t\t<td title='Amtsgerichtsbezirk'>";
87                                if ($showkey) {echo "<span class='key'>".$row["stelle"]."</span><br>";}
88                                echo htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8")."</td>"
89                                ."\n\t\t\t<td title='Grundbuchbezirk'>";
90                                if ($showkey) {echo "<span class='key'>".$row["bezirk"]."</span><br>";}
91                                echo htmlentities($row["beznam"], ENT_QUOTES, "UTF-8")."</td>"
92                                ."\n\t\t\t<td title='Grundbuch-Blatt'><span class='wichtig'>".$row["nr"]."</span></td>"
93                        ."\n\t\t</tr>"
94                ."\n\t\t</table>"
95                ."\n\t</td>\n\t<td>&nbsp;"
96        ."\n\t</td>\n</tr>\n</table>";
97}
98
99if ($blattkey == 5000) { // fikt. Blatt
100        echo "\n<p>Keine Angaben zum Eigentum bei fiktivem Blatt.</p>";
101} else {
102        // E I G E N T U E M E R
103        $n = eigentuemer($gmlid, true, ""); // MIT Adressen.
104        if ($n == 0) { // keine NamensNr, kein Eigentuemer
105                echo "\n<p class='err'>Keine Namensnummer gefunden.</p>"
106                ."\n<p>Bezirk: ".$row["bezirk"].", Blatt: ".$row["nr"].", Blattart ".$blattkey." (".$blattart.")</p>";
107        }
108}
109
110// Vorab pruefen, ob der Fall "Rechte an .." vorliegt.
111if ($blattkey == 1000) { // GB-Blatt  <istBestandteilVon<  sh=herrschend  >an/zu>  sd=dienend
112        $sql="SELECT count(sd.laufendenummer) AS anzahl "
113        ."FROM ax_buchungsstelle sh JOIN ax_buchungsstelle sd ON (sd.gml_id=ANY(sh.an) OR sd.gml_id=ANY(sh.zu)) "
114        ."WHERE sh.istbestandteilvon= $1 AND sd.endet IS NULL AND sh.endet IS NULL;";
115
116        $v=array($gmlid); // GB-Blatt
117        $res=pg_prepare("", $sql);
118        $res=pg_execute("", $v);
119        if (!$res) echo "\n<p class='err'>Fehler bei Suche nach Buchungen.</p>";
120        $row=pg_fetch_array($res);
121        $anz=$row["anzahl"];
122} else { // 2000: Katasterblatt, 3000: Pseudoblatt, 5000: Fiktives Blatt
123        $anz=0;
124}
125if ($anz > 0) { // auch Rechte: dann erweiterter Tabellen-Kopf
126        echo "\n<hr>\n\n<h3><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Rechte und Flurst&uuml;cke</h3>"
127        ."\n<table class='fs'>"
128        ."\n<tr>" // zus. Kopfz.
129                ."\n\t<td>&nbsp;</td>"
130                ."\n\t<td class='dien' title='herrschendes Grundst&uuml;ck'>herrschende Buchungsart</td>"
131                ."\n\t<td class='dien'>Anteil</td>"
132                ."\n\t<td class='dien'>Bezirk</td>"
133                ."\n\t<td class='dien'>Blatt</td>"
134                ."\n\t<td class='dien'>BVNR</td>"
135                ."\n\t<td class='dien' title='dienendes Grundst&uuml;ck'>Buchungsart</td>"
136                ."\n\t<td>&nbsp;</td>"
137        ."\n</tr>";
138} else { // nur FlurstÃŒcke, keine Rechte an/zu anderen Buchungen
139        echo "\n<hr>\n\n<h3><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Flurst&uuml;cke</h3>"
140        ."\n<table class='fs'>";
141} // gemeinsame Kopfzeile
142echo "\n<tr>"
143        ."\n\t<td class='heads' title='laufende Nummer Bestandsverzeichnis (BVNR) = Grundst&uuml;ck'><span class='wichtig'>BVNR</span><img src='ico/sort.png' width='10' height='10' alt='' title='prim&auml;re Sortierung'></td>"
144        ."\n\t<td class='head'>Buchungsart</td>"
145        ."\n\t<td class='head'>&nbsp;</td>"
146        ."\n\t<td class='heads'>Gemarkung</td>"
147        ."\n\t<td class='heads'>Flur</td>"
148        ."\n\t<td class='heads fsnr' title='Flurst&uuml;cksnummer (Z&auml;hler / Nenner)'><span class='wichtig'>Flurst.</span></td>"
149        ."\n\t<td class='head flag'>Fl&auml;che</td>"
150        ."\n\t<td class='head nwlink noprint' title='Verlinkung zu anderen Nachweis-Arten und verbundenen Objekten'>weitere Auskunft</td>"
151."\n</tr>";
152
153// Blatt ->  B u c h u n g s s t e l l e
154// aktuelles ax_buchungsblatt <istBestandteilVon< ax_buchungsstelle
155$sql ="SELECT s.gml_id, s.buchungsart, s.laufendenummer AS lfd, s.beschreibungdesumfangsderbuchung AS udb, s.zaehler, s.nenner, s.nummerimaufteilungsplan AS nrap, s.beschreibungdessondereigentums AS sond, b.v as bart, b.d
156FROM ax_buchungsstelle s LEFT JOIN alkis_wertearten b ON cast(s.buchungsart AS character varying)=b.k AND b.element='ax_buchungsstelle' and b.bezeichnung='buchungsart'
157WHERE s.istbestandteilvon= $1 AND s.endet IS NULL ORDER BY cast(s.laufendenummer AS integer);";
158
159$v=array($gmlid); // Rel. istBestandteilVon
160$res=pg_prepare("", $sql);
161$res=pg_execute("", $v);
162
163if (!$res) {
164        echo "\n<p class='err'>Fehler bei Buchung.</p>";
165        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '". $gmlid."'</p>";}
166}
167$i=0;
168$fscnt=0;
169$zpaar=false;
170while($row = pg_fetch_array($res)) { // Loop Buchungsstelle (GrundstÃŒck)
171        $lfdnr=$row["lfd"];
172        $bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
173        $gml_bs=$row["gml_id"]; // id der buchungsstelle
174        $bartkey=$row["buchungsart"]; // SchlÃŒsselwert
175        $bart=$row["bart"]; // BuchungsART Text dazu
176        $bartstory=htmlentities($row["d"], ENT_QUOTES, "UTF-8"); // .. fÃŒr Anzeige aufbereitet
177
178        if ($row["zaehler"] == "") {
179                $anteil = "";
180        } else {
181                $anteil = $row["zaehler"]."/".$row["nenner"];
182        }
183
184        if ($zpaar) {$trclass='paa';} else {$trclass='unp';} // Farbwechsel je GrundstÃŒck
185        $zpaar=!$zpaar;
186
187        // F l u r s t u e c k s d a t e n  zur direkten Buchungsstelle
188        $j = bnw_fsdaten($con, $lfdnr, $gml_bs, $bart, $anteil, true, $bartkey, $bartstory); // return=Anzahl der FS
189        $fscnt=$fscnt + $j;
190        if ($j == 0) { //  k e i n e  Flurstuecke gefunden (Miteigentumsnteil usw.)
191                // Bei "normalen" Grundstuecken wurden Flurstuecksdaten gefunden und ausgegeben.
192                // Bei Miteigentumsanteil, Erbbaurecht usw. muss nach weiteren Buchungsstellen gesucht werden:
193                //  Buchungsstelle >an/zu> (andere)Buchungsstelle >istBestandTeilVon> "FiktivesBlatt (ohne) Eigentuemer"
194
195                // dann andere "dienende" Buchungsstellen
196                //  sh=herrschend          sd=dienend
197                //  ax_buchungsstelle >zu> ax_buchungsstelle (des gleichen Blattes)
198                //  ax_buchungsstelle >an> ax_buchungsstelle (anderes Blatt, z.B Erbbaurecht an)
199
200/* alte Version
201                $sql="SELECT sd.gml_id, sd.buchungsart, sd.laufendenummer AS lfd, sd.beschreibungdesumfangsderbuchung AS udb, sd.nummerimaufteilungsplan AS nrap, sd.beschreibungdessondereigentums AS sond, wb.v AS bart "
202                ."FROM ax_buchungsstelle sh JOIN ax_buchungsstelle sd ON (sd.gml_id=ANY(sh.an) OR sd.gml_id=ANY(sh.zu)) "
203                ."LEFT JOIN alkis_wertearten wb ON cast(sd.buchungsart AS character varying)=wb.k AND wb.element='ax_buchungsstelle' AND wb.bezeichnung='buchungsart' "
204                ."WHERE sh.gml_id= $1 AND sh.endet IS NULL AND sd.endet IS NULL ORDER BY sd.laufendenummer;"; */
205
206                // Mit "UNION" um die FÀlle mit JOIN ÃŒber die Arrays "an" und "zu" unterscheiden zu können
207                $sql="SELECT uni.*, wb.v AS bart FROM "
208                ."(SELECT sda.gml_id, sda.buchungsart, sda.laufendenummer AS lfd, sda.beschreibungdesumfangsderbuchung AS udb, sda.nummerimaufteilungsplan AS nrap, sda.beschreibungdessondereigentums AS sond, 'an' as anzu "
209                ."FROM ax_buchungsstelle sha JOIN ax_buchungsstelle sda ON sda.gml_id=ANY(sha.an) "
210                ."WHERE sha.gml_id= $1 AND sha.endet IS NULL AND sda.endet IS NULL "
211                ."UNION SELECT sdz.gml_id, sdz.buchungsart, sdz.laufendenummer AS lfd, sdz.beschreibungdesumfangsderbuchung AS udb, sdz.nummerimaufteilungsplan AS nrap, sdz.beschreibungdessondereigentums AS sond, 'zu' as anzu "
212                ."FROM ax_buchungsstelle shz JOIN ax_buchungsstelle sdz ON sdz.gml_id=ANY(shz.zu) "
213                ."WHERE shz.gml_id= $1 AND shz.endet IS NULL AND sdz.endet IS NULL "
214                .") AS uni LEFT JOIN alkis_wertearten wb ON cast(uni.buchungsart AS character varying)=wb.k AND wb.element='ax_buchungsstelle' AND wb.bezeichnung='buchungsart' "
215                ."ORDER BY uni.lfd;";
216        //      Testfall suchen: SELECT gml_id, zu, durch FROM ax_buchungsstelle WHERE NOT zu IS NULL OR NOT durch IS NULL;
217        //      Die Relationen "an" und "durch" kommen in der Praxis nicht vor.
218
219                $v=array($gml_bs); // gml_id der "herrschenden" Buchungs-Stelle
220                $resan=pg_prepare("", $sql); // Suche nach "dienender" Buchungsstelle
221                $resan=pg_execute("", $v);
222                if (!$resan) {
223                        echo "\n<p class='err'>Fehler bei 'andere Buchungsstelle'.</p>";
224                        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = '".$gml_bs."'</p>";}
225                }
226
227                $a=0; // count
228                $altbvnr=""; // Gruppenwechsel
229                while($rowan= pg_fetch_array($resan)) {
230                        $lfdnran=$rowan["lfd"]; // BVNR an
231                        $gml_bsan=$rowan["gml_id"];     // id der buchungsstelle an
232                        $baan=$rowan["bart"];   // Buchungsart an, entschluesselt
233                        $anzu=$rowan["anzu"];   // Welche Relation? Recht an oder Recht zu ?
234
235                        // a n d e r e s   B l a t t  (an dem das aktuelle Blatt Rechte hat)
236                        // dienendes Grundbuch
237                        $sql ="SELECT b.gml_id, b.land, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung AS blatt, b.blattart, wb.v AS blattartv, z.bezeichnung AS beznam "
238                        ."FROM ax_buchungsblatt b JOIN ax_buchungsstelle s ON b.gml_id=s.istbestandteilvon "
239                        ."LEFT JOIN ax_buchungsblattbezirk z ON b.land=z.land AND b.bezirk=z.bezirk "
240                        ."LEFT JOIN alkis_wertearten wb ON cast(b.blattart AS character varying)=wb.k AND wb.element='ax_buchungsblatt' AND wb.bezeichnung='blattart' "
241                        ."WHERE s.gml_id= $1 AND b.endet IS NULL ORDER BY b.land, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung;";
242                        $v=array($gml_bsan);
243                        $fbres=pg_prepare("", $sql);
244                        $fbres=pg_execute("", $v);
245                        if (!$fbres) {
246                                echo "\n<p class='err'>Fehler bei fiktivem Blatt.</p>";
247                                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}                       
248                        }
249                        $b=0;
250                        while($fbrow = pg_fetch_array($fbres)) { // genau 1
251                                $fbgml=$fbrow["gml_id"];
252                                $fbland=$fbrow["land"];
253                                $fbbez=$fbrow["bezirk"];
254                                $beznam=$fbrow["beznam"];
255                                $fbblatt=$fbrow["blatt"];
256                                $fbbartkey=$fbrow["blattart"]; // Key
257                                $fbbart=$fbrow["blattartv"];  // Value
258                                $b++;
259                        }
260                        if ($b != 1) { // Überwachen: genau 1?
261                                echo "\n<p class='err'>Anzahl fiktive Bl&auml;tter zu anderer Buchungstelle = ".$b."</p>";
262                        }
263
264                        // G r u n d b u c h d a t e n  zur  a n d e r e n  Buchungsstelle
265                        echo "\n<tr class='".$trclass."'>"
266                                ."\n\t<td id='bvnr".$lfdnr."'>"; // Sp.1 Erbbau BVNR, Sprungmarke
267                                        if($bvnr == $altbvnr) { // gleiches Grundstueck
268                                                echo "&nbsp;"; // dann Anzeige unterdruecken
269                                        } else {
270                                        //      echo "<a id='bvnr".$lfdnr."'></a>" // Sprungmarke
271                                                echo "<span class='wichtig'>".$bvnr."</span>";
272                                                $altbvnr = $bvnr; // Gruppenwechsel merken
273                                        }
274                                echo "</td>"
275                                ."\n\t<td class='dien'>"; // Sp.2 Buchung
276                                        if ($showkey) {echo "<span class='key'>".$row["buchungsart"]."</span> ";}
277                                echo $bart." an</td>"
278                                ."\n\t<td class='dien'>".$anteil."</td>" // Sp.3 Anteil
279                                ."\n\t<td class='dien' title='Grundbuch-Bezirk'>"; // Sp.4 Gemarkg., hier Bezirk
280                                        if ($showkey) {echo "<span class='key'>".$fbbez."</span> ";}
281                                        echo htmlentities($beznam, ENT_QUOTES, "UTF-8")
282                                ."</td>";
283                                echo "\n\t<td class='dien' title='".$fbbart."'>".$fbblatt."</td>" // Sp. 5 Blatt
284                                        ."\n\t<td class='dien' title='Bestandsverzeichnis-Nummer'>".str_pad($lfdnran, 4, "0", STR_PAD_LEFT)."</td>" // Sp.6 BVNR
285                                        ."\n\t<td class='dien' title='Buchungsart'>"; // Sp.7 Buchungsart
286                                        if ($showkey) {echo "<span class='key'>".$rowan["buchungsart"]."</span> ";}
287                                        echo $baan." "
288                                ."</td>"
289                                ."\n\t<td>" // Sp.8 Link ("an" oder "zu"?)
290                                        ."\n\t\t<p class='nwlink noprint'>".$anzu; // Recht "an" oder "zu"
291                                        if ($showkey) {echo " <span class='key'>".$fbbartkey."</span>";} // Blatt-Art SchlÃŒssel
292                                        echo "\n\t\t\t<a href='alkisbestnw.php?gkz=".$gkz."&amp;gmlid=".$fbgml;
293                                                if ($showkey) {echo "&amp;showkey=j";}
294                                                echo "#bvnr".$lfdnran // Sprungmarke auf der Seite
295                                                ."' title='Zum Grundbuchnachweis des dienenden Blattes'>";
296                                                echo $fbbart // Blatt-Art entschlÃŒsselt
297                                        ." <img src='ico/GBBlatt_link.png' width='16' height='16' alt=''></a>\n\t\t</p>"
298                                ."\n\t</td>"
299                        ."\n</tr>";
300
301                        // F l u r s t u e c k s d a t e n  zur  a n d e r e n  Buchungsstelle
302                        // Buchungsart wird nur in erster Zeile ausgegeben, hier leer
303
304                        $aj = bnw_fsdaten($con, $lfdnran, $gml_bsan, "", $anteil, false, "", ""); // return=Anz.FS
305                        $fscnt=$fscnt + $aj;
306                        // +++ Gibt es Sondereigentum beim fiktiven Blatt?
307                        if ($rowan["nrap"] != "") {
308                                echo "\n<tr>"
309                                        ."\n\t<td class='sond' colspan=8>Nr. im Aufteilungsplan: ".$rowan["nrap"]."</td>"
310                                ."\n</tr>";
311                        }
312                        if ($rowan["sond"] != "") {
313                                echo "\n<tr>"
314                                        ."\n\t<td class='sond' colspan=8>Verbunden mit dem Sondereigentum an: ".htmlentities($rowan["sond"], ENT_QUOTES, "UTF-8")."</td>"
315                                ."\n</tr>";
316                        }
317                        $a++;
318                }
319                if ($a == 0) {
320                        echo "\n<tr class='".$trclass."'>"
321                                ."\n\t<td><span class='wichtig'>".$bvnr."</span></td>"
322                                ."\n\t<td colspan=7><p class='warn'>Keine Flurst&uuml;cke zu Buchung ".$bvnr." im berechtigten Bereich.</p></td>"
323                        ."\n</tr>";
324                }
325        }
326        $i++;
327        if ($row["nrap"] != "") { // Nr im Auft.Plan
328                echo "\n<tr>"
329                        ."\n\t<td class='nrap' colspan=8>Nummer <span class='wichtig'>".$row["nrap"]."</span> im Aufteilungsplan.</td>"
330                ."\n</tr>";
331        }
332        if ($row["sond"] != "") { // Sondereigentumsbeschreibung
333                echo "\n<tr>"
334                        ."\n\t<td class='sond' colspan=8>Verbunden mit dem Sondereigentum an: ".$row["sond"]."</td>"
335                ."\n</tr>";
336        } // Ende Buchungsstelle/BVNR
337} // Ende Loop
338echo "\n</table>";
339
340if ($i == 0) {
341        echo "\n<p class='err'>Keine Buchung gefunden.</p>";
342} else {
343        if ($i > 5 and $fscnt > 5) { // nur wenn nicht auf einen Blick zu erkennen
344                echo "\n<p class='cnt'>".$i." Buchungen mit ".$fscnt." Flurst&uuml;cken</p>";
345        }
346}
347
348// B e r e c h t i g t e  Buchungsblaetter  mit Recht an/zu dem aktuellen (fiktiven?) Blatt
349
350// bf                          sf            sb                               bb
351// Blatt   <istBestandteilVon< Stelle  <an<  Stelle      >istBestandteilVon>  Blatt
352// Fiktiv                      Fiktiv  <zu<  Berechtigt                       Berechtigt
353$sql="SELECT sf.laufendenummer AS anlfdnr, bb.gml_id, bb.land, bb.bezirk, bb.buchungsblattnummermitbuchstabenerweiterung AS blatt, bb.blattart, wa.v AS blattartv,
354sb.gml_id AS gml_s, sb.laufendenummer AS lfdnr, sb.buchungsart, wb.v AS bart, wb.d AS bartd, bz.bezeichnung AS beznam, d.bezeichnung, d.stelle, d.stellenart, wd.v AS stellev
355FROM ax_buchungsstelle sf JOIN ax_buchungsstelle sb ON (sf.gml_id=ANY(sb.an) OR sf.gml_id=ANY(sb.zu))
356JOIN ax_buchungsblatt bb ON bb.gml_id=sb.istbestandteilvon
357LEFT JOIN ax_buchungsblattbezirk bz ON bb.land=bz.land AND bb.bezirk=bz.bezirk
358LEFT JOIN ax_dienststelle d ON bz.land=d.land AND bz.stelle=d.stelle
359LEFT JOIN alkis_wertearten wa ON cast(bb.blattart AS character varying)=wa.k AND wa.element='ax_buchungsblatt' AND wa.bezeichnung='blattart'
360LEFT JOIN alkis_wertearten wb ON cast(sb.buchungsart AS character varying)=wb.k AND wb.element='ax_buchungsstelle' AND wb.bezeichnung='buchungsart'
361LEFT JOIN alkis_wertearten wd ON cast(d.stellenart AS character varying)=wd.k AND wd.element='ax_dienststelle' AND wd.bezeichnung='stellenart'
362WHERE sf.istbestandteilvon = $1 AND sf.endet IS NULL AND sb.endet IS NULL AND bb.endet IS NULL
363ORDER BY cast(sf.laufendenummer AS integer), bz.bezeichnung, bb.buchungsblattnummermitbuchstabenerweiterung, cast(sb.laufendenummer AS integer);";
364
365$v = array($gmlid);
366$resb = pg_prepare("", $sql);
367$resb = pg_execute("", $v);
368if (!$resb) {
369        echo "\n<p class='err'>Fehler bei 'Berechtigte Bl&auml;tter.</p>";
370        if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
371}
372$b=0; // count: Buchungen / BlÀtter
373$zpaar=false;
374while($rowb = pg_fetch_array($resb)) {
375        if ($b == 0) { // Ueberschrift und Tabelle nur ausgeben, wenn etwas gefunden wurde
376                echo "\n\n<h3><img src='ico/Grundbuch_zu.png' width='16' height='16' alt=''> Berechtigte Grundb&uuml;cher</h3>"
377                ."\n<table class='outer'>"
378                ."\n<tr>"
379                        ."\n\t<td class='heads' title='lfd. Nr. auf diesem Blatt, wie im Teil Flurst&uuml;cke'><span class='wichtig'>an BVNR</span><img src='ico/sort.png' width='10' height='10' alt='' title='prim&auml;re Sortierung'></td>"
380                        ."\n\t<td class='head'>Dienststelle</td>"
381                        ."\n\t<td class='heads'>Bezirk</td>"
382                        ."\n\t<td class='heads'><span class='wichtig'>Blatt</span></td>"
383                        ."\n\t<td class='heads'>BVNR</td>"
384                        ."\n\t<td class='head'>Buchungsart</td>"
385                        ."\n\t<td class='head nwlink noprint'>Weitere Auskunft</td>"
386                ."\n</tr>";
387        }
388
389        $anlfdnr=$rowb["anlfdnr"]; // an BVNR
390        $anlfdnr0=str_pad($anlfdnr, 4, "0", STR_PAD_LEFT); // mit fÃŒhr.0
391        $gml_b=$rowb["gml_id"]; // id des ber. Blattes
392        $gml_s=$rowb["gml_s"]; // id der ber. B-Stelle
393        $blart=$rowb["blattart"];
394
395        $buch=$rowb["buchungsart"]; // Buchungsart Stelle berechtigt
396        $bart=$rowb["bart"]; // BA entschl.
397        $lfdnr=$rowb["lfdnr"]; // BVNR ber.
398        $bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
399
400        if ($zpaar) {$trclass='paa';} else {$trclass='unp';} // Farbwechsel je Zeile = GrundstÃŒck
401        $zpaar=!$zpaar;
402
403        echo "\n<tr class='".$trclass."'>"; // Der Teil "berechtigte GrundbÃŒcher" ist sortiert wie oberer Teil "FlurstÃŒcke"
404                echo "\n\t<td><span class='wichtig'>".$anlfdnr0."</span></td>"
405                ."\n\t<td>"; // Amtsgericht,Grundbuchamt
406                        echo htmlentities($rowb["stellev"], ENT_QUOTES, "UTF-8")." ";
407                        if ($showkey) {echo "<span class='key'>".$rowb["stelle"]."</span> ";}
408                        echo htmlentities($rowb["bezeichnung"], ENT_QUOTES, "UTF-8")
409                ."</td>"
410                ."\n\t<td>";
411                        if ($showkey) {echo "<span class='key'>".$rowb["bezirk"]."</span> ";}
412                        echo htmlentities($rowb["beznam"], ENT_QUOTES, "UTF-8")
413                ."</td>"
414                ."\n\t<td><span class='wichtig'>".$rowb["blatt"]."</span></td>"
415                ."\n\t<td>".$bvnr."</td>"
416                ."\n\t<td title='".htmlentities($rowb["bartd"], ENT_QUOTES, "UTF-8")."'>";
417                        if ($showkey) {echo "<span class='key'>".$buch."</span> ";}
418                        echo $bart
419                ."</td>"
420                ."\n\t<td>"
421                        ."\n\t\t<p class='nwlink noprint'>";
422// +++ SchlÃŒssel der Blatt-Art wenn showkey +++
423                        echo "\n\t\t\t<a href='alkisbestnw.php?gkz=".$gkz."&amp;gmlid=".$gml_b;
424                                if ($showkey) {echo "&amp;showkey=j";}
425                                echo "#bvnr".$lfdnr."' title='Nachweis des berechtigten Blattes an einer Buchung auf ".$blattart."'>".$rowb["blattartv"]; // "an" ggf. durch "zu" ersetzen?
426                                echo " \n\t\t\t<img src='ico/GBBlatt_link.png' width='16' height='16' alt=''></a>"
427                        ."\n\t\t</p>"
428                ."</td>"
429        ."\n</tr>";
430        $b++;
431}
432if ($b == 0) {
433        if ($blattkey > 2000 ) { // Warnung nicht bei Grundbuchblatt 1000 und Katasterblatt 2000
434                echo "\n<p class='err'>Keine berechtigten Bl&auml;tter zu ".$blattart." (".$blattkey.") gefunden.</p>";
435        }
436} else {
437        echo "\n</table>";
438        if ($i > 1) {
439                echo "\n<p class='cnt'>Rechte anderer Buchungsstellen an ".$b." der ".$i." Buchungen</p>";
440        }
441}
442?>
443
444<div class='buttonbereich noprint'>
445        <hr>
446        <a title="zur&uuml;ck" href='javascript:history.back()'><img src="ico/zurueck.png" width="16" height="16" alt="zur&uuml;ck"></a>&nbsp;
447        <a title="Drucken" href='javascript:window.print()'><img src="ico/print.png" width="16" height="16" alt="Drucken"></a>&nbsp;
448        <a title="Export als CSV" href='javascript:ALKISexport()'><img src="ico/download_gb.png" width="32" height="16" alt="Export"></a>&nbsp;
449</div>
450<?php footer($gmlid, $_SERVER['PHP_SELF']."?", ""); ?>
451</body>
452</html>
Note: See TracBrowser for help on using the repository browser.