[301] | 1 | <?php |
---|
| 2 | /* Modul alkisexport.php |
---|
[330] | 3 | CSV-Export von ALKIS-Daten zu einem Flurstueck, Grundbuch oder EigentÃŒmer. |
---|
| 4 | Es wird eine GML-ID ÃŒbergeben. |
---|
[301] | 5 | Es wird ein gespeicherter View verwendet, der nach der gml_id gefiltert wird. |
---|
| 6 | Der View verkettet Flurstueck - Buchungsstelle - Grundbuch - Eigentuemer |
---|
[330] | 7 | Die Lagebezeichnung des FlurstÃŒcks wird in ein Feld komprimiert. |
---|
[301] | 8 | Parameter: gkz=mandant&gmlid=DE...&tabtyp=flurstueck/grundbuch/person |
---|
| 9 | |
---|
| 10 | 2014-01-17 krz f.j. |
---|
[303] | 11 | 2014-01-20 weitere Spalten und verbesserte Formatierung |
---|
[330] | 12 | 2014-01-21 Der View liefert "Rechtsgemeinschaft" nun als Feld in allen Personen-SÀtzen |
---|
[305] | 13 | eines GB-Blattes statt als eigenen "Satz ohne Person". |
---|
[308] | 14 | 2014-01-27 Erweiterung auf Filter "strasse" ("gml_id" aus "ax_lagebezeichnungkatalogeintrag") |
---|
[330] | 15 | 2014-09-04 PostNAS 0.8: ohne Tab. "alkis_beziehungen", mehr "endet IS NULL", Spalten varchar statt integer |
---|
| 16 | 2014-09-10 Bei Relationen den Timestamp abschneiden |
---|
[339] | 17 | 2014-09-30 RÃŒckbau substring(gml_id) |
---|
[301] | 18 | */ |
---|
| 19 | |
---|
| 20 | function lage_zum_fs($gmlid) { |
---|
[330] | 21 | // Zu einem FlurstÃŒck die Lagebezeichnungen (mit Hausnummer) so aufbereiten, |
---|
[303] | 22 | // dass ggf. mehrere Lagebezeichnungen in eine Zelle der Tabelle passen. |
---|
[330] | 23 | // FS >westAuf> Lage >> Katalog |
---|
| 24 | $sql ="SELECT DISTINCT s.bezeichnung, l.hausnummer |
---|
[339] | 25 | FROM ax_flurstueck f JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(f.weistauf) |
---|
[330] | 26 | JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage |
---|
| 27 | WHERE f.gml_id= $1 ORDER BY s.bezeichnung, l.hausnummer;"; |
---|
| 28 | |
---|
[303] | 29 | $v=array($gmlid); |
---|
| 30 | $res=pg_prepare("", $sql); |
---|
| 31 | $res=pg_execute("", $v); |
---|
[301] | 32 | if (!$res) { |
---|
[330] | 33 | return "** Fehler bei Lagebezeichnung **"; //.$sql; |
---|
[301] | 34 | } |
---|
| 35 | $j=0; |
---|
[303] | 36 | $lagehsnr=""; |
---|
[301] | 37 | while($row = pg_fetch_array($res)) { |
---|
[303] | 38 | if ($j > 0) {$lagehsnr.=", ";} |
---|
[301] | 39 | $sneu=$row["bezeichnung"]; |
---|
| 40 | if ($sneu == $salt) { // gleiche Str. |
---|
| 41 | $lagehsnr.=$row["hausnummer"]; // HsNr dran haengen |
---|
| 42 | } else { // Name UND HsNr dranhaengen |
---|
| 43 | $lagehsnr.=$sneu." ".$row["hausnummer"]; |
---|
| 44 | } |
---|
| 45 | $salt=$sneu; // Name f. naechste Runde |
---|
[303] | 46 | $j++; |
---|
[301] | 47 | } |
---|
| 48 | pg_free_result($res); |
---|
| 49 | return($lagehsnr); |
---|
| 50 | } |
---|
| 51 | |
---|
[330] | 52 | // HIER START // |
---|
| 53 | |
---|
[301] | 54 | $cntget = extract($_GET); // Parameter aus URL lesen |
---|
| 55 | header('Content-type: application/octet-stream'); |
---|
| 56 | header('Content-Disposition: attachment; filename="alkis_'.$tabtyp.'_'.$gmlid.'.csv"'); |
---|
[303] | 57 | require_once("alkis_conf_location.php"); |
---|
| 58 | include("alkisfkt.php"); |
---|
[301] | 59 | |
---|
| 60 | // CSV-Ausgabe: Kopfzeile mit Feldnamen |
---|
[305] | 61 | 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)"; |
---|
[301] | 62 | |
---|
[303] | 63 | // Datenbank-Verbindung |
---|
[301] | 64 | $con = pg_connect("host=".$dbhost." port=" .$dbport." dbname=".$dbname." user=".$dbuser." password=".$dbpass); |
---|
| 65 | if (!$con) { |
---|
| 66 | exit("Fehler beim Verbinden der DB"); |
---|
| 67 | } |
---|
[330] | 68 | pg_set_client_encoding($con, LATIN1); // FÃŒr Excel kein UTF8 ausgeben |
---|
[301] | 69 | |
---|
[305] | 70 | // Der Parameter "Tabellentyp" bestimmt den Namen des Filter-Feldes aus dem View "exp_csv". |
---|
| 71 | switch ($tabtyp) { // zulaessige Werte fuer &tabtyp= |
---|
[308] | 72 | case 'flurstueck': $filter = "fsgml"; break; // ax_flurstueck.gml_id |
---|
| 73 | case 'grundbuch': $filter = "gbgml"; break; // ax_buchungsblatt.gml_id |
---|
| 74 | case 'person': $filter = "psgml"; break; // ax_person.gml_id |
---|
[330] | 75 | case 'strasse': $filter = "stgml"; break; // ax_lagebezeichnungkatalogeintrag.gml_id = StraÃe-GML-ID |
---|
[303] | 76 | default: exit("Falscher Parameter '".$tabtyp."'"); break; |
---|
[301] | 77 | } |
---|
| 78 | |
---|
[308] | 79 | // Daten aus gespeichertem View, zusaetzlich Filter: "feld"='wert' mitgeben |
---|
| 80 | if ($tabtyp == 'strasse') { // Sonderversion |
---|
| 81 | $sql="SELECT * FROM exp_csv_str WHERE ".$filter." = $1 "; |
---|
| 82 | } else { |
---|
| 83 | $sql="SELECT * FROM exp_csv WHERE ".$filter." = $1 "; |
---|
| 84 | } |
---|
| 85 | |
---|
| 86 | $v=array($gmlid); |
---|
| 87 | $res=pg_prepare("", $sql); |
---|
| 88 | $res=pg_execute("", $v); |
---|
[305] | 89 | if (!$res) {exit("Fehler bei Datenbankabfrage");} |
---|
[330] | 90 | $i=1; // Kopfzeile zÀhlt mit |
---|
[301] | 91 | $fsalt=''; |
---|
| 92 | |
---|
| 93 | // Datenfelder auslesen |
---|
| 94 | while($row = pg_fetch_array($res)) { |
---|
[305] | 95 | $i++; // Zeile der Tabelle |
---|
| 96 | $rechnen=true; // Formel in letzte Spalte? |
---|
[301] | 97 | |
---|
| 98 | // Flurstueck |
---|
| 99 | $fsgml=$row["fsgml"]; |
---|
[303] | 100 | $fs_kennz=$row["fs_kennz"]; // Rechts Trim "_" ? |
---|
[301] | 101 | $gmkgnr=$row["gemarkungsnummer"]; |
---|
[303] | 102 | $gemkname=$row["gemarkung"]; |
---|
| 103 | $flurnummer=$row["flurnummer"]; |
---|
| 104 | $flstnummer=$row["zaehler"]; |
---|
[301] | 105 | $nenner=$row["nenner"]; |
---|
[303] | 106 | if ($nenner > 0) {$flstnummer.="/".$nenner;} // BruchNr |
---|
[301] | 107 | $fs_flae=$row["fs_flae"]; // amtliche Fl. aus DB-Feld |
---|
| 108 | |
---|
| 109 | // Grundbuch (Blatt) |
---|
[303] | 110 | $gb_bezirk=$row["gb_bezirk"]; // Nummer des Bezirks |
---|
| 111 | $gb_beznam=$row["beznam"]; // Name des Bezirks |
---|
[301] | 112 | $gb_blatt=$row["gb_blatt"]; |
---|
| 113 | |
---|
| 114 | // Buchungsstelle (Grundstueck) |
---|
[303] | 115 | $bu_lfd=$row["bu_lfd"]; // BVNR |
---|
[305] | 116 | $bu_ant=$row["bu_ant"]; // '=zaehler/nenner' oder NULL |
---|
[330] | 117 | $bu_key=$row["buchungsart"]; // SchlÃŒssel |
---|
| 118 | $bu_art=$row["bu_art"]; // entschlÃŒsselt (Umlaute in ANSI!) |
---|
[305] | 119 | if($bu_ant == '') { // Keine Bruch-Zahl |
---|
| 120 | $bu_ant = '1'; // "voller Anteil" (Faktor 1) |
---|
| 121 | } else { |
---|
| 122 | $bu_ant=str_replace(".", ",", $bu_ant); // Dezimalkomma statt -punkt. |
---|
[303] | 123 | } |
---|
| 124 | |
---|
| 125 | // Namensnummer |
---|
[308] | 126 | $nam_lfd="'".kurz_namnr($row["nam_lfd"])."'"; // In Hochkomma, wird sonst wie Datum dargestellt. |
---|
[304] | 127 | $nam_ant=$row["nam_ant"]; |
---|
[330] | 128 | $nam_adr=$row["nam_adr"]; // Art der Rechtsgemeischaft (SchlÃŒssel) |
---|
[308] | 129 | |
---|
| 130 | if ($nam_adr == '') { // keine Rechtsgemeinschaft |
---|
| 131 | $rechtsg=''; |
---|
[305] | 132 | if ($nam_ant == '') { // und kein Bruch-Anteil |
---|
| 133 | $nam_ant=1; // dann ganzer Anteil |
---|
| 134 | } |
---|
[303] | 135 | } else { |
---|
[308] | 136 | $rechnen=false; // bei Rechtsgemeinschaft die Anteile manuell interpretieren |
---|
[305] | 137 | if ($nam_adr == 9999) { // sonstiges |
---|
| 138 | $rechtsg=$row["nam_bes"]; // Beschrieb der Rechtsgemeinschaft |
---|
| 139 | } else { |
---|
[330] | 140 | $rechtsg=rechtsgemeinschaft($nam_adr); // EntschlÃŒsseln |
---|
[305] | 141 | } |
---|
[303] | 142 | } |
---|
| 143 | |
---|
[301] | 144 | // Person |
---|
[308] | 145 | $vnam=$row["vorname"]; |
---|
[303] | 146 | $nana=$row["nachnameoderfirma"]; |
---|
[308] | 147 | $namteil=$row["namensbestandteil"]; |
---|
| 148 | $name=anrede($row["anrede"]); |
---|
| 149 | if ($name != "") {$name.=" ";} // Trenner |
---|
| 150 | if ($namteil != "") {$name.=$namteil." ";} // von und zu |
---|
| 151 | $name.=$nana; |
---|
| 152 | if ($vnam != "") {$name.=", ".$vnam;} // Vorname nach hinten |
---|
[303] | 153 | $gebdat=$row["geburtsdatum"]; |
---|
[301] | 154 | |
---|
[303] | 155 | // Adresse der Person (Eigentuemer)) |
---|
| 156 | $ort=$row["ort"]; |
---|
| 157 | if ($ort == "") { |
---|
| 158 | $adresse=""; |
---|
| 159 | } else { |
---|
| 160 | $adresse=$row["strasse"]." ".$row["hausnummer"].", ".$row["plz"]." ".$ort; |
---|
[330] | 161 | $land=$row["land"]; // nur andere LÀnder anzeigen |
---|
[303] | 162 | if (($land != "DEUTSCHLAND") and ($land != "")) { |
---|
| 163 | $adresse.=" (".$land.")"; |
---|
| 164 | } |
---|
| 165 | } |
---|
[301] | 166 | |
---|
[303] | 167 | // Adressen (Lage) zum FS |
---|
[330] | 168 | if($fsgml != $fsalt) { // nur bei geÀndertem Kennz. |
---|
[301] | 169 | $lage=lage_zum_fs($fsgml); // die Lage neu ermitteln |
---|
| 170 | $fsalt=$fsgml; |
---|
| 171 | } |
---|
| 172 | |
---|
[330] | 173 | // Den Ausgabe-Satz montieren aus FlurstÃŒcks-, Grundbuch- und Namens-Teil |
---|
[305] | 174 | // A B C D E F G |
---|
[303] | 175 | $fsteil=$fs_kennz.";".$gmkgnr.";".$gemkname.";".$flurnummer.";".$flstnummer.";".$fs_flae.";".$lage.";"; |
---|
[305] | 176 | // H I J K L M |
---|
[303] | 177 | $gbteil=$gb_bezirk.";".$gb_beznam.";".$gb_blatt.";".$bu_lfd.";".$bu_ant.";".$bu_art.";"; |
---|
[305] | 178 | // N O P Q R S |
---|
[303] | 179 | $namteil=$nam_lfd.";".$nam_ant.";".$rechtsg.";".$name.";".$gebdat.";".$adresse; |
---|
[301] | 180 | |
---|
[305] | 181 | // Anteile "GB am FS" und "Pers am GB" verrechnen |
---|
| 182 | if ($rechnen) { // beide Anteile verwertbar |
---|
| 183 | $formelteil=";=L".$i."*O".$i; // Spalte T |
---|
| 184 | } else { |
---|
| 185 | $formelteil=';'; |
---|
| 186 | } |
---|
| 187 | |
---|
[330] | 188 | // Ausgabe in die CSV-Datei -> Download -> Tabellenkalkulation |
---|
[305] | 189 | echo "\n".$fsteil.$gbteil.$namteil.$formelteil; |
---|
[301] | 190 | } |
---|
| 191 | pg_free_result($res); |
---|
[305] | 192 | if ($i == 1) {exit ("Kein Treffer fuer gml_id=".$gmlid);} // nur Kopfzeile |
---|
[301] | 193 | pg_close($con); |
---|
[303] | 194 | exit(0); |
---|
[301] | 195 | ?> |
---|