JCL RACF : Reset un password

Resume (reset ) un passord sur racf en jcl

Dans notre exemple on reset le user USER001 avec le mdp BOULET

000001 //PASSWORD JOB 3ES19G10000012,'TEAM RACF',MSGLEVEL=(1,1), 
000002 // CLASS=A,MSGCLASS=Q,NOTIFY=&SYSUID 
000003 //******************************************************************
000004 //* *
000005 //* ADAPTER LA CLASS et MSGCLASS si Nécessaire *
000006 //* DELOCK DU USER USER001 *
000007 //* PASS BOULET *
000008 //* *
000009 //* *
000010 //******************************************************************
000011 //ADDUSR EXEC PGM=IKJEFT01 
000012 //SYSTSPRT DD SYSOUT=* 
000013 //SYSPRINT DD SYSOUT=* 
000014 //SYSTSIN DD * 
000015 //****************************************************************** 
000016 //* SI MDP no expir metrre NOEXP à la fin de la commande * 
000017 //* EXEMPLE *
000018 //* ALU USER001 PASS(BOULET) RESUME NOEXP *
000019 //****************************************************************** 
000020 ALU USER001 PASS(BOULET) RESUME 
000021 /*