Subversion Repositories wimsdev

Rev

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

Rev 9687 Rev 15494
Line 2... Line 2...
2 
 
 2 
 
3 
!if $scnt>=$max_exams
 3 
!if $scnt>=$max_exams
4 
    error=bad_maxexams
 4 
  error=bad_maxexams
5 
    !reset job
 5 
  !reset job
6 
    !changeto var.proc
 6 
  !changeto var.proc
7 
!endif
 7 
!endif
8 
!bound exam between 1 and $scnt default $empty
 8 
!bound exam between 1 and $scnt default $empty
9 
 
 9 
 
10 
!if $exam=$empty
 10 
!if $exam=$empty
11 
    error=bad_exam
 11 
  error=bad_exam
12 
    !reset job
 12 
  !reset job
13 
    !changeto var.proc
 13 
  !changeto var.proc
14 
!endif
 14 
!endif
15 
 
 15 
 
16 
exocnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exam$exam
 16 
exocnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exam$exam
17 
!if $exocnt=0
 17 
!if $exocnt=0
18 
 !reset job
 18 
  !reset job
19 
 !changeto var.proc
 19 
  !changeto var.proc
20 
!endif
 20 
!endif
21 
 
 21 
 
22 
!sh cd $wims_home/log/classes/$wims_class/exams/\
 22 
!sh cd $wims_home/log/classes/$wims_class/exams/\
23 
cp .exam$exam .exam$[$scnt+1]
 23 
cp .exam$exam .exam$[$scnt+1]
24 
 
 24