source: trunk/info/info/alkisn/alkisfsnw.php @ 427

Revision 427, 31.3 KB checked in by frank.jaeger, 2 years ago (diff)

Überarbeitung der Auskunft: Durch Functions den Code verdichtet. Drei neue Arten von Bauwerken.

RevLine 
[362]1<?php
[427]2/*      alkisfsnw.php
[362]3
[427]4        ALKIS-Auskunft
5        Author: Frank JÀger, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo)
[362]6
[427]7        FlurstÃŒcksnachweis fÃŒr ein FlurstÃŒckskennzeichen aus ALKIS PostNAS
8
[362]9        Version:
[425]10        2016-02-24 Version fÃŒr norGIS-ALKIS-Import
[427]11        ...
[422]12        2020-12-03 function selbstverlinkung() statt $_SERVER['PHP_SELF']
13        2020-12-09 Verschn. mit "Bau-, Raum- oder Bodenordnungsrecht" korrigiert, Entschl. BodenschÀtzung korrigiert
14        2020-12-16 Input-Validation und Strict Comparisation (===)
15        2021-03-09 Link zum GebÀudenachweis auch mit "Bauwerke" betiteln
[425]16        2021-12-09 Neue Parameter: $katAmtMix (Kataster-Amt-Mix), $PrntBtn (Drucken-SchaltflÀche)
[427]17        2022-01-13 Functions in Fach-Modul verschoben, die nicht von mehreren verwendet werden. Neue Functions LnkStf(), DsKy()
[362]18
[422]19ToDo:
[425]20        - Tabbelle "nutz_21" ist ein Relikt von NorGIS/ALB und könnte in spÀteren Versionen fehlen.
[402]21        - Buchung auf "fiktives Blatt" ist nur mit debug zu sehen: die <tr> in .css grau hinterlegen
[422]22        - "Umschalter" (gleiches Modul) anders darstellen als Links zu ANDEREN Nachweisen
[389]23        - Parameter zum Umschalten mit/ohne BodenschÀtzung?
24        - Bessere Differenzierung bei den Nutzungsarten (Tabelle dafÃŒr aufbauen)
[362]25*/
[427]26
27function werteliste($bez ,$sqlin) {
28// Eine oder mehrere EntschlÃŒsselungen in eine Zeile ausgeben.
29// Dient dazu, SchlÌssel-ARRAYs auflösen ohne die Zeile im JOIN mehrfach aufzulisten
30// Anwendung: FS-Nachweis BodenschÀtzung
31        global $dbg;
32
33        if ($bez === 'e') {$tabelle = 'ax_entstehungsartoderklimastufewasserverhaeltnisse_bodensc';}
34        elseif ($bez === 's') {$tabelle = 'ax_sonstigeangaben_bodenschaetzung';}
35
36        $sql="SELECT wert, beschreibung FROM ".$tabelle." WHERE wert IN (".$sqlin.") ORDER BY wert LIMIT $1 ;";
37        $v = array('9');
38        $res = pg_prepare("", $sql);
39        $res = pg_execute("", $v);
40        if (!$res) {
41                echo "\n<p class='err'>Fehler bei Werteliste.</p>";
42                if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";}
43                return;
44        }
45        $zeianz=pg_num_rows($res);
46        while($row = pg_fetch_assoc($res)) {
47                echo " ".$row["beschreibung"];
48        }
49        pg_free_result($res);
50        if ($zeianz === 0) {
51                echo "(kein Treffer)";
52                if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";}
53        }
54        return;
55}
56
57// Start
[422]58ini_set("session.cookie_httponly", 1);
[362]59session_start();
[422]60
[402]61$eig="n"; $showkey="n"; $nodebug=""; // Var. initalisieren
62$cntget = extract($_GET); // alle Parameter in Variable umwandeln
[387]63
64// strikte Validierung aller Parameter
65if (isset($gmlid)) {
66        if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
67        $fskennz='';
68} else { // Alternativ
69        $gmlid='';
[422]70        if (isset($fskennz)) {
[387]71                if (!preg_match('#^[0-9\-_/]{8,20}$#', $fskennz)) {die ("Eingabefehler fskennz");}
72        } else {
[422]73                die("Fehlender Parameter");
[387]74        }
75}
[422]76if (isset($gkz)) {
77        if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
78} else {
79        die("Fehlender Parameter");
80}
[387]81if (!preg_match('#^[j|n]{0,1}$#', $eig)) {die("Eingabefehler eig");}
82if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
[422]83if ($showkey === "j") {$showkey=true;} else {$showkey=false;} // "j"/"n" als bool, ist praktischer, oft gebraucht
[402]84if (!preg_match('#^j{0,1}$#', $nodebug)) {die("Eingabefehler nodebug");}
[387]85
[422]86include "alkis_conf_location.php";
87include "alkisfkt.php";
[362]88?>
[377]89<!doctype html>
90<html lang="de">
[362]91<head>
[377]92        <meta charset="utf-8">
[387]93        <meta name="viewport" content="width=device-width, initial-scale=1.0">
[362]94        <title>ALKIS Flurst&uuml;cksnachweis</title>
95        <link rel="stylesheet" type="text/css" href="alkisauszug.css">
96        <link rel="shortcut icon" type="image/x-icon" href="ico/Flurstueck.ico">
[402]97        <script>
98                function ALKISexport(gmlid) {
99                        window.open('alkisexport.php?gkz=<?php echo $gkz;?>&tabtyp=flurstueck&gmlid=' + gmlid);
[362]100                }
101        </script>
102</head>
103<body>
104<?php
[422]105$erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); }
[427]106$dbg=$debug;
[425]107if ($nodebug === "j") {$dbg=0;}
[402]108
[377]109$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisfsnw.php'");
[387]110if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
[362]111
[422]112// Ein FlurstÃŒcks-Kennzeichen im DB-Format wurde alternativ zur gml_id ÃŒbermittelt
[387]113if ($fskennz != '') {
[422]114        // Spalte "flurstueckskennzeichen" ist in DB indiziert. Format z.B.'052647002001910013__' oder '05264700200012______'
115        $sql ="SELECT gml_id FROM ax_flurstueck WHERE flurstueckskennzeichen= $1 AND endet IS NULL;";
[419]116        $v=array(fskenn_dbformat($fskennz));
[362]117        $res = pg_prepare("", $sql);
118        $res = pg_execute("", $v);
[402]119        if ($row = pg_fetch_assoc($res)) {
[362]120                $gmlid=$row["gml_id"];
121        } else {
[387]122                echo "\n<p class='err'>Fehler! Kein Treffer f&uuml;r Flurst&uuml;ckskennzeichen='".$fskennz."' (".$fskzdb.")</p>";
[427]123                echo "<p>Kennzeichen veraltet? <a href='./alkisfshist.php?gkz=".$gkz."&fskennz=".$fskennz.LnkStf()."'>Suche in der Flurst&uuml;cks-Historie</a></p>";
[387]124                echo "\n</body>\n</html>";
125                return;
[362]126        }
127        pg_free_result($res);
128}
129
[427]130// F L U R S T Ü C K  m. Gebiet
[417]131$sql ="SELECT f.zeigtaufexternes_art, f.zeigtaufexternes_name, f.flurnummer, f.zaehler, f.nenner, f.gemeindezugehoerigkeit_regierungsbezirk, f.gemeindezugehoerigkeit_kreis, f.gemeindezugehoerigkeit_gemeinde, f.amtlicheflaeche, st_area(f.wkb_geometry) AS fsgeomflae,
132to_char(cast(f.zeitpunktderentstehung AS date),'DD.MM.YYYY') AS zeitpunktderentstehung, f.istgebucht, g.gemarkungsnummer, g.bezeichnung, r.bezeichnung AS rbez, k.bezeichnung AS kbez, m.bezeichnung AS mbez
[402]133FROM ax_flurstueck f
[425]134LEFT JOIN ax_gemarkung g ON f.gemeindezugehoerigkeit_land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ".UnqKatAmt("f","g")
135."LEFT JOIN ax_regierungsbezirk r ON f.gemeindezugehoerigkeit_regierungsbezirk=r.regierungsbezirk ".UnqKatAmt("f","r")
136."LEFT JOIN ax_kreisregion k ON f.gemeindezugehoerigkeit_regierungsbezirk=k.regierungsbezirk AND f.gemeindezugehoerigkeit_kreis=k.kreis ".UnqKatAmt("f","k")
137."LEFT JOIN ax_gemeinde m ON m.regierungsbezirk=f.gemeindezugehoerigkeit_regierungsbezirk AND m.kreis=f.gemeindezugehoerigkeit_kreis AND m.gemeinde=f.gemeindezugehoerigkeit_gemeinde ".UnqKatAmt("f","m")
138."WHERE f.gml_id= $1 AND f.endet IS NULL AND g.endet IS NULL AND m.endet IS NULL AND k.endet IS NULL AND r.endet IS NULL;";
[412]139
[362]140$v = array($gmlid); // mit gml_id suchen
141$res = pg_prepare("", $sql);
142$res = pg_execute("", $v);
143if (!$res) {
[387]144        echo "\n<p class='err'>Fehler bei Flurstuecksdaten</p>";
[425]145        if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
[362]146}
[425]147if ($dbg > 0) {
148        $zeianz=pg_num_rows($res);
149        if ($zeianz > 1){
150                echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Flurst&uuml;cks-Objekt!</p>";
151                if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
152        }
153}
[402]154if ($row = pg_fetch_assoc($res)) {
[362]155        $gemkname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8");
156        $gmkgnr=$row["gemarkungsnummer"];
[412]157        $bezirk=$row["gemeindezugehoerigkeit_regierungsbezirk"];
[402]158        $rbez=htmlentities($row["rbez"], ENT_QUOTES, "UTF-8");
[412]159        $kreis=$row["gemeindezugehoerigkeit_kreis"];
[402]160        $kbez=htmlentities($row["kbez"], ENT_QUOTES, "UTF-8");
[412]161        $gemeinde=$row["gemeindezugehoerigkeit_gemeinde"];
[402]162        $mbez=htmlentities($row["mbez"], ENT_QUOTES, "UTF-8");
[362]163        $flurnummer=$row["flurnummer"];
164        $zaehler=$row["zaehler"];
165        $nenner=$row["nenner"];
166        $flstnummer=$zaehler;
167        if ($nenner > 0) {$flstnummer.="/".$nenner;} // BruchNr
[427]168        $fsbuchflae=$row["amtlicheflaeche"]; // amtl. Fl. aus DB-Feld
[362]169        $fsgeomflae=$row["fsgeomflae"]; // aus Geometrie ermittelte FlÀche
[389]170        $the_Xfactor = $fsbuchflae / $fsgeomflae; // Multiplikator zur Umrechnung geometrische AbschnittsflÀchen in BuchflÀche
[362]171        $fsbuchflaed=number_format($fsbuchflae,0,",",".") . " m&#178;"; // Display-Format dazu
172        $fsgeomflaed=number_format($fsgeomflae,0,",",".") . " m&#178;";
[402]173        $gml_buchungsstelle=$row["istgebucht"]; // wird erst im GB-Teil benötigt
[417]174        $entsteh=$row["zeitpunktderentstehung"];
175        $zeart=$row["zeigtaufexternes_art"];
176        $zename=$row["zeigtaufexternes_name"];
[362]177} else {
[387]178        echo "\n<p class='err'>Fehler! Kein Treffer f&uuml;r Flurst&uuml;ck mit gml_id=".$gmlid."</p>";
[425]179        if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
[387]180        echo "\n</body>\n</html>";
[362]181        return;
182}
183pg_free_result($res);
[377]184
[422]185if ($eig==="j") { // Balken
186        echo "<p class='balken fsei'>ALKIS Flurst&uuml;ck ".$gmkgnr."-".$flurnummer."-".$flstnummer."&nbsp;</p>"
[402]187        ."\n\n<h2>Flurst&uuml;ck mit Eigent&uuml;mer</h2>";
[362]188} else {
[422]189        echo "<p class='balken fskennz'>ALKIS Flurst&uuml;ck ".$gmkgnr."-".$flurnummer."-".$flstnummer."&nbsp;</p>"
[402]190        ."\n\n<h2>Flurst&uuml;ck</h2>";
[362]191}
[377]192
193// PrÃŒfung der Gebiets-Berechtigung bei gemeinsam genutzten Datenbanken (Kreis und Gemeinde)
194// FÃŒr das gkz (z.B. aus dem Mapfile-Namen) wird in der Konfiguration ein Filter gesetzt.
195if ( ($filtkreis != '' and $filtkreis != $kreis) or ($filtgem != '' and $filtgem != $gemeinde) ) {
196        // Einer der gesetzten Filter passt nicht
[427]197        if ($dbg > 2) {
[387]198                echo "\n<p class='err'>Filter Kreis='".$filtkreis."', Gemeinde='".$filtgem."'</p>"
199                ."\n<p class='err'>Flstk. Kreis='".$fskrs."', Gemeinde='".$fsgem."'</p>";
[377]200        }
201        echo "\n<br><p class='stop1'>Zugriff nicht erlaubt</p>"
202        ."\n<br><p class='stop2'>Dies Flurst&uuml;ck liegt ausserhalb der zust&auml;ndigen Stadt oder Gemeinde.</p>\n</body>\n</html>";
203        exit;
204}
205
[402]206echo "\n<table class='outer'>"
207        ."\n\t<tr>\n\t\t<td class='ll'><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Kennzeichen:</td>" // Links
208        ."\n\t\t<td>" // Mitte
209        ."\n\t\t\t<table class='kennzfs' title='Flurst&uuml;ckskennzeichen'>\n\t\t\t\t<tr>" // darin Tabelle Kennzeichen
210                ."\n\t\t\t\t\t<td class='head'>Gemarkung</td>\n\t\t\t\t\t<td class='head'>Flur</td>\n\t\t\t\t\t<td class='head'>Flurst-Nr.</td>\n\t\t\t\t</tr>"
[427]211                ."\n\t\t\t\t<tr>\n\t\t\t\t\t<td title='Gemarkung'>".DsKy($gmkgnr, 'Gemarkungsnummer').$gemkname."&nbsp;</td>"
[402]212                ."\n\t\t\t\t\t<td title='Flurnummer'>".$flurnummer."</td>"
213                ."\n\t\t\t\t\t<td title='Flurst&uuml;cksnummer (Z&auml;hler / Nenner)'><span class='wichtig'>".$flstnummer."</span></td>\n\t\t\t\t</tr>"
214        ."\n\t\t\t</table>"
[417]215        ."\n\t\t</td>\n\t\t<td>"; // Rechts
216        fortfuehrungen($entsteh, $zeart, $zename);
217echo "\n\t\t</td>\n\t</tr>\n</table>";
[362]218
[402]219echo "\n<hr>\n<table class='fs'>"; // FS-Teil 6 Spalten
[425]220echo "\n<tr>\n\t<td></td>\n\t<td></td>\n\t<td></td>\n\t<td></td>\n\t<td></td>" // 1-5 in erster Zeile kein "colspan" verwenden
221        ."\n\t<td><p class='nwlink noprint'>weitere Auskunft:</p></td>"
[402]222."\n</tr>";
[362]223
[427]224echo "\n<tr>" // Zeile: Gebietszugehörigkeit - Gemeinde / Kreis / Reg.bez.
[425]225        ."\n\t<td class='ll'><img title='Im Gebiet von' src='ico/Gemeinde.png' width='16' height='16' alt=''> Gebiet:</td>"
226        ."\n\t<td>Gemeinde<br>Kreis<br>Regierungsbezirk</td>"
[427]227        ."\n\t<td class='lr' colspan='3'>".DsKy($gemeinde, 'Gemeinde-Nummer').$mbez."<br>".DsKy($kreis, 'Kreis-Nummer').$kbez."<br>".DsKy($bezirk, 'Regierungsbezirk-Nummer').$rbez."</td>"
[425]228        ."\n\t<td class='nwlink'>";
229        if ($fsHistorie){ // conf
230                echo "\n\t\t<p class='nwlink noprint'>"
[427]231                ."\n\t\t\t<a href='alkisfshist.php?gkz=".$gkz."&amp;gmlid=".$gmlid.LnkStf()
232                ."' title='Vorg&auml;nger-Flurst&uuml;cke'>Historie <img src='ico/Flurstueck_Historisch.png' width='16' height='16' alt=''></a>\n\t\t</p>\n\t";
[425]233        }
234        echo "</td>"
[402]235."\n</tr>";
[362]236
[427]237// L a g e b e z e i c h n u n g
[362]238
[399]239// Lagebezeichnung  M I T  Hausnummer
[362]240// ax_flurstueck  >weistAuf>  AX_LagebezeichnungMitHausnummer
[399]241$sql="SELECT DISTINCT l.gml_id, l.gemeinde, l.lage, l.hausnummer, s.bezeichnung, s.gml_id AS kgml
[362]242FROM ax_flurstueck f JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(f.weistauf) 
243JOIN ax_lagebezeichnungkatalogeintrag s ON l.land=s.land AND l.regierungsbezirk=s.regierungsbezirk AND l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage
244WHERE f.gml_id= $1 AND f.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL   
245ORDER BY l.gemeinde, l.lage, l.hausnummer;";
246
247$v = array($gmlid);
248$res = pg_prepare("", $sql);
249$res = pg_execute("", $v);
250
251if (!$res) {
[387]252        echo "\n<p class='err'>Fehler bei Lagebezeichnung mit Hausnummer</p>";
[425]253        if ($dbg > 1) {
[387]254                echo "\n<p class='dbg'>Fehler:".pg_last_error()."</p>";
[425]255                if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
[362]256        }
257} else {
258        $j=0;
[399]259        $kgmlalt="";
[402]260        while($row = pg_fetch_assoc($res)) {
[399]261                $sname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); // Str.-Name
[422]262                if (substr($sname, strlen($sname) -3, 3) === 'weg') { // Versuch fuer korrekten Satzbau
[399]263                        $slink=" am ".$sname;
264                } else {
265                        $slink=" an der ".$sname;
266                }
267                $hsnr=$row["hausnummer"];
[402]268                echo "\n<tr>";
[427]269                        if ($j === 0) {
[387]270                                echo "\n\t<td class='ll'><img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''> Adresse:</td>";
[362]271                        } else {
[387]272                                echo "\n\t<td>&nbsp;</td>";
[362]273                        }
[427]274                        echo "\n\t<td>&nbsp;</td>"
275                        ."\n\t<td class='lr' colspan='3'>".DsKy($row["lage"], 'Straßen-*').$sname."&nbsp;".$hsnr."</td>"
276                        ."\n\t<td>\n\t\t<p class='nwlink noprint'>";
[399]277
278                        // +++ davor auch Link "Straße"
279                        $kgml=$row["kgml"]; // Wiederholung vermeiden
280                        if ($kgml != $kgmlalt) { // NEUE Strasse vor Lage
281                                $kgmlalt=$kgml; // Katalog GML-ID
282                                echo "\n\t\t\t<a title='Flurst&uuml;cke mit oder ohne Hausnummer".$slink."' "
[427]283                                ."href='alkisstrasse.php?gkz=".$gkz."&amp;gmlid=".$kgml.LnkStf()."'>Stra&szlig;e "
[399]284                                ."<img src='ico/Strassen.png' width='16' height='16' alt='STRA'></a> ";
285                        }
286
[427]287                        echo "\n\t\t\t<a title='Flurst&uuml;cke und Geb&auml;ude mit Hausnummer ".$hsnr."' href='alkislage.php?gkz=".$gkz."&amp;ltyp=m&amp;gmlid=".$row["gml_id"].LnkStf()
288                                ."'>Lage <img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''></a>"
[402]289                        ."\n\t\t</p>\n\t</td>"  // 6
[377]290                ."\n</tr>";
[362]291                $j++;
292        }
293        $cnt_adressen=$j;
294        pg_free_result($res);
295}
296
[399]297// Lagebezeichnung  O H N E  Hausnummer  (Gewanne oder nur Strasse)
[362]298// ax_flurstueck  >zeigtAuf>  AX_LagebezeichnungOhneHausnummer
299$sql ="SELECT l.gml_id, l.unverschluesselt, l.gemeinde, l.lage, s.bezeichnung
300FROM ax_flurstueck f JOIN ax_lagebezeichnungohnehausnummer l ON l.gml_id=ANY(f.zeigtauf)
301LEFT JOIN ax_lagebezeichnungkatalogeintrag s ON l.land=s.land AND l.regierungsbezirk=s.regierungsbezirk AND l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage
302WHERE f.gml_id = $1 AND f.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL;";
303
304$v = array($gmlid);
305$res = pg_prepare("", $sql);
306$res = pg_execute("", $v);
307if (!$res) {
[387]308        echo "\n<p class='err'>Fehler bei Lagebezeichnung ohne Hausnummer</p>";
[425]309        if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
[362]310}
[402]311while($row = pg_fetch_assoc($res)) {
[362]312        $skey=$row["lage"]; // Strassenschl.
[422]313        $lgml=$row["gml_id"]; // Key der Lage
[399]314        $gewann = htmlentities($row["unverschluesselt"], ENT_QUOTES, "UTF-8");
[422]315        if ($gewann != '') {
[377]316                echo "\n<tr>"
[402]317                        ."\n\t<td class='ll' title='unverschl&uuml;sselte Lagebezeichnung'><img src='ico/Lage_Gewanne.png' width='16' height='16' alt=''> Gewanne:</td>" // 1
[427]318                        ."\n\t<td></td>"
319                        ."\n\t<td class='lr' colspan='3'>".$gewann."</td>"
320                        ."\n\t<td>\n\t\t<p class='nwlink noprint'>"
321                                ."\n\t\t\t<a title='Flurst&uuml;cke mit der Gewanne ".$gewann."' href='alkislage.php?gkz=".$gkz."&amp;ltyp=o&amp;gmlid=".$lgml.LnkStf()
322                                ."'>\n\t\t\tLage <img src='ico/Lage_Gewanne.png' width='16' height='16' alt=''></a>"
323                        ."\n\t\t</p>\n\t</td>"
[377]324                ."\n</tr>";
[399]325        } elseif ($skey > 0) {
326                $sname=htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8"); // Str.-Name
[422]327                if (substr($sname, strlen($sname) -3, 3) === 'weg') { // Versuch fuer korrekten Satzbau
[399]328                        $slink=" am ".$sname;
329                } else {
330                        $slink=" an der ".$sname;
331                }
[377]332                echo "\n<tr>"
[427]333                        ."\n\t<td class='ll'><img src='ico/Lage_an_Strasse.png' width='16' height='16' alt=''> Stra&szlig;e:</td>"
334                        ."\n\t<td></td>\n\t<td class='lr' colspan='3'>".DsKy($skey, 'Straßen-*').$sname."</td>";
335                        echo "\n\t<td>\n\t\t<p class='nwlink noprint'>"
336                                ."\n\t\t\t<a title='FlurstÃŒcke ".$slink."' href='alkislage.php?gkz=".$gkz."&amp;ltyp=o&amp;gmlid=".$lgml.LnkStf()
337                                ."'>\n\t\t\tLage <img src='ico/Lage_an_Strasse.png' width='16' height='16' alt=''>\n\t\t\t</a>"
338                        ."\n\t\t</p>\n\t</td>"
[377]339                ."\n</tr>";
[362]340        }
341}
342pg_free_result($res);
343
[402]344/* Status "N u t z u n g":
345Die Classic-Tabelle "nutzung" ist eine Zusammenfassung aller Tabellen mit Nutzungs-FlÀchen
346Die Classic-Tabelle "nutzung_meta" zeigt die Kategorie und Gruppe des Nutzungs-Abschnitts an.
[362]347
[402]348Aus der norGIS-Struktur wird ersatzweise VORLÄUFIG die Tabelle "nutz_21" verwendet,
349die das alte ALB-Format der Nutzungs-Abschnitte von FlurstÃŒcken simuliert.
350Hier finden sich bereits verschnittene FlÀchen, aber die gml_id fehlt.
[362]351
[402]352Die EntschlÃŒsselung der Nutzungsart in den verschiedenen ALKIS-Varianten ist darin unterentwickelt.
353Diese ist eigentlich fÃŒr jede der getrennten Tabellen der Gruppe Nutzungsart individuell.
354Die Classic-Lösung mit 2 Zusatzfeldern war schon sehr pauschalisiert, aber
355durch die RÃŒck-Konvertierung in ALB-Strukturen in der norGIS-Version ist das zu stark vereinfacht.
356z.B. wird "WohnbauflÀche" mit der Zusatzeigenschaft "Art der Bebauung": 'Offen'
357nun zur Nutzungsart "Offen".
358Durch JOIN auf die "alkis_elemente" mit einem Teil des SchlÌssels wird das zur "WohnbauflÀche, Offen".
359Es sollte eine Tabellen-Struktur bereit gestellt werden, die auch aussagt, dass der Wert "Offen" zur
360Zusatz-Eigenschaft "Art der Bebauung" gehört. Dazu muss das PostProcessing erweitert werden. */
[362]361
362$sql="SELECT e.definition, trim(both FROM n.nutzsl) AS nutzsl, trim(both FROM n.fl) AS fl, trim(both FROM s.nutzung) AS nutzung
363 FROM nutz_21 n JOIN nutz_shl s ON n.nutzsl = s.nutzshl
364 JOIN alkis_elemente e ON e.kennung = substring(n.nutzsl from 1 for 5)
365WHERE n.flsnr = $1 ORDER BY cast(n.fl AS integer) DESC;";
366// Flurstueckskennzeichen mit Trennzeichen im ALB-Format wie 'llgggg-fff-zzzzz/nnn'
367$fskennzalb=$defland.$gmkgnr."-".str_pad($flurnummer,3,"0",STR_PAD_LEFT)."-".str_pad($zaehler,5,"0",STR_PAD_LEFT)."/".str_pad($nenner,3,"0",STR_PAD_LEFT);
368$v = array($fskennzalb);
369$res = pg_prepare("", $sql);
370$res = pg_execute("", $v);
371if (!$res) {
[387]372        echo "\n<p class='err'>Fehler bei Suche tats. Nutzung</p>";
[425]373        if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$fskennzalb."'",$sql), ENT_QUOTES, "UTF-8")."'</p>";}
[362]374}
375$j=0;
[402]376while($row = pg_fetch_assoc($res)) {
[362]377        $flae=$row["fl"]; // BuchflÀche
378        $nutzsl=$row["nutzsl"]; // SchlÃŒssel
379        $nutzung=$row["nutzung"]; // Bezeichnung aus ALB-Tabelle, "fein"
380        $defi=$row["definition"]; // Langer Text mit Beschreibung
381        $title=htmlentities($defi, ENT_QUOTES, "UTF-8"); // .. fÃŒr Anzeige aufbereitet
382        echo "\n<tr>\n\t";
[422]383                if ($j === 0) { // 1
[362]384                        echo "<td class='ll' title='Abschnitt der tats&auml;chlichen Nutzung'><img src='ico/Abschnitt.png' width='16' height='16' alt=''> Nutzung:</td>";
385                } else {
386                        echo "<td>&nbsp;</td>";
387                }
388                $absflaebuch = number_format($flae,0,",",".") . " m&#178;"; // Formatierte Abschnitts-Buch-FlÀche
[427]389                echo "\n\t<td></td>"
390                ."\n\t<td class='fla' title='Buchfl&auml;che des Abschnitts'>".$absflaebuch."</td>" // Sp. wie Fl. in BodenschÀtzg.
391                ."\n\t<td></td>"
392                ."\n\t<td class='lr' title='".$title."'>".DsKy($nutzsl, 'Nutzungsarten-*').$nutzung."</td>"
393                ."\n\t<td>";
[389]394/*              // Derzeit ist keine Gruppe zugeordnet
[362]395                        switch ($grupp) { // Icon nach 4 Objektartengruppen
396                                case "Siedlung":   $ico = "Abschnitt.png"; break;
397                                case "Verkehr":    $ico = "Strassen_Klassifikation.png"; break;
398                                case "Vegetation": $ico = "Wald.png"; break;
399                                case "GewÀsser":   $ico = "Wasser.png";        break;
[427]400                                default: $ico = "Abschnitt.png"; break;
[362]401                        }
402                        // Icon ist auch im Druck sichtbar, class='noprint' ?           
[402]403                        echo "<p class='nwlink'><img title='".$title."' src='ico/".$ico."' width='16' height='16' alt='NUA'></p>"; */
[427]404                echo "</td>"
[377]405        ."\n</tr>";
[362]406        $j++;
407}
408pg_free_result($res);
409
[402]410echo "\n<tr>" // FlÀchen-Summenzeile
411        ."\n\t<td class='re' title='amtliche Fl&auml;che (Buchfl&auml;che)'>Fl&auml;che:</td>" // 1
412        ."\n\t<td>&nbsp;</td>" // 2
413        ."\n\t<td class='fla sum'>" // 3 Flaeche
414                ."<span title='geometrisch berechnete Fl&auml;che = ".$fsgeomflaed."' class='flae'>".$fsbuchflaed."</span></td>"
415        ."\n\t<td>&nbsp;</td>" // 4
416        ."\n\t<td>&nbsp;</td>" // 5
417        ."\n\t<td>" // 6 Link auf GebÀude-Auswertung
[377]418                ."\n\t\t<p class='nwlink noprint'>" // Gebaeude-Verschneidung
[427]419                ."\n\t\t\t<a href='alkisgebaeudenw.php?gkz=".$gkz."&amp;gmlid=".$gmlid.LnkStf();
[402]420                if ($cnt_adressen > 0) { // wenn Adresse vorgekommen ist
[422]421                        echo "' title='Geb&auml;ude oder Bauwerke auf oder an dem Flurst&uuml;ck'>Geb&auml;ude/Bauw.";
[402]422                } else { // GebÀude mit Adresse gibt es NICHT, das ist klar
[422]423                        echo "' title='Suche Geb&auml;ude (ohne Adresse) oder Bauwerke auf dem Flurst&uuml;ck'>Geb&auml;ude/Bauw.";
[402]424                }
425                echo "<img src='ico/Haus.png' width='16' height='16' alt=''></a>"
[377]426                ."\n\t\t</p>"
[402]427        ."\n\t</td>" // 6
428        ."\n</tr>";
[362]429
[389]430// B o d e n s c h À t z u n g
431// ---------------------------
432// Tabelle "klas_3x" (norbit-ALB): Dort fehlen Bodenart und Zustandsstufe, es ist aber bereits auf BuchflÀche umgerechnet.
433
[394]434// BodenschÀtzungs-Abschnitte mit FlurstÌcken verschneiden, Spalten entschlÌsseln
[412]435$sql="SELECT b.kulturart AS kulturartk, kulturart.beschreibung AS kulturartv,
436 b.bodenart AS bodenartk, bodenart.beschreibung AS bodenartv, zustbod.beschreibung AS zustbodv,
[394]437 b.entstehungsartoderklimastufewasserverhaeltnisse AS entsteh, b.sonstigeangaben,
[402]438 b.bodenzahlodergruenlandgrundzahl as bodenzahl, b.ackerzahlodergruenlandzahl AS ackerzahl,
[389]439 b.jahreszahl, st_area(st_intersection(b.wkb_geometry, f.wkb_geometry)) AS schnittflae
440FROM ax_flurstueck f
441JOIN ax_bodenschaetzung b ON st_intersects(b.wkb_geometry, f.wkb_geometry) AND st_area(st_intersection(b.wkb_geometry, f.wkb_geometry)) > 0.05
[412]442LEFT JOIN ax_bodenart_bodenschaetzung bodenart ON b.bodenart = bodenart.wert
443LEFT JOIN ax_kulturart_bodenschaetzung kulturart ON b.kulturart = kulturart.wert
444LEFT JOIN ax_zustandsstufeoderbodenstufe_bodenschaetzung zustbod ON b.zustandsstufeoderbodenstufe = zustbod.wert
[389]445WHERE f.gml_id = $1 AND f.endet IS NULL AND b.endet IS NULL ORDER BY schnittflae DESC";
446
447$v = array($gmlid);
448$res = pg_prepare("", $sql);
449$res = pg_execute("", $v);
450if (!$res) {echo "\n<p class='err'>Fehler bei DB-Abfrage zur Klassifizierung Boden</p>\n";}
451$gesertragsmz = 0; // Gesamt-ErtragsMesszahl
452$klasflae = 0; // Summe klassifizierte FlÀche
453$j=0;
454if(!empty($res) && pg_num_rows($res) > 0) {
[402]455        while ($row = pg_fetch_assoc($res)) {
[389]456                $kulturartk=$row['kulturartk']; // Key  -
[422]457                $kulturartv=$row['kulturartv']; // - Value             
458                if (substr($kulturartv, 0, 3) === 'Ack') { // A
[389]459                        $kbez1="Bodenzahl";
460                        $kbez2="Ackerzahl";
461                } else { // Gr
462                        $kbez1="Gr&uuml;nlandgrundzahl";
463                        $kbez2="Gr&uuml;nlandzahl";
464                }
465                $absflae = $row['schnittflae'];
466                $absbuchflae = $absflae * $the_Xfactor;
467                $klasflae+=$absbuchflae;
468                $ertragszahl = intval($absbuchflae * $row['ackerzahl'] / 100);
469                $gesertragsmz+=$ertragszahl;
[422]470        //      $absflaedis = number_format($absflae,0,",",".")." m&#178;"; // als Tool-Tip ?
[389]471                $absbuchflaedis = number_format($absbuchflae,0,",",".")." m&#178;";
472                $boedenzahl=ltrim($row['bodenzahl'], '0');
473                $ackerzahl=ltrim($row['ackerzahl'], '0');
[394]474                $jahr=$row['jahreszahl'];
475                $entsteh=$row['entsteh'];
476                $sonst=$row['sonstigeangaben'];
[422]477                if ($j === 0) { // 1
[389]478                        echo "\n<tr>\n\t<td class='ll' title='Abschnitt Bodensch&auml;tzung'><img src='ico/Landwirt.png' width='16' height='16' alt=''> Bodensch&auml;tzung:</td>";
479                } else {
480                        echo "\n<tr>\n\t<td>&nbsp;</td>";
481                }
[422]482                echo "\n\t<td class='fla' title='Ertragsmesszahl: Produkt von ".$kbez2."/100 und Fl&auml;che.'>EMZ ".$ertragszahl."</td>"
483                ."\n\t<td class='re' title='Fl&auml;che des Sch&auml;tzungsabschnitts'>".$absbuchflaedis."</td>"
484                ."\n\t<td class='lr'><span title='".$kbez1."'>".$boedenzahl."</span>/<span title='".$kbez2."'>".$ackerzahl."</span></td>"
485                ."\n\t<td class='lr'>";
[427]486                echo "\n\t\t".DsKy($kulturartk, 'Kulturart')." <span title='Kulturart-*'>".$kulturartv."</span>";
487                echo "\n\t\t<br>".DsKy($row['bodenartk'], 'Bodenart-*')." <span title='Bodenart'>".$row['bodenartv']."</span>";
488                echo "\n\t\t<br><span title='Zustandsstufe'>".$row['zustbodv']."</span>";
[389]489
[422]490                        // 2 ARRAYs auflösen
491                        if (isset($entsteh)) {
492                                $ent=trim($entsteh, "{}");
[427]493                                echo "\n\t\t<br><span title='Enststehungsart oder Klimastufe, Wasserverh&auml;ltnisse'>".DsKy($ent, '*');
494                                werteliste('e', $ent); // ++ Zeilenweise mit <br> ?
[394]495                                echo "</span>";
496                        }
[422]497                        if (isset($sonst)) {
498                                $son=trim($sonst, "{}");
[427]499                                echo "\n\t\t<br><span title='Sonstige Angaben'>".werteliste('s', $son)."</span>"; // ++ Zeilenweise mit <br> ?
[394]500                        }
[422]501                        if (isset($jahr)) {
[427]502                                echo "\n\t\t<br><span title='Jahreszahl'>".$jahr."</span>";
[394]503                        }
[422]504                echo "\n\t</td>"
505                ."\n\t<td>&nbsp;</td>\n</tr>";
[389]506                $j++;
507        }
508        // Summenzeile
509        $klasflaedis = number_format($klasflae,0,",",".")." m&#178;";
[402]510        echo "\n<tr>\n\t<td class='re'>Ertragsmesszahl:</td>" // 1
511        ."\n\t<td class='fla sum' title='Summe der Ertragsmesszahlen f&uuml;r dies Flurst&uuml;ck'>".$gesertragsmz."</td>" // 2
512        ."\n\t<td class='re'>".$klasflaedis."</td>" // 3
513        ."\n\t<td colspan='3'>&nbsp;</td>\n</tr>"; // 4-6
[389]514}
515
[422]516// H i n w e i s
517// auf  "Bau-, Raum- oder Bodenordnungsrecht" (Baulast, Flurbereinigung) oder eine "strittige Grenze"
518
519// Gemeinsame FlÀche suchen: entweder (ST_Intersects and not ST_Touches) oder (2xST_Within OR ST_Overlaps), ST_Intersects liefert auch angrenzende
[425]520$sql_boden ="SELECT b.artderfestlegung AS wert, a.beschreibung AS art_verf, b.gml_id AS verf_gml, b.bezeichnung AS verf_bez,
[362]521b.name AS verf_name, d.bezeichnung AS stelle_bez, d.stelle AS stelle_key
[422]522FROM ax_flurstueck f
523JOIN ax_bauraumoderbodenordnungsrecht b ON ST_Within(b.wkb_geometry, f.wkb_geometry) OR ST_Within(f.wkb_geometry, b.wkb_geometry) OR ST_Overlaps(b.wkb_geometry, f.wkb_geometry)
524LEFT JOIN ax_artderfestlegung_bauraumoderbodenordnungsrecht a ON b.artderfestlegung=a.wert
[425]525LEFT JOIN ax_dienststelle d ON b.stelle=d.stelle ".UnqKatAmt("b","d")
526."WHERE f.gml_id = $1 AND f.endet IS NULL AND b.endet IS NULL AND d.endet IS NULL";
[362]527
528pg_prepare($con, "bodeneuordnung", $sql_boden);
529$res_bodeneuordnung = pg_execute($con, "bodeneuordnung", array($gmlid));
530if (!$res_bodeneuordnung) {
[387]531        echo "\n<p class='err'>Fehler bei Bau-, Raum- oder Bodenordnungsrecht</p>";
[425]532        if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".str_replace("$1", "'".$gmlid."'", $sql_boden)."</p>";}
[362]533}
534$sql_str="SELECT gml_id FROM ax_besondereflurstuecksgrenze WHERE endet IS NULL AND 1000 = ANY(artderflurstuecksgrenze)
535AND ST_touches((SELECT wkb_geometry FROM ax_flurstueck WHERE gml_id = $1 AND endet IS NULL),wkb_geometry);";
536
537pg_prepare($con, "strittigeGrenze", $sql_str);
538$res_strittigeGrenze = pg_execute($con, "strittigeGrenze", array($gmlid));
539if (!$res_strittigeGrenze) {
[387]540        echo "\n<p class='err'>Fehler bei strittige Grenze</p>";
[425]541        if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".str_replace("$1", "'".$gmlid."'", $sql_str)."</p>";}
[362]542}
543if (pg_num_rows($res_bodeneuordnung) > 0 OR pg_num_rows($res_strittigeGrenze) > 0) {
[377]544        echo "\n<tr>"
[402]545        ."\n\t<td title='Hinweise zum Flurst&uuml;ck'><h6><img src='ico/Hinweis.png' width='16' height='16' alt=''> " // 1
546        ."Hinweise:</h6></td>\n\t<td colspan='5'>&nbsp;</td>\n</tr>";// 2-6
[362]547        if (pg_num_rows($res_bodeneuordnung) > 0) {
[402]548                while ($row = pg_fetch_assoc($res_bodeneuordnung)) { // 3 Zeilen je Verfahren
549                        echo "\n<tr title='Bau-, Raum- oder Bodenordnungsrecht'>" // Zeile 1 - kommt immer, darum hier den Link
550                                ."\n\t<td>Bodenrecht</td>" // 1
551                                ."\n\t<td class='re'>Festlegung: </td>" // 2 "Art der Festlegung" zu lang
[427]552                                ."\n\t<td colspan='3'>".DsKy($row['wert'], 'Art des Verfahrens').$row['art_verf']."</td>";
553                                echo "\n\t<td>"
[390]554                                        ."\n\t\t<p class='nwlink noprint'>"
[427]555                                        ."\n\t\t\t<a href='alkisbaurecht.php?gkz=".$gkz."&amp;gmlid=".$row['verf_gml'].LnkStf()
556                                        ."' title='Bau-, Raum- oder Bodenordnungsrecht'>Recht <img src='ico/Gericht.png' width='16' height='16' alt=''></a>"
[390]557                                        ."\n\t\t</p>"           
558                                ."\n\t</td>"
[362]559                        ."\n</tr>";
[402]560                        $dstell=$row['stelle_key']; // Zeile 2
[422]561                        if ($dstell != '') {
[377]562                                echo "\n<tr title='Flurbereinigungsbeh&ouml;rde'>"
[402]563                                        ."\n\t<td>&nbsp;</td>" // 1
564                                        ."\n\t<td class='re'>Dienststelle: </td>" // 2
[427]565                                        ."\n\t<td colspan='3'>".DsKy($dstell, 'Art der Dienststelle').$row['stelle_bez']."</td>"
566                                        ."\n\t<td>&nbsp;</td>"
[362]567                                ."\n</tr>";
568                        }
[402]569                        $vbez=$row['verf_bez']; // Zeile 3, ist nicht immer gefÃŒllt
[362]570                        $vnam=$row['verf_name']; // noch seltener
[422]571                        if ($vbez != '') {
[377]572                                echo "\n<tr title='Verfahrensbezeichnung'>"
[390]573                                        ."\n\t<td>&nbsp;</td>"
574                                        ."\n\t<td class='re'>Verfahren: </td>"
575                                        ."\n\t<td colspan='3'>";
[427]576                                        if ($vnam == "") {
577                                                echo $vbez; // nur die Nummer
578                                        } else { // Name oder beides
579                                                echo DsKy($vbez, 'Nummer des Verfahrens').$vnam;
580                                        }
[377]581                                        echo "</td>"
582                                        ."\n\t<td>&nbsp;</td>"
583                                ."\n</tr>";
[362]584                        }
585                }
586        }
587        if (pg_num_rows($res_strittigeGrenze) > 0) { // 1 Zeile
588                echo "\n<tr>\n<td>Strittige Grenze:</td>"
[390]589                ."<td colspan=4>Mindestens eine Flurst&uuml;cksgrenze ist als <b>strittig</b> zu bezeichnen. Sie kann nicht festgestellt werden, weil die Beteiligten sich nicht &uuml;ber den Verlauf einigen. Nach sachverst&auml;ndigem Ermessen der Katasterbeh&ouml;rde ist anzunehmen, dass das Liegenschaftskataster nicht die rechtm&auml;&szlig;ige Grenze nachweist.</td>"
[362]590                ."\n<td>&nbsp;</td>\n</tr>";
591        }
592}
593echo "\n</table>";
594
[402]595// B U C H U N G S S T E L L E N  zum FS
596$bartgrp="";    // Buchungsart
597$barttypgrp=""; // Buchungsart Typ
[422]598if ($gml_buchungsstelle === '') {
599                echo "\n<p class='err'>Keine Buchungstelle zum Flurst&uuml;ck gefunden.</p>"; // keine Verweis vorhanden?
600} else {
601        echo "\n<table class='outer'>"; // ALLE Buchungen und EigentÃŒmer in 4 Spalten EINER Tabelle ausgeben
602       
[402]603        $stufe=1; // SchleifenzÀhler Tiefe
[422]604        $gezeigt=buchung_anzg($gml_buchungsstelle, $eig, false, $gmlid, 1); // die ("dienende") Buchung anzeigen, wenn nicht fiktiv. Liefert 1/0
[362]605
[422]606        $anzber=ber_bs_zaehl($gml_buchungsstelle);      // Anzahl berechtigte Buchungen (nÀchste Stufe) zu dieser Buchung ermitteln
607        $verf_next = array($gml_buchungsstelle);        // Start Recursion mit einem Element
[425]608        //if ($dbg > 1) {echo "<p class='dbg'>Nach Stufe ".$stufe.", Anzahl: ". $anzber ."</p>";}
[362]609
[402]610        while ($anzber > 0 ) { // Stufe - recursiv in die Tiefe, solange es was zu verfolgen gibt
611                $verf_akt=$verf_next; // die nÀchste Stufe als aktuell ÃŒbernehmen ..
612                $verf_next=array(); // .. und zum AuffÃŒllen leeren
613                $stufe++;
614                foreach($verf_akt as $gml_ber_bs) {
615                        if (ber_bs_zaehl($gml_ber_bs) > 0) {
[405]616                                $verf_neu=ber_bs_anzg($gml_ber_bs, $eig, false, $gmlid, ""); // Anzeige ber. Buchungst., ggf. mit EigentÃŒmer.
[402]617                                $anz_neu=count($verf_neu); // Das Ergebnis zÀhlen
618                                if ($anz_neu > 0) { // wenn neue geliefert
619                                        $verf_next=array_merge($verf_next, $verf_neu); // die neuen an die Sammlung heften
[362]620                                }
621                        }
[402]622                } // Ende Buchungs-Array in der Stufe
623                $anzber=count($verf_next); // Sammlung auf Stufe zÀhlen, Steuert die Schleife.
624        } // Ende Stufe
[387]625
[422]626        echo "\n</table>\n\n";
627
628        // Fehler aus "ModellschwÀche" erkennen.
629        // Wenn der Verweis der Buchungsstelle auf ein Grundbuch ins Leere lÀuft, weil das Grundbuch
630        //  nicht im SekundÀrbestand vorhanden ist, dann könnte das am NBA-Verfahren liegen.
[427]631        if ( $gezeigt === 0 and $stufe === 1 ) {
[422]632                echo "<p class='err'>Das Grundbuch zur Buchung '".$gml_buchungsstelle."' fehlt in der Datenbank.</p>";
[427]633                if ($dbg > 2) { // fehlt die Buchung?
[422]634                        echo "<p class='dbg'>Suchen mit SQL: SELECT * FROM ax_buchungsstelle WHERE gml_id='".$gml_buchungsstelle."'; </p>";
635                }
636        }
637}
638
[362]639pg_close($con);
[425]640echo "<div class='buttonbereich noprint'>\n<hr>"
641        ."\n\t<a title='zur&uuml;ck' href='javascript:history.back()'><img src='ico/zurueck.png' width='16' height='16' alt='zur&uuml;ck'></a>&nbsp;";
642if ($PrntBtn==true){echo "\n\t<a title='Drucken' href='javascript:window.print()'><img src='ico/print.png' width='16' height='16' alt='Drucken'></a>&nbsp;";}
643echo "\n\t<a title='Export als CSV' href='javascript:ALKISexport(\"".$gmlid."\")'><img src='ico/download_fs.png' width='32' height='16' alt='Export'></a>&nbsp;\n</div>";
[402]644
[422]645footer($gmlid, selbstverlinkung()."?", "&amp;eig=".$eig);
[362]646?>
647</body>
648</html>
Note: See TracBrowser for help on using the repository browser.