Ich hab das ganze mal folgendermaßen getestet.
Das funktioniert bei mir tadellos. Wenn das bei Dir nicht klappt, dann kann es sich nur um eine Macke im Betriebssystem handeln und Du musst bei IBM nach einem PTF fragen.PHP-Code:
PGM
DCL VAR(&TEXT) TYPE(*CHAR) LEN(50)
RTVUSRPRF USRPRF(USRPRF) TEXT(&TEXT)
ENDPGM
Bookmarks