Dann würde ich dir eine weitere "Umgehung" vorschlagen:

insert .... values(?, ..., dec(?, 7, 4), ...)
Leider laufe ich dann auf die nächste Fehlermeldung:

SQL0418: Verwendung von Parametermarkierungen ungültig.

.... aber, Versuch macht kluch, das

cast(? as dec(7, 4))

funktioniert wunderbar !!!

Schönen Dank für den Tipp mit dem Typecasting auf AS400 Seite.

Gruß Andreas

P.S.

der Austausch von CA wäre unternehmensweit ohne Weiteres nicht möglich