Rev 14341 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
14339 | guerimand | 1 | !! ------------ save new score for all participant in the class |
14537 | guerimand | 2 | !if $putiworkco!=0 or $codownload!=1 |
3 | !restart module=adm/class/freework&job=configfw&freework=$freework |
||
4 | !endif |
||
14339 | guerimand | 5 | !sh mv $wims_home/log/classes/$wims_class/.grades $wims_home/log/classes/$wims_class/.grades.old |
6 | data=!record 1 of wimshome/log/classes/$wims_class/.grades.old |
||
7 | !writefile wimshome/log/classes/$wims_class/.grades :$data |
||
14341 | guerimand | 8 | !!-- save score for old user |
9 | ltolduser=!listcomplement $ulist in $uulist |
||
10 | !if $ltolduser!=$empty |
||
11 | nb=!itemcnt $ltolduser |
||
12 | !for i=1 to $nb |
||
13 | key=!positionof item $(ltolduser[$i]) in $uulist |
||
14 | update_content=!record $[$key+1] of wimshome/log/classes/$wims_class/.grades.old |
||
15 | !appendfile wimshome/log/classes/$wims_class/.grades :$update_content |
||
16 | !next i |
||
17 | !endif |
||
18 | |||
14339 | guerimand | 19 | !for i=1 to $nbuser |
20 | student=!item $i of $ulist |
||
21 | key=!positionof item $student in $uulist |
||
22 | !bound score$i between 0 and $maxscore default $empty |
||
23 | !if $key=$empty |
||
24 | list=!values 0 for v=1 to $nbscore |
||
25 | list=!replace internal 0 by $empty in $list |
||
26 | list=!replace item number $scoring by $(score$i) in $list |
||
27 | !appendfile wimshome/log/classes/$wims_class/.grades :$student,$(flist[$i]) $(llist[$i]),$list |
||
28 | !else |
||
29 | update_content=!record $[$key+1] of wimshome/log/classes/$wims_class/.grades.old |
||
30 | update_content=!replace item number $[$scoring+2] by $(score$i) in $update_content |
||
31 | !appendfile wimshome/log/classes/$wims_class/.grades :$update_content |
||
32 | !endif |
||
33 | !next i |
||
34 | !sh rm -f $wims_home/log/classes/$wims_class/.grades.old |
||
35 | !restart module=adm/class/freework&job=configfw&freework=$freework |