Adresse ohne Leerstellen

Adressdaten sind oft inkonsistent. Entweder es gibt nur eine Firma oder eine Person, mal gibt es beides, mal finden Sie statt der Straße ein Postfach vor, und auch die Postleitzahlen sind nicht immer vollständig. Das führt bei statisch angelegten Adressfeldern in Berichten oft zu unschönen Lücken. Abhilfe schafft ein einziges, vergrößerbares Textfeld mit sinnvoll zusammengewürfelten Funktionen.

Beispieldatenbank

Die Beispieldatenbank verwendet die Tabelle Kunden aus der Nordwind-Datenbank. Der Bericht rptAdressen enthält das passende Beispiel.

Bericht anpassen

Um das Beispiel nachzuvollziehen, legen Sie einfach einen neuen Bericht an und öffnen ihn in der Entwurfsansicht. Stellen Sie die Datenherkunft des Berichtes auf die Tabelle Kunden ein.

Legen Sie dann im Detailbereich ein einzeiliges Textfeld namens txtAdresse an und stellen Sie seine Eigenschaft Vergrößerbar auf den Wert Ja ein.

Fügen Sie dann der Eigenschaft Steuerelementinhalt den folgenden Ausdruck hinzu:

=Wenn(IstNull([Firma]);"";[Firma] & Zchn(13) & Zchn(10))

& Wenn(IstNull([Kontaktperson]);"";[Kontaktperson] & Zchn(13) & Zchn(10))

& Wenn(IstNull([Strasse]);"";[Strasse] & Zchn(13) & Zchn(10))

& Wenn(IstNull([PLZ]);"";[plz] & " ") & [Ort]

& Wenn(Nicht IstNull([PLZ]) Und Nicht IstNull([Ort]);Zchn(13) & Zchn(10))

Der Ausdruck überprüft nacheinander, ob die entsprechenden Felder einen Eintrag enthalten oder nicht. Falls nicht, wird die resultierende Zeichenfolge einfach um eine leere Zeichenkette ergänzt, was sich in diesem Fall nicht auswirkt. Falls ja, wird die Zeichenkette um den entsprechenden Ausdruck, also zum Beispiel den Firmennamen ergänzt. Zusätzlich kommt die Zeichenfolge Chr(13) & Chr(10) hinzu, die einen Zeilenumbruch bewirkt.

Im Fall der PLZ und des Ortes überprüft der Ausdruck außerdem, ob einer der beiden Einträge vorhanden ist und lässt, falls beide leer sind, die komplette Zeile weg.

Sie können den Steuerelementinhalt auf beliebige Adressvarianten anpassen.