Subversion Repositories wimsdev

Rev

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

Rev 14341 Rev 14537
Line 1... Line 1...
1 
!! ------------ save new score for all participant in the class
 1 
!! ------------ save new score for all participant in the class
2 
 
 - 
 
3 
m=!record 0 of wimshome/log/classes/$wims_class/sheets/.severity
 - 
 
4 
maxscore=!word 1 of $m
 2 
!if $putiworkco!=0 or $codownload!=1
5 
!bound maxscore between 0 and 100000 default 10
 3 
  !restart module=adm/class/freework&job=configfw&freework=$freework
- 
 
 4 
!endif
6 
!sh mv $wims_home/log/classes/$wims_class/.grades $wims_home/log/classes/$wims_class/.grades.old
 5 
!sh mv $wims_home/log/classes/$wims_class/.grades $wims_home/log/classes/$wims_class/.grades.old
7 
data=!record 1 of wimshome/log/classes/$wims_class/.grades.old
 6 
data=!record 1 of wimshome/log/classes/$wims_class/.grades.old
8 
!writefile wimshome/log/classes/$wims_class/.grades :$data
 7 
!writefile wimshome/log/classes/$wims_class/.grades :$data
9 
!!-- save score for old user
 8 
!!-- save score for old user
10 
ltolduser=!listcomplement $ulist in $uulist
 9 
ltolduser=!listcomplement $ulist in $uulist