Hallo,
erster Erfolg:
folgender Befehl auf der AS400 funktioniert jetzt:

CALL PGM(QSYS/QCMDEXC) PARM('STRQMQRY QMQRY(TRUMPFH/TTRWLSVST1) OUTPUT(*OUTFILE) OUTFILE(TRUMPFH/TTRWLSVST1) ALWQRYDFN(*YES) SETVAR((VAR1 100724))' 0000000117.00000)

aber,

der Befehl über ADO bringt einen Fehler:

CallCmd2 = "CALL PGM(QSYS/QCMDEXC) PARM('" & CallCmd & "', " & Replace(Format(Len(CallCmd), "0000000000.00000"), ",", ".") & ")"
[IBM][iSeries Access ODBC-Treiber][DB2 UDB]SQL0104 - Token QSYS ungültig. Gültige Token: :.

auch die Korrektur auf:
...PGM(QSYS.QCMDEXC)...
bringt den selben Fehler

Was kann ich da machen?

Danke
Gruss
Tobias