Hallo Marc,

vielen Dank für Deine schnelle Antwort!

Bräuchte die Routine leider in RPG400.

Hast mich aber auf eine Idee gebracht.
Falls keine Routine verfügbar ist, werde ich ein kleines RPGIV-Programm erstellen, welches ich aus meinem Programm mit entspr. Parameter-Über- und -Rückgabe aufrufe und darin mit SUBDUR die Werte ermitteln kann.

So müsste es eigentlich funktionieren.

Einen schönen Abend wünscht Dir

Sepp