Ja klar:
C++
.NET
Java
PHP
Delphi
u.v.m.

Mach mal eine Anfrage bei der IBM ab wann z.B. .NET oder Delphi auf der AS/400 verfügbar wird.

Java geht ja schon.
Schreibe da aber mal ein kommerzielle Anwendung, die keine Rechenprobleme mit Nachkomma's hat (Double-Werte).

Nicht umsonst gibts da manchmal so Programmierhinweise, dass

if (MyField == 0.3)

nie zum positiven Erfolg führen wird.

Ich kenne auch keine Programmiersprache (ausser RPG), die Dezimalzahlen mit Packed(31,n), und nun neu mit ILERPG Packed(63,n) unterstützt.

Maximal gibts da den Typ Currency mit 28 Stellen, wobei dieser nur max. 4 Nachkomma haben kann.

Double hat nur 17stellige Genauhigkeit, wobei es eben in den NK's (2^1/n) immer zu problemen kommt.