Subversion Repositories wimsdev

Rev

Rev 14043 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14043 Rev 16274
Line 11... Line 11...
11 
    sheet_nums=$sheet_nums $i,
 11 
    sheet_nums=$sheet_nums $i,
12 
  !endif
 12 
  !endif
13 
  sheet_titles=$sheet_titles $t,
 13 
  sheet_titles=$sheet_titles $t,
14 
!next i
 14 
!next i
15 
sheet_nums=!nonempty item $sheet_nums
 15 
sheet_nums=!nonempty item $sheet_nums
- 
 
 16 
nbsheet=!itemcnt $sheet_nums
16 
 
 17 
 
17 
nbexams= !recordcnt wimshome/log/classes/$wims_class/exams/.exams
 18 
nbexams= !recordcnt wimshome/log/classes/$wims_class/exams/.exams
18 
exam_nums=
 19 
exam_nums=
19 
exam_deaths=
 20 
exam_deaths=
20 
exam_titles=
 21 
exam_titles=
Line 25... Line 26...
25 
    exam_nums=$exam_nums $i,
 26 
    exam_nums=$exam_nums $i,
26 
  !endif
 27 
  !endif
27 
  exam_titles=$exam_titles $t,
 28 
  exam_titles=$exam_titles $t,
28 
!next i
 29 
!next i
29 
exam_nums=!nonempty item $exam_nums
 30 
exam_nums=!nonempty item $exam_nums
- 
 
 31 
nbexam=!itemcnt $exam_nums
30 
 
 32 
 
31 
 
 33 
 
32 
file_titles=!filelist $wims_home/log/classes/$wims_class/cdt/files/
 34 
file_titles=!filelist $wims_home/log/classes/$wims_class/cdt/files/
33 
file_titles=!lines2items $file_titles
 35 
file_titles=!lines2items $file_titles
34 
nbfile=!itemcnt $file_titles
 36 
nbfile=!itemcnt $file_titles
Line 57... Line 59...
57 
  !if $o_>0
 59 
  !if $o_>0
58 
    pdoc_adds=!append item $s_ to $pdoc_adds
 60 
    pdoc_adds=!append item $s_ to $pdoc_adds
59 
    pdoc_titles=!append item $t_ to $pdoc_titles
 61 
    pdoc_titles=!append item $t_ to $pdoc_titles
60 
  !endif
 62 
  !endif
61 
!next i
 63 
!next i
- 
 
 64 
 
- 
 
 65 
nbfreeworks= !recordcnt wimshome/log/classes/$wims_class/freeworks/.freeworks
- 
 
 66 
freework_nums=
- 
 
 67 
freework_titles=
- 
 
 68 
!for i = 1 to $nbfreeworks
- 
 
 69 
  rec= !record  $i of  wimshome/log/classes/$wims_class/freeworks/.freeworks
- 
 
 70 
  !distribute line $rec into n,d,t
- 
 
 71 
  !if $n>=1 and $n<3
- 
 
 72 
    freework_nums=!append item $i to $freework_nums
- 
 
 73 
  !endif
- 
 
 74 
  freework_titles=!append item $t to $freework_titles
- 
 
 75 
!next i
- 
 
 76 
nbfreeworks=!itemcnt $freework_nums
- 
 
 77 
 
62 
!!no ariane thread in the popup window
 78 
!!no ariane thread in the popup window
63 
!distribute items no, no, into wims_ariane_self, wims_ariane_home,wims_ariane
 79 
!distribute items no, no, into wims_ariane_self, wims_ariane_home,wims_ariane