ALKIS Name id=".$gmlid." \n"
."\n
Person
";
$con = pg_connect($dbconn." options='--application_name=ALKIS-Auskunft_alkisnamstruk.php'");
if (!$con) "\nFehler beim Verbinden der DB
";
$sql="SELECT p.nachnameoderfirma, p.anrede, p.vorname, p.geburtsname, p.geburtsdatum, p.namensbestandteil, p.akademischergrad, a.v AS anrv
FROM ax_person p LEFT JOIN alkis_wertearten a ON cast(p.anrede AS character varying)=a.k AND a.element='ax_person' AND a.bezeichnung='anrede'
WHERE gml_id= $1 AND p.endet IS NULL;";
$v = array($gmlid);
$res = pg_prepare("", $sql);
$res = pg_execute("", $v);
if (!$res) {
echo "\nFehler bei Zugriff auf Namensnummer
";
if ($debug > 2) {echo "\nSQL=
".htmlentities($sql, ENT_QUOTES, "UTF-8")."
$1 = gml_id = '".$gmlid."'
";}
}
if ($row = pg_fetch_array($res)) {
$vor=htmlentities($row["vorname"], ENT_QUOTES, "UTF-8");
$nam=htmlentities($row["nachnameoderfirma"], ENT_QUOTES, "UTF-8");
$geb=htmlentities($row["geburtsname"], ENT_QUOTES, "UTF-8");
$anrk=$row["anrede"]; // Key
$anr=$row["anrv"]; // Value
$nbest=htmlentities($row["namensbestandteil"], ENT_QUOTES, "UTF-8");
$aka=htmlentities($row["akademischergrad"], ENT_QUOTES, "UTF-8");
echo ""
."\n\t| Anrede: | ";
if ($showkey) {echo "(".$anrk.") ";}
echo $anr." |
"
."\n\t| Nachname oder Firma: | ".$nam." |
"
."\n\t| Vorname: | ".$vor." |
"
."\n\t| Geburtsname: | ".$geb." |
"
."\n\t| Geburtsdatum: | ".$row["geburtsdatum"]." |
"
."\n\t| Namensbestandteil: | ".$nbest." |
"
."\n\t| akademischer Grad: | ".$aka." |
"
."\n
\n
";
// A d r e s s e
echo "\n\n
Adresse
";
// Es können redundante Adressen vorhanden sein, z.B. aus Migration, temporär aus LBESAS. Die letzte davon anzeigen.
$sqla ="SELECT a.gml_id, 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) WHERE p.gml_id= $1 AND a.endet IS NULL AND p.endet IS NULL ORDER BY a.gml_id DESC ;";
$v = array($gmlid);
$resa = pg_prepare("", $sqla);
$resa = pg_execute("", $v);
if (!$resa) {
echo "\nFehler bei Adressen
";
if ($debug > 2) {echo "\nSQL=
".$sqla."
$1=gml(Person)= '".$gmlid."'
";}
}
$j=0;
// Parameter $multiadress = j zeigt ALLE Adressen an
while($rowa = pg_fetch_array($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");
echo "\n"
."\t| PLZ: | ".$plz." |
\n"
."\t| Ort: | ".$ort." |
\n"
."\t| Strasse: | ".$str." |
\n"
."\t| Hausnummer: | ".$hsnr." |
\n"
."\t| Land: | ".$land." |
\n"
."\n
\n
";
// Name und Adresse Kompakt (im Rahmen) - Alles was man fuer ein Anschreiben braucht
echo "\n
"
."\n\n\t".$anr." ".$aka." ".$vor." ".$nbest." ".$nam."
"
."\n\t".$str." ".$hsnr."
"
."\n\t".$plz." ".$ort."\n
";
}
}
pg_free_result($resa);
if ($j == 0) {
echo "\nKeine Adressen.
";
} elseif ($j > 1) {
echo "\n\t\t"
."\n\t\t\terste Adresse ";
} else {
echo "&multiadress=j' title='Adressen ggf. mehrfach vorhanden'>alle Adressen ";
}
echo "\n\t\t\t"
."\n\t\t
";
}
// *** G R U N D B U C H ***
echo "\n
\n
Grundbücher
";
// person istBestandteilVon> Buchungsblatt
// >bestehtAusRechtsverhaeltnissenZu> namensnummer (Nebenzweig/Sonderfälle?)
$sqlg ="SELECT n.gml_id AS gml_n, n.laufendenummernachdin1421 AS lfd, n.zaehler, n.nenner, g.gml_id AS gml_g, g.bezirk, g.buchungsblattnummermitbuchstabenerweiterung as nr, g.blattart, wb.v AS blattartv, b.bezeichnung AS beznam "
."FROM ax_person p JOIN ax_namensnummer n ON p.gml_id=n.benennt "
."JOIN ax_buchungsblatt g ON g.gml_id=n.istbestandteilvon "
."LEFT JOIN ax_buchungsblattbezirk b ON g.land=b.land AND g.bezirk=b.bezirk "
."LEFT JOIN alkis_wertearten wb ON cast(g.blattart AS character varying)=wb.k AND wb.element='ax_buchungsblatt' AND wb.bezeichnung='blattart' "
."WHERE p.gml_id= $1 AND p.endet IS NULL AND n.endet IS NULL AND b.endet IS NULL "
."ORDER BY b.bezeichnung, g.buchungsblattnummermitbuchstabenerweiterung, n.laufendenummernachdin1421;";
// buchungsblatt... mal mit und mal ohne fuehrende Nullen, bringt die Sortierung durcheinander
$v = array($gmlid);
$resg = pg_prepare("", $sqlg);
$resg = pg_execute("", $v);
if (!$resg) {
echo "\nFehler bei Grundbuch
";
if ($debug > 2) {
echo "\nSQL=
".htmlentities($sqlg, ENT_QUOTES, "UTF-8")."
$1 = gml_id = '".$gmlid."'
";
}
}
echo "";
if ($i == 0) {echo "\nKein Grundbuch.
";}
} else {
echo "\n\tFehler! Kein Treffer für\n\t".$gmlid."\n
\n\n";
}
?>
