PWDCHGDAT: PGM DCL VAR(&UsrPrf ) TYPE(*CHAR) LEN(10) DCL VAR(&PwdChgDat) TYPE(*CHAR) LEN(6 ) RTVJOBA USER(&UsrPrf ) RTVUSRPRF USRPRF(&UsrPrf) PWDCHGDAT(&PwdChgDat) PGM_END: ENDPGMThe date returned in in YYMMDD format.
On Tuesday, September 15, 1998, 08:26 AM, Ted Sarah wrote: I know that somewhere in the security files, that the date that a users password was last changed is kept. How do I get at it? We don't force users to change passwords, but there are some users with access to certain files that we want to remind them to change it if they haven't within a give time frame, and then force them to change it if they don't. Ted Sarah Stow Police & Fire tsarah@gwis.com Chris Ringer...
Comment