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

Revision 315, 18.9 KB checked in by frank.jaeger, 7 years ago (diff)

Feinschliff und Korrektur an Auskunft und Navigation

Line 
1<?php
2/*      Modul: alkisfkt.php
3        ALKIS-Buchauskunft, Kommunales Rechenzentrum Minden-Ravensberg/Lippe (Lemgo).
4        Functions
5
6        Version:
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
12        2014-02-06 Korrektur EigentÃŒmerart
13*/
14
15function footer($gmlid, $link, $append) {
16        // Einen Seitenfuss ausgeben.
17        // Den URL-Parameter "&id=j/n" und "&showkey=j/n" in allen Kombinationen umschalten lassen.
18        // Die Parameter &gkz= und &gmlid= kommen in allen Modulen einheitlich vor
19
20        // Der Parameter $append wird angehaengt wenn gefuellt
21        //  Anwendung: &eig=j bei FS-NW, &ltyp=m/p/o bei Lage
22        global $gkz, $idumschalter, $idanzeige, $showkey, $hilfeurl;
23
24        $customer=$_SESSION["mb_user_name"];
25        echo "\n<div class='confbereich noprint'>";
26        echo "\n<table class='outer'>\n<tr>";
27
28        // Spalte 1: Info Benutzerkennung
29        echo "\n\t<td title='Info'><i>Benutzer:&nbsp;".$customer."</i></td>";
30
31        // Spalte 2: Umschalter
32        echo "\n\t<td title='Konfiguration'>";
33                $mylink ="\n\t\t<a class='gmlid' href='".$link."gkz=".$gkz."&amp;gmlid=".$gmlid.$append;
34                if ($showkey) {$mykey = "&amp;showkey=j";} else {$mykey = "&amp;showkey=n";}
35                if ($idumschalter) { // fuer Entwicklung ODER Test
36                        if ($idanzeige) {$myid = "&amp;id=j";} else {$myid = "&amp;id=n";}
37
38                        // Umschalter nur ausgeben, wenn in conf gesetzt
39                        if ($idanzeige) { // Umschalten ID ein/aus
40                                echo $mylink.$mykey."&amp;id=n' title='Ohne Verfolgung der ALKIS-Beziehungen'>";
41                                echo "<img src='ico/Beziehung_link.ico' width='16' height='16' alt=''> ID aus</a>";
42                        } else {
43                                echo $mylink.$mykey."&amp;id=j' title='Verfolgung der GML-ID in den ALKIS-Beziehungen'>";
44                                echo "<img src='ico/Beziehung_link.ico' width='16' height='16' alt=''> ID ein</a>";
45                        }
46                        echo " | ";
47                } else { // keinen ID-Umschalter
48                        $myid = "";
49                }
50
51                if ($showkey) { // // Umschalten SchlÃŒssel ein/aus
52                        echo $mylink.$myid."&amp;showkey=n' title='Verschl&uuml;sselungen ausblenden'>Schl&uuml;ssel aus</a>";
53                } else {
54                        echo $mylink.$myid."&amp;showkey=j' title='Verschl&uuml;sselungen anzeigen'>Schl&uuml;ssel ein</a>";
55                }
56        echo "\n\t</td>";
57
58        // Spalte 3
59        echo "\n\t<td title='Hilfe'>";
60        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>";
61        echo "\n</tr>\n</table>\n</div>\n";
62        return 0;
63}
64
65function linkgml($gkz, $gml, $typ)  {
66        // Einen Link zur Verfolgung der Beziehungen mit dem Modul alkisrelationen.php
67        $kurzid=substr($gml, 12); // ID in Anzeige kuerzen (4 Zeichen), der Anfang ist immer gleich
68        echo "\n\t\t<a target='_blank' title='ID ".$typ."' class='gmlid noprint' ";
69        echo "href='alkisrelationen.php?gkz=".$gkz."&amp;gmlid=".$gml."&amp;otyp=".$typ."'>";
70        echo "<img src='ico/Beziehung_link.ico' width='16' height='16' alt=''>".$kurzid."</a>";
71        return 0;
72}
73
74function kurz_namnr($lang) {
75        // Namensnummer kuerzen. Nicht benoetigte Stufen der Dezimalklassifikation abschneiden
76        $kurz=str_replace(".00","",$lang); // leere Stufen (nur am Ende)
77        $kurz=str_replace("0000","",$kurz); // ganz leer (am Anfang)
78        $kurz=ltrim($kurz, "0"); // fuehrende Nullen am Anfang
79        $kurz=str_replace(".0",".",$kurz); // fuehrende Null jeder Stufe
80        return $kurz;
81}
82
83function bnw_fsdaten($con, $lfdnr, $gml_bs, $ba, $anteil, $bvnraus) {
84/*      Bestandsnachweis - Flurstuecksdaten
85        Die Tabellenzeilen mit den Flurstuecksdaten zu einer Buchungsstelle im Bestandsnachweis ausgeben.
86        Die Funktion wird je einmal aufgerufen fÃŒr die Buchungen direkt auf dem GB (Normalfall).
87        Weiterere Aufrufe ggf. bei Erbbaurecht fÃŒr die mit "an" verknuepften Buchungsstellen.
88        Table-Tag und Kopfzeile im aufrufenden Programm.
89*/
90        global $gkz, $idanzeige, $showkey;
91        // F L U R S T U E C K
92        $sql="SELECT g.gemarkungsnummer, g.bezeichnung, ";
93        $sql.="f.gml_id, f.flurnummer, f.zaehler, f.nenner, f.regierungsbezirk, f.kreis, f.gemeinde, f.amtlicheflaeche ";
94        $sql.="FROM ax_flurstueck f ";
95        $sql.="JOIN alkis_beziehungen v ON f.gml_id=v.beziehung_von ";
96        $sql.="LEFT JOIN ax_gemarkung g ON f.land=g.land AND f.gemarkungsnummer=g.gemarkungsnummer ";
97        $sql.="WHERE v.beziehung_zu= $1 "; // id buchungsstelle
98        $sql.="AND v.beziehungsart='istGebucht' ";
99        $sql.="ORDER BY f.gemarkungsnummer, f.flurnummer, f.zaehler, f.nenner;";
100
101        $v = array($gml_bs);
102        $resf = pg_prepare("", $sql);
103        $resf = pg_execute("", $v);
104
105        if (!$resf) {echo "<p class='err'>Fehler bei Flurst&uuml;ck</p>\n";}
106
107        if($bvnraus) { // nur bei direkten Buchungen die lfdNr ausgeben
108                $bvnr=str_pad($lfdnr, 4, "0", STR_PAD_LEFT);
109        }
110        $altlfdnr="";
111        $j=0;
112        while($rowf = pg_fetch_array($resf)) {
113                $flur=str_pad($rowf["flurnummer"], 3, "0", STR_PAD_LEFT);
114
115/*              $fskenn=str_pad($rowf["zaehler"], 5, "0", STR_PAD_LEFT);
116                if ($rowf["nenner"] != "") { // Bruchnummer
117                        $fskenn.="/".str_pad($rowf["nenner"], 3, "0", STR_PAD_LEFT);
118                } */
119
120                // ohne fuehrende Nullen?
121                $fskenn=$rowf["zaehler"];
122                if ($rowf["nenner"] != "") { // Bruchnummer
123                        $fskenn.="/".$rowf["nenner"];
124                }
125
126                $flae=number_format($rowf["amtlicheflaeche"],0,",",".") . " m&#178;";
127
128                echo "\n<tr>"; // eine Zeile je Flurstueck
129                        // Sp. 1-3 der Tab. aus Buchungsstelle, nicht aus FS
130                        if($lfdnr == $altlfdnr) {       // gleiches Grundstueck
131                                echo "\n\t<td>&nbsp;</td>";
132                                echo "\n\t<td>&nbsp;</td>";
133                                echo "\n\t<td>&nbsp;</td>";
134                        } else {
135                                echo "\n\t<td>";
136                                        echo "<a name='bvnr".$lfdnr."'></a>"; // Sprungmarke
137                                        echo "<span class='wichtig'>".$bvnr."</span>";  // BVNR
138                                        if ($idanzeige) {linkgml($gkz, $gml_bs, "Buchungsstelle");}
139                                echo "</td>";
140
141                                echo "\n\t<td>"; // Buchungsart
142                                        //      if ($showkey) {echo "<span class='key'>".$???."</span>&nbsp;";} // Schluessel
143                                        echo $ba; // entschluesselt
144                                echo "</td>";
145                                echo "\n\t<td>&nbsp;</td>"; // Anteil
146                                $altlfdnr=$lfdnr;
147                        }
148                        //Sp. 4-7 aus Flurstueck
149                        echo "\n\t<td>";
150                        if ($showkey) {
151                                echo "<span class='key'>".$rowf["gemarkungsnummer"]."</span> ";
152                        }
153                        echo $rowf["bezeichnung"]."</td>";
154                        echo "\n\t<td>".$flur."</td>";
155                        echo "\n\t<td><span class='wichtig'>".$fskenn."</span>";
156                                if ($idanzeige) {linkgml($gkz, $rowf["gml_id"], "Flurst&uuml;ck");}
157                        echo "</td>";
158                        echo "\n\t<td class='fla'>".$flae."</td>";
159
160                        echo "\n\t<td><p class='nwlink noprint'>";
161                                echo "<a href='alkisfsnw.php?gkz=".$gkz."&amp;gmlid=".$rowf["gml_id"]."&amp;eig=n";
162                                        if ($idanzeige) {echo "&amp;id=j";}
163                                        if ($showkey)   {echo "&amp;showkey=j";}
164                                        echo "' title='Flurst&uuml;cksnachweis'>Flurst&uuml;ck ";
165                                        echo "<img src='ico/Flurstueck_Link.ico' width='16' height='16' alt=''>";
166                                echo "</a>";
167                        echo "</p></td>";
168                echo "\n</tr>";
169
170                $j++;
171        } // Ende Flurstueck
172        pg_free_result($resf);
173        return $j;
174}
175
176function eigentuemer($con, $gmlid, $mitadresse, $lnkclass) {
177        // Tabelle mit Eigentuemerdaten zu einem Grundbuchblatt ausgeben
178        // Sp.1 = Namennummer, Sp. 2 = Name / Adresse, Sp. 3 = Link
179        // Parameter:
180        //      $gmlid = ID des GB-Blattes
181        //      $mitadresse = Option (true/false) ob auch die Adresszeile ausgegeben werden soll
182        // Return = Anzahl Namensnummern
183
184        // Schleife 1: N a m e n s n u m m e r
185        // Beziehung: ax_namensnummer  >istBestandteilVon>  ax_buchungsblatt
186        global $debug, $gkz, $idanzeige, $showkey;
187
188        // Link ÃŒber Java-Class? (Ja in alkisinlayausk.php, sonst normal)
189        if ($lnkclass == "") {
190                $lnkvor = "";
191                $lnknach = "";
192        } else {
193                $lnkvor  = "javascript:".$lnkclass."(\"";
194                $lnknach = "\")";
195        } // Beispiel-Link href='javascript:imFenster(\"alkislage.php?gkz= ... ."\")'>xxx ";
196
197        $sqln="SELECT n.gml_id, n.laufendenummernachdin1421 AS lfd, n.zaehler, n.nenner, ";
198        $sqln.="n.artderrechtsgemeinschaft AS adr, n.beschriebderrechtsgemeinschaft as beschr, n.eigentuemerart, n.anlass ";
199        $sqln.="FROM ax_namensnummer n JOIN alkis_beziehungen b ON b.beziehung_von=n.gml_id ";
200        $sqln.="WHERE b.beziehung_zu= $1 AND b.beziehungsart='istBestandteilVon' ORDER BY laufendenummernachdin1421;";
201
202        $v = array($gmlid);
203        $resn = pg_prepare("", $sqln);
204        $resn = pg_execute("", $v);
205
206        if (!$resn) {
207                echo "<p class='err'>Fehler bei Eigent&uuml;mer</p>\n";
208                if ($debug > 2) {echo "<p class='err'>SQL=<br>".$sqln."<br>$1=gml= '".$gmlid."'</p>";}
209        }
210
211        echo "\n\n<table class='eig'>";
212        $n=0; // Z.NamNum.
213
214        while($rown = pg_fetch_array($resn)) {
215                $gmlnn=$rown["gml_id"];
216                echo "\n<tr>";
217                        echo "\n\t<td class='nanu' title='Namens-Nummer'>\n\t\t<p>"; // Sp. 1
218                                // VOR die Tabelle: "EigentÃŒmer"
219                                $namnum=kurz_namnr($rown["lfd"]);
220                                echo $namnum."&nbsp;";
221                                if ($idanzeige) {linkgml($gkz, $rown["gml_id"], "Namensnummer");}
222                        echo "</p>\n\t</td>";
223
224                        echo "\n\t<td>"; // Sp. 2
225                        $rechtsg=$rown["adr"];
226                        if ($rechtsg != "" ) {
227                                if ($rechtsg == 9999) { // sonstiges
228                                        echo "\n\t\t<p class='zus' title='Beschrieb der Rechtsgemeinschaft'>".htmlentities($rown["beschr"], ENT_QUOTES, "UTF-8")."</p>";
229                                } else {
230                                        echo "\n\t\t<p class='zus' title='Art der Rechtsgemeinschaft'>".htmlentities(rechtsgemeinschaft($rown["adr"]), ENT_QUOTES, "UTF-8")."</p>";
231                                }
232                        }
233                        //if ($rown["anlass"] > 0 ) {echo "<p>Anlass=".$rown["anlass"]."</p>";} // TEST:
234
235                        // Schleife Ebene 2: andere Namensnummern
236                        // Beziehung   ax_namensnummer >bestehtAusRechtsverhaeltnissenZu>  ax_namensnummer
237
238                        // Die Relation 'Namensnummer' besteht aus RechtsverhÀltnissen zu 'Namensnummer' sagt aus,
239                        // dass mehrere Namensnummern zu einer Rechtsgemeinschaft gehören können.
240                        // Die Rechtsgemeinschaft selbst steht unter einer eigenen AX_Namensnummer,
241                        // die zu allen Namensnummern der Rechtsgemeinschaft eine Relation besitzt.
242
243                        // Die Relation 'Namensnummer' hat VorgÀnger 'Namensnummer' gibt Auskunft darÃŒber,
244                        // aus welchen Namensnummern die aktuelle entstanden ist.
245
246                // Schleife 2: P e r s o n
247                // Beziehung: ax_person  <benennt<  ax_namensnummer
248                $sqlp ="SELECT p.gml_id, p.nachnameoderfirma, p.vorname, p.geburtsname, p.geburtsdatum, p.namensbestandteil, p.akademischergrad ";
249                $sqlp.="FROM ax_person p JOIN alkis_beziehungen v ON v.beziehung_zu=p.gml_id ";
250                $sqlp.="WHERE v.beziehung_von= $1 AND v.beziehungsart='benennt';";
251
252                $v = array($gmlnn);
253                $resp = pg_prepare("", $sqlp);
254                $resp = pg_execute("", $v);
255
256                if (!$resp) {
257                        echo "\n\t<p class='err'>Fehler bei Person</p>\n";
258                        if ($debug > 2) {echo "<p class='err'>SQL=<br>".$sqlp."<br>$1=gml= '".$gmlnn."'</p>";}
259                }
260
261                $i=0; // cnt Person
262                while($rowp = pg_fetch_array($resp)) {
263                        $diePerson="";
264                        if ($rowp["akademischergrad"] <> "") {$diePerson=$rowp["akademischergrad"]." ";}
265                        $diePerson.=$rowp["nachnameoderfirma"];
266                        if ($rowp["vorname"] <> "") {$diePerson.=", ".$rowp["vorname"];}
267                        if ($rowp["namensbestandteil"] <> "") {$diePerson.=". ".$rowp["namensbestandteil"];}
268                        if ($rowp["geburtsdatum"] <> "") {$diePerson.=", geb. ".$rowp["geburtsdatum"];}
269                        if ($rowp["geburtsname"] <> "") {$diePerson.=", geb. ".$rowp["geburtsname"];}
270                        $diePerson=htmlentities($diePerson, ENT_QUOTES, "UTF-8"); // Umlaute
271
272                        // Spalte 1 enthÀlt die Namensnummer, nur in Zeile 0
273                        if ($i > 0) {
274                                echo "\n<tr>\n\t<td>&nbsp;</td>\n\t<td>";
275                        }
276                        // Spalte 2 = Angaben
277                        $eiartkey=$rown["eigentuemerart"];
278                        $eiart=eigentuemerart($eiartkey);
279                        echo "\n\t\t<p class='geig' title='Eigent&uuml;merart: ".$eiart."'>".$diePerson."</p>\n\t</td>";
280
281                        // Spalte 3 = Link
282                        echo "\n\t<td>\n\t\t<p class='nwlink noprint'>";
283                                if ($idanzeige) {linkgml($gkz, $rowp["gml_id"], "Person"); echo "&nbsp";}
284                                if ($showkey) {echo "<span class='key'>(".$eiartkey.")</span> ";}
285                                echo "\n\t\t<a href='".$lnkvor."alkisnamstruk.php?gkz=".$gkz."&amp;gmlid=".$rowp[0];
286                                if ($idanzeige) {echo "&amp;id=j";}
287                                if ($showkey)   {echo "&amp;showkey=j";}
288                                echo $lnknach."' title='vollst&auml;ndiger Name und Adresse eines Eigent&uuml;mers'>".$eiart;
289                                echo " <img src='ico/Eigentuemer.ico' width='16' height='16' alt=''></a>\n\t\t</p>";
290                        echo "\n\t</td>\n</tr>";
291
292                        if ($mitadresse) {
293                                // Schleife 3:  A d r e s s e  (OPTIONAL)
294                                $sqla ="SELECT a.gml_id, a.ort_post, a.postleitzahlpostzustellung AS plz, a.strasse, a.hausnummer, a.bestimmungsland ";
295                                $sqla.="FROM ax_anschrift a JOIN alkis_beziehungen b ON a.gml_id=b.beziehung_zu ";
296                                $sqla.="WHERE b.beziehung_von= $1 AND b.beziehungsart='hat';"; // ORDER?
297                                $gmlp=$rowp["gml_id"]; // Person
298                                $v = array($gmlp);
299                                $resa = pg_prepare("", $sqla);
300                                $resa = pg_execute("", $v);
301                                if (!$resa) {
302                                        echo "\n\t<p class='err'>Fehler bei Adressen</p>\n";
303                                        if ($debug > 2) {echo "<p class='err'>SQL=<br>".$sqla."<br>$1=gml= '".$gmlp."'</p>";}
304                                }
305                                $j=0;
306                                while($rowa = pg_fetch_array($resa)) {
307                                        $gmla=$rowa["gml_id"];
308                                        $plz=$rowa["plz"]; // integer
309                                        if($plz == 0) {
310                                                $plz="";
311                                        } else {
312                                                $plz=str_pad($plz, 5, "0", STR_PAD_LEFT);
313                                        }
314                                        $ort=htmlentities($rowa["ort_post"], ENT_QUOTES, "UTF-8");
315                                        $str=htmlentities($rowa["strasse"], ENT_QUOTES, "UTF-8");
316                                        $hsnr=$rowa["hausnummer"];
317                                        $land=htmlentities($rowa["bestimmungsland"], ENT_QUOTES, "UTF-8");
318
319                                        echo "\n<tr>\n\t<td>&nbsp;</td>"; // Spalte 1
320                                        echo "\n\t<td><p class='gadr'>"; //Spalte 2
321                                        if ($str.$hsnr != "") {
322                                                echo $str." ".$hsnr."<br>";
323                                        }
324                                        if ($plz.$ort != "") {
325                                                echo $plz." ".$ort;
326                                        }
327                                        if ($land != "" and $land != "DEUTSCHLAND") {
328                                                echo ", ".$land;
329                                        }
330                                        echo "</p></td>";
331                                        echo "\n\t<td>"; // Spalte 3
332                                        if ($idanzeige) {
333                                                echo "<p class='nwlink noprint'>";
334                                                linkgml($gkz, $gmla, "Adresse");
335                                                echo "</p>";
336                                        } else {
337                                                echo "&nbsp;";
338                                        }
339                                        echo "</td>\n</tr>";
340                                        $j++;
341                                }
342                                pg_free_result($resa);
343                        } // End if
344
345                        // 'keine Adresse' kann vorkommen, z.B. "Deutsche Telekom AG"
346                        $i++; // cnt Person
347                        // als eigene Tab-Zeile?
348                        // 'Anteil' ist der Anteil der Berechtigten in Bruchteilen (Par. 47 GBO) an einem gemeinschaftlichen Eigentum (GrundstÃŒck oder Recht).
349                        if ($rown["zaehler"] != "") {
350                                echo "\n<tr>\n\t<td>&nbsp;</td>"; // Sp. 1
351                                echo "\n\t<td><p class='avh' title='Anteil'>".$rown["zaehler"]."/".$rown["nenner"]." Anteil</p></td>";
352                                echo "\n\t<td>&nbsp;</td>\n</tr>"; // Sp. 3
353                        }
354                } // End Loop Person
355                if ($i == 0) { // kommt vor hinter Zeile Erbengemeinschaft, dann kein Fehler
356                        if ($debug > 0) {
357                                echo "\n<p class='dbg'>Rechtsgemeinschaft = '".$rechtsg."'</p>";
358                                if ($rechtsg != 9999) {
359                                        echo "\n<p class='dbg'>Keine Person zur Namensnummer ".$namnum."</p>";
360                                }
361                                //if ($debug > 2) {echo "\n<p class='dbg'>SQL=<br>".$sqlp."<br>$1=gml(NamNum)= '".$gmlnn."'</p>";}
362                        }
363                        echo "</td>\n\t<td>&nbsp;</td>\n<tr>";
364                }
365                $n++; // cnt NamNum
366        } // End Loop NamNum
367        echo "\n</table>\n";
368        if ($n == 0) {
369                if ($debug > 0) {echo "<p class='dbg'>keine Namensnummern zum Blatt</p>";}
370                if ($debug > 2) {echo "<p class='dbg'>Namensnummern: SQL=<br>".$sqln."<br>$1=gml(Blatt)= '".$gmlid."'</p>";}
371        }
372        pg_free_result($resn);
373        return $n;
374} // End Function eigentuemer
375
376// **  Functions  zum   E n t s c h l u e s s e l n  **
377
378// Entschluesslung ax_person.anrede
379function anrede($key) {
380        switch ($key) {
381                case 1000: $wert = "Frau"; break;
382                case 2000: $wert = "Herr"; break;
383                case 3000: $wert = "Firma"; break;
384                default:   $wert = ""; break;
385        }
386        return $wert;
387}
388
389// Entschluesslung AX_Namensnummer.artDerRechtsgemeinschaft
390function rechtsgemeinschaft($key) {
391        switch ($key) {
392                case 1000: $wert = "Erbengemeinschaft"; break;
393                case 2000: $wert = "GÃŒtergemeinschaft"; break;
394                case 3000: $wert = "BGB-Gesellschaft"; break;
395                case 9999: $wert = "Sonstiges"; break;  // dann: beschriebDerRechtsgemeinschaft
396                default:   $wert = ""; break;
397        }
398        return $wert;
399}
400
401// Entschluesslung AX_Namensnummer.eigentuemerart
402function 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 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.
408        global $debug;
409        switch ($key) {
410                case 1000: $wert = "Nat&uuml;rliche Person"; break; // singular fuer Link-Text
411                case 2000: $wert = "Juristische Person"; break; // singl.
412                case 3000: $wert = "Körperschaft"; break; // singl.
413                case 4000: $wert = "Kirchliches Eigentum"; break;
414                case 4100: $wert = "Evangelische Kirche"; break;
415                case 4200: $wert = "Katholische Kirche"; break;
416                case 5100: $wert = "Bundesrepublik Deutschland"; break;
417                case 5400: $wert = "Kreis"; break;
418                case 5500: $wert = "Gemeinde"; break;
419                case 5920: $wert = "Land"; break; // "Eigenes Bundesland"
420                case "":   $wert = "Person"; break; // falls (noch) nicht gefuellt
421                default: // Datenbank-Abfrage
422                        $sql="SELECT bezeichner FROM ax_namensnummer_eigentuemerart WHERE wert= $1 ;";
423                        $v=array($key);
424                        $res=pg_prepare("", $sql);
425                        $res=pg_execute("", $v);
426                        if ($res) {
427                                $row=pg_fetch_array($res);
428                                $wert=htmlentities($row["bezeichner"], ENT_QUOTES, "UTF-8");
429                                if ($wert == "") {$wert="** Eigent&uuml;merart '".$key."' nicht gefunden **";}
430                        } else {
431                                echo "\n\t<p class='err'>Fehler bei DB-Zugriff auf EigentÃŒmerart.</p>\n";
432                                $wert="** Unbekannte Eigent&uuml;merart '".$key."' **";
433                        }
434                        pg_free_result($res);
435                        break;
436        }
437        return $wert;
438}
439
440// Entschluesslung ax_buchungsblatt.blattart
441function blattart($key) {
442        switch ($key) {
443                case 1000: $wert = "Grundbuchblatt"; break;
444                // Ein Grundbuchblatt ist ein Buchungsblatt, das die Buchung im Grundbuch enthÀlt.
445                case 2000: $wert = "Katasterblatt"; break;
446                // Ein Katasterblatt ist ein Buchungsblatt, das die Buchung im Liegenschaftskataster enthÀlt.
447                case 3000: $wert = "Pseudoblatt"; break;
448                // Ein Pseudoblatt ist ein Buchungsblatt, das die Buchung, die bereits vor Eintrag im Grundbuch Rechtskraft erlangt hat, enthÀlt
449                // (z.B. Übernahme von Flurbereinigungsverfahren, Umlegungsverfahren).
450                case 5000: $wert = "Fiktives Blatt"; break;
451                // Das fiktive Blatt enthÀlt die aufgeteilten GrundstÃŒcke und Rechte als Ganzes.
452                // Es bildet um die Miteigentumsanteile eine fachliche Klammer.
453                default: $wert = "** Unbekannter Wert '".$key."'"; break;
454        }
455        return $wert;
456}
457// Entschluesslung ax_dienststelle.stellenart
458function dienststellenart($key) {
459        switch ($key) {
460                case 1000: $wert = "Grundbuchamt"; break;
461                case 1100: $wert = "Katasteramt"; break;
462                case 1200: $wert = "Finanzamt"; break;
463                case 1300: $wert = "Flurbereinigungsbeh&ouml;rde"; break;
464                case 1400: $wert = "Forstamt"; break;
465                case 1500: $wert = "Wasserwirtschaftsamt"; break;
466                case 1600: $wert = "Straßenbauamt"; break;
467                case 1700: $wert = "Gemeindeamt"; break;
468                case 1900: $wert = "Kreis- oder Stadtverwaltung"; break;
469                case 2000: $wert = "Wasser- und Bodenverband"; break;
470                case 2100: $wert = "Umlegungsstelle"; break;
471                case 2200: $wert = "Landesvermessungsverwaltung"; break;
472                case 2300: $wert = "&Ouml;bVI"; break;
473                case 2400: $wert = "Bundeseisenbahnverm&ouml;gen"; break;
474                case 2500: $wert = "Landwirtschaftskammer"; break;
475                default: $wert = "** Unbekannter Wert '".$key."'"; break;
476        }
477        return $wert;
478}
479?>
Note: See TracBrowser for help on using the repository browser.