source: trunk/var/www/info/alkis/alkisgbfsexp.php @ 198

Revision 198, 1.9 KB checked in by frank.jaeger, 11 years ago (diff)

Buchauskunft: Umstellen der Schaltflächen am unteren Rand auf Symbole statt Buchstaben,
CSV-Download von FS- und GB-Daten,
begonnene Änderungen teilweise noch nicht fertig gestellt (siehe Kommentare).

Line 
1<?php
2/*      Modul alkisfsexp.php
3        CSV-Export von Flurstücksdaten zu einem Grundbuch-Blatt
4        2012-07-24 krz f.j.
5       
6++++ IN ARBEIT ++++   Zunächst Kopie von alkisgbexp.php
7
8        Es wird die gml_id eines Bestandes übergeben (analog alkisgbexp.php).
9        Dazu alle darauf gebuchten FS ermitteln.
10        Dazu dann alle FS-DFaten ausgeben (analog alkisfsexp.php).     
11
12*/
13
14
15import_request_variables("G"); // gmlid
16
17header('Content-type: application/octet-stream');
18header('Content-Disposition: attachment; filename="alkis_grundbuch_'.$gmlid.'.csv"');
19
20require_once("alkis_conf_location.php");
21
22// Datenbank-Verbindung
23$con = pg_connect("host=".$dbhost." port=" .$dbport." dbname=".$dbname." user=".$dbuser." password=".$dbpass);
24if (!$con) {exit("Fehler beim Verbinden der DB");}
25pg_set_client_encoding($con, LATIN1);
26
27// Brundbuch-Blatt
28$sql ="SELECT g.buchungsblattnummermitbuchstabenerweiterung AS nr, g.blattart, "; // GB-Blatt
29$sql.=" b.bezirk, b.bezeichnung AS beznam, "; // Bezirk
30$sql.=" a.land, a.bezeichnung "; // Amtsgericht
31$sql.="FROM ax_buchungsblatt g ";
32$sql.="LEFT JOIN ax_buchungsblattbezirk b ON g.land=b.land AND g.bezirk=b.bezirk ";  // BBZ
33$sql.="LEFT JOIN ax_dienststelle a ON b.land = a.land AND b.stelle = a.stelle ";
34$sql.="WHERE g.gml_id= $1 AND a.stellenart=1000;"; // Amtsgericht
35$v = array($gmlid);
36$res = pg_prepare("", $sql);
37$res = pg_execute("", $v);
38if (!$res) {exit("Fehler bei Grundbuchdaten");}
39if ($row = pg_fetch_array($res)) {
40        $agland=$row["land"]; // Amtsgericht   
41        $agbez=$row["bezeichnung"];
42        $bezirk=$row["bezirk"]; // Bezirk
43        $beznam=$row["beznam"];
44        $blattnr=$row["nr"]; // Blatt
45        $blattart=$row["blattart"];
46} else {
47        exit("Kein Treffer fuer gml_id=".$gmlid);
48}
49//if ($blattkey == 5000) { // fikt. Blatt Keine Angaben zum Eigentum
50
51// CSV-Ausgabe
52echo "Land;Amtsgericht;Bezirk;Bezirksname;Blatt;Blattart";
53echo "\n".$agland.";".$agbez.";".$bezirk.";".$beznam.";".$blattnr.";".$blattart;
54exit();
55?>
Note: See TracBrowser for help on using the repository browser.