Ignore:
Timestamp:
12/20/17 16:57:07 (6 years ago)
Author:
frank.jaeger
Message:

Feinkorrekturen an der Buchauskunft, Title von Links, "jüngste" Adresse zur Person.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/info/info/alkisn/alkisnamstruk.php

    r391 r398  
    1111        2017-10-09 Sauber filtern auf endet IS NULL 
    1212        2017-10-17 Deutsches Datumsformat im Geburtsdatum 
     13        2017-12-20 Anlass und Datum zur Adresse ausgeben, wenn es mehrere gibt oder SchlÃŒssel angefordert werden 
    1314*/ 
    1415session_start(); 
     
    8788 
    8889        // A d r e s s e 
    89         echo "\n\n<h3><img src='ico/Strasse_mit_Haus.png' width='16' height='16' alt=''> Adresse</h3>"; 
    90         // Es können redundante Adressen vorhanden sein, z.B. aus Migration, temporÀr aus LBESAS. Die letzte davon anzeigen. 
    91  
    92         $sqla ="SELECT a.gml_id, a.ort_post, a.postleitzahlpostzustellung AS plz, a.strasse, a.hausnummer, a.bestimmungsland  
    93         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 ;"; 
     90        if ($multiadress == "j") {$plural="n";} else {$plural="";} 
     91        echo "\n\n<h3><img src='ico/Strasse_mit_Haus.png' width='16' height='16' alt=''> Adresse".$plural."</h3>"; 
     92        // Es können redundante Adressen vorhanden sein, z.B. aus Migration, temporÀr aus LBESAS. 
     93        // Im Normalfall nur die "letzte" davon anzeigen. Auf Wunsch alle anzigen, dazu den Anlass und das Datum. 
     94 
     95        $sqla ="SELECT a.gml_id, w.v 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 " 
     96        ."FROM ax_anschrift a JOIN ax_person p ON a.gml_id=ANY(p.hat) " 
     97        ."LEFT JOIN alkis_wertearten w ON w.k = ANY(a.anlass) AND element='ax_benutzergruppemitzugriffskontrolle' AND w.bezeichnung='zugriffsartfortfuehrungsanlass' " 
     98        ."WHERE p.gml_id= $1 AND a.endet IS NULL AND p.endet IS NULL ORDER BY a.beginnt DESC ;"; 
    9499 
    95100        $v = array($gmlid); 
     
    112117                        $hsnr=$rowa["hausnummer"]; 
    113118                        $land=htmlentities($rowa["bestimmungsland"], ENT_QUOTES, "UTF-8"); 
    114                         echo "<table>\n" 
    115                                 ."\t<tr><td class='nhd'>PLZ:</td><td class='nam'>".$plz."</td></tr>\n" 
     119                        $anlass=trim($rowa["anlass"], "{}"); // Key 
     120                        $anltxt=$rowa["anltxt"]; // Value 
     121                        $datum=$rowa["datum"]; 
     122                        echo "<table>\n"; 
     123                                if ($multiadress == "j" OR $showkey) { 
     124                                        if ($debug > 0) { // nur Entw.: Sortierung gml_id vs. beginnt? 
     125                                                echo "\t<tr><td class='dbg'>gml_id:</td><td class='dbg'>".$rowa["gml_id"]."</td></tr>\n"; 
     126                                        } 
     127                                        echo "\t<tr><td class='nhd'>Datum:</td><td class='nam'>".$datum."</td></tr>\n" 
     128                                        ."\t<tr><td class='nhd'>Anlass:</td><td class='nam'>"; 
     129                                        if ($showkey) {echo "<span class='key'>".$anlass."</span> ";} 
     130                                        echo $anltxt."</td></tr>\n"; 
     131                                } 
     132                                echo "\t<tr><td class='nhd'>PLZ:</td><td class='nam'>".$plz."</td></tr>\n" 
    116133                                ."\t<tr><td class='nhd'>Ort:</td><td class='nam'>".$ort."</td></tr>\n" 
    117134                                ."\t<tr><td class='nhd'>Strasse:</td><td class='nam'>".$str."</td></tr>\n" 
Note: See TracChangeset for help on using the changeset viewer.