Subversion Repositories wimsdev

test=!recordcnt wimshome/$wims_sesdir/examscore.$exam
!if $wims_exam_remain>0 and ($test<2 or ($test=1 and $allowtype=simulation))
  job=score
  !exit
!endif

!if $activeexo>0 and $replycnt<$exocnt and $confirm_end!=yes and $wims_exam_remain>100
  !exit
!endif
!reset confirm_end

now=!char 1 to 14 of $wims_now
nowtime=$wims_nowseconds
!if $allowtype!=simulation and $wims_user!=supervisor
  !appendfile wimshome/log/classes/$wims_class/score/$wims_user.exam $exam -- 0 $nowtime 0 0 0 0
!endif
!sh rm -f $wims_home/log/classes/$wims_class/.parmreg/$wims_user.exam\
 rm -fr $wims_home/$wims_sesdir*
#!if $wims_user=supervisor
# !readdef wimshome/log/classes/$wims_class/supervisor
#!else
# !readdef wimshome/log/classes/$wims_class/.users/$wims_user
#!endif
cutclass=!translate / to , in $wims_class
!if / notin $wims_class and $wims_class<=9999
  !! exit for example class
  !restart module=adm/class/classes&+job=example
!else
  !! exit for normal class
  !restart module=home&user=$wims_user,$(cutclass[1])
!endif