Mary Zervos wrote:
Hello everyone,
A professor here would like an "ind user studentname" taken every 4
hours of his 80 students, with a report sent to him once a week. My
question is, which vm software to use and how to collect the data in a
file to send the professor. The professor will use his own program to
extract the data he needs from the file.
I guess about 20 lines of REXX ought to do the trick !
--Ivan
/**/
'EXECIO * DISKR STUDENT LIST * ( STEM SL. FINIS'
DO I=1 TO SL.0
SL.I=STRIP(SL.I)
END
DO FOREVER
D=DATE()
T=TIME()
DO I=1 TO SL.0
A=DIAGRC(8,'INDICATE USER '||SL.I)
DRC=STRIP(SUBSTR(A,1,9))
IF DRC=0 THEN
DTXT=D T TRANSLATE(SUBSTR(A,16),' ',X2C('15'))
'EXECIO 1 DISKW STUDENT INDICAT A 0 V ( VAR DTXT'
END
'FINIS STUDENT INDICAT'
'WAKEUP +04:00:00 ( CONS'
IF RC=6 THEN LEAVE
END
