Versions Compared

Old Version 1

changes.mady.by.user Wara Hermosa

Saved on

compared with

New Version Current

changes.mady.by.user Alejandra Rivera

Saved on

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

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)