source: trunk/info/info/alkis/alkisfkt.php @ 330

<?php
/*      Modul: alkisfkt.php
        ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo).
        Functions

        Version:
        2010-12-17 Astrid Emde: Prepared Statements (pg_query -> pg_prepare + pg_execute)
        2011-11-01 *Left* Join - Fehlertoleranz bei unvollstaendigen Schluesseltabellen
        2011-11-02 Parameter debug in function eigentuemer
        2011-11-17 Variable ($debug, $idanzeige, $showkey) von Parameter nach global. Die heißen in allen Programmteilen gleich.
        2014-01-22 Eigentuemerart: Mehr Werte und Zugriff auf DB-SchlÃŒssel-Tabelle
        2014-02-06 Korrektur EigentÃŒmerart
        2014-09-09 PostNAS 0.8: ohne Tab. "alkis_beziehungen", mehr "endet IS NULL", Spalten varchar statt integer
        2014-09-10 Bei Relationen den Timestamp abschneiden
*/

function footer($gmlid, $link, $append) {
        // Einen Seitenfuss ausgeben.
        // Den URL-Parameter "&id=j/n" und "&showkey=j/n" in allen Kombinationen umschalten lassen.
        // Die Parameter &gkz= und &gmlid= kommen in allen Modulen einheitlich vor

        // Der Parameter $append wird angehaengt wenn gefuellt
        //  Anwendung: &eig=j bei FS-NW, &ltyp=m/p/o bei Lage
        global $gkz, $idumschalter, $idanzeige, $showkey, $hilfeurl;

        $customer=$_SESSION["mb_user_name"];
        echo "\n<div class='confbereich noprint'>";
        echo "\n<table class='outer'>\n<tr>";

        // Spalte 1: Info Benutzerkennung
        echo "\n\t<td title='Info'><i>Benutzer:&nbsp;".$customer."</i></td>";

        // Spalte 2: Umschalter
        echo "\n\t<td title='Konfiguration'>";
                $mylink ="\n\t\t<a class='gmlid' href='".$link."gkz=".$gkz."&amp;gmlid=".$gmlid.$append;
                if ($showkey) {$mykey = "&amp;showkey=j";} else {$mykey = "&amp;showkey=n";}
                if ($idumschalter) { // fuer Entwicklung ODER Test
                        if ($idanzeige) {$myid = "&amp;id=j";} else {$myid = "&amp;id=n";}

                        // Umschalter nur ausgeben, wenn in conf gesetzt
                        if ($idanzeige) { // Umschalten ID ein/aus
                                echo $mylink.$mykey."&amp;id=n' title='Ohne Verfolgung der ALKIS-Beziehungen'>";
                                echo "<img src='ico/Beziehung_link.ico' width='16' height='16' alt=''> ID aus</a>";
                        } else {
                                echo $mylink.$mykey."&amp;id=j' title='Verfolgung der GML-ID in den ALKIS-Beziehungen'>";
                                echo "<img src='ico/Beziehung_link.ico' width='16' height='16' alt=''> ID ein</a>";
                        }
                        echo " | ";
                } else { // keinen ID-Umschalter
                        $myid = "";
                }

                if ($showkey) { // // Umschalten SchlÃŒssel ein/aus
                        echo $mylink.$myid."&amp;showkey=n' title='Verschl&uuml;sselungen ausblenden'>Schl&uuml;ssel aus</a>";
                } else {
                        echo $mylink.$myid."&amp;showkey=j' title='Verschl&uuml;sselungen anzeigen'>Schl&uuml;ssel ein</a>";
                }
        echo "\n\t</td>";

        // Spalte 3
        echo "\n\t<td title='Hilfe'>";
        echo "\n\t\t<p class='nwlink'>\n\t\t\t<a target='_blank' href='".$hilfeurl."' title='Dokumentation'>Hilfe zur ALKIS-Auskunft</a>\n\t\t</p>\n\t</td>";
        echo "\n</tr>\n</table>\n</div>\n";
        return 0;
}

function linkgml($gkz, $gml, $typ, $tabelle)  {
        // Einen Link zur Verfolgung der Beziehungen mit dem Modul alkisrelationen.php
        // tabelle = nur angeben fÃŒr Tabellen, die Relationen-Spalten besitzen, sonst leer
        $kurzid=substr($gml, 12, 4); // ID in Anzeige kuerzen (4 Zeichen), der Anfang ist immer gleich
        // PostNAS 0.8: Timestamp abschneiden
        echo "\n\t\t<a target='_blank' title='ID ".$typ."' class='gmlid noprint' ";
        echo "href='alkisrelationen.php?gkz=".$gkz."&amp;gmlid=".$gml."&amp;otyp=".$typ."&amp;tabelle=".$tabelle."'>";
        echo "<img src='ico/Beziehung_link.ico' width='16' height='16' alt=''>".$kurzid."</a>";
        return 0;
}

function kurz_namnr($lang) {
        // Namensnummer kÌrzen. Nicht benötigte Stufen der Dezimalklassifikation abschneiden
        $kurz=str_replace(".00","",$lang); // leere Stufen (nur am Ende)
        $kurz=str_replace("0000","",$kurz); // ganz leer (am Anfang)
        $kurz=ltrim($kurz, "0"); // fuehrende Nullen am Anfang
        $kurz=str_replace(".0",".",$kurz); // fuehrende Null jeder Stufe
        return $kurz;
}

function bnw_fsdaten($con, $lfdnr, $gml_bs, $ba, $anteil, $bvnraus) {
/*      Bestandsnachweis - Flurstuecksdaten
        Die Tabellenzeilen mit den Flurstuecksdaten zu einer Buchungsstelle im Bestandsnachweis ausgeben.
        Die Funktion wird je einmal aufgerufen fÃŒr die Buchungen direkt auf dem GB (Normalfall).
        Weiterere Aufrufe ggf. bei Erbbaurecht fÃŒr die mit "an" verknuepften Buchungsstellen.
        Table-Tag und Kopfzeile im aufrufenden Programm. 
*/
        global $gkz, $idanzeige, $showkey;

        // F L U R S T U E C K
        $sql="SELECT g.gemarkungsnummer, g.bezeichnung, f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.regierungsbezirk, f.kreis, f.gemeinde, f.amtlicheflaeche ";
        $sql.="FROM ax_flurstueck f JOIN ax_buchungsstelle s ON f.istgebucht=substring(s.gml_id,1,16) "; 
        $sql.="LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ";
        $sql.="WHERE s.gml_id= $1 ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;";

        $v = array($gml_bs);
        $resf = pg_prepare("", $sql);
        $resf = pg_execute("", $v);

        if (!$resf) {echo "<p class='err'>Fehler bei Flurst&uuml;ck</p>\n";}

        if($bvnraus) { // nur bei direkten Buchungen die lfdNr ausgeben
                $bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
        }
        $altlfdnr="";
        $j=0;
        while($rowf = pg_fetch_array($resf)) {
                $flur=str_pad($rowf["flurnummer"], 3, "0", STR_PAD_LEFT);

/*              $fskenn=str_pad($rowf["zaehler"], 5, "0", STR_PAD_LEFT);
                if ($rowf["nenner"] != "") { // Bruchnummer
                        $fskenn.="/".str_pad($rowf["nenner"], 3, "0", STR_PAD_LEFT);
                }
*/
                // ohne fuehrende Nullen?
                $fskenn=$rowf["zaehler"];
                if ($rowf["nenner"] != "") { // Bruchnummer
                        $fskenn.="/".$rowf["nenner"];
                }

                $flae=number_format($rowf["amtlicheflaeche"],0,",",".") . " m&#178;";

                echo "\n<tr>"; // eine Zeile je Flurstueck
                        // Sp. 1-3 der Tab. aus Buchungsstelle, nicht aus FS
                        if($lfdnr == $altlfdnr) {       // gleiches Grundstueck
                                echo "\n\t<td>&nbsp;</td>";
                                echo "\n\t<td>&nbsp;</td>";
                                echo "\n\t<td>&nbsp;</td>";
                        } else {
                                echo "\n\t<td>";
                                        echo "<a name='bvnr".$lfdnr."'></a>"; // Sprungmarke
                                        echo "<span class='wichtig'>".$bvnr."</span>";  // BVNR
                                        if ($idanzeige) {linkgml($gkz, $gml_bs, "Buchungsstelle", "ax_buchungsstelle");}
                                echo "</td>";

                                echo "\n\t<td>"; // Buchungsart 
                                        //      if ($showkey) {echo "<span class='key'>".$???."</span>&nbsp;";} // Schluessel
                                        echo $ba; // entschluesselt
                                echo "</td>"; 
                                echo "\n\t<td>&nbsp;</td>"; // Anteil
                                $altlfdnr=$lfdnr;
                        }
                        //Sp. 4-7 aus Flurstueck
                        echo "\n\t<td>";
                        if ($showkey) {
                                echo "<span class='key'>".$rowf["gemarkungsnummer"]."</span> ";
                        }
                        echo $rowf["bezeichnung"]."</td>";
                        echo "\n\t<td>".$flur."</td>";
                        echo "\n\t<td><span class='wichtig'>".$fskenn."</span>";
                                if ($idanzeige) {linkgml($gkz, $rowf["gml_id"], "Flurst&uuml;ck", "ax_flurstueck");}
                        echo "</td>";
                        echo "\n\t<td class='fla'>".$flae."</td>";

                        echo "\n\t<td><p class='nwlink noprint'>";
                                echo "<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$rowf["gml_id"]."&amp;eig=n";
                                        if ($idanzeige) {echo "&amp;id=j";}
                                        if ($showkey)   {echo "&amp;showkey=j";}
                                        echo "' title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck ";
                                        echo "<img src='ico/Flurstueck_Link.ico' width='16' height='16' alt=''>";
                                echo "</a>";
                        echo "</p></td>";
                echo "\n</tr>";

                $j++;
        } // Ende Flurstueck
        pg_free_result($resf);
        return $j;
}

function eigentuemer($con, $gmlid, $mitadresse, $lnkclass) {
        // Tabelle mit Eigentuemerdaten zu einem Grundbuchblatt ausgeben
        // Sp.1 = Namennummer, Sp. 2 = Name / Adresse, Sp. 3 = Link
        // Parameter:
        //      $gmlid = ID GB-Blattes
        //      $mitadresse = Option (true/false) ob die Adresszeile ausgegeben werden soll
        // Return = Anzahl Namensnummern

        // Schleife 1: N a m e n s n u m m e r
        // Beziehung: ax_namensnummer >istBestandteilVon> ax_buchungsblatt
        global $debug, $gkz, $idanzeige, $showkey;

        // Link ÃŒber Java-Class? (Ja in alkisinlayausk.php, sonst normal)
        if ($lnkclass == "") {
                $lnkvor = "";
                $lnknach = "";
        } else {
                $lnkvor  = "javascript:".$lnkclass."(\"";
                $lnknach = "\")";
        } // Beispiel-Link href='javascript:imFenster(\"alkislage.php?gkz= ... ."\")'>xxx ";

        $sqln="SELECT n.gml_id, n.laufendenummernachdin1421 AS lfd, n.zaehler, n.nenner, n.artderrechtsgemeinschaft AS adr, n.beschriebderrechtsgemeinschaft as beschr, n.eigentuemerart, n.anlass ";
        $sqln.="FROM ax_namensnummer n WHERE n.istbestandteilvon= $1 ORDER BY n.laufendenummernachdin1421;";

        $v = array($gmlid);
        $resn = pg_prepare("", $sqln);
        $resn = pg_execute("", $v);

        if (!$resn) {
                echo "<p class='err'>Fehler bei Eigent&uuml;mer</p>\n";
                if ($debug > 2) {echo "<p class='err'>SQL=<br>".$sqln."<br>$1=gml= '".$gmlid."'</p>";}
        }

        echo "\n\n<table class='eig'>";
        $n=0; // Z.NamNum.

        while($rown = pg_fetch_array($resn)) {
                $gmlnn=$rown["gml_id"];
                echo "\n<tr>";
                        echo "\n\t<td class='nanu' title='Namens-Nummer'>\n\t\t<p>"; // Sp. 1
                                // VOR die Tabelle: "EigentÃŒmer"
                                $namnum=kurz_namnr($rown["lfd"]);
                                echo $namnum."&nbsp;";
                                if ($idanzeige) {linkgml($gkz, $rown["gml_id"], "Namensnummer", "ax_namensnummer");}
                        echo "</p>\n\t</td>";

                        echo "\n\t<td>"; // Sp. 2
                        $rechtsg=$rown["adr"];
                        if ($rechtsg != "" ) {
                                if ($rechtsg == 9999) { // sonstiges
                                        echo "\n\t\t<p class='zus' title='Beschrieb der Rechtsgemeinschaft'>".htmlentities($rown["beschr"], ENT_QUOTES, "UTF-8")."</p>";
                                } else {
                                        echo "\n\t\t<p class='zus' title='Art der Rechtsgemeinschaft'>".htmlentities(rechtsgemeinschaft($rown["adr"]), ENT_QUOTES, "UTF-8")."</p>";
                                }
                        }
                        //if ($rown["anlass"] > 0 ) {echo "<p>Anlass=".$rown["anlass"]."</p>";} // TEST:

                        // Schleife Ebene 2: andere Namensnummern
                        // Beziehung   ax_namensnummer >bestehtAusRechtsverhaeltnissenZu>  ax_namensnummer 

                        // Die Relation 'Namensnummer' besteht aus RechtsverhÀltnissen zu 'Namensnummer' sagt aus, 
                        // dass mehrere Namensnummern zu einer Rechtsgemeinschaft gehören können. 
                        // Die Rechtsgemeinschaft selbst steht unter einer eigenen AX_Namensnummer, 
                        // die zu allen Namensnummern der Rechtsgemeinschaft eine Relation besitzt.

                        // Die Relation 'Namensnummer' hat VorgÀnger 'Namensnummer' gibt Auskunft darÌber, 
                        // aus welchen Namensnummern die aktuelle entstanden ist.

                // Schleife 2: P e r s o n
                // Beziehung: ax_person  <benennt<  ax_namensnummer
                $sqlp ="SELECT p.gml_id, p.nachnameoderfirma, p.vorname, p.geburtsname, p.geburtsdatum, p.namensbestandteil, p.akademischergrad ";
                $sqlp.="FROM ax_person p JOIN ax_namensnummer nn ON nn.benennt=substring(p.gml_id,1,16) WHERE nn.gml_id= $1 AND p.endet IS NULL AND nn.endet IS NULL;";
                // Timestamp an ID abschneiden!

                $v = array($gmlnn);
                $resp = pg_prepare("", $sqlp);
                $resp = pg_execute("", $v);

                if (!$resp) {
                        echo "\n\t<p class='err'>Fehler bei Person</p>\n";
                        if ($debug > 2) {echo "<p class='err'>SQL=<br>".$sqlp."<br>$1=gml= '".$gmlnn."'</p>";}
                }

                $i=0; // cnt Person
                while($rowp = pg_fetch_array($resp)) {  // ++ Schleife? nn >benennt> Person ist kein Array!
                        $diePerson="";
                        if ($rowp["akademischergrad"] <> "") {$diePerson=$rowp["akademischergrad"]." ";}
                        $diePerson.=$rowp["nachnameoderfirma"];
                        if ($rowp["vorname"] <> "") {$diePerson.=", ".$rowp["vorname"];}
                        if ($rowp["namensbestandteil"] <> "") {$diePerson.=". ".$rowp["namensbestandteil"];}
                        if ($rowp["geburtsdatum"] <> "") {$diePerson.=", geb. ".$rowp["geburtsdatum"];}
                        if ($rowp["geburtsname"] <> "") {$diePerson.=", geb. ".$rowp["geburtsname"];}
                        $diePerson=htmlentities($diePerson, ENT_QUOTES, "UTF-8"); // Umlaute

                        // Spalte 1 enthÀlt die Namensnummer, nur in Zeile 0
                        if ($i > 0) {
                                echo "\n<tr>\n\t<td>&nbsp;</td>\n\t<td>";
                        }
                        // Spalte 2 = Angaben
                        $eiartkey=$rown["eigentuemerart"];
                        $eiart=eigentuemerart($eiartkey);
                        echo "\n\t\t<p class='geig' title='Eigent&uuml;merart: ".$eiart."'>".$diePerson."</p>\n\t</td>";

                        // Spalte 3 = Link
                        echo "\n\t<td>\n\t\t<p class='nwlink noprint'>";
                                if ($idanzeige) {linkgml($gkz, $rowp["gml_id"], "Person", "ax_person"); echo "&nbsp";}
                                if ($showkey AND $eiartkey != '') { // oft leer
                                                echo "<span class='key'>(".$eiartkey.")</span> ";
                                }
                                echo "\n\t\t<a href='".$lnkvor."alkisnamstruk.php?gkz=".$gkz."&amp;gmlid=".$rowp[0];
                                if ($idanzeige) {echo "&amp;id=j";}
                                if ($showkey)   {echo "&amp;showkey=j";}
                                echo $lnknach."' title='vollst&auml;ndiger Name und Adresse eines Eigent&uuml;mers'>".$eiart;
                                echo " <img src='ico/Eigentuemer.ico' width='16' height='16' alt=''></a>\n\t\t</p>";
                        echo "\n\t</td>\n</tr>";

                        if ($mitadresse) {
                                // Schleife 3:  A d r e s s e  (OPTIONAL)
                                $sqla ="SELECT a.gml_id, a.ort_post, a.postleitzahlpostzustellung AS plz, a.strasse, a.hausnummer, a.bestimmungsland ";
                                $sqla.="FROM ax_anschrift a JOIN ax_person p ON substring(a.gml_id,1,16) = ANY(p.hat) WHERE p.gml_id= $1 ;"; // ORDER?
                                $gmlp=$rowp["gml_id"]; // Person
                                $v = array($gmlp);
                                $resa = pg_prepare("", $sqla);
                                $resa = pg_execute("", $v);
                                if (!$resa) {
                                        echo "\n\t<p class='err'>Fehler bei Adressen</p>\n";
                                        if ($debug > 2) {echo "<p class='err'>SQL=<br>".$sqla."<br>$1=gml= '".$gmlp."'</p>";}
                                }
                                $j=0;
                                while($rowa = pg_fetch_array($resa)) {
                                        $gmla=$rowa["gml_id"];
                                        $plz=$rowa["plz"]; // integer
                                        if($plz == 0) {
                                                $plz="";
                                        } else {
                                                $plz=str_pad($plz, 5, "0", STR_PAD_LEFT);
                                        }
                                        $ort=htmlentities($rowa["ort_post"], ENT_QUOTES, "UTF-8");
                                        $str=htmlentities($rowa["strasse"], ENT_QUOTES, "UTF-8");
                                        $hsnr=$rowa["hausnummer"];
                                        $land=htmlentities($rowa["bestimmungsland"], ENT_QUOTES, "UTF-8");

                                        echo "\n<tr>\n\t<td>&nbsp;</td>"; // Spalte 1
                                        echo "\n\t<td><p class='gadr'>"; //Spalte 2
                                        if ($str.$hsnr != "") {
                                                echo $str." ".$hsnr."<br>";
                                        }
                                        if ($plz.$ort != "") {
                                                echo $plz." ".$ort;
                                        }
                                        if ($land != "" and $land != "DEUTSCHLAND") {
                                                echo ", ".$land;
                                        }
                                        echo "</p></td>";
                                        echo "\n\t<td>"; // Spalte 3
                                        if ($idanzeige) {
                                                echo "<p class='nwlink noprint'>";
                                                linkgml($gkz, $gmla, "Adresse", "ax_adresse");
                                                echo "</p>";
                                        } else { 
                                                echo "&nbsp;";
                                        }
                                        echo "</td>\n</tr>";
                                        $j++;
                                }
                                pg_free_result($resa);
                        } // End if
                        // 'keine Adresse' kann vorkommen, z.B. "Deutsche Telekom AG"

                        $i++; // cnt Person
                        // als eigene Tab-Zeile?
                        // 'Anteil' ist der Anteil der Berechtigten in Bruchteilen (Par. 47 GBO) an einem gemeinschaftlichen Eigentum (GrundstÃŒck oder Recht).
                        if ($rown["zaehler"] != "") {
                                echo "\n<tr>\n\t<td>&nbsp;</td>"; // Sp. 1
                                echo "\n\t<td><p class='avh' title='Anteil'>".$rown["zaehler"]."/".$rown["nenner"]." Anteil</p></td>";
                                echo "\n\t<td>&nbsp;</td>\n</tr>"; // Sp. 3
                        }
                } // End Loop Person
                if ($i == 0) { // kommt vor hinter Zeile Erbengemeinschaft, ist dann kein Fehler
                        if ($debug > 0) {
                                echo "\n<p class='dbg'>Rechtsgemeinschaft = '".$rechtsg."'</p>";
                                if ($rechtsg != 9999) {
                                        echo "\n<p class='dbg'>Fehler: Keine Person zur Namensnummer ".$namnum."</p>";
                                }
                                if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".$sqlp."<br>$1 = gml(NamNum) = '".$gmlnn."'</p>";}
                        }
                        echo "</td>\n\t<td>&nbsp;</td>\n<tr>";
                }
                $n++; // cnt NamNum
        } // End Loop NamNum
        echo "\n</table>\n";
        if ($n == 0) {
                // kommt vor bei "Fiktives Blatt", kein Fehler 
                if ($debug > 0) {echo "<p class='dbg'>keine Namensnummern zum Blatt</p>";}

                if ($debug > 2) {echo "<p class='dbg'>Namensnummern: SQL=<br>".$sqln."<br>$1=gml(Blatt)= '".$gmlid."'</p>";}
        }
        pg_free_result($resn);
        return $n; 
} // End Function eigentuemer

// **  Functions  zum   E n t s c h l u e s s e l n  **

// Entschluesslung ax_person.anrede
function anrede($key) {
        switch ($key) {
                case 1000: $wert = "Frau"; break;
                case 2000: $wert = "Herr"; break;
                case 3000: $wert = "Firma"; break;
                default:   $wert = ""; break;
        }
        return $wert;
}

// Entschluesslung AX_Namensnummer.artDerRechtsgemeinschaft
function rechtsgemeinschaft($key) {
        switch ($key) {
                case 1000: $wert = "Erbengemeinschaft"; break;
                case 2000: $wert = "GÃŒtergemeinschaft"; break;
                case 3000: $wert = "BGB-Gesellschaft"; break;
                case 9999: $wert = "Sonstiges"; break;  // dann: beschriebDerRechtsgemeinschaft
                default:   $wert = ""; break;
        }
        return $wert;
}

// Entschluesslung AX_Namensnummer.eigentuemerart
function eigentuemerart($key) {
        // Die hÀufigsten Werte direkt aus den Programmcode liefern, ggf. angepasst.
        // FÃŒr seltene Werte in der Datenbank nachschlagen.
        // SchlÃŒsseltabelle dazu ist vorhanden seit 2014-01-22.
        // Hier Verwendung fÃŒr Text zum Link.
        // FÃŒr korrekte Wiedergabe der amtlichen Werte einen Join auf Tabelle verwenden statt dieser Function. 
        global $debug;
        switch ($key) {
                case 1000: $wert = "Nat&uuml;rliche Person"; break; // singular fuer Link-Text
                case 2000: $wert = "Juristische Person"; break; // singl.
                case 3000: $wert = "Körperschaft"; break; // singl.
                case 4000: $wert = "Kirchliches Eigentum"; break;
                case 4100: $wert = "Evangelische Kirche"; break;
                case 4200: $wert = "Katholische Kirche"; break;
                case 5100: $wert = "Bundesrepublik Deutschland"; break;
                case 5400: $wert = "Kreis"; break;
                case 5500: $wert = "Gemeinde"; break;
                case 5920: $wert = "Land"; break; // "Eigenes Bundesland"
                case "":   $wert = "Person"; break; // falls (noch) nicht gefuellt
                default: // Datenbank-Abfrage
                        $sql="SELECT bezeichner FROM ax_namensnummer_eigentuemerart WHERE wert= $1 ;";
                        $v=array($key);
                        $res=pg_prepare("", $sql);
                        $res=pg_execute("", $v);
                        if ($res) {
                                $row=pg_fetch_array($res);
                                $wert=htmlentities($row["bezeichner"], ENT_QUOTES, "UTF-8");
                                if ($wert == "") {$wert="** Eigent&uuml;merart '".$key."' nicht gefunden **";}
                        } else {
                                echo "\n\t<p class='err'>Fehler bei DB-Zugriff auf EigentÃŒmerart.</p>\n";
                                $wert="** Unbekannte Eigent&uuml;merart '".$key."' **";
                        }
                        pg_free_result($res);
                        break;
        }
        return $wert;
}

// Entschluesslung ax_buchungsblatt.blattart
function blattart($key) {
        switch ($key) {
                case 1000: $wert = "Grundbuchblatt"; break;
                // Ein Grundbuchblatt ist ein Buchungsblatt, das die Buchung im Grundbuch enthÀlt.
                case 2000: $wert = "Katasterblatt"; break;
                // Ein Katasterblatt ist ein Buchungsblatt, das die Buchung im Liegenschaftskataster enthÀlt.
                case 3000: $wert = "Pseudoblatt"; break;
                // Ein Pseudoblatt ist ein Buchungsblatt, das die Buchung, die bereits vor Eintrag im Grundbuch Rechtskraft erlangt hat, enthÀlt 
                // (z.B. Übernahme von Flurbereinigungsverfahren, Umlegungsverfahren).
                case 5000: $wert = "Fiktives Blatt"; break;
                // Das fiktive Blatt enthÀlt die aufgeteilten GrundstÌcke und Rechte als Ganzes. 
                // Es bildet um die Miteigentumsanteile eine fachliche Klammer.
                default: $wert = "** Unbekannter Wert '".$key."'"; break;
        }
        return $wert;
}
// Entschluesslung ax_dienststelle.stellenart
function dienststellenart($key) {
        switch ($key) {
                case 1000: $wert = "Grundbuchamt"; break;
                case 1100: $wert = "Katasteramt"; break;
                case 1200: $wert = "Finanzamt"; break;
                case 1300: $wert = "Flurbereinigungsbeh&ouml;rde"; break;
                case 1400: $wert = "Forstamt"; break;
                case 1500: $wert = "Wasserwirtschaftsamt"; break;
                case 1600: $wert = "Straßenbauamt"; break;
                case 1700: $wert = "Gemeindeamt"; break;
                case 1900: $wert = "Kreis- oder Stadtverwaltung"; break;
                case 2000: $wert = "Wasser- und Bodenverband"; break;
                case 2100: $wert = "Umlegungsstelle"; break;
                case 2200: $wert = "Landesvermessungsverwaltung"; break;
                case 2300: $wert = "&Ouml;bVI"; break;
                case 2400: $wert = "Bundeseisenbahnverm&ouml;gen"; break;
                case 2500: $wert = "Landwirtschaftskammer"; break;
                default: $wert = "** Unbekannter Wert '".$key."'"; break;
        }
        return $wert;
}
?>