Subversion Repositories wimsdev

Rev

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

Rev 16198 Rev 17456
Line 108... Line 108...
108 
  dl=$dl$sep$dl_var
 108 
  dl=$dl$sep$dl_var
109 
!endif
 109 
!endif
110 
 
 110 
 
111 
tit=!translate , to $sep in $dl
 111 
tit=!translate , to $sep in $dl
112 
!for i=1 to $examcnttot
 112 
!for i=1 to $examcnttot
- 
 
 113 
  !if $(nb_ses$i)>1
113 
  tmp=!makelist : for x=1 to $(nb_ses$i)
 114 
    tmp=!makelist : for x=1 to $(nb_ses$i)
114 
  tmp=!items2words $tmp
 115 
    tmp=!items2words $tmp
115 
  tit=!replace internal exam$i by exam$i$tmp$ in $tit
 116 
    tit=!replace internal exam$i by exam$i$tmp$ in $tit
- 
 
 117 
  !endif
116 
!next
 118 
!next
117 
!! quote the values (case of word groups)
 119 
!! quote the values (case of word groups)
118 
!for n in login,password,lastname,firstname,email,regnum,comments,\
 120 
!for n in login,password,lastname,firstname,email,regnum,comments,\
119 
  participate,supervise,supervisable,external_auth,average0,average1,average2
 121 
  participate,supervise,supervisable,external_auth,average0,average1,average2
120 
  dl2=!replace user_$n by $(quote)user_$n$quote in $dl2
 122 
  dl2=!replace user_$n by $(quote)user_$n$quote in $dl2
Line 213... Line 215...
213 
    !endif
 215 
    !endif
214 
    !for i=1 to $examcnttot
 216 
    !for i=1 to $examcnttot
215 
      !if exam$i isitemof $dl and $i isitemof $activexams
 217 
      !if exam$i isitemof $dl and $i isitemof $activexams
216 
        user_exam$i=$[rint(10*$scoremax*$(es_$i))/100]
 218 
        user_exam$i=$[rint(10*$scoremax*$(es_$i))/100]
217 
        !set tmp=!listuniq $(sess_$i)
 219 
        !set tmp=!listuniq $(sess_$i)
- 
 
 220 
        !if $(nb_ses$i)>1
218 
        !for j in $tmp
 221 
          !for j in $tmp
219 
          !set user_exam$i=$(user_exam$i):$[rint(10*$scoremax*$(score$(j)_$i))/100]
 222 
            !set user_exam$i=$(user_exam$i):$[rint(10*$scoremax*$(score$(j)_$i))/100]
220 
        !next
 223 
          !next
221 
        !set tmp=!itemcnt $tmp
 224 
          !set tmp=!itemcnt $tmp
222 
        !for j= $tmp+1 to $(nb_ses$i)
 225 
          !for j= $tmp+1 to $(nb_ses$i)
223 
          !set user_exam$i=$(user_exam$i):
 226 
            !set user_exam$i=$(user_exam$i):
224 
        !next
 227 
          !next
- 
 
 228 
        !endif
225 
      !endif
 229 
      !endif
226 
      !if examduration$i isitemof $dl and $i isitemof $activexams
 230 
      !if examduration$i isitemof $dl and $i isitemof $activexams
227 
        user_examduration$i=!replace internal , by $ $ in $quote$(Dureeexam_$i)$quote
 231 
        user_examduration$i=!replace internal , by $ $ in $quote$(Dureeexam_$i)$quote
228 
      !endif
 232 
      !endif
229 
      !if exam$(i)_exexo isin $dl and $i isitemof $activexams
 233 
      !if exam$(i)_exexo isin $dl and $i isitemof $activexams
Line 236... Line 240...
236 
          !reset t_
 240 
          !reset t_
237 
          !set n_ses=0
 241 
          !set n_ses=0
238 
          !for ses=1 to $checksessions_cnt
 242 
          !for ses=1 to $checksessions_cnt
239 
            !if $i isitemof $(exam_$ses)
 243 
            !if $i isitemof $(exam_$ses)
240 
              !set tmp=$(Exam_$(i)_$ses)
 244 
              !set tmp=$(Exam_$(i)_$ses)
241 
            !set t_=$t_$(tmp[$k_]),
 245 
              !set t_=$t_$(tmp[$k_]),
242 
            !increase n_ses
 246 
              !increase n_ses
243 
            !endif
 247 
            !endif
244 
          !next
 248 
          !next
245 
          !set t_=$(t_[1..-2])
 249 
          !set t_=$(t_[1..-2])
246 
          !if $nb_ses>$n_ses
 250 
          !if $nb_ses>$n_ses
247 
            !set oo=!makelist $ $ for x=1 to $[$nb_ses-$n_ses-1]
 251 
            !set oo=!makelist $ $ for x=1 to $[$nb_ses-$n_ses-1]