Subversion Repositories wimsdev

Rev

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

Rev 18148 Rev 18150
Line 232... Line 232...
232
        wims_exrandomlist=!makelist x for x = 1 to $exocnt
232
        wims_exrandomlist=!makelist x for x = 1 to $exocnt
233
      !endif
233
      !endif
234
      wims_exrandomlist=$wims_exrandomlist;$exam;$exam_mode
234
      wims_exrandomlist=$wims_exrandomlist;$exam;$exam_mode
235
      !setdef wims_exrandomlist=$wims_exrandomlist in wimshome/sessions/$wims_session/var.stat
235
      !setdef wims_exrandomlist=$wims_exrandomlist in wimshome/sessions/$wims_session/var.stat
236
    !endif
236
    !endif
237
    !if $exam_hidetechvar!=$empty
-
 
238
      !readproc adm/vfilter/ishiddensheet.proc $exam_hidetechvar
-
 
239
!!!set tmp_examstatus=!getsheetstatus exam=$exam
237
    !set tmp_examstatus=!getsheetstatus exam=$exam
240
      !if $hidden_sheet=1
238
    !if $tmp_examstatus=3
241
        activetest=-1
239
      activetest=-1
242
        exocnt=0
240
      exocnt=0
243
        error=exam_hidden
241
      error=exam_hidden
244
        !default expiration=$class_expiration
242
      !default expiration=$class_expiration
245
        exam_exist=no
243
      exam_exist=no
246
        !exit
244
      !exit
247
      !endif
-
 
248
    !endif
245
    !endif
249
  !endif
246
  !endif
250
!else
247
!else
251
  exam_exist=no
248
  exam_exist=no
252
  activetest=-1
249
  activetest=-1