Da gibts eine Sonderbehandlung auf System ZL958 ...
Wie sind die beiden Parameter im Programm LEACLUSR definiert?

Zitat Zitat von nico1964 Beitrag anzeigen
IF COND(&SYSTEM *EQ 'ZL958') THEN(DO)
CALL PGM(LEACLUSR) PARM(&USER &NAME)
ENDDO
IF COND(&SYSTEM *NE 'ZL958') THEN(DO)
CHGVAR VAR(&NAME) VALUE(&SYSTEM)
ENDDO