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