You are viewing an old version of this page. View the current version.

Compare with Current View Page History

Version 1 Current »

The JSMCHGUSER program can be used in the JSMDRTEXT program to change the user profile of the current job.

DCL VAR(&STATUS) TYPE(*CHAR) LEN(7)
DCL VAR(&USERID) TYPE(*CHAR) LEN(10)
DCL VAR(&PASSWORD) TYPE(*CHAR) LEN(10)

CALL PGM(JSMCHGUSER) PARM(&USERID &PASSWORD &STATUS)
IF COND(&STATUS *NE OK) THEN(DO)
  • No labels