Subversion Repositories wimsdev

Rev

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

  1. !set joker=--
  2. !if $gcnt<=0
  3.  $name_nomanual
  4.  !href cmd=reply&method=column&cc=1 $wims_name_addmanual
  5. .
  6. !set wims_menu_items=!append line addmanual,1,cmd=reply&method=column&cc=1\
  7. to $wims_menu_items
  8.  !exit
  9. !endif
  10.  
  11. $table_header
  12. $table_hdtr<th>$wims_name_name</th><th><small>$name_average</small></th>
  13. !for g=1 to $gcnt
  14.  <th><small>
  15.  !set t_=!item $g of $titles
  16.  !if $ucnt<=$maxuser
  17.   !href cmd=reply&method=column&cc=$g $t_
  18.  !else
  19.   $t_
  20.  !endif
  21.  </small>
  22. !next g
  23.  
  24. $table_hdtr<td align="center"><b>$name_weight</b><td align="center">--</td>
  25. !for g=1 to $gcnt
  26.  !set w_=!item $g of $weights
  27.  !default w_=1
  28.  <td align="center"><b>$w_</b></td>
  29. !next g
  30. !for u=1 to $ucnt
  31.  !set n_=!item $u of $ulist
  32.  !set f_=!item $u of $flist
  33.  !set l_=!item $u of $llist
  34.  $table_tr<td>
  35.  !href cmd=reply&method=user&un=$n_ $l_, $f_
  36.  !set t_=!positionof item $n_ in $uulist
  37.  !if $t_!=
  38.   !set v_=!record $t_+1 of wimshome/log/classes/$wims_class/.grades
  39.  !else
  40.   !set v_=!makelist $joker for x=1 to $gcnt
  41.   !set v_=$n_,$f_,$v_
  42.  !endif
  43.  !set a_=0
  44.  !for g=1 to $gcnt
  45.   !set G$g=!item $g+2 of $v_
  46.   !default G$g=0
  47.   !set w_=!item $g of $weights
  48.   !set a_=$[$a_+($w_)*$(G$g)]
  49.  !next g
  50.  !if $joker isin ($v_[3..-1])
  51.   !set a_=NaN
  52.  !endif
  53.  
  54.  !endif
  55.  !if $a_!=NaN
  56.  !set a_=$[rint(100*$a_/$wtot)/100]
  57.  !endif
  58.  <td align="center">$a_
  59.  !for g=1 to $gcnt
  60.   <td align="center">$(G$g)
  61.  !next g
  62. !next u
  63. $table_end
  64.  
  65. <p>$name_modify
  66. !if $gcnt<$maxcol
  67. $wims_name_or
  68.  !href cmd=reply&method=column&cc=$[$gcnt+1] $wims_name_addmanual
  69. .
  70.  !set wims_menu_items=!append line addmanual,1,cmd=reply&method=column&cc=$[$gcnt+1]\
  71. to $wims_menu_items
  72. !else
  73. .
  74. !endif
  75. !if $gcnt>0
  76. <p>
  77. $name_can_also
  78. !href cmd=reply&method=raw $wims_name_raw
  79.  $name_can_also2 (
  80.  !href module=adm/class/userlist&cmd=new&job=csv $wims_name_csv
  81. ).
  82.  !set wims_menu_items=!append line raw,1,cmd=reply&method=raw\
  83.  csv,1,module=adm/class/userlist&cmd=new&job=csv\
  84. to $wims_menu_items
  85. !endif
  86.  
  87.