Context Navigation

source: trunk/info/info/alkisn/alkisbestnw.php @ 398

Revision 398, 21.8 KB checked in by frank.jaeger, 6 years ago (diff)
Feinkorrekturen an der Buchauskunft, Title von Links, "jüngste" Adresse zur Person.

Rev	Line
[362]	1	<?php
	2	/* Modul: alkisbestnw.php
	3
	4	ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo).
	5	Bestandsnachweis fÃŒr ein Grundbuch aus ALKIS PostNAS
	6
	7	Version:
	8	2016-02-24 Version fuer norGIS-ALKIS-Import
[377]	9	2016-11-29 HTML5, Gemeinsam genutzte Datenbanken ermÃ¶glichen, Markierung der Sortierung
[387]	10	2017-06-01 Function "eigentuemer" ohne Parameter $con
	11	2017-06-08 Validierung Eingabeparameter, Farbwechsel der Tabelle je GrundstÃŒck, Feinschliff und HTML-Profilierung
[389]	12	2017-10-09 SchlÃŒssel der Blattart bei berechtigten BlÃ€ttern, sauber filtern auf endet IS NULL
[362]	13	*/
	14	session_start();
[387]	15
	16	$showkey="n"; // Var. initalisieren
	17	$cntget = extract($_GET); // Parameter in Variable umwandeln
	18
	19	// strikte Validierung aller Parameter
	20	if (!isset($gmlid) or !preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
	21	if (!isset($gkz) or !preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
	22	if (!preg_match('#^[j\|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
	23	if ($showkey == "j") {$showkey=true;} else {$showkey=false;}
	24
[362]	25	require_once("alkis_conf_location.php");
	26	if ($auth == "mapbender") {require_once($mapbender);}
	27	include("alkisfkt.php");
	28	?>
[377]	29	<!doctype html>
	30	<html lang="de">
[362]	31	<head>
[377]	32	<meta charset="utf-8">
[387]	33	<meta name="viewport" content="width=device-width, initial-scale=1.0">
[362]	34	<title>ALKIS Bestandsnachweis</title>
	35	<link rel="stylesheet" type="text/css" href="alkisauszug.css">
	36	<link rel="shortcut icon" type="image/x-icon" href="ico/Grundbuch.ico">
	37	<script type="text/javascript">
	38	function ALKISexport() {
	39	window.open(<?php echo "'alkisexport.php?gkz=".$gkz."&tabtyp=grundbuch&gmlid=".$gmlid."'"; ?>);
	40	}
	41	</script>
	42	</head>
	43	<body>
	44	<?php
[377]	45	$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisbestnw.php'");
[387]	46	if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
[362]	47
	48	// G R U N D B U C H
	49	$sql="SELECT g.gml_id, g.bezirk, g.buchungsblattnummermitbuchstabenerweiterung AS nr, g.blattart, wb.v AS blattartv, wb.d AS blattartd,
	50	b.gml_id, b.bezirk, b.bezeichnung AS beznam, d.gml_id, d.land, d.bezeichnung, d.stelle, d.stellenart, wd.v AS stellev
	51	FROM ax_buchungsblatt g
	52	LEFT JOIN ax_buchungsblattbezirk b ON g.land=b.land AND g.bezirk=b.bezirk
	53	LEFT JOIN ax_dienststelle d ON b.land=d.land AND b.stelle=d.stelle
	54	LEFT JOIN alkis_wertearten wb ON cast(g.blattart AS character varying)=wb.k AND wb.element='ax_buchungsblatt' AND wb.bezeichnung='blattart'
	55	LEFT JOIN alkis_wertearten wd ON cast(d.stellenart AS character varying)=wd.k AND wd.element='ax_dienststelle' AND wd.bezeichnung='stellenart'
[389]	56	WHERE g.gml_id= $1 AND g.endet IS NULL AND b.endet IS NULL AND d.endet IS NULL;";
[362]	57	// .. AND d.stellenart=1000
	58
	59	$v = array($gmlid);
	60	$res = pg_prepare("", $sql);
	61	$res = pg_execute("", $v);
	62	if (!$res) {
[387]	63	echo "\n<p class='err'>Fehler bei Grundbuchdaten.</p>";
	64	if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
[362]	65	}
	66	if ($row = pg_fetch_array($res)) {
	67	$blattkey=$row["blattart"];
	68	$blattart=$row["blattartv"];
	69
[387]	70	echo "<p class='gbkennz'>ALKIS Bestand ".$row["bezirk"]." - ".$row["nr"]." </p>"; // Balken
[362]	71	echo "\n<h2><img src='ico/Grundbuch.png' width='16' height='16' alt=''> Grundbuch</h2>"
	72	."\n<table class='outer'>\n<tr>\n\t<td>"; // Kennz. im Rahmen
	73	if ($blattkey == 1000) {
[387]	74	echo "\n\t\t<table class='kennzgb' title='Bestandskennzeichen'>";
[362]	75	} else {
[387]	76	echo "\n\t\t<table class='kennzgbf' title='Bestandskennzeichen'>"; // dotted
[362]	77	}
[387]	78	echo "\n\t\t<tr>"
	79	."\n\t\t\t<td class='head'>"; // .d nicht gefÃŒllt
[362]	80	if ($showkey) {echo "<span class='key'>".$row["stellenart"]." </span>";}
	81	echo $row["stellev"]."</td>";
[387]	82	echo "\n\t\t\t<td class='head'>Bezirk</td>"
	83	."\n\t\t\t<td class='head' title='".htmlentities($row["blattartd"], ENT_QUOTES, "UTF-8")."'>";
[362]	84	if ($showkey) {echo "<span class='key'>".$blattkey." </span>";}
	85	echo $blattart."</td>"
[387]	86	."\n\t\t</tr>\n\t\t<tr>"
	87	."\n\t\t\t<td title='Amtsgerichtsbezirk'>";
[362]	88	if ($showkey) {echo "<span class='key'>".$row["stelle"]."</span><br>";}
	89	echo htmlentities($row["bezeichnung"], ENT_QUOTES, "UTF-8")."</td>"
[387]	90	."\n\t\t\t<td title='Grundbuchbezirk'>";
[362]	91	if ($showkey) {echo "<span class='key'>".$row["bezirk"]."</span><br>";}
	92	echo htmlentities($row["beznam"], ENT_QUOTES, "UTF-8")."</td>"
[387]	93	."\n\t\t\t<td title='Grundbuch-Blatt'><span class='wichtig'>".$row["nr"]."</span></td>"
	94	."\n\t\t</tr>"
	95	."\n\t\t</table>"
	96	."\n\t</td>\n\t<td> "
[362]	97	."\n\t</td>\n</tr>\n</table>";
	98	}
	99
	100	if ($blattkey == 5000) { // fikt. Blatt
[387]	101	echo "\n<p>Keine Angaben zum Eigentum bei fiktivem Blatt.</p>";
[362]	102	} else {
	103	// E I G E N T U E M E R
[387]	104	$n = eigentuemer($gmlid, true, ""); // MIT Adressen.
[362]	105	if ($n == 0) { // keine NamensNr, kein Eigentuemer
[377]	106	echo "\n<p class='err'>Keine Namensnummer gefunden.</p>"
	107	."\n<p>Bezirk: ".$row["bezirk"].", Blatt: ".$row["nr"].", Blattart ".$blattkey." (".$blattart.")</p>";
[362]	108	}
	109	}
	110
	111	// Vorab pruefen, ob der Fall "Rechte an .." vorliegt.
[398]	112	// ToDo: +++ Es gibt auch den Fall, dass auf der nÃ€chsten Stufe "nur Rechte" angezeigt werden, noch keine FlurstÃŒcke
	113	// ++ Also 3 MÃ¶glichkeiten:
	114	// - Nur Rechte an (+++ FEHLT NOCH ++)
	115	// - Rechte und FlurstÃŒcke
	116	// - FlurstÃŒcke
	117	// +++ Herrschend/Dienend per "title" auf den Ãberschriften ("Rechte" / "Berechtigte GrundbÃŒcher") erlÃ€utern
[362]	118
[398]	119	// GB-Blatt <istBestandteilVon< sh=herrschend >an/zu> sd=dienend
	120	$sql="SELECT count(sd.laufendenummer) AS anzahl "
	121	."FROM ax_buchungsstelle sh JOIN ax_buchungsstelle sd ON (sd.gml_id=ANY(sh.an) OR sd.gml_id=ANY(sh.zu)) "
	122	."WHERE sh.istbestandteilvon= $1 AND sd.endet IS NULL AND sh.endet IS NULL;";
	123
	124	$v=array($gmlid); // GB-Blatt
	125	$res=pg_prepare("", $sql);
	126	$res=pg_execute("", $v);
	127	if (!$res) echo "\n<p class='err'>Fehler bei Suche nach Buchungen.</p>";
	128	$row=pg_fetch_array($res);
	129	$anz=$row["anzahl"];
	130
	131	echo "\n<hr>\n\n<h3><img src='ico/Flurstueck.png' width='16' height='16' alt=''>";
	132	if ($anz > 0) { // auch "Rechte an"
	133	echo " Rechte und Flurstücke</h3>\n<table class='fs'>";
	134
	135	// zusaetzliche Kopfzeile "Rechte"
	136	echo "\n<tr>"
[377]	137	."\n\t<td> </td>"
[362]	138	."\n\t<td class='dien' title='herrschendes Grundstück'>herrschende Buchungsart</td>"
[387]	139	."\n\t<td class='dien'>Anteil</td>"
[362]	140	."\n\t<td class='dien'>Bezirk</td>"
	141	."\n\t<td class='dien'>Blatt</td>"
	142	."\n\t<td class='dien'>BVNR</td>"
	143	."\n\t<td class='dien' title='dienendes Grundstück'>Buchungsart</td>"
	144	."\n\t<td> </td>"
	145	."\n</tr>";
[398]	146	} else { // keine Rechte an .., nur FlurstÃŒcke gebucht
	147	echo " Flurstücke</h3>\n<table class='fs'>";
	148	}
	149
	150	// gemeinsame Kopfzeile "Buchung + FlurstÃŒck"
[362]	151	echo "\n<tr>"
[377]	152	."\n\t<td class='heads' title='laufende Nummer Bestandsverzeichnis (BVNR) = Grundstück'><span class='wichtig'>BVNR</span><img src='ico/sort.png' width='10' height='10' alt='' title='primäre Sortierung'></td>"
[362]	153	."\n\t<td class='head'>Buchungsart</td>"
[387]	154	."\n\t<td class='head'> </td>"
[377]	155	."\n\t<td class='heads'>Gemarkung</td>"
	156	."\n\t<td class='heads'>Flur</td>"
	157	."\n\t<td class='heads fsnr' title='Flurstücksnummer (Zähler / Nenner)'><span class='wichtig'>Flurst.</span></td>"
[387]	158	."\n\t<td class='head flag'>Fläche</td>"
	159	."\n\t<td class='head nwlink noprint' title='Verlinkung zu anderen Nachweis-Arten und verbundenen Objekten'>weitere Auskunft</td>"
[362]	160	."\n</tr>";
	161
	162	// Blatt -> B u c h u n g s s t e l l e
	163	// aktuelles ax_buchungsblatt <istBestandteilVon< ax_buchungsstelle
	164	$sql ="SELECT s.gml_id, s.buchungsart, s.laufendenummer AS lfd, s.beschreibungdesumfangsderbuchung AS udb, s.zaehler, s.nenner, s.nummerimaufteilungsplan AS nrap, s.beschreibungdessondereigentums AS sond, b.v as bart, b.d
[377]	165	FROM ax_buchungsstelle s LEFT JOIN alkis_wertearten b ON cast(s.buchungsart AS character varying)=b.k AND b.element='ax_buchungsstelle' and b.bezeichnung='buchungsart'
[362]	166	WHERE s.istbestandteilvon= $1 AND s.endet IS NULL ORDER BY cast(s.laufendenummer AS integer);";
	167
	168	$v=array($gmlid); // Rel. istBestandteilVon
	169	$res=pg_prepare("", $sql);
	170	$res=pg_execute("", $v);
	171
	172	if (!$res) {
[387]	173	echo "\n<p class='err'>Fehler bei Buchung.</p>";
	174	if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '". $gmlid."'</p>";}
[362]	175	}
	176	$i=0;
	177	$fscnt=0;
[387]	178	$zpaar=false;
[362]	179	while($row = pg_fetch_array($res)) { // Loop Buchungsstelle (GrundstÃŒck)
	180	$lfdnr=$row["lfd"];
	181	$bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
[387]	182	$gml_bs=$row["gml_id"]; // id der buchungsstelle
[362]	183	$bartkey=$row["buchungsart"]; // SchlÃŒsselwert
	184	$bart=$row["bart"]; // BuchungsART Text dazu
	185	$bartstory=htmlentities($row["d"], ENT_QUOTES, "UTF-8"); // .. fÃŒr Anzeige aufbereitet
	186
	187	if ($row["zaehler"] == "") {
	188	$anteil = "";
	189	} else {
	190	$anteil = $row["zaehler"]."/".$row["nenner"];
	191	}
[387]	192
	193	if ($zpaar) {$trclass='paa';} else {$trclass='unp';} // Farbwechsel je GrundstÃŒck
	194	$zpaar=!$zpaar;
	195
[362]	196	// F l u r s t u e c k s d a t e n zur direkten Buchungsstelle
	197	$j = bnw_fsdaten($con, $lfdnr, $gml_bs, $bart, $anteil, true, $bartkey, $bartstory); // return=Anzahl der FS
	198	$fscnt=$fscnt + $j;
	199	if ($j == 0) { // k e i n e Flurstuecke gefunden (Miteigentumsnteil usw.)
	200	// Bei "normalen" Grundstuecken wurden Flurstuecksdaten gefunden und ausgegeben.
	201	// Bei Miteigentumsanteil, Erbbaurecht usw. muss nach weiteren Buchungsstellen gesucht werden:
	202	// Buchungsstelle >an/zu> (andere)Buchungsstelle >istBestandTeilVon> "FiktivesBlatt (ohne) Eigentuemer"
	203
[387]	204	// dann andere "dienende" Buchungsstellen
	205	// sh=herrschend sd=dienend
[362]	206	// ax_buchungsstelle >zu> ax_buchungsstelle (des gleichen Blattes)
	207	// ax_buchungsstelle >an> ax_buchungsstelle (anderes Blatt, z.B Erbbaurecht an)
[387]	208
	209	// Mit "UNION" um die FÃ€lle mit JOIN ÃŒber die Arrays "an" und "zu" unterscheiden zu kÃ¶nnen
	210	$sql="SELECT uni.*, wb.v AS bart FROM "
	211	."(SELECT sda.gml_id, sda.buchungsart, sda.laufendenummer AS lfd, sda.beschreibungdesumfangsderbuchung AS udb, sda.nummerimaufteilungsplan AS nrap, sda.beschreibungdessondereigentums AS sond, 'an' as anzu "
	212	."FROM ax_buchungsstelle sha JOIN ax_buchungsstelle sda ON sda.gml_id=ANY(sha.an) "
	213	."WHERE sha.gml_id= $1 AND sha.endet IS NULL AND sda.endet IS NULL "
	214	."UNION SELECT sdz.gml_id, sdz.buchungsart, sdz.laufendenummer AS lfd, sdz.beschreibungdesumfangsderbuchung AS udb, sdz.nummerimaufteilungsplan AS nrap, sdz.beschreibungdessondereigentums AS sond, 'zu' as anzu "
	215	."FROM ax_buchungsstelle shz JOIN ax_buchungsstelle sdz ON sdz.gml_id=ANY(shz.zu) "
	216	."WHERE shz.gml_id= $1 AND shz.endet IS NULL AND sdz.endet IS NULL "
	217	.") AS uni LEFT JOIN alkis_wertearten wb ON cast(uni.buchungsart AS character varying)=wb.k AND wb.element='ax_buchungsstelle' AND wb.bezeichnung='buchungsart' "
	218	."ORDER BY uni.lfd;";
	219	// Testfall suchen: SELECT gml_id, zu, durch FROM ax_buchungsstelle WHERE NOT zu IS NULL OR NOT durch IS NULL;
	220	// Die Relationen "an" und "durch" kommen in der Praxis nicht vor.
	221
	222	$v=array($gml_bs); // gml_id der "herrschenden" Buchungs-Stelle
	223	$resan=pg_prepare("", $sql); // Suche nach "dienender" Buchungsstelle
[362]	224	$resan=pg_execute("", $v);
	225	if (!$resan) {
[387]	226	echo "\n<p class='err'>Fehler bei 'andere Buchungsstelle'.</p>";
	227	if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = '".$gml_bs."'</p>";}
[362]	228	}
[387]	229
[362]	230	$a=0; // count
	231	$altbvnr=""; // Gruppenwechsel
	232	while($rowan= pg_fetch_array($resan)) {
[387]	233	$lfdnran=$rowan["lfd"]; // BVNR an
[362]	234	$gml_bsan=$rowan["gml_id"]; // id der buchungsstelle an
[387]	235	$baan=$rowan["bart"]; // Buchungsart an, entschluesselt
	236	$anzu=$rowan["anzu"]; // Welche Relation? Recht an oder Recht zu ?
[362]	237
	238	// a n d e r e s B l a t t (an dem das aktuelle Blatt Rechte hat)
	239	// dienendes Grundbuch
	240	$sql ="SELECT b.gml_id, b.land, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung AS blatt, b.blattart, wb.v AS blattartv, z.bezeichnung AS beznam "
	241	."FROM ax_buchungsblatt b JOIN ax_buchungsstelle s ON b.gml_id=s.istbestandteilvon "
	242	."LEFT JOIN ax_buchungsblattbezirk z ON b.land=z.land AND b.bezirk=z.bezirk "
	243	."LEFT JOIN alkis_wertearten wb ON cast(b.blattart AS character varying)=wb.k AND wb.element='ax_buchungsblatt' AND wb.bezeichnung='blattart' "
[389]	244	."WHERE s.gml_id= $1 AND b.endet IS NULL AND s.endet IS NULL AND z.endet IS NULL ORDER BY b.land, b.bezirk, b.buchungsblattnummermitbuchstabenerweiterung;";
[362]	245	$v=array($gml_bsan);
	246	$fbres=pg_prepare("", $sql);
	247	$fbres=pg_execute("", $v);
	248	if (!$fbres) {
[387]	249	echo "\n<p class='err'>Fehler bei fiktivem Blatt.</p>";
	250	if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
[362]	251	}
	252	$b=0;
	253	while($fbrow = pg_fetch_array($fbres)) { // genau 1
	254	$fbgml=$fbrow["gml_id"];
	255	$fbland=$fbrow["land"];
	256	$fbbez=$fbrow["bezirk"];
	257	$beznam=$fbrow["beznam"];
[387]	258	$fbblatt=$fbrow["blatt"];
	259	$fbbartkey=$fbrow["blattart"]; // Key
	260	$fbbart=$fbrow["blattartv"]; // Value
[362]	261	$b++;
	262	}
	263	if ($b != 1) { // Ãberwachen: genau 1?
[387]	264	echo "\n<p class='err'>Anzahl fiktive Blätter zu anderer Buchungstelle = ".$b."</p>";
[362]	265	}
	266
	267	// G r u n d b u c h d a t e n zur a n d e r e n Buchungsstelle
[387]	268	echo "\n<tr class='".$trclass."'>"
	269	."\n\t<td id='bvnr".$lfdnr."'>"; // Sp.1 Erbbau BVNR, Sprungmarke
[362]	270	if($bvnr == $altbvnr) { // gleiches Grundstueck
	271	echo " "; // dann Anzeige unterdruecken
	272	} else {
[387]	273	// echo "<a id='bvnr".$lfdnr."'></a>" // Sprungmarke
	274	echo "<span class='wichtig'>".$bvnr."</span>";
[362]	275	$altbvnr = $bvnr; // Gruppenwechsel merken
	276	}
[377]	277	echo "</td>"
	278	."\n\t<td class='dien'>"; // Sp.2 Buchung
[362]	279	if ($showkey) {echo "<span class='key'>".$row["buchungsart"]."</span> ";}
[377]	280	echo $bart." an</td>"
[387]	281	."\n\t<td class='dien'>".$anteil."</td>" // Sp.3 Anteil
	282	."\n\t<td class='dien' title='Grundbuch-Bezirk'>"; // Sp.4 Gemarkg., hier Bezirk
[362]	283	if ($showkey) {echo "<span class='key'>".$fbbez."</span> ";}
[387]	284	echo htmlentities($beznam, ENT_QUOTES, "UTF-8")
[362]	285	."</td>";
[387]	286	echo "\n\t<td class='dien' title='".$fbbart."'>".$fbblatt."</td>" // Sp. 5 Blatt
	287	."\n\t<td class='dien' title='Bestandsverzeichnis-Nummer'>".str_pad($lfdnran, 4, "0", STR_PAD_LEFT)."</td>" // Sp.6 BVNR
	288	."\n\t<td class='dien' title='Buchungsart'>"; // Sp.7 Buchungsart
[362]	289	if ($showkey) {echo "<span class='key'>".$rowan["buchungsart"]."</span> ";}
	290	echo $baan." "
[377]	291	."</td>"
	292	."\n\t<td>" // Sp.8 Link ("an" oder "zu"?)
[387]	293	."\n\t\t<p class='nwlink noprint'>".$anzu; // Recht "an" oder "zu"
	294	if ($showkey) {echo " <span class='key'>".$fbbartkey."</span>";} // Blatt-Art SchlÃŒssel
	295	echo "\n\t\t\t<a href='alkisbestnw.php?gkz=".$gkz."&gmlid=".$fbgml;
[362]	296	if ($showkey) {echo "&showkey=j";}
[377]	297	echo "#bvnr".$lfdnran // Sprungmarke auf der Seite
	298	."' title='Zum Grundbuchnachweis des dienenden Blattes'>";
[387]	299	echo $fbbart // Blatt-Art entschlÃŒsselt
	300	." <img src='ico/GBBlatt_link.png' width='16' height='16' alt=''></a>\n\t\t</p>"
	301	."\n\t</td>"
[362]	302	."\n</tr>";
	303
	304	// 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
	305	// Buchungsart wird nur in erster Zeile ausgegeben, hier leer
[387]	306
[362]	307	$aj = bnw_fsdaten($con, $lfdnran, $gml_bsan, "", $anteil, false, "", ""); // return=Anz.FS
	308	$fscnt=$fscnt + $aj;
	309	// +++ Gibt es Sondereigentum beim fiktiven Blatt?
	310	if ($rowan["nrap"] != "") {
	311	echo "\n<tr>"
	312	."\n\t<td class='sond' colspan=8>Nr. im Aufteilungsplan: ".$rowan["nrap"]."</td>"
	313	."\n</tr>";
	314	}
	315	if ($rowan["sond"] != "") {
	316	echo "\n<tr>"
[387]	317	."\n\t<td class='sond' colspan=8>Verbunden mit dem Sondereigentum an: ".htmlentities($rowan["sond"], ENT_QUOTES, "UTF-8")."</td>"
[362]	318	."\n</tr>";
	319	}
	320	$a++;
	321	}
	322	if ($a == 0) {
[387]	323	echo "\n<tr class='".$trclass."'>"
[362]	324	."\n\t<td><span class='wichtig'>".$bvnr."</span></td>"
[387]	325	."\n\t<td colspan=7><p class='warn'>Keine Flurstücke zu Buchung ".$bvnr." im berechtigten Bereich.</p></td>"
[362]	326	."\n</tr>";
	327	}
	328	}
	329	$i++;
	330	if ($row["nrap"] != "") { // Nr im Auft.Plan
	331	echo "\n<tr>"
	332	."\n\t<td class='nrap' colspan=8>Nummer <span class='wichtig'>".$row["nrap"]."</span> im Aufteilungsplan.</td>"
	333	."\n</tr>";
	334	}
	335	if ($row["sond"] != "") { // Sondereigentumsbeschreibung
	336	echo "\n<tr>"
	337	."\n\t<td class='sond' colspan=8>Verbunden mit dem Sondereigentum an: ".$row["sond"]."</td>"
	338	."\n</tr>";
	339	} // Ende Buchungsstelle/BVNR
	340	} // Ende Loop
	341	echo "\n</table>";
	342
	343	if ($i == 0) {
[387]	344	echo "\n<p class='err'>Keine Buchung gefunden.</p>";
[362]	345	} else {
	346	if ($i > 5 and $fscnt > 5) { // nur wenn nicht auf einen Blick zu erkennen
[387]	347	echo "\n<p class='cnt'>".$i." Buchungen mit ".$fscnt." Flurstücken</p>";
[362]	348	}
	349	}
	350
	351	// B e r e c h t i g t e Buchungsblaetter mit Recht an/zu dem aktuellen (fiktiven?) Blatt
	352
	353	// bf sf sb bb
	354	// Blatt <istBestandteilVon< Stelle <an< Stelle >istBestandteilVon> Blatt
	355	// Fiktiv Fiktiv <zu< Berechtigt Berechtigt
	356	$sql="SELECT sf.laufendenummer AS anlfdnr, bb.gml_id, bb.land, bb.bezirk, bb.buchungsblattnummermitbuchstabenerweiterung AS blatt, bb.blattart, wa.v AS blattartv,
	357	sb.gml_id AS gml_s, sb.laufendenummer AS lfdnr, sb.buchungsart, wb.v AS bart, wb.d AS bartd, bz.bezeichnung AS beznam, d.bezeichnung, d.stelle, d.stellenart, wd.v AS stellev
	358	FROM ax_buchungsstelle sf JOIN ax_buchungsstelle sb ON (sf.gml_id=ANY(sb.an) OR sf.gml_id=ANY(sb.zu))
	359	JOIN ax_buchungsblatt bb ON bb.gml_id=sb.istbestandteilvon
	360	LEFT JOIN ax_buchungsblattbezirk bz ON bb.land=bz.land AND bb.bezirk=bz.bezirk
	361	LEFT JOIN ax_dienststelle d ON bz.land=d.land AND bz.stelle=d.stelle
	362	LEFT JOIN alkis_wertearten wa ON cast(bb.blattart AS character varying)=wa.k AND wa.element='ax_buchungsblatt' AND wa.bezeichnung='blattart'
	363	LEFT JOIN alkis_wertearten wb ON cast(sb.buchungsart AS character varying)=wb.k AND wb.element='ax_buchungsstelle' AND wb.bezeichnung='buchungsart'
	364	LEFT JOIN alkis_wertearten wd ON cast(d.stellenart AS character varying)=wd.k AND wd.element='ax_dienststelle' AND wd.bezeichnung='stellenart'
[389]	365	WHERE sf.istbestandteilvon = $1 AND sf.endet IS NULL AND sb.endet IS NULL AND bb.endet IS NULL AND bz.endet IS NULL AND d.endet IS NULL
[377]	366	ORDER BY cast(sf.laufendenummer AS integer), bz.bezeichnung, bb.buchungsblattnummermitbuchstabenerweiterung, cast(sb.laufendenummer AS integer);";
[362]	367
	368	$v = array($gmlid);
	369	$resb = pg_prepare("", $sql);
	370	$resb = pg_execute("", $v);
	371	if (!$resb) {
[387]	372	echo "\n<p class='err'>Fehler bei 'Berechtigte Blätter.</p>";
	373	if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."<br>$1 = gml_id = '".$gmlid."'</p>";}
[362]	374	}
	375	$b=0; // count: Buchungen / BlÃ€tter
[387]	376	$zpaar=false;
[362]	377	while($rowb = pg_fetch_array($resb)) {
	378	if ($b == 0) { // Ueberschrift und Tabelle nur ausgeben, wenn etwas gefunden wurde
[387]	379	echo "\n\n<h3><img src='ico/Grundbuch_zu.png' width='16' height='16' alt=''> Berechtigte Grundbücher</h3>"
[362]	380	."\n<table class='outer'>"
	381	."\n<tr>"
[377]	382	."\n\t<td class='heads' title='lfd. Nr. auf diesem Blatt, wie im Teil Flurstücke'><span class='wichtig'>an BVNR</span><img src='ico/sort.png' width='10' height='10' alt='' title='primäre Sortierung'></td>"
[362]	383	."\n\t<td class='head'>Dienststelle</td>"
[377]	384	."\n\t<td class='heads'>Bezirk</td>"
	385	."\n\t<td class='heads'><span class='wichtig'>Blatt</span></td>"
	386	."\n\t<td class='heads'>BVNR</td>"
[362]	387	."\n\t<td class='head'>Buchungsart</td>"
	388	."\n\t<td class='head nwlink noprint'>Weitere Auskunft</td>"
	389	."\n</tr>";
	390	}
	391
[389]	392	$anlfdnr=$rowb["anlfdnr"]; // an BVNR
[362]	393	$anlfdnr0=str_pad($anlfdnr, 4, "0", STR_PAD_LEFT); // mit fÃŒhr.0
[389]	394	$gml_b=$rowb["gml_id"]; // id des ber. Blattes
	395	$gml_s=$rowb["gml_s"]; // id der ber. B-Stelle
[362]	396	$blart=$rowb["blattart"];
	397
[389]	398	$buch=$rowb["buchungsart"]; // Buchungsart Stelle berechtigt
	399	$bart=$rowb["bart"]; // BA entschl.
	400	$lfdnr=$rowb["lfdnr"]; // BVNR ber.
[362]	401	$bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
	402
[387]	403	if ($zpaar) {$trclass='paa';} else {$trclass='unp';} // Farbwechsel je Zeile = GrundstÃŒck
	404	$zpaar=!$zpaar;
[362]	405
[387]	406	echo "\n<tr class='".$trclass."'>"; // Der Teil "berechtigte GrundbÃŒcher" ist sortiert wie oberer Teil "FlurstÃŒcke"
	407	echo "\n\t<td><span class='wichtig'>".$anlfdnr0."</span></td>"
[377]	408	."\n\t<td>"; // Amtsgericht,Grundbuchamt
[387]	409	echo htmlentities($rowb["stellev"], ENT_QUOTES, "UTF-8")." ";
[362]	410	if ($showkey) {echo "<span class='key'>".$rowb["stelle"]."</span> ";}
[387]	411	echo htmlentities($rowb["bezeichnung"], ENT_QUOTES, "UTF-8")
[362]	412	."</td>"
	413	."\n\t<td>";
	414	if ($showkey) {echo "<span class='key'>".$rowb["bezirk"]."</span> ";}
[387]	415	echo htmlentities($rowb["beznam"], ENT_QUOTES, "UTF-8")
[362]	416	."</td>"
	417	."\n\t<td><span class='wichtig'>".$rowb["blatt"]."</span></td>"
	418	."\n\t<td>".$bvnr."</td>"
	419	."\n\t<td title='".htmlentities($rowb["bartd"], ENT_QUOTES, "UTF-8")."'>";
	420	if ($showkey) {echo "<span class='key'>".$buch."</span> ";}
	421	echo $bart
	422	."</td>"
	423	."\n\t<td>"
[387]	424	."\n\t\t<p class='nwlink noprint'>";
[389]	425	if ($showkey) {echo "<span class='key'>".$blart."</span> ";} // NEU!
[387]	426	echo "\n\t\t\t<a href='alkisbestnw.php?gkz=".$gkz."&gmlid=".$gml_b;
[362]	427	if ($showkey) {echo "&showkey=j";}
[387]	428	echo "#bvnr".$lfdnr."' title='Nachweis des berechtigten Blattes an einer Buchung auf ".$blattart."'>".$rowb["blattartv"]; // "an" ggf. durch "zu" ersetzen?
[362]	429	echo " \n\t\t\t<img src='ico/GBBlatt_link.png' width='16' height='16' alt=''></a>"
	430	."\n\t\t</p>"
	431	."</td>"
	432	."\n</tr>";
	433	$b++;
	434	}
	435	if ($b == 0) {
	436	if ($blattkey > 2000 ) { // Warnung nicht bei Grundbuchblatt 1000 und Katasterblatt 2000
[387]	437	echo "\n<p class='err'>Keine berechtigten Blätter zu ".$blattart." (".$blattkey.") gefunden.</p>";
[362]	438	}
	439	} else {
	440	echo "\n</table>";
	441	if ($i > 1) {
[387]	442	echo "\n<p class='cnt'>Rechte anderer Buchungsstellen an ".$b." der ".$i." Buchungen</p>";
[362]	443	}
	444	}
	445	?>
	446
[377]	447	<div class='buttonbereich noprint'>
[387]	448	<hr>
[377]	449	<a title="zurück" href='javascript:history.back()'><img src="ico/zurueck.png" width="16" height="16" alt="zurück"></a>
	450	<a title="Drucken" href='javascript:window.print()'><img src="ico/print.png" width="16" height="16" alt="Drucken"></a>
	451	<a title="Export als CSV" href='javascript:ALKISexport()'><img src="ico/download_gb.png" width="32" height="16" alt="Export"></a>
	452	</div>
[362]	453	<?php footer($gmlid, $_SERVER['PHP_SELF']."?", ""); ?>
	454	</body>
	455	</html>

Note: See TracBrowser for help on using the repository browser.

Download in other formats: