Ersetzen Großbuchstaben und Leerzeichen

23. August 2016 13:48

Hallo,

im Feld Ort der Tabelle Kontakt habe ich Einträge,
- die nur aus Großbuchstaben bestehen
- und am Ende Leerzeichen haben.

Wer hat einen Tip wie man z.B. aus "BAD BIRNBACH " als Ergebnis "Bad Birnbach" erhält.
D.h. der erste Buchstabe eines Wortes als Großbuchstabe, der Rest des Wortes in Klienbuchstaben und
alle Leerzeichen nach dem letzten Buchstaben löschen

Vielen Dank im Voraus
Viele Grüße
Harry

Re: Ersetzen Großbuchstaben und Leerzeichen

23. August 2016 13:54

Leerzeichen am Ende löschen:
if copstr(Ort,strlen(Ort)-1,1) = ' ' then Ort := copystr(Ort,1,strlen(Ort)-1);

Für das Großbuchstabenproblem gibt es die LOWERCASE Funktion, schau mal in der Hilfe für C/AL / Entwicklungsumgebung nach.

Dazu müsstest du eine entsprechende LIzenz haben die es zulässt eine Codeunit oder einen Report zu programmieren die/der den Job übernimmt.

Re: Ersetzen Großbuchstaben und Leerzeichen

23. August 2016 14:04

Leer- und andere Zeichen löschen geht auch direkt über DELCHR.
Leerzeichen hinten entfernen:
Code:
NewString := DELCHR(String,'>');


Ansonsten den String (ggf. nach und nach) bei den Leerzeichen zerlegen, von vorne mit STRPOS(String,' ') oder auch von hinten und nach der LOWERCASE-Anwendung wieder zusammensetzen.