dann muß es so aussehen:
CallPgm = 'call pgm(Prog) parm(X''0' + %subst(Feld:10:6) + 'F'')'