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]