[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 |
---|
| 7 | 3 Sonstiges Bauwerk oder sonstige Einrichtung |
---|
| 8 | 4 Bauwerk oder Anlage fÃŒr Industrie und Gewerbe |
---|
| 9 | 5 Bauwerk oder Anlage fÃŒr Sport, Freizeit und Erholung |
---|
| 10 | 6 Leitung |
---|
| 11 | 7 Transportanlage |
---|
| 12 | 8 Turm |
---|
| 13 | 9 VorratsbehÀlter, Speicherbauwerk |
---|
| 14 | |
---|
| 15 | Version: |
---|
| 16 | 2021-03-11 Neues Modul |
---|
| 17 | 2021-03-17 Korrekturen |
---|
| 18 | |
---|
| 19 | */ |
---|
| 20 | |
---|
| 21 | // Bauwerk (bw) gehört zu (gz) Lage |
---|
| 22 | // Ein Bauwerk "gehört zu" (Relation) einem GebÀude. Zu diesem GebÀude die Adresse(n) als Tabellen-Zeile ausgeben |
---|
| 23 | function bw_gz_lage($gmlgz) { |
---|
| 24 | global $gkz, $debug, $showkey; |
---|
| 25 | |
---|
| 26 | // HAUPTgebÀude Geb >zeigtAuf> lage (mehrere) |
---|
| 27 | $sqlgz="SELECT 'm' AS ltyp, l.gml_id AS lgml, s.lage, s.bezeichnung, l.hausnummer, '' AS laufendenummer " |
---|
| 28 | ."FROM ax_gebaeude g JOIN ax_lagebezeichnungmithausnummer l ON l.gml_id=ANY(g.zeigtauf) " |
---|
| 29 | ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage " |
---|
| 30 | ."WHERE g.gml_id= $1 AND g.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL "; |
---|
| 31 | |
---|
| 32 | // ++ evtl. keine NEBEN-GebÀude möglich, nur Haupt-? |
---|
| 33 | // UNION - oder NEBENgebÀude Geb >hat> Pseudo |
---|
| 34 | $sqlgz.="UNION SELECT 'p' AS ltyp, l.gml_id AS lgml, s.lage, s.bezeichnung, l.pseudonummer AS hausnummer, l.laufendenummer " |
---|
| 35 | ."FROM ax_gebaeude g JOIN ax_lagebezeichnungmitpseudonummer l ON l.gml_id=g.hat " |
---|
| 36 | ."JOIN ax_lagebezeichnungkatalogeintrag s ON l.kreis=s.kreis AND l.gemeinde=s.gemeinde AND l.lage=s.lage " |
---|
| 37 | ."WHERE g.gml_id= $1 AND g.endet IS NULL AND l.endet IS NULL AND s.endet IS NULL "; // ID des Hauses" |
---|
| 38 | |
---|
| 39 | $sqlgz.="ORDER BY bezeichnung, hausnummer, laufendenummer;"; |
---|
| 40 | $v = array($gmlgz); |
---|
| 41 | $resgz = pg_prepare("", $sqlgz); |
---|
| 42 | $resgz = pg_execute("", $v); |
---|
| 43 | if (!$resgz) { |
---|
| 44 | echo "\n<p class='err'>Fehler bei Lage mit HsNr. zum Bauwerk</p>"; |
---|
| 45 | if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".str_replace("$1", "'".$gmlgz."'", $sqlgz)."</p>";} |
---|
| 46 | if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resgz)."</p>";} |
---|
| 47 | } else { |
---|
| 48 | echo "\n<tr>"; |
---|
| 49 | echo "\n\t<td class='li'>Lage</td>"; |
---|
| 50 | echo "\n\t<td class='fett'>"; |
---|
| 51 | while($rowgz = pg_fetch_assoc($resgz)) { // LOOP: Lagezeilen |
---|
| 52 | $ltyp=$rowgz["ltyp"]; |
---|
| 53 | $skey=$rowgz["lage"]; |
---|
| 54 | $snam=htmlentities($rowgz["bezeichnung"], ENT_QUOTES, "UTF-8"); |
---|
| 55 | $hsnr=$rowgz["hausnummer"]; |
---|
| 56 | $hlfd=$rowgz["laufendenummer"]; |
---|
| 57 | $gmllag=$rowgz["lgml"]; |
---|
| 58 | |
---|
| 59 | if ($ltyp === "p") { |
---|
| 60 | $lagetitl="NebengebÀude Nr. ".$hlfd; |
---|
| 61 | // $lagetxt="Nebengebäude Nr. ".$hlfd; // alt |
---|
| 62 | $lagetxt=$snam." ".$hsnr." (".$hlfd.")"; |
---|
| 63 | } else { |
---|
| 64 | $lagetitl="HauptgebÀude - Hausnummer ".$hsnr; |
---|
| 65 | $lagetxt=$snam." ".$hsnr; |
---|
| 66 | } |
---|
| 67 | |
---|
| 68 | echo "\n\t\t<a title='".$lagetitl."' href='alkislage.php?gkz=".$gkz."&gmlid=".$gmllag."&ltyp=".$ltyp; |
---|
| 69 | if ($showkey) {echo "&showkey=j";} |
---|
| 70 | echo "'>"; |
---|
| 71 | if ($showkey) {echo "<span class='key'>(".$skey.")</span> ";} |
---|
| 72 | echo $lagetxt." <img src='ico/Lage_mit_Haus.png' width='16' height='16' alt=''></a> "; |
---|
| 73 | } |
---|
| 74 | echo "</td>"; |
---|
| 75 | echo "\n\t<td>"; |
---|
| 76 | echo "\n\t\t<p class='erkli'>Das Haus hat die Adresse ".$lagetitl."</p>"; |
---|
| 77 | echo "\n\t</td>\n</tr>"; |
---|
| 78 | pg_free_result($resgz); |
---|
| 79 | } |
---|
| 80 | } |
---|
| 81 | |
---|
| 82 | // Eine Zeile der HTML-Tabelle ausgeben |
---|
| 83 | function tab_zeile($titel, $key, $inhalt, $ea, $ei) { |
---|
| 84 | global $showkey, $allefelder, $debug; |
---|
| 85 | if ($inhalt != "" OR $allefelder) { |
---|
| 86 | echo "\n<tr>\n\t<td class='li'>".$titel."</td>\n\t<td class='fett'>"; |
---|
| 87 | if ($showkey and $key != '') {echo "<span class='key'>(".$key.")</span> ";} |
---|
| 88 | echo $inhalt."</td>\n\t<td>"; |
---|
| 89 | if ($ea != '') {echo "\n\t\t<p class='erklk'>".$ea."</p>";} // Erkl. Attribut (allgemein) |
---|
| 90 | if ($ei != '') {echo "\n\t\t<p class='erkli'>".$ei."</p>";} // Erkl. Inhalt (speziell) |
---|
| 91 | echo "\n\t</td>\n</tr>"; |
---|
| 92 | } |
---|
| 93 | } |
---|
| 94 | |
---|
| 95 | // Eine zusÀtzliche Daten-Spalte der Datenbank-Tabelle in eine Zeile der HTML-Tabelle ausgeben (Key|Value|ErklÀrung) |
---|
| 96 | // Anwendung fÃŒr die DB-Spalten, die nicht bei jeder Bauwerks-Tabelle vorkommen |
---|
| 97 | function zusatz_spalte($col, $inhalt) { // Spalten-Name, Value |
---|
| 98 | global $debug; |
---|
| 99 | $einh=''; |
---|
| 100 | switch ($col) { |
---|
| 101 | case 'objekthoehe': |
---|
| 102 | $titel='Objekthöhe'; |
---|
| 103 | $einh=' m'; |
---|
| 104 | break; |
---|
| 105 | case 'breitedesobjekts': |
---|
| 106 | $titel='Breite des Objekts'; |
---|
| 107 | $einh=' m'; |
---|
| 108 | break; |
---|
| 109 | case 'bezeichnung': |
---|
| 110 | $titel='Bezeichnung'; |
---|
| 111 | break; |
---|
| 112 | // 1 Verk. |
---|
| 113 | case 'durchfahrtshoehe': |
---|
| 114 | $titel='Durchfahrtshöhe'; |
---|
| 115 | $einh=' m'; |
---|
| 116 | break; |
---|
| 117 | // 6 Leitung |
---|
| 118 | case 'spannungsebene': |
---|
| 119 | $titel='Spannungsebene'; |
---|
| 120 | $einh=' KV'; |
---|
| 121 | break; |
---|
| 122 | // 7 Transport |
---|
| 123 | case 'produkt': |
---|
| 124 | $titel='Produkt'; |
---|
| 125 | break; |
---|
| 126 | // Fehler |
---|
| 127 | default: // noch nicht berÃŒcksichtigt |
---|
| 128 | if ($debug > 1) {echo "<p class='dbg'>Der Feldname ".$col." ist in function zusatz_spalte noch nicht berücksichtigt.</p>";} |
---|
| 129 | $titel=$col; |
---|
| 130 | } |
---|
| 131 | |
---|
| 132 | if ($inhalt != '') {$inhalt.=$einh;} |
---|
| 133 | tab_zeile($titel, '', $inhalt, '', ''); |
---|
| 134 | } |
---|
| 135 | |
---|
| 136 | // Eine Zeile der HTML-Tabelle ausgeben, die einen Objektverweis (Relation) enthÀlt |
---|
| 137 | function verweis_zeile($zieltyp, $link, $info) { |
---|
| 138 | echo "\n<tr>\n\t<td class='li'>".$zieltyp."</td>\n\t<td class='fett'>".$link."</td>\n\t<td>"; |
---|
| 139 | echo "\n\t\t<p class='erkli'>".$info."</p>\n\t</td>\n</tr>"; |
---|
| 140 | } |
---|
| 141 | |
---|
| 142 | // Ein Relationen-Feld anzeigen |
---|
| 143 | // col = Name der DB-Spalte |
---|
| 144 | // inhalt = gml_id oder Array mit gml_id's |
---|
| 145 | function objektverweis($col, $inhalt) { |
---|
| 146 | global $gkz, $showkey, $debug; |
---|
| 147 | // if ($debug > 1) {echo "<p>Verweis Typ '".$col."' auf Objekt(e): '".$inhalt."'.</p>";} |
---|
| 148 | switch ($col) { |
---|
| 149 | case 'hatdirektunten': // [] ++ Wie kann man dies Objekt finden? |
---|
| 150 | $olist=''; |
---|
| 151 | $arrhdu=explode(",", trim($inhalt, "{}")); |
---|
| 152 | foreach($arrhdu AS $hdugml) {$olist.=$hdugml."<br>";} |
---|
| 153 | tab_zeile('Hat direkt Unten', '', $olist, '', 'Verweis auf ein Objekt unter diesem Bauwerk, Typ unbekannt.'); |
---|
| 154 | break; |
---|
| 155 | |
---|
| 156 | case 'gehoertzu': // Assoziation zu: FeatureType AX_Gebaeude (ax_gebaeude) 0..1' |
---|
| 157 | if ($inhalt == '') { |
---|
| 158 | verweis_zeile('Haus', '', 'Das Bauwerk gehört zum Haus'); |
---|
| 159 | } else { |
---|
| 160 | $link="\n\t\t<a title='gehört zu' href='alkishaus.php?gkz=".$gkz."&gmlid=".$inhalt; |
---|
| 161 | if ($showkey) {$link.="&showkey=j";} |
---|
| 162 | $link.="'>Haus <img src='ico/Haus.png' width='16' height='16' alt=''></a>"; |
---|
| 163 | verweis_zeile('Haus', $link, 'Das Bauwerk gehört zum Haus'); |
---|
| 164 | bw_gz_lage($inhalt); |
---|
| 165 | } |
---|
| 166 | break; |
---|
| 167 | |
---|
| 168 | // 'istabgeleitetaus'; 'traegtbeizu': 'istteilvon': // -> Keine FÀlle vorhanden |
---|
| 169 | default: |
---|
| 170 | if ($debug > 1) {echo "<p class='dbg'>Der Feldname ".$col." ist in function 'objektverweis' noch nicht berücksichtigt.</p>";} |
---|
| 171 | } |
---|
| 172 | } |
---|
| 173 | // alle leer: |
---|
| 174 | // SELECT * FROM bauwerke_zusammenfassung WHERE NOT istabgeleitetaus IS NULL; |
---|
| 175 | // SELECT * FROM bauwerke_zusammenfassung WHERE NOT traegtbeizu IS NULL; |
---|
| 176 | // SELECT * FROM bauwerke_zusammenfassung WHERE NOT istteilvon IS NULL; |
---|
| 177 | // SELECT gml_id, hatdirektunten, st_asewkt( wkb_geometry ) as wkt FROM ax_bauwerkimgewaesserbereich WHERE NOT hatdirektunten IS NULL; |
---|
| 178 | // 1 Fall in 290: 2 / DENW15AL360000N7 , |
---|
| 179 | // SELECT gml_id, hatdirektunten, st_asewkt( wkb_geometry ) as wkt FROM ax_bauwerkimgewaesserbereich WHERE gml_id = 'DENW15AL360000N7'; |
---|
| 180 | // 34 FÀlle in 200: |
---|
| 181 | // 16 FÀlle in 300: |
---|
| 182 | |
---|
| 183 | // S T A R T |
---|
| 184 | |
---|
| 185 | ini_set("session.cookie_httponly", 1); |
---|
| 186 | session_start(); |
---|
| 187 | $allfld = "n"; $showkey="n"; $nodebug=""; // Var. aus Parameter initalisieren |
---|
| 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>'); } |
---|
| 226 | |
---|
| 227 | // Mit URL-Parameter "&nodebug=j" kann man die Entwicklungsumgebung (in Conf definiert) ausschalten. |
---|
| 228 | // Manuell an die URL anfÌgen, wirkt nur temporÀr und wird nicht in Links weiter gereicht. |
---|
| 229 | if ($nodebug === "j") {$debug=0;} |
---|
| 230 | |
---|
| 231 | $con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisbauwerk.php'"); |
---|
| 232 | if (!$con) echo "\n<p class='err'>Fehler beim Verbinden der DB</p>\n"; |
---|
| 233 | |
---|
| 234 | // Konstanten fÃŒr Sortierung und Gruppierung |
---|
| 235 | $btyp_verkehr=1; $btyp_gewaesser=2; $btyp_sonst=3; $btyp_indu=4; $btyp_sport=5; |
---|
| 236 | $btyp_leitg=6; $btyp_trans=7; $btyp_turm=8; $btyp_vorrat=9; |
---|
| 237 | |
---|
| 238 | /* in ALLEN Bauwerks-Typen folgende Spalten, bisher NICHT verwendet: |
---|
| 239 | processstep_ax_li_processstep_mitdatenerhebung_description[] processstep_rationale[] |
---|
| 240 | processstep_datetime[] processstep_individualname[] processstep_organisationname[] processstep_positionname[] |
---|
| 241 | processstep_phone[] processstep_address[] processstep_onlineresource[] processstep_hoursofservice[] |
---|
| 242 | processstep_contactinstructions[] processstep_role[] processstep_ax_datenerhebung[] |
---|
| 243 | processstep_scaledenominator[] processstep_sourcereferencesystem[] processstep_sourceextent[] processstep_sourcestep[] |
---|
| 244 | |
---|
| 245 | herkunft_source_source_ax_datenerhebung[] herkunft_source_source_scaledenominator[] herkunft_source_source_sourcereferencesystem[] |
---|
| 246 | herkunft_source_source_sourceextent[] herkunft_source_source_sourcestep[] */ |
---|
| 247 | |
---|
| 248 | /* Fallunterscheidung: B a u w e r k s - T y p |
---|
| 249 | Nacheinander werden folgende Abfragen je Objekt ausgefÃŒhrt: |
---|
| 250 | 1. sqlb: Standard-Spalten, die bei jedem Typ vorhanden sind |
---|
| 251 | 2. sqlk: ZusÀtzliche Key-Value-Beziehungen (mit Key und ErklÀrung) |
---|
| 252 | 3. sqlz: ZusÀtzliche Spalten, individuell je Objektart (einfache Werte-Darstellung) |
---|
| 253 | 4. sqlr: Relationen zu anderen Objektarten */ |
---|
| 254 | switch ($btyp) { |
---|
| 255 | |
---|
| 256 | case $btyp_verkehr: // 1 - V e r k e h r |
---|
| 257 | $btyptitle='Bauwerk im Verkehrsbereich'; |
---|
| 258 | $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 |
---|
| 259 | FROM ax_bauwerkimverkehrsbereich b1 LEFT JOIN ax_bauwerksfunktion_bauwerkimverkehrsbereich k1 ON b1.bauwerksfunktion=k1.wert |
---|
| 260 | WHERE b1.gml_id = $1 AND b1.endet IS NULL;"; |
---|
| 261 | $sqlk="SELECT b1.zustand, k1.beschreibung, k1.dokumentation |
---|
| 262 | FROM ax_bauwerkimverkehrsbereich b1 LEFT JOIN ax_zustand_bauwerkimverkehrsbereich k1 ON b1.zustand=k1.wert |
---|
| 263 | WHERE b1.gml_id = $1 AND b1.endet IS NULL;"; |
---|
| 264 | $sqlz="SELECT b1.bezeichnung, b1.breitedesobjekts, b1.durchfahrtshoehe FROM ax_bauwerkimverkehrsbereich b1 WHERE b1.gml_id = $1 AND b1.endet IS NULL;"; |
---|
| 265 | $sqlr="SELECT b1.hatdirektunten FROM ax_bauwerkimverkehrsbereich b1 WHERE b1.gml_id = $1 AND b1.endet IS NULL;"; |
---|
| 266 | break; |
---|
| 267 | |
---|
| 268 | case $btyp_gewaesser: // 2 - G e w À s s e r |
---|
| 269 | $btyptitle='Bauwerk im GewÀsserbereich'; |
---|
| 270 | $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 |
---|
| 271 | FROM ax_bauwerkimgewaesserbereich b2 LEFT JOIN ax_bauwerksfunktion_bauwerkimgewaesserbereich ug ON b2.bauwerksfunktion=ug.wert |
---|
| 272 | WHERE b2.gml_id = $1 AND b2.endet IS NULL;"; |
---|
| 273 | $sqlk="SELECT b2.zustand, k2.beschreibung, k2.dokumentation |
---|
| 274 | FROM ax_bauwerkimgewaesserbereich b2 LEFT JOIN ax_zustand_bauwerkimgewaesserbereich k2 ON b2.zustand=k2.wert |
---|
| 275 | WHERE b2.gml_id = $1 AND b2.endet IS NULL;"; |
---|
| 276 | $sqlz="SELECT b2.bezeichnung FROM ax_bauwerkimgewaesserbereich b2 WHERE b2.gml_id = $1 AND b2.endet IS NULL;"; |
---|
| 277 | $sqlr="SELECT b2.hatdirektunten FROM ax_bauwerkimgewaesserbereich b2 WHERE b2.gml_id = $1 AND b2.endet IS NULL;"; |
---|
| 278 | break; |
---|
| 279 | |
---|
| 280 | case $btyp_sonst: // 3 - S o n s t i g e Bauwerke |
---|
| 281 | $btyptitle='Sonstiges Bauwerk oder sonstige Einrichtung'; |
---|
| 282 | $sqlb="SELECT b3.bauwerksfunktion, k3.beschreibung, k3.dokumentation, b3.name, b3.statement, |
---|
| 283 | GeometryType(b3.wkb_geometry) as bgeotyp, round(st_area(b3.wkb_geometry)::numeric,2) AS flae |
---|
| 284 | FROM ax_sonstigesbauwerkodersonstigeeinrichtung b3 LEFT JOIN ax_bauwerksfunktion_sonstigesbauwerkodersonstigeeinrichtun k3 ON b3.bauwerksfunktion=k3.wert |
---|
| 285 | WHERE b3.gml_id = $1 AND b3.endet IS NULL;"; |
---|
| 286 | $sqlk="SELECT b3.funktion, k3.beschreibung AS beschr, k3.dokumentation AS doku, b3.hydrologischesmerkmal, hm.beschreibung AS hmbeschr, hm.dokumentation AS hmdoku |
---|
| 287 | FROM ax_sonstigesbauwerkodersonstigeeinrichtung b3 |
---|
| 288 | LEFT JOIN ax_funktion_bauwerk k3 ON b3.funktion=k3.wert |
---|
| 289 | LEFT JOIN ax_hydrologischesmerkmal_sonstigesbauwerkodersonstigeeinri hm ON b3.hydrologischesmerkmal=hm.wert |
---|
| 290 | WHERE b3.gml_id = $1 AND b3.endet IS NULL;"; |
---|
| 291 | $sqlz="SELECT b3.bezeichnung, b3.objekthoehe FROM ax_sonstigesbauwerkodersonstigeeinrichtung b3 WHERE b3.gml_id = $1 AND b3.endet IS NULL;"; |
---|
| 292 | $sqlr="SELECT b3.hatdirektunten, b3.gehoertzu FROM ax_sonstigesbauwerkodersonstigeeinrichtung b3 WHERE b3.gml_id = $1 AND b3.endet IS NULL;"; |
---|
| 293 | |
---|
| 294 | /* gehoertzubauwerk_ax_sonstigesbauwerkodersonstigeeinrichtun |
---|
| 295 | gehoertzubauwerk_ax_bauwerkoderanlagefuersportfreizeitunde |
---|
| 296 | gehoertzubauwerk_ax_leitung |
---|
| 297 | gehoertzubauwerk_ax_bauwerkoderanlagefuerindustrieundgewer |
---|
| 298 | gehoertzubauwerk_ax_einrichtunginoeffentlichenbereichen |
---|
| 299 | gehoertzubauwerk_ax_heilquellegasquelle |
---|
| 300 | gehoertzubauwerk_ax_historischesbauwerkoderhistorischeeinr |
---|
| 301 | gehoertzubauwerk_ax_turm |
---|
| 302 | gehoertzubauwerk_ax_vorratsbehaelterspeicherbauwerk |
---|
| 303 | gehoertzubauwerk_ax_transportanlage |
---|
| 304 | gehoertzubauwerk_ax_wegpfadsteig |
---|
| 305 | gehoertzubauwerk_ax_gleis |
---|
| 306 | gehoertzubauwerk_ax_bahnverkehrsanlage |
---|
| 307 | gehoertzubauwerk_ax_bauwerkimgewaesserbereich |
---|
| 308 | gehoertzubauwerk_ax_strassenverkehrsanlage |
---|
| 309 | gehoertzubauwerk_ax_seilbahnschwebebahn |
---|
| 310 | gehoertzubauwerk_ax_einrichtungenfuerdenschiffsverkehr |
---|
| 311 | gehoertzubauwerk_ax_bauwerkimverkehrsbereich |
---|
| 312 | gehoertzubauwerk_ax_flugverkehrsanlage |
---|
| 313 | gehoertzubauwerk_ax_gewaesserstationierungsachse |
---|
| 314 | gehoertzubauwerk_ax_sickerstrecke |
---|
| 315 | gehoertzubauwerk_ax_schifffahrtsliniefaehrverkehr |
---|
| 316 | gehoertzubauwerk_ax_wasserspiegelhoehe |
---|
| 317 | gehoertzubauwerk_ax_abschnitt |
---|
| 318 | gehoertzubauwerk_ax_ast |
---|
| 319 | gehoertzubauwerk_ax_netzknoten |
---|
| 320 | gehoertzubauwerk_ax_nullpunkt |
---|
| 321 | gehoertzubauwerk_ax_hafen |
---|
| 322 | gehoertzubauwerk_ax_testgelaende |
---|
| 323 | gehoertzubauwerk_ax_schleuse |
---|
| 324 | gehoertzubauwerk_ax_ortslage |
---|
| 325 | gehoertzubauwerk_ax_grenzuebergang |
---|
| 326 | gehoertzubauwerk_ax_polder |
---|
| 327 | gehoertzubauwerk_ax_gewaessermerkmal |
---|
| 328 | gehoertzubauwerk_ax_untergeordnetesgewaesser |
---|
| 329 | gehoertzubauwerk_ax_vegetationsmerkmal */ |
---|
| 330 | break; |
---|
| 331 | |
---|
| 332 | case $btyp_indu: // 4 - Bauwerk oder Anlage fÃŒr I n d u s t r i e und Gewerbe |
---|
| 333 | $btyptitle="Bauwerk oder Anlage fÃŒr Industrie und Gewerbe"; |
---|
| 334 | $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 |
---|
| 335 | FROM ax_bauwerkoderanlagefuerindustrieundgewerbe b4 LEFT JOIN ax_bauwerksfunktion_bauwerkoderanlagefuerindustrieundgewer k4 ON b4.bauwerksfunktion=k4.wert |
---|
| 336 | WHERE b4.gml_id = $1 AND b4.endet IS NULL;"; |
---|
| 337 | $sqlk="SELECT b4.zustand, k4.beschreibung, k4.dokumentation |
---|
| 338 | FROM ax_bauwerkoderanlagefuerindustrieundgewerbe b4 LEFT JOIN ax_zustand_bauwerkoderanlagefuerindustrieundgewerbe k4 ON b4.zustand=k4.wert |
---|
| 339 | WHERE b4.gml_id = $1 AND b4.endet IS NULL;"; |
---|
| 340 | $sqlz="SELECT b4.bezeichnung, b4.objekthoehe FROM ax_bauwerkoderanlagefuerindustrieundgewerbe b4 WHERE b4.gml_id = $1 AND b4.endet IS NULL;"; |
---|
| 341 | $sqlr="SELECT b4.hatdirektunten FROM ax_bauwerkoderanlagefuerindustrieundgewerbe b4 WHERE b4.gml_id = $1 AND b4.endet IS NULL;"; |
---|
| 342 | break; |
---|
| 343 | |
---|
| 344 | case $btyp_sport: // 5 - Bauwerk oder Anlage fÃŒr S p o r t , Freizeit und Erholung |
---|
| 345 | $btyptitle="Bauwerk oder Anlage fÃŒr Sport, Freizeit und Erholung"; |
---|
| 346 | $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 |
---|
| 347 | FROM ax_bauwerkoderanlagefuersportfreizeitunderholung b5 LEFT JOIN ax_bauwerksfunktion_bauwerkoderanlagefuersportfreizeitunde k5 ON b5.bauwerksfunktion=k5.wert |
---|
| 348 | WHERE b5.gml_id = $1 AND b5.endet IS NULL;"; |
---|
| 349 | $sqlk="SELECT b5.sportart, k5.beschreibung, k5.dokumentation |
---|
| 350 | FROM ax_bauwerkoderanlagefuersportfreizeitunderholung b5 LEFT JOIN ax_sportart_bauwerkoderanlagefuersportfreizeitunderholung k5 ON b5.sportart=k5.wert |
---|
| 351 | WHERE b5.gml_id = $1 AND b5.endet IS NULL;"; |
---|
| 352 | $sqlz="SELECT b5.breitedesobjekts FROM ax_bauwerkoderanlagefuersportfreizeitunderholung b5 WHERE b5.gml_id = $1 AND b5.endet IS NULL;"; |
---|
| 353 | $sqlr="SELECT b5.hatdirektunten FROM ax_bauwerkoderanlagefuersportfreizeitunderholung b5 WHERE b5.gml_id = $1 AND b5.endet IS NULL;"; |
---|
| 354 | break; |
---|
| 355 | |
---|
| 356 | case $btyp_leitg: // 6 - L e i t u n g |
---|
| 357 | $btyptitle="Leitung"; |
---|
| 358 | $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 |
---|
| 359 | FROM ax_leitung b6 LEFT JOIN ax_bauwerksfunktion_leitung k6 ON b6.bauwerksfunktion=k6.wert |
---|
| 360 | WHERE b6.gml_id = $1 AND b6.endet IS NULL;"; |
---|
| 361 | $sqlk=""; |
---|
| 362 | $sqlz="SELECT b6.spannungsebene FROM ax_leitung b6 WHERE b6.gml_id = $1 AND b6.endet IS NULL;"; |
---|
| 363 | $sqlr="SELECT b6.hatdirektunten FROM ax_leitung b6 WHERE b6.gml_id = $1 AND b6.endet IS NULL;"; |
---|
| 364 | break; |
---|
| 365 | |
---|
| 366 | case $btyp_trans: // 7 - T r a n s p o r t a n l a g e |
---|
| 367 | $btyptitle="Transportanlage"; |
---|
| 368 | $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 |
---|
| 369 | FROM ax_transportanlage b7 LEFT JOIN ax_bauwerksfunktion_transportanlage k7 ON b7.bauwerksfunktion=k7.wert |
---|
| 370 | WHERE b7.gml_id = $1 AND b7.endet IS NULL;"; |
---|
| 371 | $sqlk="SELECT b7.lagezurerdoberflaeche, k7.beschreibung, k7.dokumentation |
---|
| 372 | FROM ax_transportanlage b7 LEFT JOIN ax_lagezurerdoberflaeche_transportanlage k7 ON b7.lagezurerdoberflaeche=k7.wert |
---|
| 373 | WHERE b7.gml_id = $1 AND b7.endet IS NULL;"; |
---|
| 374 | $sqlz="SELECT b7.produkt FROM ax_transportanlage b7 WHERE b7.gml_id = $7 AND b7.endet IS NULL;"; |
---|
| 375 | $sqlr="SELECT b7.hatdirektunten FROM ax_transportanlage b7 WHERE b7.gml_id = $1 AND b7.endet IS NULL;"; |
---|
| 376 | break; |
---|
| 377 | |
---|
| 378 | case $btyp_turm: // 8 - T u r m (Sonderfall Array) |
---|
| 379 | $btyptitle="Turm"; |
---|
| 380 | $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 |
---|
| 381 | FROM ax_turm b8 LEFT JOIN ax_bauwerksfunktion_turm k8 ON k8.wert =ANY(b8.bauwerksfunktion) |
---|
| 382 | WHERE b8.gml_id = $1 AND b8.endet IS NULL;"; |
---|
| 383 | $sqlk="SELECT b8.zustand, k8.beschreibung, k8.dokumentation |
---|
| 384 | FROM ax_turm b8 LEFT JOIN ax_zustand_turm k8 ON b8.zustand=k8.wert |
---|
| 385 | WHERE b8.gml_id = $1 AND b8.endet IS NULL;"; |
---|
| 386 | $sqlz="SELECT b8.objekthoehe FROM ax_turm b8 WHERE b8.gml_id = $1 AND b8.endet IS NULL;"; |
---|
| 387 | $sqlr="SELECT b8.hatdirektunten, b8.zeigtauf FROM ax_turm b8 WHERE b8.gml_id = $1 AND b8.endet IS NULL;"; |
---|
| 388 | break; |
---|
| 389 | |
---|
| 390 | 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 |
---|
| 391 | $btyptitle="VorratsbehÀlter, Speicherbauwerk"; |
---|
| 392 | $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 |
---|
| 393 | FROM ax_vorratsbehaelterspeicherbauwerk b9 LEFT JOIN ax_bauwerksfunktion_vorratsbehaelterspeicherbauwerk k9 ON b9.bauwerksfunktion=k9.wert |
---|
| 394 | WHERE b9.gml_id = $1 AND b9.endet IS NULL;"; |
---|
| 395 | $sqlk="SELECT b9.lagezurerdoberflaeche, k9.beschreibung, k9.dokumentation, |
---|
| 396 | b9.speicherinhalt, sp9.beschreibung AS spbes, sp9.dokumentation AS spdok |
---|
| 397 | FROM ax_vorratsbehaelterspeicherbauwerk b9 |
---|
| 398 | LEFT JOIN ax_lagezurerdoberflaeche_vorratsbehaelterspeicherbauwerk k9 ON b9.lagezurerdoberflaeche=k9.wert |
---|
| 399 | LEFT JOIN ax_speicherinhalt_vorratsbehaelterspeicherbauwerk sp9 ON b9.speicherinhalt=sp9.wert |
---|
| 400 | WHERE b9.gml_id = $1 AND b9.endet IS NULL;"; |
---|
| 401 | $sqlz="SELECT b9.objekthoehe FROM ax_vorratsbehaelterspeicherbauwerk b9 WHERE b9.gml_id = $1 AND b9.endet IS NULL;"; |
---|
| 402 | $sqlr="SELECT b9.hatdirektunten FROM ax_vorratsbehaelterspeicherbauwerk b9 WHERE b9.gml_id = $1 AND b9.endet IS NULL;"; |
---|
| 403 | break; |
---|
| 404 | |
---|
| 405 | default: |
---|
| 406 | die('<p class="stop1">Fehler showkey</p></body>'); |
---|
| 407 | break; |
---|
| 408 | } |
---|
| 409 | |
---|
| 410 | // 1. sqlb: Standard-Spalten, die bei jedem Typ vorhanden sind |
---|
| 411 | $v=array($gmlid); |
---|
| 412 | $resb=pg_prepare("", $sqlb); |
---|
| 413 | $resb=pg_execute("", $v); |
---|
| 414 | if (!$resb) { |
---|
| 415 | echo "\n<p class='err'>Fehler bei Bauwerksdaten Standardfelder.</p>"; |
---|
| 416 | if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlb)."'</p>";} |
---|
| 417 | if ($debug > 1) {echo "\n<p class='dbg'>Fehler:".pg_result_error($resb)."</p>";} |
---|
| 418 | } else { |
---|
| 419 | if (!$rowb = pg_fetch_assoc($resb)) { |
---|
| 420 | echo "\n<p class='err'>Fehler! Kein Treffer für gml_id=".$gmlid."</p>"; |
---|
| 421 | die('<p class="stop1">Abbruch</p></body>'); // Das wÃŒrde sich sonst 2x wiederholen |
---|
| 422 | } else { |
---|
| 423 | // Treffer |
---|
| 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>"; |
---|
| 486 | if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlk)."'</p>";} |
---|
| 487 | if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resk)."</p>";} |
---|
| 488 | } else { |
---|
| 489 | if (!$rowk = pg_fetch_array($resk)) { |
---|
| 490 | echo "\n<p class='err'>Fehler! Kein Treffer für gml_id=".$gmlid."</p>"; |
---|
| 491 | } else { |
---|
| 492 | // Treffer |
---|
| 493 | switch ($btyp) { // individuell je Typ |
---|
| 494 | case $btyp_verkehr: // 1 |
---|
| 495 | tab_zeile('Zustand', $rowk["zustand"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 496 | break; |
---|
| 497 | case $btyp_gewaesser: // 2 |
---|
| 498 | tab_zeile('Zustand', $rowk["zustand"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 499 | break; |
---|
| 500 | case $btyp_sonst: // 3 |
---|
| 501 | tab_zeile('Funktion', $rowk["funktion"], htmlentities($rowk["beschr"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["doku"], ENT_QUOTES, "UTF-8")); |
---|
| 502 | tab_zeile('Hydrologisches Merkmal', $rowk["hydrologischesmerkmal"], htmlentities($rowk["hmbeschr"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["hmdoku"], ENT_QUOTES, "UTF-8")); |
---|
| 503 | break; |
---|
| 504 | case $btyp_indu: // 4 |
---|
| 505 | tab_zeile('Zustand', $rowk["zustand"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 506 | break; |
---|
| 507 | case $btyp_sport: // 5 |
---|
| 508 | tab_zeile('Sportart', $rowk["sportart"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 509 | break; |
---|
| 510 | case $btyp_trans: // 7 |
---|
| 511 | tab_zeile('Lage zur Erdoberfläche', $rowk["lagezurerdoberflaeche"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 512 | break; |
---|
| 513 | case $btyp_turm: // 8 |
---|
| 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_vorrat: // 9 |
---|
| 517 | tab_zeile('Lage zur Erdoberfläche', $rowk["lagezurerdoberflaeche"], htmlentities($rowk["beschreibung"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["dokumentation"], ENT_QUOTES, "UTF-8")); |
---|
| 518 | tab_zeile('Speicherinhalt', $rowk["speicherinhalt"], htmlentities($rowk["spbes"], ENT_QUOTES, "UTF-8"), '', htmlentities($rowk["spdok"], ENT_QUOTES, "UTF-8")); |
---|
| 519 | break; |
---|
| 520 | } |
---|
| 521 | } |
---|
| 522 | pg_free_result($resk); |
---|
| 523 | } |
---|
| 524 | } |
---|
| 525 | |
---|
| 526 | // 3. sqlz: Individuelle Z u s a t z - Spalten je Bauwerks-Art |
---|
| 527 | // einfache Werte-Anzeige, ohne SchlÃŒsseltabelle |
---|
| 528 | if ($sqlz != '') { |
---|
| 529 | $v=array($gmlid); |
---|
| 530 | $resz=pg_prepare("", $sqlz); |
---|
| 531 | $resz=pg_execute("", $v); |
---|
| 532 | if (!$resz) { |
---|
| 533 | echo "\n<p class='err'>Fehler bei Bauwerk Relation.</p>"; |
---|
| 534 | if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlz)."'</p>";} |
---|
| 535 | if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resz)."</p>";} |
---|
| 536 | } else { |
---|
| 537 | if (!$rowz = pg_fetch_array($resz)) { |
---|
| 538 | echo "\n<p class='err'>Fehler! Kein Treffer für gml_id=".$gmlid."</p>"; |
---|
| 539 | } else { |
---|
| 540 | // Die Spalten im Row abarbeiten |
---|
| 541 | $anzcol=pg_num_fields($resz); |
---|
| 542 | // if ($debug > 1) {echo "<p class='dbg'>".$anzcol." Zusatz-Spalten vorhanden"."</p>";} |
---|
| 543 | for ($i = 0; $i < $anzcol; $i++) { |
---|
| 544 | $k=pg_field_name($resz, $i); |
---|
| 545 | $v=$rowz[$i]; |
---|
| 546 | if ($v != "" OR $allefelder) { |
---|
| 547 | zusatz_spalte($k, $v); |
---|
| 548 | } |
---|
| 549 | } |
---|
| 550 | } |
---|
| 551 | pg_free_result($resz); |
---|
| 552 | } |
---|
| 553 | } |
---|
| 554 | |
---|
| 555 | // 4. sqlr: R e l a t i o n e n zu anderen Objektarten |
---|
| 556 | if ($sqlr != '') { |
---|
| 557 | $v=array($gmlid); |
---|
| 558 | $resr=pg_prepare("", $sqlr); |
---|
| 559 | $resr=pg_execute("", $v); |
---|
| 560 | if (!$resr) { |
---|
| 561 | echo "\n<p class='err'>Fehler bei Bauwerksdaten Zusatzfelder.</p>"; |
---|
| 562 | if ($debug > 2) {echo "\n<p class='err'>SQL=<br>".str_replace("$1","'".$gmlid."'",$sqlr)."'</p>";} |
---|
| 563 | if ($debug > 1) {echo "<p class='dbg'>Fehler:".pg_result_error($resr)."</p>";} |
---|
| 564 | } else { |
---|
| 565 | if (!$rowr = pg_fetch_array($resr)) { |
---|
| 566 | echo "\n<p class='err'>Fehler! Kein Treffer für gml_id=".$gmlid."</p>"; |
---|
| 567 | } else { // Die Spalten im Row abarbeiten |
---|
| 568 | $anzcol=pg_num_fields($resr); |
---|
| 569 | // if ($debug > 1) {echo "<p class='dbg'>".$anzcol." Relationen-Spalten vorhanden"."</p>";} |
---|
| 570 | for ($i = 0; $i < $anzcol; $i++) { |
---|
| 571 | $k=pg_field_name($resr, $i); |
---|
| 572 | $v=$rowr[$i]; // Array mit gml_id anderer Objekte |
---|
| 573 | if ($v != "" OR $allefelder) { |
---|
| 574 | objektverweis($k, $v); |
---|
| 575 | } |
---|
| 576 | } |
---|
| 577 | } |
---|
| 578 | pg_free_result($resr); |
---|
| 579 | } |
---|
| 580 | } |
---|
| 581 | |
---|
| 582 | echo "\n</table>\n"; |
---|
| 583 | // +++ Test, ob ein zweiter Satz zum Bauwerk gefunden wird? Das sollte nicht sein. |
---|
| 584 | ?> |
---|
| 585 | |
---|
| 586 | <div class='buttonbereich noprint'> |
---|
| 587 | <hr> |
---|
| 588 | <a title="zurück" href='javascript:history.back()'><img src="ico/zurueck.png" width="16" height="16" alt="zurück"></a> |
---|
| 589 | <a title="Drucken" href='javascript:window.print()'><img src="ico/print.png" width="16" height="16" alt="Drucken"></a> |
---|
| 590 | </div> |
---|
| 591 | |
---|
| 592 | <?php footer($gmlid, selbstverlinkung()."?", "&btyp=".$btyp); ?> |
---|
| 593 | |
---|
| 594 | </body> |
---|
| 595 | </html> |
---|