Rev 3245 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 2329 | guerimand | 1 | !!!### language independant |
| 2 | !! |
||
| 2349 | guerimand | 3 | |
| 23 | reyssat | 4 | sh=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets |
| 5 | !for i=1 to $sh |
||
| 6 | l=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets |
||
| 7 | l=!word 1 of $l |
||
| 8 | !if $l>0 |
||
| 9 | asheets=!append item $i to $asheets |
||
| 10 | !endif |
||
| 11 | !next i |
||
| 12 | |||
| 8903 | czzmrn | 13 | ex=!recordcnt wimshome/log/classes/$wims_class/exams/.exams |
| 14 | !for i=1 to $ex |
||
| 15 | l=!record $i of wimshome/log/classes/$wims_class/exams/.exams |
||
| 16 | l=!word 1 of $l |
||
| 17 | !if $l>0 |
||
| 18 | aexams=!append item $i to $aexams |
||
| 19 | !endif |
||
| 20 | !next i |
||
| 21 |