View Full Version : Zahlen in Worte
Da man ja nicht immer alles neu programmieren muß hier mal eine Anfrage:
Hat jemand ein Programm/Routine mit der ich eine Zahl in ein Wort umsetzen kann ?
Also z.B.
1397 = Eintausenddreihundertsiebenundneunzig
Ich brauche dies für die französischen Zahlen !
Hallo,
unter folgendem Link ist die Quelle für ein RPG-Service-Programm zu finden.
Zwar werden die Ziffern in englische Zahlen umgesetzt, müsste aber für Deutsch leicht umgesetzt werden können.
Convert Numbers to Words (http://www.iseriesnetwork.com/artarchive/index.cfm?fuseaction=viewarticle&CO_ContentID=10583&channel=art&subart=issue&issueid=476)
Birgitta
Entschuldige bitte, aber ich brauche dies für französisch !
Dies ist ungleich komplizierter, da die französischen Zahlen zusammengesetzt werden:
80 = vier mal zwanzig
90 = vier mal zwanzig und zehn
97 = vier mal zwanzig und zehn und sieben
usw. usw.
PS: Ja ok, jede Kombination einzeln aufführen, dann gehts.
Danke
Hallo,
entschuldige, aber auch französiche Zahlen unterliegen ähnlichen Regeln wie deutsche oder englische.
In dem angegebenen Beispiel Programm sind die Zahlen 1-99 in einer Tabelle hinterlegt.
Also kann man doch statt ninety-nine ganz einfach quatre vingt dixneuf schreiben oder?
Kein Mensch rechnet französiche Zahlen!
Birgitta
tja, ich muss eben Rechnungen in Tunesien drucken. Dort muss der Rechnungsendbetrag in französischen Worten ausgeschrieben werden. (Neben dem Problem, dass die Währung Dinar dort 3 Nachkommastellen hat).
Ich werde diese Routine, leicht geändert für spezielle Werte, verwenden.
Im deutschen gibts ja auch die Sonderregel:
1 = Eins
100 = Einhundert (also ohne "s")
1000 = Eintausend
1001 = Eintausendeins
Die Engländer haben's da schon einfacher.
Die Sonderregeln werde ich mir von einem französischen Mitarbeiter geben lassen.
Die Zahlwörter werde ich in eine Datei verlegen, damit es keine Probleme mit der CCSID gibt.
Nochmals Danke.
Hallo Fuerchau,
kann auch mit keiner Französischen Konvertierungsprogramm
dienen, aber noch ein paar andere Programme:
CONVERTING NUMBERS TO WORDS
Q: How do I programmatically convert a number to words such as those you'd
see on a check?
A: This is a commonly requested routine. Fortunately, you have several
solutions to choose from, all of which are listed below:
a. Gary Guthrie's NbrToWords RPG ILE Service Program
http://www.iseriesnetwork.com/article.cfm?ID=10581_
b. Jeff Crosby's SUBNtoA RPG ILE Service Program
http://groups.google.com/groups?q=SubNToA&hl=en&lr=&ie=UTF-8&oe=UTF-8&selm=3C7FF5B0.BE24069A%40dilgardfoods.com&rnum=1
c. iSeries NEWS RPG program CHECKWORDS
(This appeared a long time ago in the book "AS/400 Power Tools, Vol. 1.")
http://www.iseriesnetwork.com/noderesources/code/clubtechcode/CheckWords.zip_
There are at least two commercial products that include a callable program
that converts numbers to words:
d. Jim Sloan's TAA Productivity Tools (the follow-on product to QUSRTOOL) _
http://www.taatool.com/document/L_bldchkamt.htm_.
e. Golden State Software Systems' Function Junction
http://www.gsssi.com/
Gruss TARASIK
@Tarasik
Ein paar der Links funktionieren anscheinend nur wenn entsprechende Berechtigung vorliegt.
Und: Geld darf es wie immer nicht kosten !
Hi Fuerchau,
ich muss BHAUSER Recht geben! Die Problematik ist die Gleiche! Die Wort-Zahlen werden in eine Ladezeittabelle hinterlegt.
Beispiel: deutsch englisch französisch
21 einundzwanzig twenty-one vingt-et-un
22 zweiundzwanzig twenty-two vingt-deux
99 neunundneuntig ninety-nine quatre-vingt- dix-neuf. usw...
Du brauchst nur die entsprechende Zahlen an die richtige Stelle einzutragen.
Ich habe sowas damals für die Scheckschreibung auf der /36 geschrieben. Falls Du Problemen hast, suche ich Dir gerne die Sources heraus.
Schöne Grüsse aus hamburg
Thierry
Mailto: thierry@tecs.de
Im deutschen gibt es aber trotzdem ein paar Ausnahmen, die abweichend programmiert werden müssen, siehe hierzu meinen obigen Kommentar (bzgl. einhundert aber einhundertundeins)
mag sein. Auf frz. gibt es solche Ausnahmen nicht!
Gruss
Th