Hallo,
V5R4, WINXP SP3

Irgendwo ist beim Befehl QCMDEXC ein Syntaxfehler und den finde ich nicht?

CallCmd = "STRQMQRY QMQRY(TRUMPFH/TTRWLSVST1) OUTPUT(*OUTFILE) OUTFILE(TRUMPFH/TTRWLSVST1) ALWQRYDFN(*YES) SETVAR((VAR1 " & VAR1 & "))"

CallCmd = Replace(CallCmd, "'", "''")

cnn.Execute("CALL QSYS.QCMDEXC ('" & CallCmd & "', " & Format(Len(CallCmd), "0000000000.00000") & ")")


Fehlermeldung von VBA:
[IBM][iSeries Access ODBC-Treiber][DB2 UDB]CPF0006 - Im Befehl ist ein Fehler aufgetreten.

Ich finde den Fehler nicht, trotz der Recherche in diesem Forum.

Vielen Dank
Gruss
Tobias