Context Navigation

source: trunk/info/info/alkisn/alkislage.php @ 427

Revision 427, 18.4 KB checked in by frank.jaeger, 2 years ago (diff)
Überarbeitung der Auskunft: Durch Functions den Code verdichtet. Drei neue Arten von Bauwerken.

Rev	Line
[362]	1	<?php
	2	/* alkislage.php
	3
[427]	4	ALKIS-Auskunft
	5	Author: Frank JÃ€ger, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo)
	6
[362]	7	Kann die 3 Arten von Lagebezeichnung anzeigen und verbundene Objekte verlinken
	8
	9	Version:
[425]	10	2016-02-24 Version fÃŒr norGIS-ALKIS-Import
[422]	11	....
	12	2020-02-20 Authentifizierung ausgelagert in Function darf_ich()
	13	2020-12-03 function selbstverlinkung() statt $_SERVER['PHP_SELF']
	14	2020-12-15 Input-Validation und Strict Comparisation (===)
[425]	15	2021-12-09 Neue Parameter: $katAmtMix (Kataster-Amt-Mix), $PrntBtn (Drucken-SchaltflÃ€che)
	16	Gemarkung und Flur bei Gruppenwechsel FETT anzeigen
[427]	17	2022-01-12 Neue Functions LnkStf(), DsKy()
[362]	18
[427]	19	ToDo:
[362]	20	- Balken-Kennzeichen kompatibel machen mit der Eingabe der Navigation fÃŒr Adresse
	21	- das Modul "alkisgebaeudenw" (alle Geb. auf einem FS) verschneidet die FlÃ€chen und findet damit auch
[427]	22	Grenz-Ãberbauungen und angrenzende GebÃ€ude. Diese fehlen hier, weil nur VerknÃŒpfungen verarbeitet werden.
[387]	23	Mit FlÃ€chen-Verschneidung auch weitere FS anzeigen?
[362]	24	*/
[422]	25	ini_set("session.cookie_httponly", 1);
[362]	26	session_start();
[402]	27	$showkey="n"; $nodebug=""; // Var. aus Parameter initalisieren
[387]	28	$cntget = extract($_GET); // Parameter in Variable umwandeln
	29
	30	// strikte Validierung aller Parameter
[422]	31	if (isset($gmlid)) {
	32	if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");}
	33	} else {
	34	die("Fehlender Parameter");
	35	}
	36	if (isset($gkz)) {
	37	if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");}
	38	} else {
	39	die("Fehlender Parameter");
	40	}
[387]	41	if (!preg_match('#^[j\|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");}
[422]	42	if ($showkey === "j") {$showkey=true;} else {$showkey=false;}
[387]	43	if (!preg_match('#^[m\|p\|o]{1}$#', $ltyp)) {die ("Eingabefehler ltyp");}
[402]	44	if (!preg_match('#^j{0,1}$#', $nodebug)) {die("Eingabefehler nodebug");}
[387]	45
[422]	46	include "alkis_conf_location.php";
	47	include "alkisfkt.php";
[362]	48
	49	switch ($ltyp) {
[427]	50	case "m": // "Mit HsNr" = HauptgebÃ€ude
[362]	51	$tnam = "ax_lagebezeichnungmithausnummer"; break;
[427]	52	case "p": // "mit PseudoNr" = NebengebÃ€ude
	53	$tnam = "ax_lagebezeichnungmitpseudonummer"; break;
	54	case "o": //"Ohne HsNr" = Gewanne oder StraÃe
[362]	55	$tnam = "ax_lagebezeichnungohnehausnummer"; break;
	56	default:
	57	$ltyp = "m";
	58	$tnam = "ax_lagebezeichnungmithausnummer"; break;
	59	}
[402]	60	echo <<<END
[377]	61	<!doctype html>
	62	<html lang="de">
[362]	63	<head>
[377]	64	<meta charset="utf-8">
[387]	65	<meta name="viewport" content="width=device-width, initial-scale=1.0">
[362]	66	<title>ALKIS Lagebezeichnung</title>
	67	<link rel="stylesheet" type="text/css" href="alkisauszug.css">
	68	<link rel="shortcut icon" type="image/x-icon" href="ico/Lage_mit_Haus.ico">
	69	</head>
	70	<body>
[402]	71	END;
[422]	72
	73	$erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); }
[427]	74	$dbg=$debug;
[425]	75	if ($nodebug === "j") {$dbg=0;}
[402]	76
[377]	77	$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkislage.php'");
[387]	78	if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>";
[362]	79
	80	// L a g e b e z e i c h n u n g
	81	$sql ="SELECT s.gml_id AS strgml, s.bezeichnung AS snam, b.bezeichnung AS bnam, r.bezeichnung AS rnam, k.bezeichnung AS knam, g.bezeichnung AS gnam, l.land, l.regierungsbezirk, l.kreis, l.gemeinde, l.lage, ";
	82	switch ($ltyp) {
	83	case "m": // "Mit HsNr"
	84	$sql.="l.hausnummer ";
	85	break;
	86	case "p": // "mit PseudoNr"
	87	$sql.="l.pseudonummer, l.laufendenummer ";
	88	break;
	89	case "o": //"Ohne HsNr"
	90	$sql.="l.unverschluesselt ";
	91	break;
	92	}
	93	// "Left" weil: Bei sub-Typ "Gewanne" von Typ "o" sind keine SchlÃŒsselfelder gefÃŒllt!
	94	$sql.="FROM ".$tnam." l
[425]	95	LEFT JOIN ax_gemeinde g ON l.land=g.land AND l.regierungsbezirk=g.regierungsbezirk AND l.kreis=g.kreis AND l.gemeinde=g.gemeinde ".UnqKatAmt("l","g")
	96	."LEFT JOIN ax_kreisregion k ON l.land=k.land AND l.regierungsbezirk=k.regierungsbezirk AND l.kreis=k.kreis ".UnqKatAmt("l","k")
	97	."LEFT JOIN ax_regierungsbezirk r ON l.land=r.land AND l.regierungsbezirk=r.regierungsbezirk ".UnqKatAmt("l","r")
	98	."LEFT JOIN ax_bundesland b ON l.land=b.land ".UnqKatAmt("l","b")
	99	."LEFT JOIN ax_lagebezeichnungkatalogeintrag s
[362]	100	ON l.land=s.land AND l.regierungsbezirk=s.regierungsbezirk AND l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage
[389]	101	WHERE l.gml_id= $1 AND l.endet IS NULL AND g.endet IS NULL AND k.endet IS NULL AND r.endet IS NULL AND b.endet IS NULL AND s.endet IS NULL;";
[362]	102
	103	$v = array($gmlid);
	104	$res = pg_prepare("", $sql);
	105	$res = pg_execute("", $v);
	106	if (!$res) {
[387]	107	echo "\n<p class='err'>Fehler bei Lagebezeichnung.</p>";
[425]	108	if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
[362]	109	}
[425]	110	if ($dbg > 0) {
	111	$zeianz=pg_num_rows($res);
	112	if ($zeianz > 1){
	113	echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Lage-Objekt!</p>";
	114	if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."</p>";}
	115	}
	116	}
[402]	117	if ($row = pg_fetch_assoc($res)) {
[362]	118	$strgml=$row["strgml"]; // gml_id des Katalogeintrag StraÃe
	119	$land =$row["land"];
	120	$regbez=$row["regierungsbezirk"];
	121	$kreis=$row["kreis"];
	122	$knam=$row["knam"];
	123	$rnam=$row["rnam"];
	124	$bnam=$row["bnam"];
	125	$gem=$row["gemeinde"];
	126	$gnam=$row["gnam"];
	127	$lage=$row["lage"]; // Strassenschluessel
	128	$snam=$row["snam"]; //Strassennamen
[425]	129	// $kennz=$land."-".$regbez."-".$kreis. ..
[362]	130	$kennz=$gem."-".$lage."-"; // ToDo: Kompatibel machen als Eingabe in Navigation/Adresse
[425]	131
[362]	132	switch ($ltyp) {
	133	case "m": // "Mit HsNr"
	134	$hsnr=$row["hausnummer"];
	135	$kennz.=$hsnr;
	136	$untertitel="Hauptgebäude mit Hausnummer";
[422]	137	echo "\n<p class='balken lage'>ALKIS Lagebezeichnung mit Hausnummer ".$kennz." </p>"; // Balken
[362]	138	$osub="";
	139	break;
	140	case "p": // "mit PseudoNr"
	141	$pseu=$row["pseudonummer"];
	142	$lfd=$row["laufendenummer"];
	143	$kennz.=$pseu."-".$lfd;
	144	$untertitel="NebengebÃ€ude mit laufender Nummer (Lagebezeichnung mit Pseudonummer)";
[422]	145	echo "\n<p class='balken lage'>ALKIS Lagebezeichnung NebengebÃ€ude ".$kennz." </p>"; // Balken
[362]	146	$osub="";
	147	break;
	148	case "o": // "Ohne HsNr"
	149	$unver=$row["unverschluesselt"]; // Gewanne
	150	// 2 Unterarten bzw. Zeilen-Typen in der Tabelle
	151	if ($lage == "") {
	152	$osub="g"; // Sub-Typ Gewanne
	153	$kennz=" - ".$unver;
	154	$untertitel="Gewanne (unverschlüsselte Lage)";
[422]	155	echo "\n<p class='balken lage'>ALKIS Lagebezeichnung Ohne Hausnummer ".$kennz." </p>"; // Balken
[362]	156	} else {
	157	$osub="s"; // Sub-Typ Strasse (ohne HsNr)
	158	$kennz.=$unver;
	159	$untertitel="Straße ohne Hausnummer";
[422]	160	echo "\n<p class='balken lage'>ALKIS Lagebezeichnung Ohne Hausnummer ".$kennz." </p>"; // Balken
[362]	161	}
	162	break;
	163	}
	164	} else {
[387]	165	echo "\n<p class='err'>Fehler! Kein Treffer fuer Lagebezeichnung mit gml_id='".$gmlid."'</p>";
[425]	166	if ($dbg > 2) {
[422]	167	echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";
[377]	168	}
[387]	169	echo "\n</body>\n</html>";
[377]	170	exit;
[362]	171	}
	172
[402]	173	echo "\n<h2>Lagebezeichnung</h2>\n<p>Typ: ".$untertitel."</p>";
[362]	174	echo "\n<table class='outer'>\n<tr>\n\t<td>"; // Tab. Kennz.
[427]	175	// ToDo: kleiner, wenn ltyp=0 und die SchlÃŒsselfelder leer sind
[387]	176	echo "\n\t\t<table class='kennzla' title='Lage'>"
	177	."\n\t\t<tr>";
[362]	178	if ($osub != "g") { // nicht bei Gewanne
[387]	179	echo "\n\t\t\t<td class='head'>Land</td>"
	180	."\n\t\t\t<td class='head'>Reg.-Bez.</td>"
	181	."\n\t\t\t<td class='head'>Kreis</td>"
	182	."\n\t\t\t<td class='head'>Gemeinde</td>"
	183	."\n\t\t\t<td class='head'>Straße</td>";
[362]	184	}
	185	switch ($ltyp) {
	186	case "m": // "Mit HsNr"
[387]	187	echo "\n\t\t\t<td class='head'>Haus-Nr</td>";
[362]	188	break;
	189	case "p": // "mit PseudoNr"
[387]	190	echo "\n\t\t\t<td class='head'>Haus-Nr</td>"
	191	."\n\t\t\t<td class='head'>lfd.-Nr</td>";
[362]	192	break;
	193	case "o": //"Ohne HsNr"
[422]	194	if ($osub === "g") {
[387]	195	echo "\n\t\t\t<td class='head'>unverschlüsselte Lage</td>";
[362]	196	}
	197	break;
	198	}
[387]	199	echo "\n\t\t</tr>\n\t\t<tr>";
[362]	200	if ($osub != "g") { // nicht bei Gewanne
[427]	201	echo "\n\t\t\t<td title='Bundesland'>".DsKy($land, 'Bundesland-*').$bnam." </td>"
	202	."\n\t\t\t<td title='Regierungsbezirk'>".DsKy($regbez, 'Regierungsbezirk-*').$rnam." </td>"
	203	."\n\t\t\t<td title='Kreis'>".DsKy($kreis, 'Kreis-*').$knam." </td>"
	204	."\n\t\t\t<td title='Gemeinde'>".DsKy($gem, 'Gemeinde-*').$gnam." </td>"
	205	."\n\t\t\t<td title='Straße'>".DsKy($lage, 'Straßen-*');
[422]	206	if ($ltyp === "o") {
[362]	207	echo "<span class='wichtig'>".$snam."</span>";
	208	} else {
	209	echo $snam;
	210	}
	211	echo " </td>";
	212	}
	213
	214	switch ($ltyp) {
	215	case "m":
[387]	216	echo "\n\t\t\t<td title='Hausnummer und Zusatz'><span class='wichtig'>".$hsnr."</span></td>";
[362]	217	break;
	218	case "p":
[387]	219	echo "\n\t\t\t<td title='Pseudonummer - Nebengebäude zu dieser Hausnummer'>".$pseu."</td>"
	220	."\n\t\t\t<td title='Laufende Nummer Nebengebäude'><span class='wichtig'>".$lfd."</span></td>";
[362]	221	break;
	222	case "o":
[422]	223	if ($osub === "g") {
[387]	224	echo "\n\t\t\t<td title='Gewanne'><span class='wichtig'>".$unver."</span></td>";
[362]	225	}
	226	break;
	227	}
[387]	228	echo "\n\t\t</tr>"
	229	."\n\t\t</table>";
[362]	230
	231	echo "\n\t</td>\n\t<td>";
	232
	233	// Kopf Rechts: weitere Daten?
	234	if ($osub != "g") { // Link zu Strasse
	235	echo "\n\t\t<p class='nwlink noprint'>"
[427]	236	."\n\t\t\t<a href='alkisstrasse.php?gkz=".$gkz."&gmlid=".$strgml.LnkStf()
	237	."' title='Straße'>Straße <img src='ico/Strassen.png' width='16' height='16' alt=''></a>"
[362]	238	."\n\t\t</p>";
	239	}
	240
	241	echo "\n\t</td>\n</tr>\n</table>";
	242
[427]	243	// F L U R S T Ã C K E
[362]	244	// ax_Flurstueck >weistAuf> ax_LagebezeichnungMitHausnummer
	245	// ax_Flurstueck >zeigtAuf> ax_LagebezeichnungOhneHausnummer
	246	// ++ auch FlÃ€chenverschneidung?
[422]	247	if ($ltyp != "p") { // Pseudonummer linkt nur GebÃ€ude
[387]	248	echo "\n\n<a id='fs'></a>\n<h3><img src='ico/Flurstueck.png' width='16' height='16' alt=''> Flurstücke</h3>"
[362]	249	."\n<p>mit dieser Lagebezeichnung.</p>";
	250	switch ($ltyp) {
	251	case "m": $bezart="weistauf"; break;
	252	case "o": $bezart="zeigtauf"; break;
	253	}
	254
[425]	255	$sql ="SELECT g.gemarkungsnummer, g.bezeichnung, f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.amtlicheflaeche
	256	FROM ax_flurstueck f LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ".UnqKatAmt("f","g")
	257	."WHERE $1 = ANY(f.".$bezart.") AND f.endet IS NULL AND g.endet IS NULL
[362]	258	ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;";
	259
	260	$v = array($gmlid);
	261	$resf = pg_prepare("", $sql);
	262	$resf = pg_execute("", $v);
	263	if (!$resf) {
[387]	264	echo "\n<p class='err'>Fehler bei Flurstück.</p>";
[425]	265	if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
[362]	266	}
	267	echo "\n<table class='fs'>"
	268	."\n<tr>"
[377]	269	."\n\t<td class='heads'>Gemarkung<img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'></td>"
	270	."\n\t<td class='heads'>Flur<img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'></td>"
	271	."\n\t<td class='heads fsnr' title='Flurstücksnummer (Zähler / Nenner)'><img src='ico/sort.png' width='10' height='10' alt='' title='Sortierung'>Flurst.</td>"
[362]	272	."\n\t<td class='head fla'>Fläche</td>"
[387]	273	."\n\t<td class='head nwlink noprint' title='Verlinkung zu anderen Nachweis-Arten und verbundenen Objekten'>weitere Auskunft</td>"
[362]	274	."\n</tr>";
	275	$j=0;
[387]	276	$zpaar=false;
[425]	277	$gwgmkg=""; // Gruppenwechsel
	278	$gwflur="";
[402]	279	while($rowf = pg_fetch_assoc($resf)) {
[425]	280	$gmkg=$rowf["bezeichnung"];
[362]	281	$flur=str_pad($rowf["flurnummer"], 3, "0", STR_PAD_LEFT);
	282	$fskenn=$rowf["zaehler"]; // Bruchnummer
	283	if ($rowf["nenner"] != "") {$fskenn.="/".$rowf["nenner"];}
	284	$flae=number_format($rowf["amtlicheflaeche"],0,",",".") . " m²";
[387]	285
	286	if ($zpaar) {$trclass='paa';} else {$trclass='unp';}
	287	$zpaar=!$zpaar;
	288
	289	echo "\n<tr class='".$trclass."'>"
[427]	290	."\n\t<td>".DsKy($rowf["gemarkungsnummer"], 'Gemarkungsnummer');
[425]	291	if ($gwgmkg != $gmkg) {
	292	echo "<b>".$gmkg."</b></td>";
	293	$gwgmkg=$gmkg;
	294	$gwflur="";
	295	} else {
	296	echo $gmkg."</td>";
	297	}
	298	if ($gwflur != $flur) {
	299	echo "\n\t<td><b>".$flur."</b></td>";
	300	$gwflur=$flur;
	301	} else {
	302	echo "\n\t<td>".$flur."</td>";
	303	}
	304	echo "\n\t<td class='fsnr'><span class='wichtig'>".$fskenn."</span></td>"
[362]	305	."\n\t<td class='fla'>".$flae."</td>"
	306	."\n\t<td>\n\t\t<p class='nwlink noprint'>"
[427]	307	."\n\t\t\t<a href='alkisfsnw.php?gkz=".$gkz."&gmlid=".$rowf["gml_id"].LnkStf()."&eig=n"
	308	."' title='Flurstücksnachweis'>Flurstück <img src='ico/Flurstueck_Link.png' width='16' height='16' alt=''></a>"
[362]	309	."\n\t\t</p>\n\t</td>"
	310	."\n</tr>";
	311	$j++;
	312	}
	313	echo "\n</table>";
	314	if ($j > 6) {echo "<p class='cnt'>".$j." Flurstücke</p>";}
	315	}
	316
	317	// L A G E
	318	// andere Lage mit gleicher Hausnummer suchen
[422]	319	if ($ltyp != "o") { // nicht bei Gewanne (Ohne HsNr)
[387]	320	echo "\n\n<a id='lage'></a>\n<h3><img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''> Lage</h3>"
	321	."\n<p>Andere Lagebezeichnungen zur gleichen Hausnummer.</p>";
[362]	322	$whereclaus="WHERE land= $1 AND regierungsbezirk= $2 AND kreis= $3 AND gemeinde= $4 AND lage= $5 ";
[427]	323	$url=selbstverlinkung()."?gkz=".$gkz.LnkStf()."&gmlid="; // Basis
[362]	324
	325	switch ($ltyp) {
[387]	326	case "m": // aktuell: Hausnummer gefunden (HauptgebÃ€ude)
[362]	327	// dazu alle NebengebÃ€ude suchen
	328	echo "\n<p>Nebengebäude: ";
	329	$sql ="SELECT l.gml_id, l.laufendenummer FROM ax_lagebezeichnungmitpseudonummer l "
	330	.$whereclaus."AND lage= $6 AND pseudonummer= $7 AND l.endet IS NULL ORDER BY laufendenummer;";
	331
	332	$v = array($land,$regbez,$kreis,$gem,$lage,$lage,$hsnr);
	333	$res = pg_prepare("", $sql);
	334	$res = pg_execute("", $v);
	335	if (!$res) {
[422]	336	echo "\n<p class='err'>Fehler bei Nebengebäude.</p>";
[425]	337	if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";} // 7 $-Parameter
[362]	338	}
	339	$neb=0;
[402]	340	while($row = pg_fetch_assoc($res)) {
[427]	341	echo "\n\t<a href='".$url.$row["gml_id"].LnkStf()."&ltyp=p'>lfd.-Nr ".$row["laufendenummer"]."</a>  ";
[362]	342	$neb++;
	343	}
[422]	344	if ($neb === 0) {echo "keine";}
[362]	345	echo "</p>";
	346	break;
	347
[387]	348	case "p": // aktuell NebengebÃ€ude: Haupt- und (andere) NebengebÃ€ude suchen
[362]	349	echo "\n<p>Hauptgebäude: ";
[387]	350	$sql ="SELECT l.gml_id FROM ax_lagebezeichnungmithausnummer l ".$whereclaus."AND hausnummer= $6 AND l.endet IS NULL ;";
[362]	351
	352	$v = array($land,$regbez,$kreis,$gem,$lage,$pseu);
	353	$res = pg_prepare("", $sql);
	354	$res = pg_execute("", $v);
	355
[387]	356	if (!$res) {echo "\n<p class='err'>Fehler bei Hauptgebäude.<br>".$sql."</p>";}
[362]	357	$hg=0;
[402]	358	while($row = pg_fetch_assoc($res)) {
[427]	359	echo "\n\t<a href='".$url.$row["gml_id"].LnkStf()."&ltyp=m'>Haus-Nr ".$pseu."</a>  ";
[362]	360	$hg++;
	361	}
[422]	362	if ($hg === 0) {echo " Kein Hauptgebäude gefunden.";}
[362]	363	echo "</p>";
	364
	365	echo "\n<p>Weitere Nebengebäude: ";
	366	$sql ="SELECT l.gml_id, l.laufendenummer FROM ax_lagebezeichnungmitpseudonummer l "
	367	.$whereclaus."AND pseudonummer= $6 AND laufendenummer <> $7 AND l.endet IS NULL ORDER BY laufendenummer;";
	368	$v=array($land,$regbez,$kreis,$gem,$lage,$pseu,$lfd);
	369	$res = pg_prepare("", $sql);
	370	$res = pg_execute("", $v);
	371	if (!$res) {
[387]	372	echo "\n<p class='err'>Fehler bei Nebengebäude.</p>";
[425]	373	if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities($sql, ENT_QUOTES, "UTF-8")."</p>";} // 7 $-Parameter
[362]	374	}
	375	$neb=0;
[402]	376	while($row = pg_fetch_assoc($res)) {
[427]	377	echo "\n\t<a href='".$url.$row["gml_id"].LnkStf()."&ltyp=p'>lfd.-Nr ".$row["laufendenummer"]."</a>  ";
[362]	378	$neb++;
	379	}
[422]	380	if ($neb === 0) {echo "keine";}
[362]	381	echo "</p>";
	382	break;
	383	}
	384	}
	385
[427]	386	// G E B Ã U D E
[422]	387	if ($ltyp != "o") { // OhneHsNr linkt nur Flurst.
[387]	388	echo "\n\n<a id='geb'></a>\n<h3><img src='ico/Haus.png' width='16' height='16' alt=''> Gebäude</h3>"
[362]	389	."\n<p>mit dieser Lagebezeichnung.</p>";
	390	switch ($ltyp) {
	391	case "p": $bezart="g.hat"; break;
	392	case "m": $bezart="ANY(g.zeigtauf)"; break; // array
	393	}
	394
	395	$sql ="SELECT g.gml_id, g.gebaeudefunktion, array_to_string(g.name, ',') AS name, g.bauweise, g.grundflaeche, g.zustand, round(st_area(g.wkb_geometry)::numeric,2) AS flaeche,
[412]	396	h.beschreibung AS hv, h.dokumentation AS hd, u.beschreibung AS uv, u.dokumentation AS ud, z.beschreibung AS zv, z.dokumentation AS zd FROM ax_gebaeude g
	397	LEFT JOIN ax_bauweise_gebaeude h ON g.bauweise = h.wert
	398	LEFT JOIN ax_gebaeudefunktion u ON g.gebaeudefunktion = u.wert
	399	LEFT JOIN ax_zustand_gebaeude z ON g.zustand = z.wert
[362]	400	WHERE $1 = ".$bezart." AND g.endet IS NULL;";
[377]	401	// Keine Sortierung (ORDER BY) notwendig weil i.d.R. nur ein (Haupt-)GebÃ€ude diese Hausnummer hat.
[412]	402	// FÃŒr weiter Eigenschaften dem Link "Haus" folgen.
[362]	403
	404	$v = array($gmlid);
	405	$res = pg_prepare("", $sql);
	406	$res = pg_execute("", $v);
	407	if (!$res) {
[387]	408	echo "\n<p class='err'>Fehler bei Gebäude.</p>";
[425]	409	if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."</p>";}
[362]	410	}
	411	echo "\n<table class='geb'>"
	412	."\n<tr>"
	413	."\n\t<td class='head' title='Name ist der Eigenname oder die Bezeichnung des Gebäudes.'>Name</td>"
	414	."\n\t<td class='head fla' title='Fläche'>Fläche</td>"
	415	."\n\t<td class='head' title='Gebäudefunktion ist die zum Zeitpunkt der Erhebung vorherrschend funktionale Bedeutung des Gebäudes'>Funktion</td>"
	416	."\n\t<td class='head' title='Bauweise ist die Beschreibung der Art der Bauweise'>Bauweise</td>"
	417	."\n\t<td class='head' title='Zustand beschreibt die Beschaffenheit oder die Betriebsbereitschaft von Gebäude. Diese Attributart wird nur dann optional geführt, wenn der Zustand des Gebäudes vom nutzungsfähigen Zustand abweicht.'>Zustand</td>"
[377]	418	."\n\t<td class='head nwlink' title='Komplette Hausdaten'>Hausdaten</td>"
[362]	419	."\n</tr>";
	420	$i=0;
[402]	421	while($row = pg_fetch_assoc($res)) {
[362]	422	$ggml=$row["gml_id"];
	423	$gfla=$row["flaeche"];
[387]	424	echo "\n<tr>"
[427]	425	."\n\t<td>".$row["name"]."</td>"
	426	."\n\t<td class='fla'>".$gfla." m²</td>"
	427	."\n\t<td title='".htmlentities($row["ud"], ENT_QUOTES, "UTF-8")."'>".DsKy($row["gebaeudefunktion"], 'Gebäudefunktion-*').$row["uv"]."</td>"
	428	."\n\t<td title='".htmlentities($row["hd"], ENT_QUOTES, "UTF-8")."'>".DsKy($row["bauweise"], 'Bauweise-*').$row["hv"]."</td>"
	429	."\n\t<td title='".htmlentities($row["zd"], ENT_QUOTES, "UTF-8")."'>".DsKy($row["zustand"], 'Zustand-*').$row["zv"]."</td>"
	430	."\n\t<td class='nwlink noprint'>"
	431	."\n\t\t<a title='komplette Hausdaten' href='alkishaus.php?gkz=".$gkz."&gmlid=".$ggml.LnkStf()
	432	."'>Haus <img src='ico/Haus.png' width='16' height='16' alt=''></a>"
	433	."\n\t</td>\n</tr>";
[362]	434	}
	435	echo "\n</table>";
	436	}
	437
[425]	438	echo "<div class='buttonbereich noprint'>\n<hr>"
	439	."\n\t<a title='zurück' href='javascript:history.back()'><img src='ico/zurueck.png' width='16' height='16' alt='zurück'></a> ";
	440	if ($PrntBtn==true){echo "\n\t<a title='Drucken' href='javascript:window.print()'><img src='ico/print.png' width='16' height='16' alt='Drucken'></a> ";}
	441	echo "\n</div>";
[362]	442
[425]	443	footer($gmlid, selbstverlinkung()."?", "&ltyp=".$ltyp);
	444	?>
[362]	445
	446	</body>
	447	</html>

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

Download in other formats: