Rev 12899 | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 23 | reyssat | 1 | |
| 2 | !distribute words $wims_read_parm into cl,cls |
||
| 3 | |||
| 4 | $(cl)_usercnt=!recordcnt wimshome/$cls/.userlist |
||
| 5 | $(cl)_sheetcnt=!recordcnt wimshome/$cls/sheets/.sheets |
||
| 6 | $(cl)_examcnt=!recordcnt wimshome/$cls/exams/.exams |
||
| 7 | $(cl)_doccnt=!recordcnt wimshome/$cls/doc/.index |
||
| 8 | $(cl)_votecnt=!recordcnt wimshome/$cls/vote/.votes |
||
| 9 | $(cl)_forumcnt=!recordcnt wimshome/$cls/forum/.msglist |
||
| 1407 | bpr | 10 | $(cl)_docpubliccnt=!recordcnt wimshome/$cls/doc/.docindex |
| 16094 | guerimand | 11 | $(cl)_freeworkcnt=!recordcnt wimshome/$cls/freeworks/.freeworks |
| 23 | reyssat | 12 | t=!filelist $wims_home/$cls/src/*.oef |
| 13 | $(cl)_exocnt=!wordcnt $t |
||
| 12080 | guerimand | 14 | !if log/classes isin $cls |
| 12413 | bpr | 15 | cls_ph=!replace / by , in $cls |
| 16 | cls_ph=log/classes/$(cls_ph[3]) |
||
| 12080 | guerimand | 17 | !else |
| 12413 | bpr | 18 | cls_ph=$cls |
| 12080 | guerimand | 19 | !endif |
| 20 | t=!filelist $wims_home/$cls_ph/photoboard/ |
||
| 12078 | guerimand | 21 | $(cl)_userphotocnt=!wordcnt $t |
| 23 | reyssat | 22 | $(cl)_cdtcnt=!defof cdt_nbdate in wimshome/$cls/cdt/.def |
| 1505 | bpr | 23 | $(cl)_seqcnt=!record 0 of wimshome/$cls/seq/.sequences |
| 24 | $(cl)_seqcnt=!word 1 of $($(cl)_seqcnt) |
||
| 1858 | guerimand | 25 | $(cl)_livretcnt=!recordcnt wimshome/$cls/livret/.comps |
| 12029 | guerimand | 26 | t=!filelist $wims_home/$cls/cdt/src/* |
| 27 | $(cl)_cdtcnt=!wordcnt $t |
||
| 23 | reyssat | 28 | scorecnt=!mexec scripts/scorefcnt.sh $cls |
| 29 | !distribute words $scorecnt into $(cl)_scorecnt1,$(cl)_scorecnt2 |
||
| 30 | $(cl)_scorecnt=$[$($(cl)_scorecnt1)+$($(cl)_scorecnt2)] |
||
| 31 | t=!record 1 of wimshome/$cls/.grades |
||
| 32 | t=!line 2 of $t |
||
| 33 | t=!itemcnt $t |
||
| 34 | $(cl)_manualcnt=$[max(0,$t-2)] |
||
| 35 | $(cl)_testcnt=$[$($(cl)_scorecnt1)+$($(cl)_manualcnt)] |
||
| 36 | $(cl)_reccnt=$[$($(cl)_usercnt)+$($(cl)_sheetcnt)+$($(cl)_examcnt)\ |
||
| 1407 | bpr | 37 | +$($(cl)_doccnt)+$($(cl)_docpubliccnt)+$($(cl)_forumcnt)+$($(cl)_votecnt)\ |
| 23 | reyssat | 38 | +$($(cl)_exocnt)+$($(cl)_scorecnt)+$($(cl)_manualcnt)] |
| 9880 | bpr | 39 | $(cl)_motdcnt=!filelist $wims_home/$cls/.motd |
| 40 | !if $($(cl)_motdcnt)!=$empty |
||
| 41 | $(cl)_motdcnt=1 |
||
| 42 | !else |
||
| 43 | $(cl)_motdcnt=0 |
||
| 44 | !endif |
||
| 12899 | guerimand | 45 | $(cl)_glossarycnt=!recordcnt wimshome/$cls/tool/.glossaryindex |
| 46 | tmp=!recordcnt wimshome/$cls/tool/.toolindex |
||
| 47 | $(cl)_toolcnt=$[$($(cl)_glossarycnt)+$tmp2] |
||
| 23 | reyssat | 48 | |
| 49 | t=!defof user_exists in wimshome/$cls/supervisor |
||
| 50 | !if $t=yes |
||
| 12413 | bpr | 51 | $(cl)_supcnt=1 |
| 23 | reyssat | 52 | !else |
| 12413 | bpr | 53 | $(cl)_supcnt=0 |
| 1407 | bpr | 54 | !endif |