ALKIS Bau-, Raum- oder Bodenordnungsrecht

Fehler beim Verbinden der DB

\n"; if ($debug > 1) {echo "

DB=".$dbname.", user=".$dbuser."

";} // wie View "baurecht" $sql ="SELECT r.ogc_fid, r.artderfestlegung as adfkey, r.name, r.stelle, r.bezeichnung AS rechtbez, "; $sql.="a.bezeichner AS adfbez, d.bezeichnung AS stellbez, d.stellenart, "; $sql.="round(st_area(r.wkb_geometry)::numeric,0) AS flae "; $sql.="FROM ax_bauraumoderbodenordnungsrecht r "; $sql.="LEFT JOIN ax_bauraumoderbodenordnungsrecht_artderfestlegung a ON r.artderfestlegung = a.wert "; $sql.="LEFT JOIN ax_dienststelle d ON r.land = d.land AND r.stelle = d.stelle "; $sql.="WHERE r.gml_id= $1 ;"; $v = array($gmlid); $res = pg_prepare("", $sql); $res = pg_execute("", $v); if (!$res) { echo "\n

Fehler bei Baurecht.

\n"; if ($debug > 2) {echo "

SQL=
".$sql."
$1 = ".$gmlid."

\n";} } echo "\n

Bau-, Raum- oder Bodenordnungsrecht

\n"; if ($row = pg_fetch_array($res)) { echo "\n"; echo "\n"; echo "\n\t\n\t"; echo "\n"; $enam=$row["name"]; if ($enam != "") { echo "\n"; echo "\n\t\n\t"; echo "\n"; } echo "\n"; echo "\n\t"; echo "\n\t"; echo "\n"; $stell=$row["stelle"]; if ($stell != "") { echo "\n"; echo "\n\t\n\t"; echo "\n"; } echo "\n"; echo "\n\t"; $flae=number_format($row["flae"],0,",",".")." m²"; echo "\n\t"; echo "\n"; echo "\n

Art der Festlegung:	(".$row["adfkey"].") "; echo "".$row["adfbez"]."
Eigenname des Gebietes:	".$enam."
Verfahrensnummer:	".$row["rechtbez"]."
Dienststelle:	(".$stell.") ".$row["stellbez"]; $stellart=$row["stellenart"]; if ($stellart != "") { echo " (".$stellart.")"; // d.stellenart -- weiter entschluesseln } echo "
Fläche:	".$flae."

"; } else { echo "\n

Fehler! Kein Treffer bei gml_id=".$gmlid."

"; } echo "\n

betroffene Flurstücke

\n"; echo "\n

Ermittelt durch geometrische Verschneidung. Nach Größe absteigend.

"; $sql ="SELECT f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche, "; $sql.="round(st_area(ST_Intersection(r.wkb_geometry,f.wkb_geometry))::numeric,1) AS schnittflae "; $sql.="FROM ax_flurstueck f, ax_bauraumoderbodenordnungsrecht r "; $sql.="WHERE r.gml_id= $1 "; $sql.="AND st_intersects(r.wkb_geometry,f.wkb_geometry) = true "; $sql.="AND st_area(st_intersection(r.wkb_geometry,f.wkb_geometry)) > 0.05 "; // > 0.0 ist gemeint, Ungenauigkeit durch st_simplify $sql.="ORDER BY schnittflae DESC "; // Limit: Flurbereinigungsgebiete koennen sehr gross werden! $sql.="LIMIT 40;"; // Trotz Limit lange Antwortzeit, wegen OrderBy -> intersection $v = array($gmlid); $res = pg_prepare("", $sql); $res = pg_execute("", $v); if (!$res) { echo "\n

Keine Flurstücke ermittelt.
\nSQL=

\n"; if ($debug > 2) {echo "

SQL=
".$sql."
$1 = ".$gmlid."

\n";} } echo "\n"; echo "\n"; // Header echo "\n\t"; echo "\n\t"; echo "\n\t"; echo "\n\t"; echo "\n"; $fscnt=0; while($row = pg_fetch_array($res)) { $fscnt++; echo "\n"; echo "\n\t"; echo "\n\t"; echo "\n\t"; echo "\n\t"; echo "\n"; } echo "\n

Flurstück	Fläche	von	weitere Auskunft
".$row["flurnummer"]."-".$row["zaehler"]; $nen=$row["nenner"]; if ($nen != "") { echo "/".$nen; } echo "	".$row["schnittflae"]." m²	".$row["amtlicheflaeche"]." m²	"; echo "\n\t\tFlurstück "; echo "\n\t\t\t"; echo "\n\t\t"; echo "\n\t

"; if ($fscnt == 40) { echo "

... und weitere Flurstücke (Limit 40 erreicht)."; } ?>