Rev 14889 | Rev 16738 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 14889 | Rev 16422 | ||
---|---|---|---|
Line 30... | Line 30... | ||
30 | !endif |
30 | !endif |
31 | !endif |
31 | !endif |
32 | 32 | ||
33 | !! ---------- make a column in .grades file for this scoring |
33 | !! ---------- make a column in .grades file for this scoring |
34 | !if $scoring=0 and $type>=2 |
34 | !if $scoring=0 and $type>=2 |
- | 35 | test=!fileexists wimshome/log/classes/$wims_class/.grades |
|
- | 36 | !if $test=yes |
|
35 | data=!record 1 of wimshome/log/classes/$wims_class/.grades |
37 | data=!record 1 of wimshome/log/classes/$wims_class/.grades |
36 | !distribute line $data into l1,l2,l3 |
38 | !distribute line $data into l1,l2,l3 |
37 | l2=!append item $wims_name_freework $freework to $l2 |
39 | l2=!append item $wims_name_freework $freework to $l2 |
38 | l3=!append item 1 to $l3 |
40 | l3=!append item 1 to $l3 |
39 | update_field=1 |
41 | update_field=1 |
40 | update_content=$l1\ |
42 | update_content=$l1\ |
41 | $l2\ |
43 | $l2\ |
42 | $l3 |
44 | $l3 |
43 | !read adm/uprecord wimshome/log/classes/$wims_class/.grades |
45 | !read adm/uprecord wimshome/log/classes/$wims_class/.grades |
44 | !increase nbscore |
46 | !increase nbscore |
45 | scoring=$nbscore |
47 | scoring=$nbscore |
- | 48 | !else |
|
- | 49 | !writefile wimshome/log/classes/$wims_class/.grades :0\ |
|
- | 50 | title,title,$wims_name_freework $freework\ |
|
- | 51 | weight,weight,1 |
|
- | 52 | nbscore=1 |
|
- | 53 | scoring=1 |
|
- | 54 | !endif |
|
46 | !endif |
55 | !endif |
47 | 56 | ||
48 | !! change statut |
57 | !! change statut |
49 | activetest=1 |
58 | activetest=1 |
50 | update_content=1\ |
59 | update_content=1\ |