[422] | 1 | <?php |
---|
| 2 | /* alkisbauwerk.php - Bauwerksdaten |
---|
| 3 | ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo). |
---|
| 4 | |
---|
| 5 | 1 Bauwerk im Verkehrsbereich |
---|
| 6 | 2 Bauwerk im GewÀsserbereich |
---|
[425] | 7 | 3 Sonstiges Bauwerk oder sonstige Einrichtung 51009 |
---|
| 8 | 4 Bauwerk oder Anlage fÃŒr Industrie und Gewerbe 51002 |
---|
| 9 | 5 Bauwerk oder Anlage fÃŒr Sport, Freizeit und Erholung 51006 |
---|
| 10 | 6 Leitung 51005 |
---|
| 11 | 7 Transportanlage 51004 |
---|
| 12 | 8 Turm 51001 |
---|
| 13 | 9 VorratsbehÀlter, Speicherbauwerk 51003 |
---|
[422] | 14 | |
---|
| 15 | Version: |
---|
| 16 | 2021-03-11 Neues Modul |
---|
| 17 | 2021-03-17 Korrekturen |
---|
[425] | 18 | 2021-12-09 2021-12-09 Neue Parameter: $katAmtMix (Kataster-Amt-Mix), $PrntBtn (Drucken-SchaltflÀche). Debugging verbessert. |
---|
[422] | 19 | |
---|
[425] | 20 | ToDo: |
---|
| 21 | - Icon fÃŒr "Bauwerk" machen! ggf. einzeln fÃŒr jede der 9 Arten? |
---|
| 22 | - 4 weitere Objektarten, bisher nicht verwendet: |
---|
| 23 | 51007 'Historisches Bauwerk oder historische Einrichtung' |
---|
| 24 | 51008 'Heilquelle, Gasquelle' |
---|
| 25 | 51010 'Einrichtung in öffentlichen Bereichen' |
---|
| 26 | 51011 'Besonderer Bauwerkspunkt' |
---|
[422] | 27 | */ |
---|
| 28 | |
---|
| 29 | // Bauwerk (bw) gehört zu (gz) Lage |
---|
| 30 | // Ein Bauwerk "gehört zu" (Relation) einem GebÀude. Zu diesem GebÀude die Adresse(n) als Tabellen-Zeile ausgeben |
---|
| 31 | function bw_gz_lage($gmlgz) { |
---|
[425] | 32 | global $gkz, $dbg, $showkey; |
---|
[422] | 33 | |
---|
| 34 | // HAUPTgebÀude Geb >zeigtAuf> lage (mehrere) |
---|
[425] | 35 | $sqlgz ="SELECT 'm' AS ltyp, l.gml_id AS lgml, s.lage, s.bezeichnung, l.hausnummer, '' AS laufendenummer, p.bezeichnung as gemeinde " |
---|
[422] | 36 | ."FROM ax_gebaeude g JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(g.zeigtauf) " |
---|
[425] | 37 | ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage " |
---|
| 38 | ."JOIN ax_gemeinde p ON s.land=p.land AND s.regierungsbezirk=p.regierungsbezirk AND s.kreis=p.kreis AND s.gemeinde=p.gemeinde ".UnqKatAmt("s","p") |
---|
[422] | 39 | ."WHERE g.gml_id= $1 AND g.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL "; |
---|
| 40 | |
---|
| 41 | // ++ evtl. keine NEBEN-GebÀude möglich, nur Haupt-? |
---|
| 42 | // UNION - oder NEBENgebÀude Geb >hat> Pseudo |
---|
[425] | 43 | $sqlgz.="UNION SELECT 'p' AS ltyp, l.gml_id AS lgml, s.lage, s.bezeichnung, l.pseudonummer AS hausnummer, l.laufendenummer, p.bezeichnung as gemeinde " |
---|
[422] | 44 | ."FROM ax_gebaeude g JOIN ax_lagebezeichnungmitpseudonummer l ON l.gml_id=g.hat " |
---|
| 45 | ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage " |
---|
[425] | 46 | ."JOIN ax_gemeinde p ON s.land=p.land AND s.regierungsbezirk=p.regierungsbezirk AND s.kreis=p.kreis AND s.gemeinde=p.gemeinde ".UnqKatAmt("s","p") |
---|
| 47 | ."WHERE g.gml_id= $1 AND g.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL " // ID des Hauses" |
---|
| 48 | ."ORDER BY bezeichnung, hausnummer, laufendenummer;"; |
---|
[422] | 49 | $v = array($gmlgz); |
---|
| 50 | $resgz = pg_prepare("", $sqlgz); |
---|
| 51 | $resgz = pg_execute("", $v); |
---|
| 52 | if (!$resgz) { |
---|
| 53 | echo "\n<p class='err'>Fehler bei Lage mit HsNr. zum Bauwerk</p>"; |
---|
[425] | 54 | if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".str_replace("$1", "'".$gmlgz."'", $sqlgz)."</p>";} |
---|
| 55 | if ($dbg > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resgz)."</p>";} |
---|
[422] | 56 | } else { |
---|
| 57 | echo "\n<tr>"; |
---|
| 58 | echo "\n\t<td class='li'>Lage</td>"; |
---|
| 59 | echo "\n\t<td class='fett'>"; |
---|
| 60 | while($rowgz = pg_fetch_assoc($resgz)) { // LOOP: Lagezeilen |
---|
| 61 | $ltyp=$rowgz["ltyp"]; |
---|
| 62 | $skey=$rowgz["lage"]; |
---|
| 63 | $snam=htmlentities($rowgz["bezeichnung"], ENT_QUOTES, "UTF-8"); |
---|
| 64 | $hsnr=$rowgz["hausnummer"]; |
---|
| 65 | $hlfd=$rowgz["laufendenummer"]; |
---|
| 66 | $gmllag=$rowgz["lgml"]; |
---|
[425] | 67 | $gemeinde=$rowgz["gemeinde"]; |
---|
[422] | 68 | |
---|
| 69 | if ($ltyp === "p") { |
---|
| 70 | $lagetitl="NebengebÀude Nr. ".$hlfd; |
---|
[425] | 71 | $lagetxt=$snam." ".$hsnr." (".$hlfd."), ".$gemeinde; |
---|
[422] | 72 | } else { |
---|
| 73 | $lagetitl="HauptgebÀude - Hausnummer ".$hsnr; |
---|
[425] | 74 | $lagetxt=$snam." ".$hsnr.", ".$gemeinde; |
---|
[422] | 75 | } |
---|
| 76 | |
---|
| 77 | echo "\n\t\t<a title='".$lagetitl."' href='alkislage.php?gkz=".$gkz."&gmlid=".$gmllag."&ltyp=".$ltyp; |
---|
| 78 | if ($showkey) {echo "&showkey=j";} |
---|
| 79 | echo "'>"; |
---|
| 80 | if ($showkey) {echo "<span class='key'>(".$skey.")</span> ";} |
---|
| 81 | echo $lagetxt." <img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''></a> "; |
---|
| 82 | } |
---|
| 83 | echo "</td>"; |
---|
| 84 | echo "\n\t<td>"; |
---|
| 85 | echo "\n\t\t<p class='erkli'>Das Haus hat die Adresse ".$lagetitl."</p>"; |
---|
| 86 | echo "\n\t</td>\n</tr>"; |
---|
| 87 | pg_free_result($resgz); |
---|
| 88 | } |
---|
| 89 | } |
---|
| 90 | |
---|
| 91 | // Eine Zeile der HTML-Tabelle ausgeben |
---|
| 92 | function tab_zeile($titel, $key, $inhalt, $ea, $ei) { |
---|
[425] | 93 | global $showkey, $allefelder, $dbg; |
---|
[422] | 94 | if ($inhalt != "" OR $allefelder) { |
---|
| 95 | echo "\n<tr>\n\t<td class='li'>".$titel."</td>\n\t<td class='fett'>"; |
---|
| 96 | if ($showkey and $key != '') {echo "<span class='key'>(".$key.")</span> ";} |
---|
| 97 | echo $inhalt."</td>\n\t<td>"; |
---|
| 98 | if ($ea != '') {echo "\n\t\t<p class='erklk'>".$ea."</p>";} // Erkl. Attribut (allgemein) |
---|
| 99 | if ($ei != '') {echo "\n\t\t<p class='erkli'>".$ei."</p>";} // Erkl. Inhalt (speziell) |
---|
| 100 | echo "\n\t</td>\n</tr>"; |
---|
| 101 | } |
---|
| 102 | } |
---|
| 103 | |
---|
| 104 | // Eine zusÀtzliche Daten-Spalte der Datenbank-Tabelle in eine Zeile der HTML-Tabelle ausgeben (Key|Value|ErklÀrung) |
---|
| 105 | // Anwendung fÃŒr die DB-Spalten, die nicht bei jeder Bauwerks-Tabelle vorkommen |
---|
| 106 | function zusatz_spalte($col, $inhalt) { // Spalten-Name, Value |
---|
[425] | 107 | global $dbg; |
---|
[422] | 108 | $einh=''; |
---|
| 109 | switch ($col) { |
---|
| 110 | case 'objekthoehe': |
---|
| 111 | $titel='Objekthöhe'; |
---|
| 112 | $einh=' m'; |
---|
| 113 | break; |
---|
| 114 | case 'breitedesobjekts': |
---|
| 115 | $titel='Breite des Objekts'; |
---|
| 116 | $einh=' m'; |
---|
| 117 | break; |
---|
| 118 | case 'bezeichnung': |
---|
| 119 | $titel='Bezeichnung'; |
---|
| 120 | break; |
---|
| 121 | // 1 Verk. |
---|
| 122 | case 'durchfahrtshoehe': |
---|
| 123 | $titel='Durchfahrtshöhe'; |
---|
| 124 | $einh=' m'; |
---|
| 125 | break; |
---|
| 126 | // 6 Leitung |
---|
| 127 | case 'spannungsebene': |
---|
| 128 | $titel='Spannungsebene'; |
---|
| 129 | $einh=' KV'; |
---|
| 130 | break; |
---|
| 131 | // 7 Transport |
---|
| 132 | case 'produkt': |
---|
| 133 | $titel='Produkt'; |
---|
| 134 | break; |
---|
| 135 | // Fehler |
---|
| 136 | default: // noch nicht berÃŒcksichtigt |
---|
[425] | 137 | if ($dbg > 1) {echo "<p class='dbg'>Der Feldname ".$col." ist in function zusatz_spalte noch nicht berücksichtigt.</p>";} |
---|
[422] | 138 | $titel=$col; |
---|
| 139 | } |
---|
| 140 | |
---|
| 141 | if ($inhalt != '') {$inhalt.=$einh;} |
---|
| 142 | tab_zeile($titel, '', $inhalt, '', ''); |
---|
| 143 | } |
---|
| 144 | |
---|
| 145 | // Eine Zeile der HTML-Tabelle ausgeben, die einen Objektverweis (Relation) enthÀlt |
---|
| 146 | function verweis_zeile($zieltyp, $link, $info) { |
---|
| 147 | echo "\n<tr>\n\t<td class='li'>".$zieltyp."</td>\n\t<td class='fett'>".$link."</td>\n\t<td>"; |
---|
| 148 | echo "\n\t\t<p class='erkli'>".$info."</p>\n\t</td>\n</tr>"; |
---|
| 149 | } |
---|
| 150 | |
---|
| 151 | // Ein Relationen-Feld anzeigen |
---|
| 152 | // col = Name der DB-Spalte |
---|
| 153 | // inhalt = gml_id oder Array mit gml_id's |
---|
| 154 | function objektverweis($col, $inhalt) { |
---|
[425] | 155 | global $gkz, $showkey, $dbg; |
---|
| 156 | // if ($dbg > 1) {echo "<p>Verweis Typ '".$col."' auf Objekt(e): '".$inhalt."'.</p>";} |
---|
[422] | 157 | switch ($col) { |
---|
| 158 | case 'hatdirektunten': // [] ++ Wie kann man dies Objekt finden? |
---|
| 159 | $olist=''; |
---|
| 160 | $arrhdu=explode(",", trim($inhalt, "{}")); |
---|
| 161 | foreach($arrhdu AS $hdugml) {$olist.=$hdugml."<br>";} |
---|
| 162 | tab_zeile('Hat direkt Unten', '', $olist, '', 'Verweis auf ein Objekt unter diesem Bauwerk, Typ unbekannt.'); |
---|
| 163 | break; |
---|
| 164 | |
---|
| 165 | case 'gehoertzu': // Assoziation zu: FeatureType AX_Gebaeude (ax_gebaeude) 0..1' |
---|
| 166 | if ($inhalt == '') { |
---|
| 167 | verweis_zeile('Haus', '', 'Das Bauwerk gehört zum Haus'); |
---|
| 168 | } else { |
---|
| 169 | $link="\n\t\t<a title='gehört zu' href='alkishaus.php?gkz=".$gkz."&gmlid=".$inhalt; |
---|
| 170 | if ($showkey) {$link.="&showkey=j";} |
---|
| 171 | $link.="'>Haus <img src='ico/Haus.png' width='16' height='16' alt=''></a>"; |
---|
| 172 | verweis_zeile('Haus', $link, 'Das Bauwerk gehört zum Haus'); |
---|
| 173 | bw_gz_lage($inhalt); |
---|
| 174 | } |
---|
| 175 | break; |
---|
| 176 | |
---|
| 177 | // 'istabgeleitetaus'; 'traegtbeizu': 'istteilvon': // -> Keine FÀlle vorhanden |
---|
| 178 | default: |
---|
[425] | 179 | if ($dbg > 1) {echo "<p class='dbg'>Der Feldname ".$col." ist in function 'objektverweis' noch nicht berücksichtigt.</p>";} |
---|
[422] | 180 | } |
---|
| 181 | } |
---|
| 182 | |
---|
| 183 | // S T A R T |
---|
| 184 | |
---|
| 185 | ini_set("session.cookie_httponly", 1); |
---|
| 186 | session_start(); |
---|
[425] | 187 | $allfld = "n"; $showkey="n"; $nodebug=""; // Var. initalisieren |
---|
[422] | 188 | $cntget = extract($_GET); // Parameter in Variable umwandeln |
---|
| 189 | |
---|
| 190 | // strikte Validierung aller Parameter |
---|
| 191 | if (isset($gmlid)) { |
---|
| 192 | if (!preg_match('#^[0-9A-Za-z]{16}$#', $gmlid)) {die("Eingabefehler gmlid");} |
---|
| 193 | } else { |
---|
| 194 | die("Fehlender Parameter"); |
---|
| 195 | } |
---|
| 196 | if (isset($gkz)) { |
---|
| 197 | if (!preg_match('#^[0-9]{3}$#', $gkz)) {die("Eingabefehler gkz");} |
---|
| 198 | } else { |
---|
| 199 | die("Fehlender Parameter"); |
---|
| 200 | } |
---|
| 201 | if (!preg_match('#^[1-9]{1}$#', $btyp)) {die("Eingabefehler btyp");} // Bauwerks-Typ = Tabelle |
---|
| 202 | if (!preg_match('#^[j|n]{0,1}$#', $showkey)) {die ("Eingabefehler showkey");} |
---|
| 203 | if ($showkey === "j") {$showkey=true;} else {$showkey=false;} |
---|
| 204 | if (!preg_match('#^[j|n]{0,1}$#', $allfld)) {die ("Eingabefehler allfld");} |
---|
| 205 | if ($allfld === "j") {$allefelder=true;} else {$allefelder=false;} |
---|
| 206 | if (!preg_match('#^j{0,1}$#', $nodebug)) {die("Eingabefehler nodebug");} |
---|
| 207 | |
---|
| 208 | include "alkis_conf_location.php"; |
---|
| 209 | include "alkisfkt.php"; |
---|
| 210 | |
---|
| 211 | echo <<<END |
---|
| 212 | <!doctype html> |
---|
| 213 | <html lang="de"> |
---|
| 214 | <head> |
---|
| 215 | <meta charset="utf-8"> |
---|
| 216 | <meta name="viewport" content="width=device-width, initial-scale=1.0"> |
---|
| 217 | <title>ALKIS Bauwerksdaten</title> |
---|
| 218 | <link rel="stylesheet" type="text/css" href="alkisauszug.css"> |
---|
| 219 | <link rel="shortcut icon" type="image/x-icon" href="ico/Haus.ico"> |
---|
| 220 | </head> |
---|
| 221 | <body> |
---|
| 222 | |
---|
| 223 | END; |
---|
| 224 | |
---|
| 225 | $erlaubnis = darf_ich(); if ($erlaubnis === 0) { die('<p class="stop1">Abbruch</p></body>'); } |
---|
[425] | 226 | $dbg=$debug; // CONF in Arbeits-Variable |
---|
| 227 | if ($nodebug === "j") {$dbg=0;} // Entwicklungsumgebung temporÀr ausschalten |
---|
[422] | 228 | |
---|
| 229 | $con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisbauwerk.php'"); |
---|
| 230 | if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>\n"; |
---|
| 231 | |
---|
| 232 | // Konstanten fÃŒr Sortierung und Gruppierung |
---|
| 233 | $btyp_verkehr=1; $btyp_gewaesser=2; $btyp_sonst=3; $btyp_indu=4; $btyp_sport=5; |
---|
| 234 | $btyp_leitg=6; $btyp_trans=7; $btyp_turm=8; $btyp_vorrat=9; |
---|
| 235 | |
---|
| 236 | /* in ALLEN Bauwerks-Typen folgende Spalten, bisher NICHT verwendet: |
---|
| 237 | herkunft_source_source_ax_datenerhebung[] herkunft_source_source_scaledenominator[] herkunft_source_source_sourcereferencesystem[] |
---|
| 238 | herkunft_source_source_sourceextent[] herkunft_source_source_sourcestep[] */ |
---|
| 239 | |
---|
| 240 | /* Fallunterscheidung: B a u w e r k s - T y p |
---|
| 241 | Nacheinander werden folgende Abfragen je Objekt ausgefÃŒhrt: |
---|
| 242 | 1. sqlb: Standard-Spalten, die bei jedem Typ vorhanden sind |
---|
| 243 | 2. sqlk: ZusÀtzliche Key-Value-Beziehungen (mit Key und ErklÀrung) |
---|
| 244 | 3. sqlz: ZusÀtzliche Spalten, individuell je Objektart (einfache Werte-Darstellung) |
---|
| 245 | 4. sqlr: Relationen zu anderen Objektarten */ |
---|
| 246 | switch ($btyp) { |
---|
| 247 | |
---|
| 248 | case $btyp_verkehr: // 1 - V e r k e h r |
---|
| 249 | $btyptitle='Bauwerk im Verkehrsbereich'; |
---|
| 250 | $sqlb="SELECT b1.bauwerksfunktion, k1.beschreibung, k1.dokumentation, b1.name, b1.statement, GeometryType(b1.wkb_geometry) as bgeotyp, round(st_area(b1.wkb_geometry)::numeric,2) AS flae |
---|
| 251 | FROM ax_bauwerkimverkehrsbereich b1 LEFT JOIN ax_bauwerksfunktion_bauwerkimverkehrsbereich k1 ON b1.bauwerksfunktion=k1.wert |
---|
| 252 | WHERE b1.gml_id = $1 AND b1.endet IS NULL;"; |
---|
| 253 | $sqlk="SELECT b1.zustand, k1.beschreibung, k1.dokumentation |
---|
| 254 | FROM ax_bauwerkimverkehrsbereich b1 LEFT JOIN ax_zustand_bauwerkimverkehrsbereich k1 ON b1.zustand=k1.wert |
---|
| 255 | WHERE b1.gml_id = $1 AND b1.endet IS NULL;"; |
---|
| 256 | $sqlz="SELECT b1.bezeichnung, b1.breitedesobjekts, b1.durchfahrtshoehe FROM ax_bauwerkimverkehrsbereich b1 WHERE b1.gml_id = $1 AND b1.endet IS NULL;"; |
---|
| 257 | $sqlr="SELECT b1.hatdirektunten FROM ax_bauwerkimverkehrsbereich b1 WHERE b1.gml_id = $1 AND b1.endet IS NULL;"; |
---|
| 258 | break; |
---|
| 259 | |
---|
| 260 | case $btyp_gewaesser: // 2 - G e w À s s e r |
---|
| 261 | $btyptitle='Bauwerk im GewÀsserbereich'; |
---|
| 262 | $sqlb="SELECT b2.bauwerksfunktion, ug.beschreibung, ug.dokumentation, b2.name, b2.statement, GeometryType(b2.wkb_geometry) as bgeotyp, round(st_area(b2.wkb_geometry)::numeric,2) AS flae |
---|
| 263 | FROM ax_bauwerkimgewaesserbereich b2 LEFT JOIN ax_bauwerksfunktion_bauwerkimgewaesserbereich ug ON b2.bauwerksfunktion=ug.wert |
---|
| 264 | WHERE b2.gml_id = $1 AND b2.endet IS NULL;"; |
---|
| 265 | $sqlk="SELECT b2.zustand, k2.beschreibung, k2.dokumentation |
---|
| 266 | FROM ax_bauwerkimgewaesserbereich b2 LEFT JOIN ax_zustand_bauwerkimgewaesserbereich k2 ON b2.zustand=k2.wert |
---|
| 267 | WHERE b2.gml_id = $1 AND b2.endet IS NULL;"; |
---|
| 268 | $sqlz="SELECT b2.bezeichnung FROM ax_bauwerkimgewaesserbereich b2 WHERE b2.gml_id = $1 AND b2.endet IS NULL;"; |
---|
| 269 | $sqlr="SELECT b2.hatdirektunten FROM ax_bauwerkimgewaesserbereich b2 WHERE b2.gml_id = $1 AND b2.endet IS NULL;"; |
---|
| 270 | break; |
---|
| 271 | |
---|
| 272 | case $btyp_sonst: // 3 - S o n s t i g e Bauwerke |
---|
| 273 | $btyptitle='Sonstiges Bauwerk oder sonstige Einrichtung'; |
---|
| 274 | $sqlb="SELECT b3.bauwerksfunktion, k3.beschreibung, k3.dokumentation, b3.name, b3.statement, |
---|
| 275 | GeometryType(b3.wkb_geometry) as bgeotyp, round(st_area(b3.wkb_geometry)::numeric,2) AS flae |
---|
| 276 | FROM ax_sonstigesbauwerkodersonstigeeinrichtung b3 LEFT JOIN ax_bauwerksfunktion_sonstigesbauwerkodersonstigeeinrichtun k3 ON b3.bauwerksfunktion=k3.wert |
---|
| 277 | WHERE b3.gml_id = $1 AND b3.endet IS NULL;"; |
---|
| 278 | $sqlk="SELECT b3.funktion, k3.beschreibung AS beschr, k3.dokumentation AS doku, b3.hydrologischesmerkmal, hm.beschreibung AS hmbeschr, hm.dokumentation AS hmdoku |
---|
| 279 | FROM ax_sonstigesbauwerkodersonstigeeinrichtung b3 |
---|
| 280 | LEFT JOIN ax_funktion_bauwerk k3 ON b3.funktion=k3.wert |
---|
| 281 | LEFT JOIN ax_hydrologischesmerkmal_sonstigesbauwerkodersonstigeeinri hm ON b3.hydrologischesmerkmal=hm.wert |
---|
| 282 | WHERE b3.gml_id = $1 AND b3.endet IS NULL;"; |
---|
| 283 | $sqlz="SELECT b3.bezeichnung, b3.objekthoehe FROM ax_sonstigesbauwerkodersonstigeeinrichtung b3 WHERE b3.gml_id = $1 AND b3.endet IS NULL;"; |
---|
| 284 | $sqlr="SELECT b3.hatdirektunten, b3.gehoertzu FROM ax_sonstigesbauwerkodersonstigeeinrichtung b3 WHERE b3.gml_id = $1 AND b3.endet IS NULL;"; |
---|
| 285 | |
---|
| 286 | /* gehoertzubauwerk_ax_sonstigesbauwerkodersonstigeeinrichtun |
---|
| 287 | gehoertzubauwerk_ax_bauwerkoderanlagefuersportfreizeitunde |
---|
| 288 | gehoertzubauwerk_ax_leitung |
---|
| 289 | gehoertzubauwerk_ax_bauwerkoderanlagefuerindustrieundgewer |
---|
| 290 | gehoertzubauwerk_ax_einrichtunginoeffentlichenbereichen |
---|
| 291 | gehoertzubauwerk_ax_heilquellegasquelle |
---|
| 292 | gehoertzubauwerk_ax_historischesbauwerkoderhistorischeeinr |
---|
| 293 | gehoertzubauwerk_ax_turm |
---|
| 294 | gehoertzubauwerk_ax_vorratsbehaelterspeicherbauwerk |
---|
| 295 | gehoertzubauwerk_ax_transportanlage |
---|
| 296 | gehoertzubauwerk_ax_wegpfadsteig |
---|
| 297 | gehoertzubauwerk_ax_gleis |
---|
| 298 | gehoertzubauwerk_ax_bahnverkehrsanlage |
---|
| 299 | gehoertzubauwerk_ax_bauwerkimgewaesserbereich |
---|
| 300 | gehoertzubauwerk_ax_strassenverkehrsanlage |
---|
| 301 | gehoertzubauwerk_ax_seilbahnschwebebahn |
---|
| 302 | gehoertzubauwerk_ax_einrichtungenfuerdenschiffsverkehr |
---|
| 303 | gehoertzubauwerk_ax_bauwerkimverkehrsbereich |
---|
| 304 | gehoertzubauwerk_ax_flugverkehrsanlage |
---|
| 305 | gehoertzubauwerk_ax_gewaesserstationierungsachse |
---|
| 306 | gehoertzubauwerk_ax_sickerstrecke |
---|
| 307 | gehoertzubauwerk_ax_schifffahrtsliniefaehrverkehr |
---|
| 308 | gehoertzubauwerk_ax_wasserspiegelhoehe |
---|
| 309 | gehoertzubauwerk_ax_abschnitt |
---|
| 310 | gehoertzubauwerk_ax_ast |
---|
| 311 | gehoertzubauwerk_ax_netzknoten |
---|
| 312 | gehoertzubauwerk_ax_nullpunkt |
---|
| 313 | gehoertzubauwerk_ax_hafen |
---|
| 314 | gehoertzubauwerk_ax_testgelaende |
---|
| 315 | gehoertzubauwerk_ax_schleuse |
---|
| 316 | gehoertzubauwerk_ax_ortslage |
---|
| 317 | gehoertzubauwerk_ax_grenzuebergang |
---|
| 318 | gehoertzubauwerk_ax_polder |
---|
| 319 | gehoertzubauwerk_ax_gewaessermerkmal |
---|
| 320 | gehoertzubauwerk_ax_untergeordnetesgewaesser |
---|
| 321 | gehoertzubauwerk_ax_vegetationsmerkmal */ |
---|
| 322 | break; |
---|
| 323 | |
---|
| 324 | case $btyp_indu: // 4 - Bauwerk oder Anlage fÃŒr I n d u s t r i e und Gewerbe |
---|
| 325 | $btyptitle="Bauwerk oder Anlage fÃŒr Industrie und Gewerbe"; |
---|
| 326 | $sqlb="SELECT b4.bauwerksfunktion, k4.beschreibung, k4.dokumentation, b4.name, b4.statement, GeometryType(b4.wkb_geometry) as bgeotyp, round(st_area(b4.wkb_geometry)::numeric,2) AS flae |
---|
| 327 | FROM ax_bauwerkoderanlagefuerindustrieundgewerbe b4 LEFT JOIN ax_bauwerksfunktion_bauwerkoderanlagefuerindustrieundgewer k4 ON b4.bauwerksfunktion=k4.wert |
---|
| 328 | WHERE b4.gml_id = $1 AND b4.endet IS NULL;"; |
---|
| 329 | $sqlk="SELECT b4.zustand, k4.beschreibung, k4.dokumentation |
---|
| 330 | FROM ax_bauwerkoderanlagefuerindustrieundgewerbe b4 LEFT JOIN ax_zustand_bauwerkoderanlagefuerindustrieundgewerbe k4 ON b4.zustand=k4.wert |
---|
| 331 | WHERE b4.gml_id = $1 AND b4.endet IS NULL;"; |
---|
| 332 | $sqlz="SELECT b4.bezeichnung, b4.objekthoehe FROM ax_bauwerkoderanlagefuerindustrieundgewerbe b4 WHERE b4.gml_id = $1 AND b4.endet IS NULL;"; |
---|
| 333 | $sqlr="SELECT b4.hatdirektunten FROM ax_bauwerkoderanlagefuerindustrieundgewerbe b4 WHERE b4.gml_id = $1 AND b4.endet IS NULL;"; |
---|
| 334 | break; |
---|
| 335 | |
---|
| 336 | case $btyp_sport: // 5 - Bauwerk oder Anlage fÃŒr S p o r t , Freizeit und Erholung |
---|
| 337 | $btyptitle="Bauwerk oder Anlage fÃŒr Sport, Freizeit und Erholung"; |
---|
| 338 | $sqlb="SELECT b5.bauwerksfunktion, k5.beschreibung, k5.dokumentation, b5.name, b5.statement, GeometryType(b5.wkb_geometry) as bgeotyp, round(st_area(b5.wkb_geometry)::numeric,2) AS flae |
---|
| 339 | FROM ax_bauwerkoderanlagefuersportfreizeitunderholung b5 LEFT JOIN ax_bauwerksfunktion_bauwerkoderanlagefuersportfreizeitunde k5 ON b5.bauwerksfunktion=k5.wert |
---|
| 340 | WHERE b5.gml_id = $1 AND b5.endet IS NULL;"; |
---|
| 341 | $sqlk="SELECT b5.sportart, k5.beschreibung, k5.dokumentation |
---|
| 342 | FROM ax_bauwerkoderanlagefuersportfreizeitunderholung b5 LEFT JOIN ax_sportart_bauwerkoderanlagefuersportfreizeitunderholung k5 ON b5.sportart=k5.wert |
---|
| 343 | WHERE b5.gml_id = $1 AND b5.endet IS NULL;"; |
---|
| 344 | $sqlz="SELECT b5.breitedesobjekts FROM ax_bauwerkoderanlagefuersportfreizeitunderholung b5 WHERE b5.gml_id = $1 AND b5.endet IS NULL;"; |
---|
| 345 | $sqlr="SELECT b5.hatdirektunten FROM ax_bauwerkoderanlagefuersportfreizeitunderholung b5 WHERE b5.gml_id = $1 AND b5.endet IS NULL;"; |
---|
| 346 | break; |
---|
| 347 | |
---|
| 348 | case $btyp_leitg: // 6 - L e i t u n g |
---|
| 349 | $btyptitle="Leitung"; |
---|
| 350 | $sqlb="SELECT b6.bauwerksfunktion, k6.beschreibung, k6.dokumentation, b6.name, b6.statement, GeometryType(b6.wkb_geometry) as bgeotyp, round(st_area(b6.wkb_geometry)::numeric,2) AS flae |
---|
| 351 | FROM ax_leitung b6 LEFT JOIN ax_bauwerksfunktion_leitung k6 ON b6.bauwerksfunktion=k6.wert |
---|
| 352 | WHERE b6.gml_id = $1 AND b6.endet IS NULL;"; |
---|
| 353 | $sqlk=""; |
---|
| 354 | $sqlz="SELECT b6.spannungsebene FROM ax_leitung b6 WHERE b6.gml_id = $1 AND b6.endet IS NULL;"; |
---|
| 355 | $sqlr="SELECT b6.hatdirektunten FROM ax_leitung b6 WHERE b6.gml_id = $1 AND b6.endet IS NULL;"; |
---|
| 356 | break; |
---|
| 357 | |
---|
| 358 | case $btyp_trans: // 7 - T r a n s p o r t a n l a g e |
---|
| 359 | $btyptitle="Transportanlage"; |
---|
| 360 | $sqlb="SELECT b7.bauwerksfunktion, k7.beschreibung, k7.dokumentation, NULL AS name, b7.statement, GeometryType(b7.wkb_geometry) as bgeotyp, round(st_area(b7.wkb_geometry)::numeric,2) AS flae |
---|
| 361 | FROM ax_transportanlage b7 LEFT JOIN ax_bauwerksfunktion_transportanlage k7 ON b7.bauwerksfunktion=k7.wert |
---|
| 362 | WHERE b7.gml_id = $1 AND b7.endet IS NULL;"; |
---|
| 363 | $sqlk="SELECT b7.lagezurerdoberflaeche, k7.beschreibung, k7.dokumentation |
---|
| 364 | FROM ax_transportanlage b7 LEFT JOIN ax_lagezurerdoberflaeche_transportanlage k7 ON b7.lagezurerdoberflaeche=k7.wert |
---|
| 365 | WHERE b7.gml_id = $1 AND b7.endet IS NULL;"; |
---|
| 366 | $sqlz="SELECT b7.produkt FROM ax_transportanlage b7 WHERE b7.gml_id = $7 AND b7.endet IS NULL;"; |
---|
| 367 | $sqlr="SELECT b7.hatdirektunten FROM ax_transportanlage b7 WHERE b7.gml_id = $1 AND b7.endet IS NULL;"; |
---|
| 368 | break; |
---|
| 369 | |
---|
| 370 | case $btyp_turm: // 8 - T u r m (Sonderfall Array) |
---|
| 371 | $btyptitle="Turm"; |
---|
| 372 | $sqlb="SELECT k8.wert AS bauwerksfunktion, k8.beschreibung, k8.dokumentation, b8.name, b8.statement, GeometryType(b8.wkb_geometry) as bgeotyp, round(st_area(b8.wkb_geometry)::numeric,2) AS flae |
---|
| 373 | FROM ax_turm b8 LEFT JOIN ax_bauwerksfunktion_turm k8 ON k8.wert =ANY(b8.bauwerksfunktion) |
---|
| 374 | WHERE b8.gml_id = $1 AND b8.endet IS NULL;"; |
---|
| 375 | $sqlk="SELECT b8.zustand, k8.beschreibung, k8.dokumentation |
---|
| 376 | FROM ax_turm b8 LEFT JOIN ax_zustand_turm k8 ON b8.zustand=k8.wert |
---|
| 377 | WHERE b8.gml_id = $1 AND b8.endet IS NULL;"; |
---|
| 378 | $sqlz="SELECT b8.objekthoehe FROM ax_turm b8 WHERE b8.gml_id = $1 AND b8.endet IS NULL;"; |
---|
| 379 | $sqlr="SELECT b8.hatdirektunten, b8.zeigtauf FROM ax_turm b8 WHERE b8.gml_id = $1 AND b8.endet IS NULL;"; |
---|
| 380 | break; |
---|
| 381 | |
---|
| 382 | case $btyp_vorrat: // 9 - V o r r a t s b e h À l t e r , S p e i c h e r b a u w e r k |
---|
| 383 | $btyptitle="VorratsbehÀlter, Speicherbauwerk"; |
---|
| 384 | $sqlb="SELECT b9.bauwerksfunktion, k9.beschreibung, k9.dokumentation, b9.name, b9.statement, GeometryType(b9.wkb_geometry) as bgeotyp, round(st_area(b9.wkb_geometry)::numeric,2) AS flae |
---|
| 385 | FROM ax_vorratsbehaelterspeicherbauwerk b9 LEFT JOIN ax_bauwerksfunktion_vorratsbehaelterspeicherbauwerk k9 ON b9.bauwerksfunktion=k9.wert |
---|
| 386 | WHERE b9.gml_id = $1 AND b9.endet IS NULL;"; |
---|
| 387 | $sqlk="SELECT b9.lagezurerdoberflaeche, k9.beschreibung, k9.dokumentation, |
---|
| 388 | b9.speicherinhalt, sp9.beschreibung AS spbes, sp9.dokumentation AS spdok |
---|
| 389 | FROM ax_vorratsbehaelterspeicherbauwerk b9 |
---|
| 390 | LEFT JOIN ax_lagezurerdoberflaeche_vorratsbehaelterspeicherbauwerk k9 ON b9.lagezurerdoberflaeche=k9.wert |
---|
| 391 | LEFT JOIN ax_speicherinhalt_vorratsbehaelterspeicherbauwerk sp9 ON b9.speicherinhalt=sp9.wert |
---|
| 392 | WHERE b9.gml_id = $1 AND b9.endet IS NULL;"; |
---|
| 393 | $sqlz="SELECT b9.objekthoehe FROM ax_vorratsbehaelterspeicherbauwerk b9 WHERE b9.gml_id = $1 AND b9.endet IS NULL;"; |
---|
| 394 | $sqlr="SELECT b9.hatdirektunten FROM ax_vorratsbehaelterspeicherbauwerk b9 WHERE b9.gml_id = $1 AND b9.endet IS NULL;"; |
---|
| 395 | break; |
---|
| 396 | |
---|
| 397 | default: |
---|
| 398 | die('<p class="stop1">Fehler showkey</p></body>'); |
---|
| 399 | break; |
---|
| 400 | } |
---|
| 401 | |
---|
| 402 | // 1. sqlb: Standard-Spalten, die bei jedem Typ vorhanden sind |
---|
| 403 | $v=array($gmlid); |
---|
| 404 | $resb=pg_prepare("", $sqlb); |
---|
| 405 | $resb=pg_execute("", $v); |
---|
| 406 | if (!$resb) { |
---|
| 407 | echo "\n<p class='err'>Fehler bei Bauwerksdaten Standardfelder.</p>"; |
---|
[425] | 408 | if ($dbg > 0) { |
---|
| 409 | echo "\n<p class='dbg'>Fehler:".pg_result_error($resb)."</p>"; |
---|
| 410 | if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlb)."'</p>";} |
---|
| 411 | } |
---|
[422] | 412 | } else { |
---|
[425] | 413 | if ($dbg > 0) { |
---|
| 414 | $zeianz=pg_num_rows($resb); |
---|
| 415 | if ($zeianz > 1){ |
---|
| 416 | echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Bauwerk! (Standardfelder)</p>"; |
---|
| 417 | if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sqlb), ENT_QUOTES, "UTF-8")."</p>";} |
---|
| 418 | } |
---|
| 419 | } |
---|
[422] | 420 | if (!$rowb = pg_fetch_assoc($resb)) { |
---|
| 421 | echo "\n<p class='err'>Fehler! Kein Treffer für gml_id=".$gmlid."</p>"; |
---|
| 422 | die('<p class="stop1">Abbruch</p></body>'); // Das wÃŒrde sich sonst 2x wiederholen |
---|
[425] | 423 | } else { // Treffer |
---|
[422] | 424 | // Seitenkopf |
---|
| 425 | echo "<p class='balken bauwerk".$btyp."'>ALKIS Bauwerk ".$btyp." - ".$gmlid." </p>"; // Balken, Farbe wie WMS |
---|
| 426 | echo "\n<h2>".$btyptitle."</h2>"; |
---|
| 427 | echo "\n<p class='nwlink noprint'>"; // Umschalter: auch leere Felder |
---|
| 428 | echo "Umschalten: <a class='nwlink' href='".selbstverlinkung()."?gkz=".$gkz."&btyp=".$btyp."&gmlid=".$gmlid; |
---|
| 429 | if ($showkey) {echo "&showkey=j";} else {echo "&showkey=n";} |
---|
| 430 | if ($allefelder) { |
---|
| 431 | echo "&allfld=n'>nur Felder mit Inhalt"; |
---|
| 432 | } else { |
---|
| 433 | echo "&allfld=j'>auch leere Felder"; |
---|
| 434 | } |
---|
| 435 | echo "</a></p>"; |
---|
| 436 | |
---|
| 437 | echo "\n<table class='geb'>" |
---|
| 438 | ."\n<tr>" |
---|
| 439 | ."\n\t<td class='head' title=''>Attribut</td>" |
---|
| 440 | ."\n\t<td class='head mittelspalte' title=''>Wert</td>" |
---|
| 441 | ."\n\t<td class='head' title=''>" |
---|
| 442 | ."\n\t\t<p class='erklk'>Erklärung zum Attribut</p>" |
---|
| 443 | ."\n\t\t<p class='erkli'>Erklärung zum Inhalt</p>" |
---|
| 444 | ."\n\t</td>" |
---|
| 445 | ."\n</tr>"; |
---|
| 446 | |
---|
| 447 | tab_zeile('Bauwerksfunktion', $rowb["bauwerksfunktion"], htmlentities($rowb["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowb["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 448 | tab_zeile('Name', '', htmlentities($rowb["name"], ENT_QUOTES, "UTF-8"), '', ''); |
---|
| 449 | tab_zeile('Statement', '', htmlentities($rowb["statement"], ENT_QUOTES, "UTF-8"), '', ''); |
---|
| 450 | |
---|
| 451 | // G e o m e t r i e und FlÀche |
---|
| 452 | $geotyp=$rowb["bgeotyp"]; |
---|
| 453 | switch ($geotyp) { |
---|
| 454 | case "POINT": |
---|
| 455 | $geodeutsch=$geotyp." bedeutet 'Punkt', einzelne Koordinate."; |
---|
| 456 | break; |
---|
| 457 | case "LINESTRING": |
---|
| 458 | $geodeutsch=$geotyp." bedeutet 'Linie'."; |
---|
| 459 | break; |
---|
| 460 | case "POLYGON": |
---|
| 461 | $geodeutsch=$geotyp." bedeutet eine einzelne 'Fläche'."; |
---|
| 462 | break; |
---|
| 463 | case "MULTIPOLYGON": |
---|
| 464 | $geodeutsch=$geotyp." bedeutet eine 'Fläche', die aus mehreren Teilen bestehen kann oder die Aussparungen haben kann."; |
---|
| 465 | break; |
---|
| 466 | default: $geodeutsch=""; |
---|
| 467 | } |
---|
| 468 | tab_zeile('Geometrietyp', '', $geotyp, '', $geodeutsch); |
---|
| 469 | |
---|
| 470 | if ($geotyp == "POLYGON" or $geotyp == "MULTIPOLYGON") { |
---|
| 471 | $flaeche=$rowb["flae"]." m²"; |
---|
| 472 | tab_zeile('Fläche', '', $flaeche, '', "Die 'Fläche' des Bauwerks wird aus der Geometrie berechnet, aber nur bei POLYGON."); |
---|
| 473 | } |
---|
| 474 | } |
---|
| 475 | pg_free_result($resb); |
---|
| 476 | } |
---|
| 477 | |
---|
| 478 | // 2. sqlk: Z u s À t z l i c h e K e y - V a l u e - B e z i e h u n g e n |
---|
| 479 | // Andere Art der Darstellung als die schlichten Zusatzfelder, Key optional anzeigen, ErklÀrung zum Wert aus SchlÌsseltabelle |
---|
| 480 | if ($sqlk != '') { |
---|
| 481 | $v=array($gmlid); |
---|
| 482 | $resk=pg_prepare("", $sqlk); |
---|
| 483 | $resk=pg_execute("", $v); |
---|
| 484 | if (!$resk) { |
---|
| 485 | echo "\n<p class='err'>Fehler bei Schlüsseltabelle ".$btyp."</p>"; |
---|
[425] | 486 | if ($dbg > 0) { |
---|
| 487 | echo "<p class='dbg'>Fehler:".pg_result_error($resk)."</p>"; |
---|
| 488 | if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlk)."'</p>";} |
---|
| 489 | } |
---|
[422] | 490 | } else { |
---|
[425] | 491 | if ($dbg > 0) { |
---|
| 492 | $zeianz=pg_num_rows($resk); |
---|
| 493 | if ($zeianz > 1){ |
---|
| 494 | echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Bauwerk! (Key-Value)</p>"; |
---|
| 495 | if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sqlk), ENT_QUOTES, "UTF-8")."</p>";} |
---|
| 496 | } |
---|
| 497 | } |
---|
[422] | 498 | if (!$rowk = pg_fetch_array($resk)) { |
---|
| 499 | echo "\n<p class='err'>Fehler! Kein Treffer für gml_id=".$gmlid."</p>"; |
---|
| 500 | } else { |
---|
| 501 | // Treffer |
---|
| 502 | switch ($btyp) { // individuell je Typ |
---|
| 503 | case $btyp_verkehr: // 1 |
---|
| 504 | tab_zeile('Zustand', $rowk["zustand"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 505 | break; |
---|
| 506 | case $btyp_gewaesser: // 2 |
---|
| 507 | tab_zeile('Zustand', $rowk["zustand"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 508 | break; |
---|
| 509 | case $btyp_sonst: // 3 |
---|
| 510 | tab_zeile('Funktion', $rowk["funktion"], htmlentities($rowk["beschr"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["doku"], ENT_QUOTES, "UTF-8")); |
---|
| 511 | tab_zeile('Hydrologisches Merkmal', $rowk["hydrologischesmerkmal"], htmlentities($rowk["hmbeschr"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["hmdoku"], ENT_QUOTES, "UTF-8")); |
---|
| 512 | break; |
---|
| 513 | case $btyp_indu: // 4 |
---|
| 514 | tab_zeile('Zustand', $rowk["zustand"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 515 | break; |
---|
| 516 | case $btyp_sport: // 5 |
---|
| 517 | tab_zeile('Sportart', $rowk["sportart"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 518 | break; |
---|
| 519 | case $btyp_trans: // 7 |
---|
| 520 | tab_zeile('Lage zur Erdoberfläche', $rowk["lagezurerdoberflaeche"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 521 | break; |
---|
| 522 | case $btyp_turm: // 8 |
---|
| 523 | tab_zeile('Zustand', $rowk["zustand"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 524 | break; |
---|
| 525 | case $btyp_vorrat: // 9 |
---|
| 526 | tab_zeile('Lage zur Erdoberfläche', $rowk["lagezurerdoberflaeche"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 527 | tab_zeile('Speicherinhalt', $rowk["speicherinhalt"], htmlentities($rowk["spbes"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["spdok"], ENT_QUOTES, "UTF-8")); |
---|
| 528 | break; |
---|
| 529 | } |
---|
| 530 | } |
---|
| 531 | pg_free_result($resk); |
---|
| 532 | } |
---|
| 533 | } |
---|
| 534 | |
---|
| 535 | // 3. sqlz: Individuelle Z u s a t z - Spalten je Bauwerks-Art |
---|
| 536 | // einfache Werte-Anzeige, ohne SchlÃŒsseltabelle |
---|
| 537 | if ($sqlz != '') { |
---|
| 538 | $v=array($gmlid); |
---|
| 539 | $resz=pg_prepare("", $sqlz); |
---|
| 540 | $resz=pg_execute("", $v); |
---|
| 541 | if (!$resz) { |
---|
| 542 | echo "\n<p class='err'>Fehler bei Bauwerk Relation.</p>"; |
---|
[425] | 543 | if ($dbg > 0) { |
---|
| 544 | echo "<p class='dbg'>Fehler:".pg_result_error($resz)."</p>"; |
---|
| 545 | if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlz)."'</p>";} |
---|
| 546 | } |
---|
[422] | 547 | } else { |
---|
[425] | 548 | if ($dbg > 0) { |
---|
| 549 | $zeianz=pg_num_rows($resz); |
---|
| 550 | if ($zeianz > 1){ |
---|
| 551 | echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Bauwerk! (Zusatz-Spalten)</p>"; |
---|
| 552 | if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sqlz), ENT_QUOTES, "UTF-8")."</p>";} |
---|
| 553 | } |
---|
| 554 | } |
---|
[422] | 555 | if (!$rowz = pg_fetch_array($resz)) { |
---|
| 556 | echo "\n<p class='err'>Fehler! Kein Treffer für gml_id=".$gmlid."</p>"; |
---|
| 557 | } else { |
---|
| 558 | // Die Spalten im Row abarbeiten |
---|
| 559 | $anzcol=pg_num_fields($resz); |
---|
| 560 | for ($i = 0; $i < $anzcol; $i++) { |
---|
| 561 | $k=pg_field_name($resz, $i); |
---|
| 562 | $v=$rowz[$i]; |
---|
| 563 | if ($v != "" OR $allefelder) { |
---|
| 564 | zusatz_spalte($k, $v); |
---|
| 565 | } |
---|
| 566 | } |
---|
| 567 | } |
---|
| 568 | pg_free_result($resz); |
---|
| 569 | } |
---|
| 570 | } |
---|
| 571 | |
---|
| 572 | // 4. sqlr: R e l a t i o n e n zu anderen Objektarten |
---|
| 573 | if ($sqlr != '') { |
---|
| 574 | $v=array($gmlid); |
---|
| 575 | $resr=pg_prepare("", $sqlr); |
---|
| 576 | $resr=pg_execute("", $v); |
---|
| 577 | if (!$resr) { |
---|
| 578 | echo "\n<p class='err'>Fehler bei Bauwerksdaten Zusatzfelder.</p>"; |
---|
[425] | 579 | if ($dbg > 0) { |
---|
| 580 | echo "<p class='dbg'>Fehler:".pg_result_error($resr)."</p>"; |
---|
| 581 | if ($dbg > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlr)."'</p>";} |
---|
| 582 | } |
---|
[422] | 583 | } else { |
---|
[425] | 584 | if ($dbg > 0) { |
---|
| 585 | $zeianz=pg_num_rows($resr); |
---|
| 586 | if ($zeianz > 1){ |
---|
| 587 | echo "\n<p class='err'>Die Abfrage liefert mehr als ein (".$zeianz.") Bauwerk! (Relationen)</p>"; |
---|
| 588 | if ($dbg > 2) {echo "\n<p class='dbg'>SQL=<br>".htmlentities(str_replace("$1","'".$gmlid."'",$sqlr), ENT_QUOTES, "UTF-8")."</p>";} |
---|
| 589 | } |
---|
| 590 | } |
---|
[422] | 591 | if (!$rowr = pg_fetch_array($resr)) { |
---|
| 592 | echo "\n<p class='err'>Fehler! Kein Treffer für gml_id=".$gmlid."</p>"; |
---|
| 593 | } else { // Die Spalten im Row abarbeiten |
---|
| 594 | $anzcol=pg_num_fields($resr); |
---|
| 595 | for ($i = 0; $i < $anzcol; $i++) { |
---|
| 596 | $k=pg_field_name($resr, $i); |
---|
| 597 | $v=$rowr[$i]; // Array mit gml_id anderer Objekte |
---|
| 598 | if ($v != "" OR $allefelder) { |
---|
| 599 | objektverweis($k, $v); |
---|
| 600 | } |
---|
| 601 | } |
---|
| 602 | } |
---|
| 603 | pg_free_result($resr); |
---|
| 604 | } |
---|
| 605 | } |
---|
| 606 | |
---|
| 607 | echo "\n</table>\n"; |
---|
[425] | 608 | echo "<div class='buttonbereich noprint'>\n<hr>\n\t<a title='zurück' href='javascript:history.back()'><img src='ico/zurueck.png' width='16' height='16' alt='zurück'></a> "; |
---|
| 609 | 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> ";} |
---|
| 610 | echo "\n</div>"; |
---|
| 611 | |
---|
| 612 | footer($gmlid, selbstverlinkung()."?", "&btyp=".$btyp); |
---|
[422] | 613 | ?> |
---|
| 614 | </body> |
---|
| 615 | </html> |
---|