"WIL" als Kürzel für "Ralf Weiß"? Wie wäre die dahinterstehende Systematik?

Na ja, du wolltest - Zitat: "[...] aus dem Vor&Nachname ein kürzel erstellen". Aber bitte - wenn's egal ist ...

Na ja, die einfachste Möglichkeit für Kürzel aus Ralf Weiß wäre natürlich RW. Diese kann man mit der Formel:

---

first(split(Vorname, "")) + first(split(Nachname, ""))

---

realisieren. Die Anderen Sachen wie WIL oder RLW setzen auf  irgendwelche Regeln, die kein Programm kennt.

Leo 

Es kommt drauf an welche 2-3 Buchstaben du nehmen möchtest. Die Ersten zwei aus Vorname  und eine aus Nachname wäre:

upper(substr(Vorname,0,2)+substr(Nachname,0,1));

---

wenn du nur Konsonanten Benutzen möchtest kannst du die Vokale aus dem Namen entfernen zb so:

upper(replacex(lower(Text), "[aeyiuoöäö]", ""))

und dann mit substr die notwendigen Buchstaben nehmen. Problem ist es dabei bei Ralf sind es RL - was ist mei Emanuel? - MN? Wen du mir die Regeln erklärst kann ich dir dann auch die exakte formel liefern.

Leo

Ich würde es als Formel für einen Button machen:

---

let myArr:=[upper(substr(Vorname,0,1)+substr(Nachname,0,1)), upper(substr(Vorname,0,2)+substr(Nachname,0,1)), upper(substr(Vorname,0,1)+substr(Nachname,0,2)), upper(substr(Vorname,0,2)+substr(Nachname,0,2)) ]];
myArr:=for i in myArr do
if  cnt(select DEINETABELLE where 'KÜRZEL'=i)=0 then i
end
end;
let myDialog ("Kürzel vergeben","Für "+Vorname+" "+Nachname sind volgende Kürzel verfügbar, myArr);
for i in myArr do
if i=myDialog then 
'KÜRZEL':=i
end
end

---

Habe die Formel nicht geprüft aber es sollte so funktionieren:

1. es werden aus Ralf Weiß volgende Kürzel generiert [RW,RAW,RWE,RAWE]
2. die Kürzel werden einzeln auf duplikate geprüft und die Duplikate aus dem Array entfernt
3. es wird ein Popupfenster angezeigt: Angenommen RW existiert bereits

Kürzel vergeben

Für Ralf Weiß sind volgende Kürzel verfügbar

[RAW] [RWE] [RAWE]

4. Nach dem Klick auf entsprechenden Kürzel wird dieser in das Feld KÜRZEL geschrieben.

Leo

if Vorname and Nachname then
let myArr := [upper(substr(Vorname, 0, 1) + substr(Nachname, 0, 1)), upper(substr(Vorname, 0, 2) + substr(Nachname, 0, 1)), upper(substr(Vorname, 0, 1) + substr(Nachname, 0, 2)), upper(substr(Vorname, 0, 2) + substr(Nachname, 0, 2))];
myArr := for i in myArr do
if cnt(select 'Kürzel Liste' where 'Kürzel' = i) = 0 then
i
end
end;
let myDialog := dialog("Kürzel vergeben", "Für " + Vorname + " " + Nachname + " sind volgende Kürzel verfügbar: ", myArr);
for i in myArr do
if i = myDialog then 'Kürzel' := i end
end
else
alert("Vorname und Nachname müssen ausgefüllt werden")
end