[362] | 1 | <?php |
---|
[427] | 2 | /* alkisexport.php |
---|
[425] | 3 | |
---|
[427] | 4 | ALKIS-Auskunft |
---|
| 5 | Author: Frank JÀger, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo) |
---|
| 6 | |
---|
[378] | 7 | CSV-Export von ALKIS-Daten zu einem Flurstueck, Grundbuch, EigentÃŒmer oder StraÃe. |
---|
[362] | 8 | Es wird eine GML-ID ÃŒbergeben. |
---|
| 9 | Es wird ein gespeicherter View verwendet, der nach der gml_id gefiltert wird. |
---|
[425] | 10 | Der View verkettet Flurstueck - Buchungsstelle - Grundbuch - EigentÃŒmer |
---|
[362] | 11 | Die Lagebezeichnung des FlurstÃŒcks wird in ein Feld komprimiert. |
---|
[377] | 12 | Parameter Beispiele: |
---|
[405] | 13 | ?gkz=mandant&tabtyp=flurstueck/grundbuch/buchung/person/strasse&gmlid=DE... Standard |
---|
[378] | 14 | ?gkz=270&tabtyp=gemarkung&gemarkung=2662 Sonderfall ganze Gemarkung |
---|
[377] | 15 | ?gkz=270&gemarkung=2662 |
---|
[378] | 16 | ?gkz=mandant&tabtyp=strasse&haus=m&gmlid=DE... Filter &haus=m/o = mit oder ohne Hausnummer |
---|
| 17 | ?gkz=mandant&tabtyp=strasse&haus=o bei Strasse auch ohne gmlid zulÀssig - nicht verwenden wenn aus NBA unscharf geladen |
---|
[412] | 18 | ?gkz240,tabtyp=flstliste&gmlliste=DE...,DE.... |
---|
[378] | 19 | Beispiele fÃŒr Fehler: |
---|
[377] | 20 | ?gkz=270&tabtyp=gemarkung&gmlid=2662 |
---|
| 21 | ?gkz=270&tabtyp=flurstueck&gemarkung=2662 |
---|
| 22 | ?gkz=270&tabtyp=flurstueck |
---|
| 23 | ?gkz=270&gmlid=2662 |
---|
[362] | 24 | |
---|
[398] | 25 | Version: |
---|
| 26 | -------- |
---|
[425] | 27 | 2016-02-23 Version fÃŒr norGIS-ALKIS-Import |
---|
[422] | 28 | .... |
---|
[405] | 29 | 2018-05-03 Aufruf aus neuem GrundstÃŒcksnachweis: tabtyp='buchung', angepasster View "exp_csv" notwendig |
---|
[412] | 30 | 2018-10-16 Neuer Aufruf-Typ aus der rÀumlichen Selektion, &tabtyp=flstliste&prefix=DENW15&gmlliste=AL...,AL.... |
---|
[422] | 31 | 2020-12-16 Input-Validation und Strict Comparisation (===), BerechtigungsprÃŒfung vorÃŒbergehend deaktiviert |
---|
[425] | 32 | 2021-12-01 Client-Encoding |
---|
[430] | 33 | 2022-07-05 PHP 8.1: Connection verwenden bei "pg_prepare" und "pg_execute", keine NULL-Werte in String-Functions verwenden |
---|
[387] | 34 | |
---|
[431] | 35 | ToDo:. |
---|
[425] | 36 | - In den gespeicherten Views "exp_csv" und "exp_csv_str" den Fall Kataster-Amts-Mix berÃŒcksichtigen. |
---|
[402] | 37 | - Abruf FlurstÌck sollte auch mit "fskennz" (ggg-ff-zzz/nn) statt "gml-id" möglich sein |
---|
[398] | 38 | - In Dateiname den StraÃennamen statt der gmlid verwenden? (Umlaute?) |
---|
[387] | 39 | - in alkislage.php fÃŒr den Typ "ohne Haunummer" den Export mit strasse und haus=o verlinken |
---|
[362] | 40 | */ |
---|
| 41 | |
---|
| 42 | function lage_zum_fs($gmlid) { |
---|
| 43 | // Zu einem FlurstÃŒck die Lagebezeichnungen (mit Hausnummer) so aufbereiten, |
---|
| 44 | // dass ggf. mehrere Lagebezeichnungen in eine Zelle der Tabelle passen. |
---|
| 45 | // FS >westAuf> Lage >> Katalog |
---|
[430] | 46 | global $con; |
---|
[387] | 47 | $sql ="SELECT DISTINCT s.bezeichnung, l.hausnummer " |
---|
| 48 | ."FROM ax_flurstueck f JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(f.weistauf) " |
---|
| 49 | ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage " |
---|
[389] | 50 | ."WHERE f.gml_id= $1 AND f.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL ORDER BY s.bezeichnung, l.hausnummer;"; |
---|
[362] | 51 | |
---|
| 52 | $v=array($gmlid); |
---|
[430] | 53 | $res=pg_prepare($con, "", $sql); |
---|
| 54 | $res=pg_execute($con, "", $v); |
---|
[362] | 55 | if (!$res) {return "** Fehler bei Lagebezeichnung **";} |
---|
| 56 | $j=0; |
---|
| 57 | $lagehsnr=""; |
---|
| 58 | $salt=""; |
---|
[402] | 59 | while($row = pg_fetch_assoc($res)) { |
---|
[362] | 60 | if ($j > 0) {$lagehsnr.=", ";} |
---|
| 61 | $sneu=$row["bezeichnung"]; |
---|
[422] | 62 | if ($sneu === $salt) { // gleiche Str. |
---|
[425] | 63 | $lagehsnr.=$row["hausnummer"]; // HsNr dran hÀngen |
---|
| 64 | } else { // Name UND HsNr dran hÀngen |
---|
[362] | 65 | $lagehsnr.=$sneu." ".$row["hausnummer"]; |
---|
| 66 | } |
---|
[425] | 67 | $salt=$sneu; // Name f. nÀchste Runde |
---|
[362] | 68 | $j++; |
---|
| 69 | } |
---|
| 70 | pg_free_result($res); |
---|
| 71 | return($lagehsnr); |
---|
| 72 | } |
---|
| 73 | |
---|
[427] | 74 | // START |
---|
[425] | 75 | $tabtyp=''; $haus=''; // Var. init. |
---|
[387] | 76 | $cntget = extract($_GET); // Parameter in Variable umwandeln |
---|
| 77 | |
---|
| 78 | // strikte Validierung aller Parameter |
---|
[422] | 79 | if (isset($gmlid)) { |
---|
[412] | 80 | if ( !preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");} |
---|
| 81 | } else { |
---|
| 82 | $gmlid=""; |
---|
| 83 | } |
---|
| 84 | |
---|
| 85 | // FS-Limit? x (16+1) = |
---|
[422] | 86 | if (isset($gmlliste)) { |
---|
[412] | 87 | if (!preg_match("#^[0-9A-Za-z,]{16,2000}$#", $gmlliste)) { |
---|
| 88 | die("Eingabefehler gmlliste"); |
---|
| 89 | } |
---|
| 90 | } |
---|
| 91 | |
---|
[422] | 92 | if (isset($gkz)) { |
---|
| 93 | if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");} |
---|
| 94 | } else { |
---|
| 95 | die("Fehlender Parameter"); |
---|
| 96 | } |
---|
[387] | 97 | if (isset($gemarkung)) { |
---|
| 98 | if (!preg_match('#^[0-9]{4}$#', $gemarkung)) {die("Eingabefehler gemarkung");} |
---|
| 99 | } else { |
---|
| 100 | $gemarkung=''; |
---|
| 101 | } |
---|
| 102 | if (!preg_match('#^[m|o]{0,1}$#', $haus)) {die("Eingabefehler haus");} |
---|
| 103 | if (!preg_match('#^[a-z]{0,10}$#', $tabtyp)) {die("Eingabefehler tabtyp");} |
---|
| 104 | |
---|
[422] | 105 | include "alkis_conf_location.php"; |
---|
| 106 | include "alkisfkt.php"; |
---|
[375] | 107 | |
---|
[425] | 108 | if ($tabtyp === '') { // Parameter (-kombinationen) prÃŒfen |
---|
[378] | 109 | if ($gemarkung != '') { // Dieser Parameters bestimmt auch eindeutig den $tabtyp |
---|
[375] | 110 | $tabtyp = 'gemarkung'; |
---|
[378] | 111 | } else { // Bei "gmlid" MUSS man zwingend die Tabelle dazu nennen |
---|
[387] | 112 | $err="\nFehler: Art des Suchfilters nicht angeben."; |
---|
| 113 | exit ($err); |
---|
[375] | 114 | } |
---|
[422] | 115 | } elseif ($tabtyp === 'gemarkung') { |
---|
| 116 | if ($gemarkung === '') { |
---|
[387] | 117 | $err="\nFehler: Gemarkungsnummer nicht angeben."; |
---|
| 118 | exit ($err); |
---|
[375] | 119 | } |
---|
| 120 | } |
---|
[378] | 121 | |
---|
| 122 | if ($gmlid != '') { // Angabe von gmlid ist der Normalfall, das passt fÃŒr fast jeden tabtyp |
---|
[422] | 123 | if ($tabtyp === 'strasse' and $haus != '') { // den Zusatzfilter m/o im Dateinamen dokumentieren |
---|
| 124 | if ($haus === 'm') { |
---|
[378] | 125 | $filename='alkis_'.$tabtyp.'_'.$gmlid.'_mit_hsnr.csv'; |
---|
| 126 | } else { // = o |
---|
| 127 | $filename='alkis_'.$tabtyp.'_'.$gmlid.'_ohne_hsnr.csv.csv'; |
---|
| 128 | } |
---|
| 129 | } else { |
---|
| 130 | $filename='alkis_'.$tabtyp.'_'.$gmlid.'.csv'; |
---|
| 131 | } |
---|
| 132 | } else { // Oh Oh! Keine gmlid! - Alternativen? |
---|
| 133 | if ($gemarkung != '') { // Sonderfall 1 - Gemarkungsnummer statt gmlid als Filter |
---|
[375] | 134 | if ($tabtyp != 'gemarkung') { |
---|
[378] | 135 | $err = "Fehler: Falsche Kombination Parameter tabtyp='".$tabtyp."' mit Wert fuer Gemarkungsnummer."; |
---|
| 136 | echo "\n".$err; exit ($err); |
---|
[375] | 137 | } |
---|
| 138 | $filename='alkis_'.$tabtyp.'_'.$gemarkung.'.csv'; |
---|
[378] | 139 | |
---|
[412] | 140 | /* // $gmlid zu strasse ist noch notwendig solange kein Filter auf "Gemeinde" verwendet wird. |
---|
[422] | 141 | } elseif ($haus === 'm' or $haus === 'o') { // Sonderfall 2 - alle mit/ohne Hausnummer, nur Ìber View "exp_csv_str" möglich |
---|
[378] | 142 | if ($tabtyp != 'strasse') { |
---|
[387] | 143 | $err="\nFehler: Falsche Kombination Parameter tabtyp='".$tabtyp."' mit Wert fuer Haus."; |
---|
| 144 | exit ($err); |
---|
[378] | 145 | } |
---|
[422] | 146 | if ($haus === 'm') { // den Zusatzfilter m/o im Dateinamen dokumentieren |
---|
[378] | 147 | $filename='alkis_'.$tabtyp.'_mit_hsnr.csv'; |
---|
| 148 | } else { |
---|
| 149 | $filename='alkis_'.$tabtyp.'_ohne_hsnr.csv'; |
---|
| 150 | } |
---|
| 151 | */ |
---|
[412] | 152 | } elseif ($gmlliste != '') { // Sonderfall 3 - FlurstÌcke aus rÀumlicher Selection |
---|
| 153 | if ($tabtyp != 'flstliste') { |
---|
| 154 | $err = "Fehler: Falsche Kombination Parameter tabtyp='".$tabtyp."' mit Liste der GML-ID."; |
---|
| 155 | echo "\n".$err; exit ($err); |
---|
| 156 | } |
---|
| 157 | if (!isset($prefix) or !preg_match("#^[A-Z0-9,]{6}$#", $prefix)) { |
---|
| 158 | die("Eingabefehler prefix"); |
---|
| 159 | } |
---|
| 160 | $filename='alkis_gebiet.csv'; // RÀumliche Selection |
---|
| 161 | |
---|
[378] | 162 | } else { |
---|
[387] | 163 | $err="\nFehler: Kein passender Wert fuer die Suche angegeben."; |
---|
| 164 | exit ($err); |
---|
[375] | 165 | } |
---|
| 166 | } |
---|
| 167 | |
---|
| 168 | // DOWNLOAD der CSV-Datei vorbereiten (statt HTML-Ausgabe) |
---|
[362] | 169 | header('Content-type: application/octet-stream'); |
---|
[375] | 170 | header('Content-Disposition: attachment; filename="'.$filename.'"'); |
---|
[362] | 171 | |
---|
| 172 | // CSV-Ausgabe: Kopfzeile mit Feldnamen |
---|
| 173 | echo "FS-Kennzeichen;GmkgNr;Gemarkung;Flur;Flurstueck;Flaeche;Adressen;GB-BezNr;GB-Bezirk;GB-Blatt;BVNR;Anteil_am_FS;Buchungsart;Namensnummer;AnteilDerPerson;RechtsGemeinschaft;Person;GebDatum;Anschrift;Anteil(berechnet)"; |
---|
| 174 | |
---|
| 175 | // Datenbank-Verbindung |
---|
[377] | 176 | $con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisexport.php'"); |
---|
[378] | 177 | if (!$con) { |
---|
| 178 | $err= "Fehler beim Verbinden der DB"; |
---|
| 179 | echo "\n".$err; exit($err); |
---|
| 180 | } |
---|
[425] | 181 | //pg_set_client_encoding($con, 'LATIN1'); // FÃŒr Excel kein UTF8 |
---|
| 182 | pg_set_client_encoding($con, 'WIN1252'); // Auch Buchstaben z.B. mit "CARON", wie ş Ŝ š Š|
---|
[362] | 183 | |
---|
[412] | 184 | //$viewname="exp_csv"; // Standard-View, in der DB gespeichert |
---|
[375] | 185 | $v=array($gmlid); // Standard-Filter-Feld |
---|
| 186 | |
---|
[362] | 187 | // Der Parameter "Tabellentyp" bestimmt den Namen des Filter-Feldes aus dem View "exp_csv". |
---|
| 188 | switch ($tabtyp) { // zulaessige Werte fuer &tabtyp= |
---|
[412] | 189 | |
---|
[375] | 190 | case 'flurstueck': // ax_flurstueck.gml_id |
---|
[412] | 191 | $sql="SELECT * FROM exp_csv WHERE fsgml = $1 "; |
---|
[375] | 192 | break; |
---|
[412] | 193 | |
---|
[375] | 194 | case 'grundbuch': // ax_buchungsblatt.gml_id |
---|
[412] | 195 | $sql="SELECT * FROM exp_csv WHERE gbgml = $1 "; |
---|
[375] | 196 | break; |
---|
[412] | 197 | |
---|
[431] | 198 | case 'buchung': // ax_buchungsstelle.gml_id (bei "Recht an" die herrschende Buchung) |
---|
| 199 | $sql="SELECT * FROM exp_csv WHERE gsgml = $1 "; // 2022-11-02: gsgml im View eingefÃŒgt |
---|
[405] | 200 | break; |
---|
[412] | 201 | |
---|
[375] | 202 | case 'person': // ax_person.gml_id |
---|
[412] | 203 | $sql="SELECT * FROM exp_csv WHERE psgml = $1 "; |
---|
[375] | 204 | break; |
---|
[412] | 205 | |
---|
[375] | 206 | case 'strasse': // ax_lagebezeichnungkatalogeintrag.gml_id = StraÃe-GML-ID |
---|
[412] | 207 | // alternativer View mit "_str", ist in der Datenbank gespeichert |
---|
| 208 | $sql="SELECT * FROM exp_csv_str WHERE stgml = $1 "; |
---|
[375] | 209 | break; |
---|
[412] | 210 | |
---|
[375] | 211 | case 'gemarkung': // SONDERfall als Parameter wird "Gemarkungsnummer" und nicht "gml_id" geliefert |
---|
[412] | 212 | $sql="SELECT * FROM exp_csv WHERE gemarkungsnummer = $1 "; |
---|
| 213 | $v=array($gemarkung); |
---|
[375] | 214 | break; |
---|
[412] | 215 | |
---|
| 216 | case 'flstliste': |
---|
| 217 | // GML-ID aufgeteilt: 6 Byte konstant, 10 Byte variabel in Liste |
---|
| 218 | $sql="SELECT * FROM exp_csv WHERE substring(fsgml from 1 for 6) = $1 " |
---|
| 219 | ." AND substring(fsgml from 7 for 10) IN ('".str_replace(",", "','", $gmlliste)."')"; |
---|
| 220 | $v=array($prefix); |
---|
| 221 | break; |
---|
| 222 | |
---|
[375] | 223 | default: |
---|
[387] | 224 | $err="\nFalscher Parameter '".$tabtyp."'"; |
---|
| 225 | exit($err); |
---|
[375] | 226 | break; |
---|
[362] | 227 | } |
---|
| 228 | |
---|
[422] | 229 | if ($haus === 'm' or $haus === 'o') { // nur FS mit/ohne verschl. Lagebez. |
---|
| 230 | // if ($gmlid === '') { // m/o-Filter als einziger Filter |
---|
[412] | 231 | // $sql="SELECT * FROM ".$viewname." WHERE fall='".$haus."' "; // Ersetzen |
---|
| 232 | // $v=array(); // kein Filter-Feld |
---|
| 233 | // // ToDo: Filter auf Gemeinde notwendig, wenn nicht auf strasse gefiltert wird. |
---|
| 234 | // // - Sonst Ausgabe von Rand-FlurstÃŒcken (bei geometrischer Filterung des NBA-Verfahrens) |
---|
| 235 | // // - Sonst ggf. Ausgabe Kreisgebiet |
---|
| 236 | // } else { // als zusÀtzlicher Filter AND |
---|
[425] | 237 | |
---|
[412] | 238 | $sql.=" AND fall='".$haus."' "; // m/o-Filter AnhÀngen |
---|
[425] | 239 | |
---|
[412] | 240 | // } |
---|
[378] | 241 | } |
---|
| 242 | |
---|
[430] | 243 | $res=pg_prepare($con, "", $sql); |
---|
| 244 | $res=pg_execute($con, "", $v); |
---|
[378] | 245 | if (!$res) { |
---|
[387] | 246 | $err="\nFehler bei Datenbankabfrage"; |
---|
| 247 | exit($err); |
---|
[378] | 248 | } |
---|
[362] | 249 | $i=1; // Kopfzeile zÀhlt mit |
---|
| 250 | $fsalt=''; |
---|
| 251 | |
---|
| 252 | // Datenfelder auslesen |
---|
[402] | 253 | while($row = pg_fetch_assoc($res)) { |
---|
[362] | 254 | $i++; // Zeile der Tabelle |
---|
| 255 | $rechnen=true; // Formel in letzte Spalte? |
---|
| 256 | |
---|
| 257 | // Flurstueck |
---|
| 258 | $fsgml=$row["fsgml"]; |
---|
| 259 | $fs_kennz=$row["fs_kennz"]; // Rechts Trim "_" ? |
---|
| 260 | $gmkgnr=$row["gemarkungsnummer"]; |
---|
| 261 | $gemkname=$row["gemarkung"]; |
---|
| 262 | $flurnummer=$row["flurnummer"]; |
---|
| 263 | $flstnummer=$row["zaehler"]; |
---|
| 264 | $nenner=$row["nenner"]; |
---|
| 265 | // Bruchnummer kann in Excel als Datum interpretiert werden. In '' setzen. |
---|
| 266 | if ($nenner > 0) {$flstnummer="'".$flstnummer."/".$nenner."'";} // BruchNr |
---|
| 267 | $fs_flae=$row["fs_flae"]; // amtliche Fl. aus DB-Feld |
---|
| 268 | |
---|
| 269 | // Grundbuch (Blatt) |
---|
| 270 | $gb_bezirk=$row["gb_bezirk"]; // Nummer des Bezirks |
---|
| 271 | $gb_beznam=$row["beznam"]; // Name des Bezirks |
---|
| 272 | $gb_blatt=$row["gb_blatt"]; |
---|
| 273 | |
---|
| 274 | // Buchungsstelle (Grundstueck) |
---|
| 275 | $bu_lfd=$row["bu_lfd"]; // BVNR |
---|
| 276 | $bu_ant=$row["bu_ant"]; // '=zaehler/nenner' oder NULL |
---|
| 277 | $bu_key=$row["buchungsart"]; // SchlÃŒssel |
---|
| 278 | $bu_art=$row["bu_art"]; // entschlÃŒsselt (Umlaute in ANSI!) |
---|
| 279 | if($bu_ant == '') { // Keine Bruch-Zahl |
---|
| 280 | $bu_ant = '1'; // "voller Anteil" (Faktor 1) |
---|
| 281 | } else { |
---|
| 282 | $bu_ant=str_replace(".", ",", $bu_ant); // Dezimalkomma statt -punkt. |
---|
| 283 | } |
---|
| 284 | |
---|
| 285 | // Namensnummer |
---|
| 286 | $nam_lfd="'".kurz_namnr($row["nam_lfd"])."'"; // In Hochkomma, wird sonst wie Datum dargestellt. |
---|
| 287 | $nam_ant=$row["nam_ant"]; |
---|
| 288 | $nam_adr=$row["nam_adr"]; // Art der Rechtsgemeischaft (SchlÃŒssel) |
---|
| 289 | |
---|
| 290 | if ($nam_adr == '') { // keine Rechtsgemeinschaft |
---|
| 291 | $rechtsg=''; |
---|
| 292 | if ($nam_ant == '') { // und kein Bruch-Anteil |
---|
| 293 | $nam_ant=1; // dann ganzer Anteil |
---|
| 294 | } |
---|
| 295 | } else { |
---|
| 296 | $rechnen=false; // bei Rechtsgemeinschaft die Anteile manuell interpretieren |
---|
| 297 | if ($nam_adr == 9999) { // sonstiges |
---|
| 298 | $rechtsg=$row["nam_bes"]; // Beschrieb der Rechtsgemeinschaft |
---|
| 299 | } else { |
---|
| 300 | // $rechtsg=rechtsgemeinschaft($nam_adr); // EntschlÃŒsseln |
---|
| 301 | $rechtsg=$row["nam_adrv"]; // Art der Rechtsgemeischaft (Value zum Key) |
---|
| 302 | } |
---|
| 303 | } |
---|
| 304 | |
---|
| 305 | // Person |
---|
| 306 | $vnam=$row["vorname"]; |
---|
| 307 | $nana=$row["nachnameoderfirma"]; |
---|
| 308 | $namteil=$row["namensbestandteil"]; |
---|
| 309 | //$name=anrede($row["anrede"]); |
---|
| 310 | $name=$row["anrv"]; // Anrede (Value zum Key) |
---|
| 311 | if ($name != "") {$name.=" ";} // Trenner |
---|
| 312 | if ($namteil != "") {$name.=$namteil." ";} // von und zu |
---|
| 313 | $name.=$nana; |
---|
| 314 | if ($vnam != "") {$name.=", ".$vnam;} // Vorname nach hinten |
---|
| 315 | $gebdat=$row["geburtsdatum"]; |
---|
[398] | 316 | // Koennte man im View in deutsches Format umwandeln: "to_char(cast(geburtsdatum AS date),'DD.MM.YYYY') AS geburtsdatum" |
---|
[362] | 317 | |
---|
[398] | 318 | // Adresse der Person (Eigentuemer) |
---|
| 319 | // Im View ist per subquery geregelt, dass nur die "juengste" Adresse verwendet wird. |
---|
[362] | 320 | $ort=$row["ort"]; |
---|
| 321 | if ($ort == "") { |
---|
| 322 | $adresse=""; |
---|
| 323 | } else { |
---|
| 324 | $adresse=$row["strasse"]." ".$row["hausnummer"].", ".$row["plz"]." ".$ort; |
---|
[387] | 325 | $land=$row["land"]; // nur andere Laender anzeigen |
---|
[362] | 326 | if (($land != "DEUTSCHLAND") and ($land != "")) { |
---|
| 327 | $adresse.=" (".$land.")"; |
---|
| 328 | } |
---|
| 329 | } |
---|
| 330 | |
---|
| 331 | // Adressen (Lage) zum FS |
---|
| 332 | if($fsgml != $fsalt) { // nur bei geÀndertem Kennz. |
---|
| 333 | $lage=lage_zum_fs($fsgml); // die Lage neu ermitteln |
---|
| 334 | $fsalt=$fsgml; |
---|
| 335 | } |
---|
| 336 | |
---|
| 337 | // Den Ausgabe-Satz montieren aus FlurstÃŒcks-, Grundbuch- und Namens-Teil |
---|
| 338 | // A B C D E F G |
---|
| 339 | $fsteil=$fs_kennz.";".$gmkgnr.";".$gemkname.";".$flurnummer.";".$flstnummer.";".$fs_flae.";".$lage.";"; |
---|
| 340 | // H I J K L M |
---|
| 341 | $gbteil=$gb_bezirk.";".$gb_beznam.";".$gb_blatt.";".$bu_lfd.";".$bu_ant.";".$bu_art.";"; |
---|
| 342 | // N O P Q R S |
---|
| 343 | $namteil=$nam_lfd.";".$nam_ant.";".$rechtsg.";".$name.";".$gebdat.";".$adresse; |
---|
| 344 | |
---|
| 345 | // Anteile "GB am FS" und "Pers am GB" verrechnen |
---|
| 346 | if ($rechnen) { // beide Anteile verwertbar |
---|
| 347 | $formelteil=";=L".$i."*O".$i; // Spalte T |
---|
| 348 | } else { |
---|
| 349 | $formelteil=';'; |
---|
| 350 | } |
---|
| 351 | |
---|
| 352 | // Ausgabe in die CSV-Datei -> Download -> Tabellenkalkulation |
---|
| 353 | echo "\n".$fsteil.$gbteil.$namteil.$formelteil; |
---|
| 354 | } |
---|
| 355 | pg_free_result($res); |
---|
[422] | 356 | if ($i === 1) { // nur Kopf |
---|
| 357 | if ($gmlid == '') { |
---|
[412] | 358 | $err="\nKein Treffer"; |
---|
| 359 | } else { |
---|
| 360 | $err="\nKein Treffer fuer gml_id='".$gmlid."'"; |
---|
| 361 | } |
---|
[387] | 362 | exit ($err); |
---|
[378] | 363 | } |
---|
[362] | 364 | pg_close($con); |
---|
| 365 | exit(0); |
---|
| 366 | ?> |
---|