Subversion Repositories wimsdev

Rev

Rev 14325 | Blame | Compare with Previous | Last modification | View Log | RSS feed

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