";
echo "\n\t\t
";
echo "AG ";
echo $agd." (".$anr.")";
echo "\n";
return;
}
function zeile_gbbez ($gnam, $zgbbez) { // Zeile Grundbuch - B e z i r k
global $gkz, $gemeinde, $epsg, $auskpath;
$gnamd=htmlentities($gnam, ENT_QUOTES, "UTF-8");
echo "\n";
return;
}
function zeile_blatt ($bezirk, $beznam, $blattgml, $blatt, $dienend, $person) {
global $gkz, $gemeinde, $epsg, $auskpath;
// Zeile Grundbuch - B l a t t
$blattd=ltrim($blatt, "0"); // Display-Version ohne führende Nullen
if ( $dienend) {$dientxt="dienendes ";}
$blattlnk=urlencode($blatt); // trailing Blank
if ($beznam != "") {$nam = $beznam." ";}
echo "\n";
return;
}
function zeile_buchung ($buchunggml, $bvnr, $gbkennz, $dienend) {
// Zeile B u c h u n g s s t e l l e - Grundstück ausgeben
global $gkz, $gemeinde, $epsg, $auskpath;
if ($bvnr == 0) {
$bvnra = "-";
} else {
$bvnra = str_pad($bvnr, 4, "0", STR_PAD_LEFT); // auf 4 Stellen
}
if ($diened) {
$ti="dienendes ";
$re="Recht an ";
} else {
$ti="";
$re="";
}
echo "\n";
echo "\n\t
";
echo $re."Buchung";
if ($gbkennz == "") { // ohne Link
echo " ".$bvnra." ";
} else { // Bezirk-Blatt-lfd
echo "\n\t
".$bvnra." ";
}
echo "\n
\n\t";
echo "\n\t\t
";
echo "\n\t ";
echo "\n".$nnam.", ".$vnam."";
return;
}
function GB_Buchung_FS ($linelimit) {
// Zu einem Grundbuch-Blatt (identifiziert über seine gml_id) suchen der
// Buchungen (Gruppenwechsel) und Flurstücke (Links)
global $gkz, $gemeinde, $blattgml, $epsg, $gfilter, $debug;
// SQL-Bausteine vorbereiten
// SQL vorne gleich
$sql1 ="SELECT s1.laufendenummer AS lfd, s1.gml_id AS bsgml, f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.gemeinde, ";
if($epsg == "25832") { // Transform nicht notwendig
$sql1.="st_x(st_centroid(f.wkb_geometry)) AS x, ";
$sql1.="st_y(st_centroid(f.wkb_geometry)) AS y, ";
} else {
$sql1.="st_x(st_transform(st_centroid(f.wkb_geometry), ".$epsg.")) AS x, ";
$sql1.="st_y(st_transform(st_centroid(f.wkb_geometry), ".$epsg.")) AS y, ";
}
$sql1.="g.gemarkung, g.gemarkungsname ";
$sql1.="FROM alkis_beziehungen vbg ";
$sql1.="JOIN ax_buchungsstelle s1 ON vbg.beziehung_von = s1.gml_id ";
// Zwischen-JOIN verschieden
$sqlz1 ="JOIN alkis_beziehungen vfb ON s1.gml_id = vfb.beziehung_zu ";
$sqlz2 ="JOIN alkis_beziehungen vss ON vss.beziehung_von = s1.gml_id ";
$sqlz2.="JOIN ax_buchungsstelle s2 ON vss.beziehung_zu = s2.gml_id ";
$sqlz2.="JOIN alkis_beziehungen vfb ON s2.gml_id = vfb.beziehung_zu ";
// ++ JOIN alkis_beziehungen - ax_buchungsblatt
// für Link auf Buchung mit komplettem Grundbuchennzeichen
// SQL hinten gleich
$sql2 ="JOIN ax_flurstueck f ON vfb.beziehung_von = f.gml_id ";
$sql2.="JOIN pp_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkung ";
$sql2.="WHERE vbg.beziehung_zu= $1 AND vbg.beziehungsart='istBestandteilVon' AND vfb.beziehungsart='istGebucht' ";
switch ($gfilter) {
case 1: // Einzelwert
$sql2.="AND g.gemeinde=".$gemeinde." "; break;
case 2: // Liste
$sql2.="AND g.gemeinde in (".$gemeinde.") "; break;
}
$sql2.="ORDER BY cast(s1.laufendenummer AS integer), f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner LIMIT $2 ;";
// Abfrage: d i r e k t e B u c h u n g e n
// Blatt Fehler bei Buchung und Flurstück.";
#if ($debug >= 3) {echo "\n".$sql1.$sqlz1.$sql2."
";}
return;
}
$zfs1=0;
$gwbv="";
while($row = pg_fetch_array($res)) {
$bvnr=$row["lfd"];
$bsgml=$row["bsgml"]; // Buchungsstelle gml_id
if ($gwbv != $bvnr) { // Gruppierung Buchungs-Stelle (BVNR)
$gwbv = $bvnr;
zeile_buchung ($bsgml, $bvnr, "", false); // Für GB-Kennz. (-> Link) fehlt Bezirk + Blatt
}
$fs_gml=$row["gml_id"];
$gmkg=$row["gemarkungsname"];
$flur=$row["flurnummer"];
$fskenn=$row["zaehler"];
if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // BruchNr
$x=$row["x"];
$y=$row["y"];
zeile_flurstueck ($fs_gml, $fskenn, $x, $y, $gmkg, $flur);
$zfs1++;
}
#if($zfs1 == 0) { // "nichts gefunden" erst melden, wenn auch Teil 2 (Rechte an) nichts findet
#} else
if($zfs1 >= $linelimit) {
echo "\n... und weitere
"; // +++ Blättern einführen?
} elseif($zfs1 > 1) { // ab 2
echo "\n".$zfs1." Flurstücke zum Grundbuch
";
}
if($zfs1 > 0) {echo "
";} // Trennen
// Abfrage: R e c h t e a n / d i e n e n d e B u c h u n g e n
$v=array($blattgml, $linelimit);
$res=pg_prepare("", $sql1.$sqlz2.$sql2);
$res=pg_execute("", $v);
if (!$res) {
echo "\nFehler bei Recht an Buchung.
";
#if ($debug >= 3) {echo "\n".$sql1.$sqlz2.$sql2."
";}
return;
}
$zfs2=0;
#$gwblatt="";
$gwbv="";
while($row = pg_fetch_array($res)) {
$bvnr=$row["lfd"];
$bsgml=$row["bsgml"]; // Buchungsstelle gml_id
if ($gwbv != $bvnr) { // Gruppierung Buchung (BVNR) - dienend
$gwbv = $bvnr;
zeile_buchung ($bsgml, $bvnr, "", true);
}
$fs_gml=$row["gml_id"];
$gmkg=$row["gemarkungsname"];
$flur=$row["flurnummer"];
$fskenn=$row["zaehler"];
if ($row["nenner"] != "") {$fskenn.="/".$row["nenner"];} // Bruchnummer
$x=$row["x"];
$y=$row["y"];
zeile_flurstueck ($fs_gml, $fskenn, $x, $y, $gmkg, $flur);
$zfs2++;
}
if($zfs1 + $zfs2 == 0) {
echo "\nKein Flurstück im berechtigten Bereich.
";
} elseif($zfs >= $linelimit) {
echo "\n... und weitere
"; // Blättern einführen?
} elseif($zfs2 > 1) { // keine Meldung "nichts gefunden - Rechte an" wenn Treffer in Teil 1
echo "\n".$zfs2." Rechte an Flurst.
";
}
return;
}
?>