Rev 2184 | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 23 | reyssat | 1 | method=list |
| 2 | |||
| 3 | per=$[$per] |
||
| 4 | !bound $per between 0 and 100 default 0 |
||
| 5 | |||
| 6 | !for i=1 to $uucnt |
||
| 7 | l_=!record $i+1 of wimshome/log/classes/$wims_class/.grades |
||
| 8 | n_=!item 1 of $l_ |
||
| 9 | n_=!hex $n_ |
||
| 10 | g_$n_=$l_ |
||
| 11 | !next i |
||
| 14341 | guerimand | 12 | update_content=!record 1 of wimshome/log/classes/$wims_class/.grades |
| 13 | update_content=!replace line number 1 by $per in $update_content |
||
| 14 | update_field=1 |
||
| 15 | update_nbline=$empty |
||
| 16 | !read adm/uprecord wimshome/log/classes/$wims_class/.grades |
||
| 17 | |||
| 23 | reyssat | 18 | !read var.init |
| 19 |