'); } $dbg=$debug; if ($nodebug === "j") {$dbg=0;} echo "
ALKIS Name id=".$gmlid."
\n" ."\n
"; $con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisnamstruk.php'"); if (!$con) "\n
Fehler beim Verbinden der DB
"; $sql="SELECT p.nachnameoderfirma, p.anrede, coalesce(p.vorname, '') AS vorn, coalesce(p.geburtsname, '') AS geburts, to_char(cast(p.geburtsdatum AS date),'DD.MM.YYYY') AS geburtsdatum, coalesce(p.namensbestandteil, '') AS nbest, coalesce(p.akademischergrad, '') AS aka, a.beschreibung AS anrv FROM ax_person p LEFT JOIN ax_anrede_person a ON p.anrede = a.wert WHERE gml_id= $1 AND p.endet IS NULL;"; $v = array($gmlid); $res = pg_prepare($con, "", $sql); $res = pg_execute($con, "", $v); if (!$res) { echo "\n
Fehler bei Zugriff auf Namensnummer
"; if ($dbg > 2) {echo "\n
SQL=
".htmlentities(str_replace("$1", "'".$gmlid."'", $sql), ENT_QUOTES, "UTF-8")."
";} } if ($dbg > 0) { $zeianz=pg_num_rows($res); if ($zeianz > 1){ echo "\n
Die Abfrage liefert mehr als eine Person!
"; if ($dbg > 2) {echo "\n
SQL=
".htmlentities(str_replace("$1","'".$gmlid."'",$sql), ENT_QUOTES, "UTF-8")."
";} } } if ($row = pg_fetch_assoc($res)) { $vor=htmlentities($row["vorn"], ENT_QUOTES, "UTF-8"); $nam=htmlentities($row["nachnameoderfirma"], ENT_QUOTES, "UTF-8"); $geb=htmlentities($row["geburts"], ENT_QUOTES, "UTF-8"); $anrk=$row["anrede"]; // Key $anr=$row["anrv"]; // Value $nbest=htmlentities($row["nbest"], ENT_QUOTES, "UTF-8"); $aka=htmlentities($row["aka"], ENT_QUOTES, "UTF-8"); echo "
Anrede: | ".DsKy($anrk, '* der Anrede-Kennung').$anr." |
Nachname oder Firma: | ".$nam." |
Vorname: | ".$vor." |
Geburtsname: | ".$geb." |
Geburtsdatum: | ".$row["geburtsdatum"]." |
Namensbestandteil: | ".$nbest." |
akademischer Grad: | ".$aka." |
\n
"; // A d r e s s e if ($multiadress === "j") {$plural="n";} else {$plural="";} echo "\n\n
"; // Es können redundante Adressen vorhanden sein, z.B. aus Migration, temporär aus LBESAS. // Im Normalfall nur die "letzte" davon anzeigen. Auf Wunsch alle anzeigen, dazu den Anlass und das Datum um das zu bewerten. $sqla ="SELECT a.gml_id, w.value AS anltxt, a.anlass, to_char(cast(a.beginnt AS date),'DD.MM.YYYY') AS datum, a.ort_post, a.postleitzahlpostzustellung AS plz, a.strasse, a.hausnummer, a.bestimmungsland " ."FROM ax_anschrift a JOIN ax_person p ON a.gml_id=ANY(p.hat) " ."LEFT JOIN aa_anlassart w ON w.id = ANY(a.anlass) " ."WHERE p.gml_id= $1 AND a.endet IS NULL AND p.endet IS NULL ORDER BY a.beginnt DESC ;"; $v = array($gmlid); $resa = pg_prepare($con, "", $sqla); $resa = pg_execute($con, "", $v); if (!$resa) { echo "\n
Fehler bei Adressen
"; if ($dbg > 2) {echo "\n
SQL=
". str_replace("$1", "'".$gmlid."'", $sqla)."
";} } $j=0; // Parameter $multiadress = j zeigt ALLE Adressen an while($rowa = pg_fetch_assoc($resa)) { $j++; if ($multiadress === "j" OR $j === 1) { $gmla=$rowa["gml_id"]; $plz=$rowa["plz"]; $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"); $anlass=trim($rowa["anlass"], "{}"); // Key $anltxt=$rowa["anltxt"]; // Value $datum=$rowa["datum"]; echo "
gml_id: | ".$rowa["gml_id"]." |
Datum: | ".$datum." |
Anlass: | ".DsKy($anlass, 'Anlass-*').$anltxt." |
PLZ: | ".$plz." |
Ort: | ".$ort." |
Strasse: | ".$str." |
Hausnummer: | ".$hsnr." |
Land: | ".$land." |
\n
";
// Name und Adresse Kompakt (im Rahmen) - Alles was man für ein Anschreiben braucht
echo "\n"
."\n
"; } } pg_free_result($resa); if ($j === 0) { echo "\n
Keine Adressen.
"; } elseif ($j > 1) { echo "\n\t\t
"; } // G R U N D B U C H echo "\n
\n
";
// person Fehler bei Grundbuch SQL= Kein Grundbuch. Fehler! Kein Treffer für Person".$gmlid."
".htmlentities(str_replace("$1", "'".$gmlid."'", $sqlg ), ENT_QUOTES, "UTF-8").""
."\n
";
if ($i === 0) {echo "\n"
."\n\t ";
$i=0;
$zpaar=false;
$gwbeznam='';
while($rowg = pg_fetch_assoc($resg)) {
$gmln=$rowg["gml_n"];
$gmlg=$rowg["gml_g"];
$namnum=kurz_namnr($rowg["lfd"]);
$zae=$rowg["zaehler"];
$blattkey=$rowg["blattart"]; // Key
$blattart=$rowg["blattartv"]; // Value
if ($zpaar) {$trclass='paa';} else {$trclass='unp';}
$beznam=$rowg["beznam"];
$zpaar=!$zpaar;
echo "\nBezirk "
."\n\tBlattart "
."\n\tBlatt "
."\n\tNamensnummer "
."\n\tAnteil "
."\n\t "
."\n"
."\n\t ";
// +++ >bestehtAusRechtsverhaeltnissenZu> namensnummer ?
// z.B. eine Namennummer "Erbengemeinschaft" zeigt auf Namensnummern mit Eigentümern
$i++;
}
pg_free_result($resg);
echo "".DsKy($rowg["bezirk"], 'Grundbuch-Bezirks-*');
if ($gwbeznam != $beznam){
echo "".$beznam."";
$gwbeznam=$beznam;
} else {
echo $beznam;
}
echo " ";
echo "\n\t".DsKy($blattkey, 'Blattart-*').$blattart." ";
echo "\n\t".$rowg["nr"]." ";// Blatt
echo "\n\t"; // Namensnummer
if ($namnum == "") {
echo " ";
} else {
echo $namnum;
}
echo " ";
echo "\n\t"; // Anteil
if ($zae == '') {
echo " ";
} else {
echo $zae."/".$rowg["nenner"]." Anteil";
}
echo " "
."\n\t"
."\n\t\t "
."\n "
."\n\t