Subversion Repositories wimsdev

Rev

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

Rev 16257 Rev 16264
Line 1... Line 1...
1 
!if $checkexo=file
 1 
!if $checkexo=file
2 
  logfile=$wims_checkfile
 2 
  logfile=!getdef wims_checkfile in wimshome/sessions/$wims_session/var.stat
3 
!else
 3 
!else
4 
  !bound checkexo within $exos default $
 4 
  !bound checkexo within $exos default $
5 
  !if $checkexo=$empty
 5 
  !if $checkexo=$empty
6 
    error=bad_exo
 6 
    error=bad_exo
7 
    !exit
 7 
    !exit
Line 11... Line 11...
11 
  !distribute item $cexo into exam,exo
 11 
  !distribute item $cexo into exam,exo
12 
!endif
 12 
!endif
13 
!if wimshome/ notin $logfile
 13 
!if wimshome/ notin $logfile
14 
  logfile=wimshome/log/$logfile
 14 
  logfile=wimshome/log/$logfile
15 
!endif
 15 
!endif
16 
 
 - 
 
17 
 
 16 
 
18 
score=!getdef w_module_score in $logfile
 17 
score=!getdef w_module_score in $logfile
19 
!if exam isin $logfile
 18 
!if exam isin $logfile
20 
  !default score=!sh awk '/^E/ && $$2=="$checksession" && $$3==$exam && $$4==$exo && $$5=="score" {print $$6}' $wims_home/log/classes/$wims_class/noscore/$checkuser
 19 
  !default score=!sh awk '/^E/ && $$2=="$checksession" && $$3==$exam && $$4==$exo && $$5=="score" {print $$6}' $wims_home/log/classes/$wims_class/noscore/$checkuser
21 
!endif
 20 
!endif