\n\t"; // Kennz. im Rahmen
if ($blattkey == 1000) {
echo "\n\t";
} else {
echo "\n\t"; // dotted
}
echo "\n\t"
."\n\t\t"; // .d nicht gefüllt
if ($showkey) {echo "".$row["stellenart"]." ";}
echo $row["stellev"]." | ";
echo "\n\t\tBezirk | "
."\n\t\t";
if ($showkey) {echo "".$blattkey." ";}
echo $blattart." | "
."\n\t \n\t"
."\n\t\t";
if ($showkey) {echo "".$row["stelle"]." ";}
echo htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8")." | "
."\n\t\t";
if ($showkey) {echo "".$row["bezirk"]." ";}
echo htmlentities($row["beznam"], ENT_QUOTES, "UTF-8")." | "
."\n\t\t".$row["nr"]." | "
."\n\t "
."\n\t "
."\n\n\t\n\t"
."\n\t | \n\n ";
}
if ($blattkey == 5000) { // fikt. Blatt
echo "\nKeine Angaben zum Eigentum bei fiktivem Blatt. \n";
} else {
// E I G E N T U E M E R
echo "\n Angaben zum Eigentum\n";
$n = eigentuemer($con, $gmlid, true, ""); // MIT Adressen.
if ($n == 0) { // keine NamensNr, kein Eigentuemer
echo "\nKeine Namensnummer gefunden. ";
echo "\nBezirk: ".$row["bezirk"].", Blatt: ".$row["nr"].", Blattart ".$blattkey." (".$blattart.") ";
}
}
// Vorab pruefen, ob der Fall "Rechte an .." vorliegt.
if ($blattkey == 1000) { // GB-Blatt an> sd=dienend
$sql="SELECT count(sd.laufendenummer) AS anzahl
FROM ax_buchungsstelle sh JOIN ax_buchungsstelle sd ON (sd.gml_id=ANY(sh.an) OR sd.gml_id=ANY(sh.zu))
WHERE sh.istbestandteilvon= $1 AND sd.endet IS NULL AND sh.endet IS NULL;";
$v=array($gmlid); // GB-Blatt
$res=pg_prepare("", $sql);
$res=pg_execute("", $v);
if (!$res) echo "Fehler bei Suche nach Buchungen. \n";
$row=pg_fetch_array($res);
$anz=$row["anzahl"];
//echo "Zeilen : ".$anz." zu Blattart ".$blattkey." ";
} else { // 2000: Katasterblatt, 3000: Pseudoblatt, 5000: Fiktives Blatt
$anz=0;
}
if ($anz > 0) {
echo "\n \n\n Rechte und Flurstücke";
echo "\n";
echo "\n"; // zus. Kopfz.
echo "\n\t | "
."\n\therrschende Buchungsart | "
."\n\t | "
."\n\tBezirk | "
."\n\tBlatt | "
."\n\tBVNR | "
."\n\tBuchungsart | "
."\n\t | "
."\n ";
} else {
echo "\n \n\n Flurstücke"
."\n";
} // gemeinsame Kopfzeile
echo "\n"
."\n\tBVNR | "
."\n\tBuchungsart | "
."\n\tAnteil | "
."\n\tGemarkung | "
."\n\tFlur | "
."\n\tFlurst. | "
."\n\tFläche | "
."\n\tweit. Auskunft | "
."\n ";
// Blatt -> B u c h u n g s s t e l l e
// aktuelles ax_buchungsblatt Fehler bei Buchung.\n";
if ($debug > 2) {echo "SQL= ".$sql." $1 = gml_id = '". $gmlid."' ";}
}
$i=0;
$fscnt=0;
while($row = pg_fetch_array($res)) { // Loop Buchungsstelle (Grundstück)
$lfdnr=$row["lfd"];
$bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
$gml_bs= $row["gml_id"]; // id der buchungsstelle
$bartkey=$row["buchungsart"]; // Schlüsselwert
$bart=$row["bart"]; // BuchungsART Text dazu
$bartstory=htmlentities($row["d"], ENT_QUOTES, "UTF-8"); // .. für Anzeige aufbereitet
if ($row["zaehler"] == "") {
$anteil = "";
} else {
$anteil = $row["zaehler"]."/".$row["nenner"];
}
// F l u r s t u e c k s d a t e n zur direkten Buchungsstelle
$j = bnw_fsdaten($con, $lfdnr, $gml_bs, $bart, $anteil, true, $bartkey, $bartstory); // return=Anzahl der FS
$fscnt=$fscnt + $j;
if ($j == 0) { // k e i n e Flurstuecke gefunden (Miteigentumsnteil usw.)
// Bei "normalen" Grundstuecken wurden Flurstuecksdaten gefunden und ausgegeben.
// Bei Miteigentumsanteil, Erbbaurecht usw. muss nach weiteren Buchungsstellen gesucht werden:
// Buchungsstelle >an/zu> (andere)Buchungsstelle >istBestandTeilVon> "FiktivesBlatt (ohne) Eigentuemer"
// andere Buchungsstellen
// ax_buchungsstelle >zu> ax_buchungsstelle (des gleichen Blattes)
// ax_buchungsstelle >an> ax_buchungsstelle (anderes Blatt, z.B Erbbaurecht an)
// sh=herrschend sd=dienend
$sql ="SELECT sd.gml_id, sd.buchungsart, sd.laufendenummer AS lfd, sd.beschreibungdesumfangsderbuchung AS udb, sd.nummerimaufteilungsplan AS nrap, sd.beschreibungdessondereigentums AS sond, wb.v AS bart "
."FROM ax_buchungsstelle sh JOIN ax_buchungsstelle sd ON (sd.gml_id=ANY(sh.an) OR sd.gml_id=ANY(sh.zu)) "
."LEFT JOIN alkis_wertearten wb ON cast(sd.buchungsart AS character varying)=wb.k AND wb.element='ax_buchungsstelle' AND wb.bezeichnung='buchungsart' "
."WHERE sh.gml_id= $1 AND sh.endet IS NULL AND sd.endet IS NULL ORDER BY sd.laufendenummer;";
$v=array($gml_bs);
$resan=pg_prepare("", $sql);
$resan=pg_execute("", $v);
if (!$resan) {
echo "Fehler bei 'andere Buchungsstelle'. \n";
if ($debug > 2) {echo "SQL= ".$sql." $1 = gml_id = '".$gmlid."' ";}
}
$a=0; // count
$altbvnr=""; // Gruppenwechsel
while($rowan= pg_fetch_array($resan)) {
$lfdnran=$rowan["lfd"]; // BVNR an
$gml_bsan=$rowan["gml_id"]; // id der buchungsstelle an
$baan=$rowan["bart"]; // Buchungsart an, entschluesselt
// a n d e r e s B l a t t (an dem das aktuelle Blatt Rechte hat)
// dienendes Grundbuch
$sql ="SELECT b.gml_id, b.land, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung AS blatt, b.blattart, wb.v AS blattartv, z.bezeichnung AS beznam "
."FROM ax_buchungsblatt b JOIN ax_buchungsstelle s ON b.gml_id=s.istbestandteilvon "
."LEFT JOIN ax_buchungsblattbezirk z ON b.land=z.land AND b.bezirk=z.bezirk "
."LEFT JOIN alkis_wertearten wb ON cast(b.blattart AS character varying)=wb.k AND wb.element='ax_buchungsblatt' AND wb.bezeichnung='blattart' "
."WHERE s.gml_id= $1 AND b.endet IS NULL ORDER BY b.land, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung;";
$v=array($gml_bsan);
$fbres=pg_prepare("", $sql);
$fbres=pg_execute("", $v);
if (!$fbres) {
echo "Fehler bei fiktivem Blatt. \n";
if ($debug > 2) {echo "SQL= ".$sql." $1 = gml_id = '".$gmlid."' ";}
}
$b=0;
while($fbrow = pg_fetch_array($fbres)) { // genau 1
$fbgml=$fbrow["gml_id"];
$fbland=$fbrow["land"];
$fbbez=$fbrow["bezirk"];
$beznam=$fbrow["beznam"];
$fbblatt=$fbrow["blatt"]; // Key
$fbbart=$fbrow["blattartv"]; // Value
$b++;
}
if ($b != 1) { // Überwachen: genau 1?
echo "Anzahl fiktive Blätter zu anderer Buchungstelle = ".$b." ";
}
// G r u n d b u c h d a t e n zur a n d e r e n Buchungsstelle
echo "\n"
."\n\t"; // Sp.1 Erbbau BVNR
if($bvnr == $altbvnr) { // gleiches Grundstueck
echo " "; // dann Anzeige unterdruecken
} else {
echo ""; // Sprungmarke
echo "".$bvnr."";
$altbvnr = $bvnr; // Gruppenwechsel merken
}
echo " | ";
echo "\n\t"; // Sp.2 Buchung
if ($showkey) {echo "".$row["buchungsart"]." ";}
echo $bart." an | ";
echo "\n\t".$anteil." | "; // Sp.3 Anteil
echo "\n\t"; // Sp.4 Gemarkg., hier Bezirk
if ($showkey) {echo "".$fbbez." ";}
echo $beznam
." | ";
echo "\n\t".$fbblatt." | "; // Sp. 5 Blatt
echo "\n\t".str_pad($lfdnran, 4, "0", STR_PAD_LEFT)." | ";// Sp.6 BVNR
echo "\n\t"; // Sp.7 Buchungsart
if ($showkey) {echo "".$rowan["buchungsart"]." ";}
echo $baan." "
." | ";
echo "\n\t"; // Sp.8 Link ("an" oder "zu" ?)
echo " an/zu"
." ";
if ($showkey) {echo "".$rowan["blattart"]." ";}
echo $fbbart
." "
." | "
."\n ";
// F l u r s t u e c k s d a t e n zur a n d e r e n Buchungsstelle
// Buchungsart wird nur in erster Zeile ausgegeben, hier leer
$aj = bnw_fsdaten($con, $lfdnran, $gml_bsan, "", $anteil, false, "", ""); // return=Anz.FS
$fscnt=$fscnt + $aj;
// +++ Gibt es Sondereigentum beim fiktiven Blatt?
if ($rowan["nrap"] != "") {
echo "\n"
."\n\tNr. im Aufteilungsplan: ".$rowan["nrap"]." | "
."\n ";
}
if ($rowan["sond"] != "") {
echo "\n"
."\n\tVerbunden mit dem Sondereigentum an: ".$rowan["sond"]." | "
."\n ";
}
$a++;
}
if ($a == 0) {
echo "\n"
."\n\t".$bvnr." | "
."\n\t"
." Flurstücke zu ".$bvnr." nicht gefunden. "
." | "
."\n ";
}
}
$i++;
if ($row["nrap"] != "") { // Nr im Auft.Plan
echo "\n"
."\n\tNummer ".$row["nrap"]." im Aufteilungsplan. | "
."\n ";
}
if ($row["sond"] != "") { // Sondereigentumsbeschreibung
echo "\n"
."\n\tVerbunden mit dem Sondereigentum an: ".$row["sond"]." | "
."\n ";
} // Ende Buchungsstelle/BVNR
} // Ende Loop
echo "\n ";
if ($i == 0) {
echo "\nKeine Buchung gefunden. \n";
} else {
if ($i > 5 and $fscnt > 5) { // nur wenn nicht auf einen Blick zu erkennen
echo "\n".$i." Buchungen mit ".$fscnt." Flurstücken \n";
}
}
// B e r e c h t i g t e Buchungsblaetter mit Recht an/zu dem aktuellen (fiktiven?) Blatt
// bf sf sb bb
// Blatt istBestandteilVon> Blatt
// Fiktiv Fiktiv Fehler bei 'Berechtigte Blätter.\n";
if ($debug > 2) {echo "SQL= ".$sql." $1 = gml_id = '".$gmlid."' ";}
}
$b=0; // count: Buchungen / Blätter
while($rowb = pg_fetch_array($resb)) {
if ($b == 0) { // Ueberschrift und Tabelle nur ausgeben, wenn etwas gefunden wurde
echo "\n Berechtigte Grundbücher\n"
."\n"
."\n"
."\n\tan BVNR | "
."\n\tLand | "
."\n\tDienststelle | "
."\n\tBezirk | "
."\n\tBlatt | "
."\n\tBVNR | "
."\n\tBuchungsart | "
."\n\tWeitere Auskunft | "
."\n ";
}
$anlfdnr=$rowb["anlfdnr"]; // an BVNR
$anlfdnr0=str_pad($anlfdnr, 4, "0", STR_PAD_LEFT); // mit führ.0
$gml_b=$rowb["gml_id"]; // id des ber. Blattes
$gml_s=$rowb["gml_s"]; // id der ber. B-Stelle
$blart=$rowb["blattart"];
$buch=$rowb["buchungsart"]; // Buchungsart Stelle berechtigt
$bart=$rowb["bart"]; // BA entschl.
$lfdnr=$rowb["lfdnr"]; // BVNR ber.
$bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
echo "\n"; // Der Teil "berechtigte Grundbücher" ist sortiert wie oberer Teil "Flurstücke"
echo "\n\t".$anlfdnr0."";
echo " | "
."\n\t".$rowb["land"]." | "
."\n\t"; // Amtsgericht
echo $rowb["stellev"]." ";
if ($showkey) {echo "".$rowb["stelle"]." ";}
echo $rowb["bezeichnung"]
." | "
."\n\t";
if ($showkey) {echo "".$rowb["bezirk"]." ";}
echo $rowb["beznam"]
." | "
."\n\t".$rowb["blatt"]." | "
."\n\t".$bvnr." | "
."\n\t";
if ($showkey) {echo "".$buch." ";}
echo $bart
." | "
."\n\t"
."\n\t\t "
."\n\t\t\t".$rowb["blattartv"]; // oder "zu" statt "an"
echo " \n\t\t\t"
."\n\t\t "
." | "
."\n ";
$b++;
}
if ($b == 0) {
if ($blattkey > 2000 ) { // Warnung nicht bei Grundbuchblatt 1000 und Katasterblatt 2000
echo "Keine berechtigten Blätter zu ".$blattart." (".$blattkey.") gefunden. ";
}
} else {
echo "\n ";
if ($i > 1) {
echo "\nRechte anderer Buchungsstellen an ".$b." der ".$i." Buchungen \n";
}
}
?>
|