Subversion Repositories wimsdev

Rev

Rev 16006 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16006 Rev 17382
Line 5... Line 5...
5 
 
 5 
 
6 
scnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exams
 6 
scnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exams
7 
!for s=1 to $scnt
 7 
!for s=1 to $scnt
8 
  exam_$s=!record $s of wimshome/log/classes/$wims_class/exams/.exams
 8 
  exam_$s=!record $s of wimshome/log/classes/$wims_class/exams/.exams
9 
  exam_$s=$(exam_$s)\
 9 
  exam_$s=$(exam_$s)\
- 
 
 10 
\
10 
\
 11 
\
11 
\
 12 
\
12 
\
 13 
\
13 
\
 14 
\
14 
\
 15 
\
Line 25... Line 26...
25 
  !mexec examshift.sh
 26 
  !mexec examshift.sh
26 
!endif
 27 
!endif
27 
!writefile wimshome/log/classes/$wims_class/exams/.exams
 28 
!writefile wimshome/log/classes/$wims_class/exams/.exams
28 
!for s=1 to $scnt
 29 
!for s=1 to $scnt
29 
  !if $s!=$exam or $update_field>0
 30 
  !if $s!=$exam or $update_field>0
30 
    sf=!line 1 to 8 of $(exam_$s)
 31 
    sf=!line 1 to 9 of $(exam_$s)
31 
    !appendfile wimshome/log/classes/$wims_class/exams/.exams :$sf
 32 
    !appendfile wimshome/log/classes/$wims_class/exams/.exams :$sf
32 
  !endif
 33 
  !endif
33 
!next s
 34 
!next s