Etwas grundsätzliches:
Du kannst keine Kommandos aus der AS/400 aufrufen, du musst diese in QCMDEXC verpacken:

call QSYS.QCMDEXC ('MyCmd', Länge als 10VK5NK formatiert)

Man beachte, dass du das Kommando ja in Hochkomma setzen musst, also sind alle enthaltenen Hochkommas zu verdoppeln:

MyCmd = replace(MyCmd, "'", "''")

.execute "call qsys.qcmdexc ('" & mycmd & "', " & format(len(mycmd), "0000000000.00000" ) & ")"