Der CALL Befehl hatte im letzten Jahr ein Update erhalten und du kannst Typ + Länge mitgeben:

CALL PGM(PGM1) PARM(('parameter' (*CHAR 110)))