5. How can you tell which users have been logged on for over a week?
UPDATE.
If you are on 6.0 PP1 the JINFO will give you the date.
JINFO("SESSION","FmtIntroDate")
(thanks to John Backus for reminding me about JINFO)
So here is an improved version of the script posted before.
SETVAR HPMSGFENCE 17
IF FINFO("SJMSG",0)
PURGE SJMSG,TEMP
ENDIF
IF FINFO("PFILE",0)
PURGE PFILE,TEMP
ENDIF
BUILD SJMSG;REC=-79,,F,ASCII;TEMP;MSG
FILE SJMSG=SJMSG,OLDTEMP
SHOWJOB JOB=@S;*SJMSG
SETVAR COUNT FINFO("SJMSG",19)
WHILE FINFO("SJMSG",19) <> 0
INPUT SJLINE < SJMSG
IF STR(SJLINE,1,2) = "#S" THEN
SETVAR SESS STR(SJLINE,1,7)
SETVAR SDATE JINFO("!SESS","FmtIntroDate")
ECHO SESSION !SESS SIGNED ON, ON !SDATE >>PFILE
ENDIF
ENDWHILE
SETVAR HPMSGFENCE 0
PRINT PFILE
Ed Stouder
Beechglen Development Inc.
|