source: trunk/info/info/alkisn/alkisfkt.php @ 419

Revision 419, 31.1 KB checked in by frank.jaeger, 5 years ago (diff)

Auskunft Modul Flurstückshistorie nun auch mit Flurstückskennzeichen aufzurufen alternativ zu gmlid.

RevLine 
[362]1<?php
2/*      Modul: alkisfkt.php
3
4        ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo).
5        Functions
6
7        Version:
8        2016-02-24 Version fuer norGIS-ALKIS-Import, "function linkgml" raus. Case-EntschlÃŒsselung raus.
[364]9        2016-03-03 Hinweis auf Datenfehler wenn "ax_person" fehlt in function "eigentuemer"
[375]10        2016-03-14 Kleine Korrekturen
[377]11        2016-11-29 Gemeinsam genutzte Datenbanken ermöglichen (Filter Gemeinde)
[387]12        2017-06-08 gestreifte Tabelle, Feinkorrekturen
[391]13        2017-10-17 Deutsches Datumsformat fÃŒr Geburtsdatum der Person
[394]14        2017-11-03 neue function werteliste()
[398]15        2017-12-20 Default Anzeigewert "EigentÃŒmer" im Link fÃŒr leere EigentÃŒmerart, JÃŒngste Adresse zur Person verwenden.
[402]16        2018-04-23 Berechtigte Buchungen im FS-Nachw. verbessern. Neue Spalte statt Überschriften fÃŒr "EigentÃŒmer" und "Berechtigte Buchungen".
[405]17        2018-05-03 GrundstÃŒcksnachweis
[412]18        2018-11-09 Umstellung Full-Schema
[417]19        2018-11-19 EntschlÃŒsseln "zeigtaufexternes_art" mit function fortfuehrungen().
[419]20        2018-12-18 function fskenn_dbformat
[412]21
22        ++ ToDo: Parameter $lnkclass in eigentuemer() und $jfenster in buchung_anzg() vereinheitlichen
[362]23*/
24
25function footer($gmlid, $link, $append) {
26        // Einen Seitenfuss ausgeben.
27        // Die Parameter &gkz= und &gmlid= kommen in allen Modulen einheitlich vor
28        // Den URL-Parameter "&showkey=j/n" umschalten lassen.
29        // $append wird angehaengt wenn gefuellt. Anwendung: &eig=j bei FS-NW, &ltyp=m/p/o bei Lage
[402]30        global $gkz, $showkey, $hilfeurl, $auth, $debug;
[362]31
[387]32        // S c r e e n - Foot
[362]33        echo "\n<div class='confbereich noprint'>"
[387]34        ."\n\t<table class='outer'>\n\t<tr>";
[362]35
36        // Spalte 1: Info Benutzerkennung
[375]37        if ($auth == "mapbender") {
38                $customer=$_SESSION["mb_user_name"];
[387]39                echo "\n\t\t<td title='Info'><i>Benutzer:&nbsp;".$customer."</i></td>";
[375]40        } else {
[387]41                echo "\n\t\t<td>&nbsp;</td>";
[375]42        }
[362]43
44        // Spalte 2: Umschalter
[387]45        echo "\n\t\t<td title='Konfiguration'>";
46                $mylink ="\n\t\t\t<a class='keyswitch' href='".$link."gkz=".$gkz."&amp;gmlid=".$gmlid.$append;
[362]47                if ($showkey) { // Umschalten SchlÃŒssel ein/aus
48                        echo $mylink."&amp;showkey=n' title='Verschl&uuml;sselungen ausblenden'>Schl&uuml;ssel aus</a>";
49                } else {
50                        echo $mylink."&amp;showkey=j' title='Verschl&uuml;sselungen anzeigen'>Schl&uuml;ssel ein</a>";
51                }
[402]52                // TemporÀr eine Ansicht ohne Entwicklungsumgebung
53                if ($debug > 0) {
54                        echo "&nbsp;|&nbsp;".$mylink."&amp;nodebug=j' title='Debug-Ausgaben tempor&auml;r abschalten'>Ansicht ohne Testausgaben</a>";
55                }
[387]56        echo "\n\t\t</td>";
[362]57
58        // Spalte 3
[387]59        echo "\n\t\t<td title='Hilfe'>"
60                ."\n\t\t\t<p class='nwlink'>\n\t\t\t\t<a target='_blank' href='".$hilfeurl."' title='Dokumentation'>Hilfe zur ALKIS-Auskunft</a>\n\t\t\t</p>\n\t\t</td>"
61                ."\n\t</tr>\n\t</table>"
62        ."\n</div>\n";
63
64        // P r i n t - Foot
65        if ($auth == "mapbender") {
66        //      $customer=$_SESSION["mb_user_name"];
67                echo "\n<p class='onlyprint'><i>Mapbender-Benutzer:&nbsp;".$customer."</i></p>";
68        }
[362]69        return 0;
70}
71
[402]72function ber_bs_zaehl($gmls) {
73        // Berechtigte Buchungs-Stellen zaehlen.
[362]74
[387]75        // Buchungstelle dienend <(Recht)an< Buchungstelle herrschend
[402]76        $sql ="SELECT count(sh.gml_id) AS anz FROM ax_buchungsstelle sd JOIN ax_buchungsstelle sh ON sd.gml_id=ANY(sh.an) "
77        ."WHERE sd.gml_id= $1 AND sh.endet IS NULL AND sd.endet IS NULL;";
[387]78        $v = array($gmls); // GML dienende Buchungs-Stelle
[362]79        $resan = pg_prepare("", $sql);
80        $resan = pg_execute("", $v);
[402]81        if (!$resan) {echo "\n<p class='err'>Fehler bei 'berechtigte Buchungsstellen zaehlen'.</p>";}
82        $rowan = pg_fetch_assoc($resan);
83        $anz=$rowan["anz"];
84        pg_free_result($resan);
85        return $anz; // Funktionswert = Anzahl der berechtigten Buchungen
86}
87
[405]88function buchung_anzg($gmlbs, $eig, $jsfenster, $gml_fs, $trtyp) {
[402]89        // In einem FS-Nachw. EINE Buchungsstelle anzeigen.
90        // Parameter:
91        //  $gmlbs: GML-ID der anzuzeigenden Buchungs-Stelle
92        //  $eig: EigentÃŒmer ausgeben j/n
93        //  $jsfenster: Javascript-Funktion zum Verlassen des Feature-Info-Fensters verwenden (bool)
94        //  $gml_fs: GML-ID des FlurstÃŒcke (nur bei erstem Aufruf in einem FS-Nachweis notwendig)
[405]95        //      $trtyp: Tabellen-Zeilen-Typ. Werte: 1="mit GS-Link", 2="ohne GS-Link", 3="ohne GS-Link +Zeile einfÀrben"
[402]96        global $gkz, $debug, $showkey, $bartgrp, $barttypgrp, $stufe;
97
98        $sqlbs="SELECT sh.gml_id AS hgml, sh.buchungsart, sh.laufendenummer as lfd, sh.zaehler, sh.nenner, sh.nummerimaufteilungsplan as nrpl, sh.beschreibungdessondereigentums as sond, " // Buchungs-Stelle herrschend
[412]99        ."b.gml_id AS g_gml, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung as blatt, b.blattart, z.bezeichnung, a.beschreibung AS bart, a.dokumentation AS barttitle, w.beschreibung AS blattartv "
[402]100        ."FROM ax_buchungsstelle sh "
101        ."JOIN ax_buchungsblatt b ON b.gml_id=sh.istbestandteilvon "
102        ."LEFT JOIN ax_buchungsblattbezirk z ON z.land=b.land AND z.bezirk=b.bezirk "
[412]103        ."LEFT JOIN ax_buchungsart_buchungsstelle a ON sh.buchungsart = a.wert " // entschl. Buchungsart
104        ."LEFT JOIN ax_blattart_buchungsblatt w ON b.blattart = w.wert " // entschl. Blatt-Art
[402]105        ."WHERE sh.gml_id= $1 AND sh.endet IS NULL AND b.endet IS NULL AND z.endet IS NULL;";
106
107        $v = array($gmlbs); // ID dienende Buchungs-Stelle
108        $resbs = pg_prepare("", $sqlbs);
109        $resbs = pg_execute("", $v);
110        if (!$resbs) {
111                echo "\n<p class='err'>Fehler bei 'Buchungsstelle ausgeben'.</p>";
112                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sqlbs, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlbs."'</p>";}
[362]113        }
[402]114        $gezeigt=false; // Funktionswert
115        if ($rowbs = pg_fetch_assoc($resbs)) { // ein Treffer
116                $blattkeyber=$rowbs["blattart"]; // Schluessel von Blatt-Art des GB
117                if ($blattkeyber != '5000' or $debug > 1) { // "Fiktives Blatt" nur bei Entwicklung anzeigen
118                        $gezeigt=true; // Funktionswert
119                        $hgml=$rowbs["hgml"]; // GML-ID der (herrschenden) BuchungsStelle
120                        $bartkey=$rowbs["buchungsart"]; // Buchungsart SchlÃŒssel
[405]121                        $bart=$rowbs["bart"]; // Buchungsart Text
[402]122                        $beznam=$rowbs["bezeichnung"]; // Bezirk
123                        $blattartber=$rowbs["blattartv"]; // Wert von Blatt-Art des GB
124                        $nrpl=$rowbs["nrpl"]; // Nr im Auft.plan
125                        $sond=$rowbs["sond"]; // Beschr. d.Sondereigentums
126                        $gbgml=$rowbs["g_gml"]; // GML-ID des Grundbuch-Blattes
127                        $blatt=ltrim($rowbs["blatt"], "0");
128                        $lfd=ltrim($rowbs["lfd"], "0");
129                        if ($bartkey != $bartgrp) { // Wechsel der Buchungsart
130                                $barttitle=$rowbs["barttitle"]; // Buchungsart ErklÀrung
131                                switch (true) { // Die Buchungsart einem Typ (Gruppierung) zuweisen
132                                        case ($bartkey <= 1999): $barttyp = "E"; break; // Eigentum/GrundstÃŒck
133                                        case ($bartkey >= 2000): $barttyp = "R"; break; // GrundstÃŒcksgleiches Recht, z.B. 2101 "Erbbaurecht"
134                                        default: $barttyp = "E"; break;
135                                }
136                                if ($barttypgrp != $barttyp) { // Wenn der Typ wechselt, neue Überschrift in Tabelle
137                                        switch ($barttyp) { // Text der Überschrift
138                                                case "E":
139                                                        if ($eig == 'j') {$h3txt = "Buchung und Eigentum";}
140                                                        else {$h3txt = "Buchung";}
141                                                break;
142                                                case "R": $h3txt = "Grundst&uuml;cksgleiche Rechte"; break;
143                                        }
144                                        if ($barttypgrp == "" and $gml_fs != "") { // die erste Überschrift mit ID und Umschalter
145                                                echo "\n\t<tr>\n\t\t<td colspan='3'>\n\t\t\t<h3 id='gb'>".$h3txt."</h3>\n\t\t</td>"; // 1-3
146                                                echo "\n\t\t<td>\n\t\t\t<p class='nwlink noprint'>" // 4
147                                                        ."\n\t\t\t\t<a href='".$_SERVER['PHP_SELF']. "?gkz=".$gkz."&amp;gmlid=".$gml_fs;
148                                                        if ($showkey) {echo "&amp;showkey=j";}
149                                                        if ($eig=="j") { // Umschalter: FS-Nachweis ruft sich selbst mit geaendertem Parameter auf. Positionierung auf Marke "#gb"
150                                                                echo "&amp;eig=n#gb' title='Umschalter: Flurst&uuml;cksnachweis'>ohne Eigent&uuml;mer</a>";
151                                                        } else {
152                                                                echo "&amp;eig=j#gb' title='Umschalter: Flurst&uuml;cks- und Eigent&uuml;mernachweis'>mit Eigent&uuml;mer "
153                                                                ."<img src='ico/EigentuemerGBzeile.png' width='16' height='16' alt=''></a>";
154                                                        }
155                                                echo "\n\t\t\t</p>\n\t\t</td>";
156                                        } else {
157                                                echo "\n\t<tr>\n\t\t<td colspan='3'>\n\t\t\t<h3>".$h3txt."</h3>\n\t\t</td>\n\t\t<td>&nbsp;</td>"; // 1-4
158                                        }
159                                        echo "\n\t</tr>";
160                                        $barttypgrp = $barttyp;
161                                }
[387]162
[404]163                                // +++ mehr Abstand oben zur Zeile in .css?
[402]164                                echo "\n\t<tr>" // Buchungsart als Zwischenzeile
165                                        ."\n\t\t<td class='ll'><img src='ico/Grundbuch.png' width='16' height='16' alt=''> Buchungsart:</td>" // 1
166                                        ."\n\t\t<td colspan='2' title='".$barttitle."'>"; // 2-3
167                                                if ($showkey) {echo "<span class='key'>(".$bartkey.")</span> ";}
168                                                echo "<span class='wichtig'>".$bart."</span>"
169                                        ."</td>"
170                                        ."\n\t\t<td></td>" // 4
171                                ."\n\t</tr>";
172                                $bartgrp=$bartkey; // Gruppe merken
173                        } // Ende Wechsel der Buchungsart
[387]174
[405]175                        echo "\n\t<tr>" // Zeile mit 4 Spalten fÃŒr Buchung und EigentÃŒmer
[402]176                                ."\n\t\t<td class='ll'><img src='ico/Grundbuch_zu.png' width='16' height='16' alt=''> Buchung:"; // 1
177                        if ($showkey and $debug > 2) {echo "<br><span class='key'>Stufe ".$stufe."<br>".$hgml."</span> ";}
178                        echo "</td>\n\t\t<td colspan='2'>"; // 2-3
[387]179
[402]180                                        // innere Tabelle: Rahmen mit GB-Kennz.
181                                        if ($blattkeyber == 1000) {
182                                                echo "\n\t\t\t<table class='kennzgb' title='Bestandskennzeichen'>";
183                                        } else {
184                                                echo "\n\t\t\t<table class='kennzgbf' title='Bestandskennzeichen'>"; // dotted
185                                        }
186                                        echo "\n\t\t\t<tr>"
187                                                ."\n\t\t\t\t<td class='head'>Bezirk</td>"
188                                                ."\n\t\t\t\t<td class='head'>";
189                                                if ($showkey) {echo "<span class='key'>".$blattkeyber."</span> ";}
190                                                echo $blattartber."</td>"
191                                                ."\n\t\t\t\t<td class='head'>Lfd-Nr</td>"
192                                        ."\n\t\t\t</tr>";
[405]193
194                                        if ($trtyp == 3) { // Treffer-Grundst. einfÀrben
195                                                echo "\n\t\t\t<tr class='paa'>";
196                                        } else {
197                                                echo "\n\t\t\t<tr>";
198                                        }
199                                        echo "\n\t\t\t\t<td title='Grundbuchbezirk'>";
[402]200                                                if ($showkey) {echo "<span class='key'>".$rowbs["bezirk"]."</span><br>";}
201                                                echo $beznam."</td>"
202                                                ."\n\t\t\t\t<td title='Grundbuch-Blatt'><span class='wichtig'>".$blatt."</span></td>"
203                                                ."\n\t\t\t\t<td title='Bestandsverzeichnis-Nummer (BVNR, Grundst&uuml;ck)'>".$lfd."</td>"
204                                        ."\n\t\t\t</tr>"
205                                        ."\n\t\t\t</table>";
[387]206
[402]207                                        if ($rowbs["zaehler"] <> "") {
208                                                echo "\n\t\t\t<p class='ant'>".$rowbs["zaehler"]."/".$rowbs["nenner"]."&nbsp;Anteil am Flurst&uuml;ck</p>";
209                                        }
210                                        if ($nrpl != "") {
211                                                echo "\n\t\t\t<p class='nrap' title='Nummer im Aufteilungsplan'>Nummer <span class='wichtig'>".$nrpl."</span> im Aufteilungsplan.</p>";
212                                        }
213                                        if ($sond != "") {
214                                                echo "\n\t\t\t<p class='sond' title='Sondereigentum'>Verbunden mit dem Sondereigentum: ".$sond."</p>";
215                                        }
216                                echo "\n\t\t</td>"; // 2-3
217
218                                echo "\n\t\t<td>"; // 4
219                                        echo "\n\t\t\t<p class='nwlink noprint'>";
[405]220                                        // Bestand
[402]221                                                if ($showkey) {echo "<span class='key'>".$blattkeyber."</span> ";}
222                                                $url="alkisbestnw.php?gkz=".$gkz."&amp;gmlid=".$gbgml;
223                                                if ($showkey) {$url.="&amp;showkey=j";}
224                                                if ($jsfenster) {$url="javascript:imFenster(\"".$url."\")";} // Sonderfall "Inlay" aus Feature-Info
[405]225                                                echo "\n\t\t\t\t<a href='".$url."' title='Grundbuchnachweis'>".$blattartber
[402]226                                                        ." <img src='ico/GBBlatt_link.png' width='16' height='16' alt=''>"
227                                                ."</a>";
[405]228                                        // Buchung
229                                                if ($trtyp == 1) {
230                                                        echo "<br>";
231                                                        if ($showkey) {echo "<span class='key'>".$bartkey."</span> ";}
232                                                        $url="alkisgsnw.php?gkz=".$gkz."&amp;gmlid=".$hgml;
233                                                        if ($showkey) {$url.="&amp;showkey=j";}
234                                                        if ($jsfenster) {$url="javascript:imFenster(\"".$url."\")";}
235                                                        echo "\n\t\t\t\t<a href='".$url."' title='GrundstÃŒcksnachweis: ".$bart."'>Buchung"
236                                                                ." <img src='ico/Grundstueck_Link.png' width='16' height='16' alt=''>"
237                                                        ."</a>";
238                                                }
[402]239                                        echo "\n\t\t\t</p>"
240                                ."\n\t\t</td>" // 4
241                        ."\n\t</tr>";
242                        if ($eig == "j") {
243                                if ($jsfenster) {$lnkclass = "imFenster";} else {$lnkclass = "";}
244                                $n = eigentuemer($gbgml, true, $lnkclass); // mit Adresse
245                        }
[387]246                }
[362]247        }
[402]248        pg_free_result($resbs);
249        return $gezeigt; // true wenn eine Buchung ausgegeben wurde
[387]250}
251
[405]252function ber_bs_anzg($gmls, $eig, $jsfenster, $gml_fs, $gsanfrd) {
[402]253        // In einem FS-Nachw. die berechtigten (herrschenden) Buchungsstellen anzeigen z.B. "Wohnungs-/Teileigentum".
254        // Parameter:
255        //  $gmls: GML-ID der dienenden Buchungs-Stelle. Im ersten Durchlauf also, die BS auf der das FS gebucht ist.
256        //  $eig: EigentÃŒmer ausgeben j/n
[404]257        //  $jsfenster: Javascript-Funktion zum Verlassen des Feature-Info-Fensters verwenden (bool)
258        //  $gml_fs: GML-ID des FlurstÃŒcke (nur bei erstem Aufruf in einem FS-Nachweis notwendig)
[405]259        //      $gsanfrd: In einem GS-Nachw. die GML-ID der in de URL angeforderten Buchungsstelle (-> Hervorhebung)
260        global $debug, $gezeigt;
[387]261
[402]262        // sh=Buchungstelle herrschend >(Recht)an> sd=Buchungstelle dienend >istBestandteilVon> BLATT -> Bezirk
263        $sql="SELECT sh.gml_id AS hgml, sh.buchungsart, sh.laufendenummer as lfd, sh.zaehler, sh.nenner, sh.nummerimaufteilungsplan as nrpl, sh.beschreibungdessondereigentums as sond, "
264        ."b.gml_id AS g_gml, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung as blatt, b.blattart "
265        ."FROM ax_buchungsstelle sh JOIN ax_buchungsblatt b ON b.gml_id=sh.istbestandteilvon "
266        ."WHERE $1 = ANY(sh.an) AND sh.endet IS NULL AND b.endet IS NULL "
267        ."ORDER BY b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung, sh.laufendenummer;";
[387]268
[402]269        $v = array($gmls); // ID dienende BuchungsStelle
[387]270        $resber = pg_prepare("", $sql);
271        $resber = pg_execute("", $v);
272        if (!$resber) {
273                echo "\n<p class='err'>Fehler bei 'berechtigte Buchungsstellen'.</p>";
274                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmls."'</p>";}
[362]275        }
[387]276        $an=0;
[402]277        $verfolg=array(); // Ein (zunÀchst leeres) Array fÃŒr weitere GML-IDs anlegen
278        while($rowan = pg_fetch_assoc($resber)) { // Loop durch Result von berechtigte BS
279                $hgml=$rowan["hgml"]; // GML-ID der berechtigten Buchungs-Stelle
[405]280
281                if ($hgml == $gsanfrd) {
282                        $trtyp=3; // einfÀrben, o. Lnk.
283                } else {
284                        if ($gezeigt) {
285                                $trtyp=2; // ohne Link auf GS
286                        } else { // Wenn Stufe 1 "Fiktives Blatt" war, welches ausgeblendet wurde, dann auf Stufe 2 einen GS-Link ausgeben
287                                $trtyp=1; // mit Link auf GS
288                        }
289                }
290                $gezeigt2=buchung_anzg($hgml, $eig, $jsfenster, $gml_fs, $trtyp); // Die herrschende Buchung anzeigen wenn nicht fiktiv
[402]291                $an++;
292                $weitere=ber_bs_zaehl($hgml);
293                if ($weitere > 0) { // gibt es WEITERE berechtigte Buchungen dazu?
294                        $verfolg[] = $hgml; // neuen Wert fÃŒr weitere Verfolgung in Array anfÃŒgen
[387]295                }
296        }
297        pg_free_result($resber);
[402]298        return $verfolg; // weitere zu verfolgende GML-ID zurÃŒck geben
[362]299}
300
301function kurz_namnr($lang) {
302        // Namensnummer kÃŒrzen. Nicht benötigte Stufen der Dezimalklassifikation abschneiden
303        $kurz=str_replace(".00","",$lang); // leere Stufen (nur am Ende)
304        $kurz=str_replace("0000","",$kurz); // ganz leer (am Anfang)
[402]305        $kurz=ltrim($kurz, "0"); // fuehr. Nullen
306        $kurz=str_replace(".0",".",$kurz); // fuehr. Null jeder Stufe
[377]307        $kurz=rtrim($kurz); // Leerzeichen hinten
308        // echo "/n<p class='dbg'> lang='".$lang."'</p>/n<p class='dbg'> kurz='".$kurz."'</p>";
[362]309        return $kurz;
310}
311
[405]312function bnw_fsdaten($lfdnr, $gml_bs, $ba, $anteil, $bvnraus, $bartkey, $bartstory) {
[362]313/*      Bestandsnachweis - Flurstuecksdaten
[405]314        Die Tabellenzeilen mit den Flurstuecksdaten zu EINER Buchungsstelle im Bestandsnachweis ausgeben.
[362]315        Die Funktion wird je einmal aufgerufen fÃŒr die Buchungen direkt auf dem GB (Normalfall).
316        Weiterere Aufrufe ggf. bei Erbbaurecht fÃŒr die mit "an" verknuepften Buchungsstellen.
[405]317        Tabellenkopf wird im aufrufenden Programm ausgegeben. */
318        global $debug, $gkz, $showkey, $filtkreis, $filtgem, $trclass;
[362]319
320        // F L U R S T U E C K
[405]321        $sql="SELECT g.gemarkungsnummer, g.bezeichnung, f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche "
322        ."FROM ax_flurstueck f LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer "
323        ."WHERE f.endet IS NULL AND g.endet IS NULL AND f.istgebucht = $1 ";
[377]324        if ($filtgem == '' ) { // ungefiltert
325                $v=array($gml_bs);
326        } else {
[412]327                $sql.="AND f.gemeindezugehoerigkeit_kreis = $2 AND f.gemeindezugehoerigkeit_gemeinde = $3 "; // ZustÀndiges Gebiet
[377]328                $v=array($gml_bs, $filtkreis, $filtgem);
329        }
330        $sql.="ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;";
[362]331        $resf = pg_prepare("", $sql);
332        $resf = pg_execute("", $v);
[387]333        if (!$resf) {echo "\n<p class='err'>Fehler bei Flurst&uuml;ck</p>";}
[362]334
335        if($bvnraus) { // nur bei direkten Buchungen die lfdNr ausgeben
336                $bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
[377]337        } else {
338                $bvnr="";
[362]339        }
[405]340        $altbvnr=""; // ++ besser mit "$j == 0" steuern?
[362]341        $j=0;
[402]342        while($rowf = pg_fetch_assoc($resf)) {
343                $flur= $rowf["flurnummer"];
[362]344                $fskenn=$rowf["zaehler"];
[387]345                if ($rowf["nenner"] != "") { // Bruch
[362]346                        $fskenn.="/".$rowf["nenner"];
347                }
348                $flae=number_format($rowf["amtlicheflaeche"],0,",",".") . " m&#178;";
349
[387]350                echo "\n<tr class='".$trclass."'>"; // eine Zeile je Flurstueck
[362]351                        // Sp. 1-3 der Tab. aus Buchungsstelle, nicht aus FS
[387]352                        if($bvnr == $altbvnr) { // gleiches Grundstueck, leer lassen
[362]353                                echo "\n\t<td>&nbsp;</td>"
354                                ."\n\t<td>&nbsp;</td>"
355                                ."\n\t<td>&nbsp;</td>";
356                        } else { // Sprungmarke, BVNR
[387]357                                echo "\n\t<td id='bvnr".$bvnr."'>"; // Sprungmarke
358                                //      echo "\n\t\t<a id='bvnr".$bvnr."'></a>";
359                                        echo "<span class='wichtig'>".$bvnr."</span>"
360                                ."\n\t</td>";
[362]361
362                                echo "\n\t<td title ='".$bartstory."'>"; // Buchungsart
363                                        if ($showkey) {echo "<span class='key'>".$bartkey."</span>&nbsp;";} // Schluessel
364                                        echo $ba; // entschluesselt
365                                echo "</td>"
366                                ."\n\t<td>&nbsp;</td>"; // Anteil
367                        }
[387]368
369                        // Sp. 4-7 aus Flurstueck
[362]370                        echo "\n\t<td>";
371                        if ($showkey) {echo "<span class='key'>".$rowf["gemarkungsnummer"]."</span> ";}
372                        echo $rowf["bezeichnung"]."</td>"
373                        ."\n\t<td>".$flur."</td>"
374                        ."\n\t<td class='fsnr'><span class='wichtig'>".$fskenn."</span>"
375                        ."</td>"
[387]376                        ."\n\t<td class='flag'>".$flae."</td>"; // "width" hier (flaG) erweiterbar, weil in andere Zeile die Buchungsart steht
[405]377                        echo "\n\t<td>\n\t\t<p class='nwlink noprint'>";
378                //      if($bvnr != $altbvnr) {
379                        if($j == 0) {
380                                echo "\n\t\t\t<a href='alkisgsnw.php?gkz=".$gkz."&amp;gmlid=".$gml_bs;
381                                        if ($showkey) {echo "&amp;showkey=j";}
382                                        echo "' title='Grundst&uuml;cksnachweis'>Buchung "
383                                        ."<img src='ico/Grundstueck_Link.png' width='16' height='16' alt=''>"
384                                ."</a>";
[362]385
[405]386                        }
387                                echo "\n\t\t\t<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$rowf["gml_id"]."&amp;eig=n";
[362]388                                        if ($showkey)   {echo "&amp;showkey=j";}
389                                        echo "' title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck "
390                                        ."<img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''>"
391                                ."</a>"
[405]392                        ."\n\t\t</p>\n\t</td>"
[362]393                ."\n</tr>";
[405]394                $altbvnr=$bvnr;
[362]395                $j++;
[387]396        } // Ende Loop Flurstueck
[362]397        pg_free_result($resf);
398        return $j;
399}
400
[387]401function eigentuemer($gmlid, $mitadresse, $lnkclass) {
[362]402        // Tabelle mit Eigentuemerdaten zu einem Grundbuchblatt ausgeben
[402]403        //  Sp.1="EigentÃŒmer" Sp.2=NamNr, Sp.3=Name/Adresse, Sp.4=Link
[362]404        // Parameter:
405        //      $gmlid = ID GB-Blattes
406        //      $mitadresse = Option (true/false) ob die Adresszeile ausgegeben werden soll
407        // Return = Anzahl Namensnummern
408
409        // Schleife 1: N a m e n s n u m m e r
410        // Beziehung: ax_namensnummer >istBestandteilVon> ax_buchungsblatt
411        global $debug, $gkz, $showkey;
412
413        if ($lnkclass == "") {
414                $lnkvor = "";
415                $lnknach = "";
[402]416        } else { // Link ÃŒber Java-Class "imFenster" aus alkisinlayausk.php
[362]417                $lnkvor  = "javascript:".$lnkclass."(\"";
418                $lnknach = "\")";
[402]419        }
[362]420
[412]421        $sqln="SELECT n.gml_id, n.laufendenummernachdin1421 AS lfd, n.zaehler, n.nenner, n.artderrechtsgemeinschaft AS adr, n.beschriebderrechtsgemeinschaft as beschr, n.eigentuemerart, n.anlass, n.benennt, wn.beschreibung AS adrv, we.beschreibung AS eiartv "
[387]422        ."FROM ax_namensnummer n "
[412]423        ."LEFT JOIN ax_artderrechtsgemeinschaft_namensnummer wn ON n.artderrechtsgemeinschaft = wn.wert "
424        ."LEFT JOIN ax_eigentuemerart_namensnummer we ON n.eigentuemerart = we.wert "
[387]425        ."WHERE n.istbestandteilvon= $1 AND n.endet IS NULL ORDER BY n.laufendenummernachdin1421;";
[402]426        // +++  LEFT JOIN bis ax_Person statt Person als Schleife zu holen,
427        //              VerknÃŒpfungsfeld "benennt" ist leer bei "Beschrieb der Rechtsgemeinschaft".
[362]428
[402]429        $v = array($gmlid); // GB-Blatt
[362]430        $resn = pg_prepare("", $sqln);
431        $resn = pg_execute("", $v);
432
433        if (!$resn) {
[402]434                echo "\n<p class='err'>Fehler bei Eigent&uuml;mer</p>"; // kein Fehler bei Blattarten > 1000
[389]435                //if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".$sqln."<br>$1=gml= '".$gmlid."'</p>";}
[362]436        }
437
438        $n=0; // Z.NamNum.
[402]439        while($rown = pg_fetch_assoc($resn)) {
[362]440                $gmlnn=$rown["gml_id"];
[377]441                $namnum=kurz_namnr($rown["lfd"]);
442                $rechtsg=$rown["adr"];
[402]443                echo "\n\t<tr>";
444                        if($n == 0) { // erste EigentÃŒmer-Zeile zu einer Buchung
445                                echo "\n\t\t<td class='ll'><img src='ico/Eigentuemer_2.png' width='16' height='16' alt=''> Eigent&uuml;mer:</td>"; // 1
446                        } else { // Folgezeile
447                                echo "\n\t\t<td class='ll'>&nbsp;</td>"; // 1
448                        }
449
450                        if ($rechtsg != "" ) { // Erbengemeinschaft usw.
451                                echo "\n\t\t<td colspan='2'>"; // 2-3
[362]452                                if ($rechtsg == 9999) { // sonstiges
[402]453                                        echo "\n\t\t\t<p class='zus' title='Beschrieb der Rechtsgemeinschaft'>".htmlentities($rown["beschr"], ENT_QUOTES, "UTF-8")."</p>";
[362]454                                } else {
[402]455                                        echo "\n\t\t\t<p class='zus' title='Art der Rechtsgemeinschaft'>".htmlentities($rown["adrv"], ENT_QUOTES, "UTF-8")."</p>";
[362]456                                }
[402]457                        } else { // Namensnummer
458                                echo "\n\t\t<td class='nanu' title='Namens-Nummer'>\n\t\t\t<p>".$namnum."&nbsp;</p>\n\t\t</td>" // 2
459                                . "\n\t\t<td>"; // 3
460
[362]461                        }
[402]462                        //if ($rown["anlass"] > 0 ) {echo "<p>Anlass=".$rown["anlass"]."</p>";}
[362]463
[402]464                        // Andere Namensnummern?  Relation:  ax_namensnummer >bestehtAusRechtsverhaeltnissenZu>  ax_namensnummer
465                        // Die Relation 'Namensnummer' besteht aus RechtsverhÀltnissen zu 'Namensnummer' sagt aus, dass mehrere Namensnummern zu einer Rechtsgemeinschaft gehören können.
466                        // Die Rechtsgemeinschaft selbst steht unter einer eigenen AX_Namensnummer, die zu allen Namensnummern der Rechtsgemeinschaft eine Relation besitzt.
[362]467
468                // Schleife 2: P e r s o n
[402]469                // +++ bei SQL Namensnummer oben gleich mit JOIN dazu holen, statt dieser Schleife
[362]470                // Beziehung: ax_person  <benennt<  ax_namensnummer
[402]471                $sqlp="SELECT nachnameoderfirma, vorname, geburtsname, to_char(cast(geburtsdatum AS date),'DD.MM.YYYY') AS geburtsdatum, namensbestandteil, akademischergrad "
[364]472                ."FROM ax_person WHERE gml_id= $1 AND endet IS NULL;";
[402]473                $gmlpers=$rown["benennt"]; // leer bei RechtsverhÀltnis
[364]474                $v = array($gmlpers); // gml_id von ax_person
[362]475                $resp = pg_prepare("", $sqlp);
476                $resp = pg_execute("", $v);
477                if (!$resp) {
[387]478                        echo "\n\t<p class='err'>Fehler bei Person</p>";
479                        if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".$sqlp."<br>$1=gml= '".$gmlpers."'</p>";}
[362]480                }
481
482                $i=0; // cnt Person
[402]483                while($rowp = pg_fetch_assoc($resp)) { // Schleife weglassen: "benennt" ist KEIN Array!
[377]484                        $diePerson=""; //++ Anrede?
[362]485                        if ($rowp["akademischergrad"] <> "") {$diePerson=$rowp["akademischergrad"]." ";}
486                        $diePerson.=$rowp["nachnameoderfirma"];
487                        if ($rowp["vorname"] <> "") {$diePerson.=", ".$rowp["vorname"];}
488                        if ($rowp["namensbestandteil"] <> "") {$diePerson.=". ".$rowp["namensbestandteil"];}
489                        if ($rowp["geburtsdatum"] <> "") {$diePerson.=", geb. ".$rowp["geburtsdatum"];}
490                        if ($rowp["geburtsname"] <> "") {$diePerson.=", geb. ".$rowp["geburtsname"];}
491                        $diePerson=htmlentities($diePerson, ENT_QUOTES, "UTF-8"); // Umlaute
492                        $eiartkey=$rown["eigentuemerart"]; // Key
493                        $eiart=$rown["eiartv"]; // Value
494
[402]495                        echo "\n\t\t\t<p class='geig' title='Eigent&uuml;merart: ".$eiart."'>".$diePerson."</p>\n\t\t</td>"; // 3 - Person in Sp.3 hinter NamNum (Sp.2)
496                        echo "\n\t\t<td>\n\t\t\t<p class='nwlink noprint'>"; // 4
497                                if ($showkey AND $eiartkey != '') {echo "<span class='key' title='Eigent&uuml;merart'>".$eiartkey."</span> ";}
498                                echo "\n\t\t\t\t<a href='".$lnkvor."alkisnamstruk.php?gkz=".$gkz."&amp;gmlid=".$gmlpers;
[387]499                                if ($showkey) {echo "&amp;showkey=j";}
[398]500                                if ($eiartkey == "") {$eiart="Eigent&uuml;mer" ;} // Default. Ersatz-Text, wenn nicht gefÃŒllt
[377]501                                echo $lnknach."' title='vollst&auml;ndiger Name und Adresse eines Eigent&uuml;mers'>".$eiart
[402]502                                ." <img src='ico/Eigentuemer.png' width='16' height='16' alt=''></a>\n\t\t\t</p>"
503                        ."\n\t\t</td>" // 4
504                        ."\n\t</tr>";
[362]505
506                        if ($mitadresse) {
[402]507                                // Schleife 3: optional  A d r e s s e  zur Person
[362]508                                $sqla ="SELECT a.gml_id, a.ort_post, a.postleitzahlpostzustellung AS plz, a.strasse, a.hausnummer, a.bestimmungsland "
[398]509                                ."FROM ax_anschrift a JOIN ax_person p ON a.gml_id=ANY(p.hat) WHERE p.gml_id= $1 AND a.endet IS NULL AND p.endet IS NULL ORDER BY a.beginnt DESC LIMIT 2;";
[402]510                                $v = array($gmlpers);
[362]511                                $resa = pg_prepare("", $sqla);
512                                $resa = pg_execute("", $v);
513                                if (!$resa) {
[387]514                                        echo "\n\t<p class='err'>Fehler bei Adressen</p>";
[402]515                                        if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".$sqla."<br>$1=gml= '".$gmlpers."'</p>";}
[362]516                                }
517                                $j=0;
[402]518                                while($rowa = pg_fetch_assoc($resa)) {
[362]519                                        $j++;
[398]520                                        if ($j == 1) { // erste ("jÃŒngste") Adresse anzeigen
[362]521                                                $gmla=$rowa["gml_id"];
522                                                $plz=$rowa["plz"]; // integer
523                                                if($plz == 0) {
524                                                        $plz="";
525                                                } else {
526                                                        $plz=str_pad($plz, 5, "0", STR_PAD_LEFT);
527                                                }
528                                                $ort=htmlentities($rowa["ort_post"], ENT_QUOTES, "UTF-8");
529                                                $str=htmlentities($rowa["strasse"], ENT_QUOTES, "UTF-8");
530                                                $hsnr=$rowa["hausnummer"];
531                                                $land=htmlentities($rowa["bestimmungsland"], ENT_QUOTES, "UTF-8");
532
[402]533                                                echo "\n\t<tr>"
534                                                        ."\n\t\t<td class='ll'>&nbsp;</td>" // 1
535                                                        ."\n\t\t<td>&nbsp;</td>" // 2
536                                                        ."\n\t\t<td><p class='gadr'>"; // 3
537                                                        if ($str.$hsnr != "") {echo $str." ".$hsnr."<br>";}
538                                                        if ($plz.$ort != "") {echo $plz." ".$ort;}
539                                                        if ($land != "" and $land != "DEUTSCHLAND") {echo ", ".$land;}
540                                                echo "</p></td>" // 3
541                                                        ."\n\t\t<td>&nbsp;</td>\n\t</tr>"; // 4
[398]542                                        } else { // manchmal doppelte Angaben
[402]543                                                echo "\n\t<tr>"
544                                                        ."\n\t\t<td class='ll'>&nbsp;</td>" // 1
545                                                        ."\n\t\t<td>&nbsp;</td>" // 2
546                                                        ."\n\t\t<td><p class='dbg' title='Siehe Auskunft zur Person'>weitere Adresse</p></td>" // 3
547                                                        ."\n\t\t<td>&nbsp;</td>\n\t</tr>"; // 4
[362]548                                        }
[402]549                                } // Ende Loop Adresse zur Person
[362]550                                pg_free_result($resa);
551                        }
552                        // 'keine Adresse' kann vorkommen, z.B. "Deutsche Telekom AG"
553                        $i++; // cnt Person
554
555                        $zaehler=$rown["zaehler"];
[402]556                        if ($zaehler != "") { // Anteil als eigene Tab-Zeile
[362]557                                $zaehler=str_replace(".", ",", $zaehler); // Dezimal-KOMMA wenn dem Notar der Bruch nicht reicht
558                                $nenner=str_replace(".", ",", $rown["nenner"]);
559                                $comnt="Anteil der Berechtigten in Bruchteilen (Par. 47 GBO) an einem gemeinschaftlichen Eigentum (Grundst&uuml;ck oder Recht).";
[402]560                                echo "\n\t<tr>"
561                                ."\n\t\t<td class='ll'>&nbsp;</td>" // 1
562                                ."\n\t\t<td>&nbsp;</td>" // 2
563                                ."\n\t\t<td><p class='avh' title='".$comnt."'>".$zaehler."/".$nenner." Anteil</p></td>" // 3
564                                ."\n\t\t<td>&nbsp;</td>\n\t</tr>"; // 4
[362]565                        }
566                } // End Loop Person
[402]567                pg_free_result($resp);
568
569                if ($i == 0) { // KEINE Person. benennt ist leer. Das kommt vor hinter der Zeile "Erbengemeinschaft" und ist dann KEIN Fehler
570                        if ($rechtsg == 9999) {
571                                if ($debug > 1) {echo "\n\t\t\t<p class='dbg'>Rechtsgemeinschaft = '".$rechtsg."'</p>";}
572                        } else {
[364]573                                echo "\n<p class='err'>(Die Person mit der ID '".$gmlpers."' fehlt im Datenbestand)</p>";
[362]574                        }
[402]575                        echo "</td>\n\t\t<td>&nbsp;</td>\n\t</tr>";
[362]576                }
577                $n++; // cnt NamNum
578        } // End Loop NamNum
[402]579
[362]580        pg_free_result($resn);
581        return $n;
[377]582} // End function eigentuemer
[362]583
[394]584function werteliste ($element, $bezeichnung ,$sqlin) {
[412]585        // Eine oder mehrere EntschlÃŒsselungen in eine Zeile ausgeben.
[394]586        // Dient dazu, SchlÃŒssel-ARRAYs auflösen ohne die Zeile mehrfach aufzulisten (JOIN)
587        // Anwendung: FS-Nachweis BodenschÀtzung "Klimastufe + WasserverhÀltnisse"
[412]588        // 2018-11-09: Umstellung von "alkis_wertearten" auf individuelle Tabellen
589
[394]590        global $debug;
[412]591        if ($element == 'ax_bodenschaetzung' AND $bezeichnung = 'entstehungsartoderklimastufewasserverhaeltnisse' ) {
592                $tabelle = 'ax_entstehungsartoderklimastufewasserverhaeltnisse_bodensc';
593        } elseif ($element == 'ax_bodenschaetzung' AND $bezeichnung = 'sonstigeangaben' ) {
594                $tabelle = 'ax_sonstigeangaben_bodenschaetzung';
595        }
596        $sql="SELECT wert, beschreibung FROM ".$tabelle." WHERE wert IN (".$sqlin.") ORDER BY wert LIMIT $1 ;";
597        $v = array(100);
[394]598        $res = pg_prepare("", $sql);
599        $res = pg_execute("", $v);
600        if (!$res) {
[412]601                echo "\n<p class='err'>Fehler bei Werteliste.</p>";
[394]602                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = '".$sqlin."'</p>";}
603                return;
604        }
605        $i=0;
[402]606        while($row = pg_fetch_assoc($res)) {
[412]607                echo " ".$row["beschreibung"];
[394]608                $i++;   
609        }
610        pg_free_result($res);
[412]611        if ($i == 0) {echo "(kein Treffer)";}
[394]612        return;
613}
614
[417]615function fortfuehrungen($entsteh, $dbzeart, $dbzename) {
616// Tabelle im Kopf von FlurstÃŒck und FS-Historie. 2 Z./Sp. Entstehung/FortfÃŒhrung
617// Parameter: Die DB-Spalten "zeitpunktderentstehung", "zeigtaufexternes_art" und "zeigtaufexternes_name"
618        global $debug, $showkey;
619
620//      if ($debug > 2) {echo "<p class='dbg'>function fortfuehrungen<br>1: ".$dbzeart."<br>2: ".$dbzename."</p>";}
621 
622        echo "\n\t<table class='fsd'>" // FS-Daten 2 Spalten
623                ."\n\t\t<tr>\n\t\t\t<td>Entstehung</td>"
624                ."\n\t\t\t<td title='Zeitpunkt der Enstehung'>".$entsteh."</td>\n\t\t</tr>";
625        echo "\n\t<tr>"
626                ."\n\t\t\t<td>";
627        $arrart=explode(",", trim($dbzeart, "{}"));
628        foreach($arrart AS $artval) { // Zeile fÃŒr jedes Element
629                $artval=trim($artval, '"');
630// ibR: {"Entstehung des FlurstÃŒcks/5200","Letzte FortfÃŒhrung des FlurstÃŒcks/5300",urn:adv:fachdatenverbindung:AA_Antrag}
631// AED: {http://geoportal.kreis-herford.de/alkis/alkis.html#5200,http://geoportal.kreis-herford.de/alkis/alkis.html#5300,urn:adv:fachdatenverbindung:AA_Antrag}
632
633                $artpos=strpos($artval, '#');
634                if ($artpos > 0) { // AED
635                        $artkey=substr($artval, $artpos + 1);
636                        switch ($artkey) { // keine SchlÃŒsseltabelle?
637                                case '5100': $arttxt="Grundst&uuml;ckshinweis (aus ALB-Historie)"; break;
638                                case '5200': $arttxt="Entstehung des Flurst&uuml;cks"; break;
639                                case '5300': $arttxt="Letzte Fortf&uuml;hrung des Flurst&uuml;cks"; break;
640                                default: $arttxt=$artval;
641                        }
642                        if ($showkey) {echo "<span class='key'><a target='_blank' href='".$artval."'>".$artkey."</a></span> ";}
643                        echo $arttxt."<br>";
644                } else {
645                        $artpos=strpos($artval, '/');
646                        if ($artpos > 0) { // ibR
647                                $artkey=substr($artval, $artpos + 1);
648                                $arttxt=substr($artval, 0, $artpos);
649                                if ($showkey) {echo "<span class='key'>".$artkey."</span> ";}
650                                echo $arttxt."<br>";
651                        }
652                }
653        }
654        echo "</td>"
655        ."\n\t\t\t<td title='Jahrgang / Fortf&uuml;hrungsnummer - Fortf&uuml;hrungsart'>";
656        $arrname=explode(",", trim($dbzename, "{}"));
657        foreach($arrname AS $val) {
658                echo trim($val, '"')."<br>";
659        }
660        echo "</td>"
661        ."\n\t\t</tr>"
662        ."\n\t</table>";
663}
664
[419]665function fskenn_dbformat ($fskennz) {
666        // Erzeugt, wenn notwendig, aus dem Bindetrich-getrennten FlurstÃŒckskennzeichen "llgggg-fff-nnnn/zz.nn" oder "gggg-ff-nnn/zz"
667        // das ALKIS-DB-interne Format des FlurstÃŒckskennzeichens.
668        global $defland;
669        $arr=explode("-", $fskennz, 4); // zerlegen
670        $zgemkg=trim($arr[0]);
671        if (strlen($zgemkg) == 20 and !isset($arr[1])) {
672                $fskzdb=$zgemkg; // ist schon Datenbank-Feldformat
673        } else { // Das Kennzeichen auseinander nehmen.
674                if (strlen($zgemkg) == 6) {
675                        $land=substr($zgemkg, 0, 2);
676                        $zgemkg=substr($zgemkg, 2, 4);
677                } else { // kein schöner Land ..
678                        $land=$defland; // Default-Land aus config
679                }
680                $zflur=str_pad($arr[1], 3 , "0", STR_PAD_LEFT); // Flur-Nr
681                $zfsnr=trim($arr[2]); // FlurstÃŒcke-Nr
682                $zn=explode("/", $zfsnr, 2); // Bruch?
683                $zzaehler=str_pad(trim($zn[0]), 5 , "0", STR_PAD_LEFT);
684                if (isset($zn[1])) {
685                        $znenner=trim($zn[1]);
686                } else {
687                        $znenner="";
688                }
689                if (trim($znenner, " 0.") == "") { // kein Bruch oder nur Nullen
690                        $znenner="____"; // in DB-Spalte mit Tiefstrich aufgefÃŒllt
691                } else {
692                        $zn=explode(".", $znenner, 2); // .00 wegwerfen
693                        $znenner=str_pad($zn[0], 4 , "0", STR_PAD_LEFT);
694                }
695                // die Teile stellengerecht wieder zusammen setzen             
696                $fskzdb=$land.$zgemkg.$zflur.$zzaehler.$znenner.'__'; // FS-Kennz. Format Datenbank
697        }
698        return $fskzdb;
699}
700
[362]701?>
Note: See TracBrowser for help on using the repository browser.