Ignore:
Timestamp:
01/23/14 14:53:26 (10 years ago)
Author:
frank.jaeger
Message:

ALKIS-Auskunft, neues Modul "Straße"

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/info/info/alkis/alkisfkt.php

    r132 r306  
    55 
    66        Version: 
    7         17.12.2010  Astrid Emde: Prepared Statements (pg_query -> pg_prepare + pg_execute) 
    8         01.02.2011  *Left* Join - Fehlertoleranz bei unvollstaendigen Schluesseltabellen 
    9         02.11.2011  Parameter debug in function eigentuemer 
    10         17.11.2011  Variable ($debug, $idanzeige, $showkey) von Parameter nach global. Die heißen in allen Programmteilen gleich. 
     7        2010-12-17  Astrid Emde: Prepared Statements (pg_query -> pg_prepare + pg_execute) 
     8        2011-11-01  *Left* Join - Fehlertoleranz bei unvollstaendigen Schluesseltabellen 
     9        2011-11-02  Parameter debug in function eigentuemer 
     10        2011-11-17  Variable ($debug, $idanzeige, $showkey) von Parameter nach global. Die heißen in allen Programmteilen gleich. 
     11        2014-01-22      Eigentuemerart: Mehr Werte und Zugriff auf DB-SchlÃŒssel-Tabelle  
    1112*/ 
    1213 
     
    359360                                        echo "\n<p class='dbg'>Keine Person zur Namensnummer ".$namnum."</p>"; 
    360361                                } 
    361                                 if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".$sqlp."<br>$1=gml(NamNum)= '".$gmlnn."'</p>";} 
     362                                //if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".$sqlp."<br>$1=gml(NamNum)= '".$gmlnn."'</p>";} 
    362363                        } 
    363364                        echo "</td>\n\t<td>&nbsp;</td>\n<tr>"; 
     
    397398        return $wert; 
    398399} 
     400 
    399401// Entschluesslung AX_Namensnummer.eigentuemerart 
    400 // Abweichend hier in singular fuer Link-Text 
    401402function eigentuemerart($key) { 
     403        // Die hÀufigsten Werte direkt aus den Programmcode liefern, ggf. angepasst. 
     404        // FÃŒr seltene Werte in der Datenbank nachschlagen. 
     405        // SchlÃŒsseltabelle dazu aus GeoInfoDok ist vorhanden seit 2014-01-22. 
     406        // Hier Verwendung fÃŒr Text zum Link. 
     407        // FÃŒr korrekte Wiedergabe der amtlichen Werte einen Join auf Tabelle verwenden statt dieser Function.  
    402408        switch ($key) { 
    403                 case 1000: $wert = "Nat&uuml;rliche Person"; break; 
    404                 case 2000: $wert = "Juristische Person"; break; 
    405                 case 3000: $wert = "K&ouml;rperschaft"; break; 
     409                case 1000: $wert = "Nat&uuml;rliche Person"; break; // singular fuer Link-Text 
     410                case 2000: $wert = "Juristische Person"; break; // singl. 
     411                case 3000: $wert = "Körperschaft"; break; // singl. 
     412                case 4000: $wert = "Kirchliches Eigentum"; break; 
     413                case 4100: $wert = "Evangelische Kirche"; break; 
     414                case 4200: $wert = "Katholische Kirche"; break; 
     415                case 5100: $wert = "Bundesrepublik Deutschland"; break; 
     416                case 5400: $wert = "Kreis"; break; 
     417                case 5500: $wert = "Gemeinde"; break; 
     418                case 5920: $wert = "Land"; break; // "Eigenes Bundesland" 
    406419                case "":   $wert = "Person"; break; // falls (noch) nicht gefuellt 
    407                 default:   $wert = "** Unbekannte Eigent&uuml;merart '".$key."' **"; break; 
     420                default: // Datenbank-Abfrage 
     421                        $sql="SELECT bezeichner FROM ax_namensnummer_eigentuemerart WHERE wert= $1 ;"; 
     422                        $v=array($key); 
     423                        $res=pg_prepare("", $sql); 
     424                        $res=pg_execute("", $v); 
     425                        if ($res) { 
     426                                $row=pg_fetch_array($res); 
     427                                $wert==htmlentities($row["bezeichner"], ENT_QUOTES, "UTF-8"); 
     428                        } else { 
     429                                echo "\n\t<p class='err'>Fehler bei DB-Zugriff auf SchlÃŒssel EigentÃŒmerart.</p>\n"; 
     430                                $wert = "** Unbekannte Eigent&uuml;merart '".$key."' **"; 
     431                        } 
     432                        break; 
    408433        } 
    409434        return $wert; 
    410435} 
     436 
     437 
    411438// Entschluesslung ax_buchungsblatt.blattart 
    412439function blattart($key) { 
Note: See TracChangeset for help on using the changeset viewer.