Subversion Repositories wimsdev

Rev

Rev 7035 | Rev 16008 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !set t=!recordcnt wimshome/log/classes/$wims_class/exams/.exams
  2. !set aelist=
  3. !for i=1 to $t
  4.   !set e_$i=!record $i of wimshome/log/classes/$wims_class/exams/.exams
  5.   !set a_=!line 1 of $(e_$i)
  6.   !if $a_>=1 and $a_<=2
  7.     !set aelist=!append item $i to $aelist
  8.   !endif
  9. !next i
  10. !set m=!itemcnt $aelist
  11.