Subversion Repositories wimsdev

Rev

Rev 17145 | Rev 17150 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 17145 Rev 17149
Line 24... Line 24...
24
    userlist=!append item $(d[3]) to $userlist
24
    userlist=!append item $(d[3]) to $userlist
25
  !next k
25
  !next k
26
  !writefile $clsfile $wims_nowseconds $wims_now
26
  !writefile $clsfile $wims_nowseconds $wims_now
27
  time2=yes
27
  time2=yes
28
!endif
28
!endif
-
 
29
time1=$wims_nowseconds
29
!writefile $ufile $wims_nowseconds $wims_now 100000
30
!writefile $ufile $wims_nowseconds $wims_now 100000
30
majdate=$wims_now
31
majdate=$wims_now
31
nbuser=!recordcnt wimshome/log/classes/$wims_class/.userlist
32
nbuser=!recordcnt wimshome/log/classes/$wims_class/.userlist
32
!for sh=1 to $nbsheet
33
!for sh=1 to $nbsheet
33
  dtsh=!record $sh of wimshome/log/classes/$wims_class/sheets/.sheets
34
  dtsh=!record $sh of wimshome/log/classes/$wims_class/sheets/.sheets