Subversion Repositories wimsdev

Rev

Rev 18029 | Rev 18057 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
18014 bpr 1
!distribute items $wims_read_parm into tmp_work,tmp_severity
2
 
3
!set tmp_work=!replace internal / by , in $tmp_work
4
!distribute items $tmp_work into tmp_sheet,tmp_work
5
!if $tmp_work!=$empty and $tmp_sheet!=$empty
6
  !set require=!getscorerequire sheet=$tmp_sheet work=$tmp_work
7
  !distribute words $tmp_severity into severity_w,severity_s,severity_ss
18051 bpr 8
  <div class="wims_tooltip wims_sheet_item">
9
  <div class="wims_tooltiptext" style="width:15em">
10
  $wims_name_Sheet $tmp_sheet, $wims_name_Exercise $tmp_work
11
  !if $require!=0 and $require!=$empty
18014 bpr 12
    <ul class="wims_nopuce">
13
    <li>$(wims_name_thsheet[3]): $require</li>
18029 bpr 14
    !if $wims_user!=$empty and $wims_user!=supervisor
15
      !set mean=!getscoremean sheet=$tmp_sheet work=$tmp_work
16
       <li>$(wims_name_thsheet[7]): $[$mean]/10</li>
17
      !if $severity_ss=0
18
        !set got=!getscore sheet=$tmp_sheet work=$tmp_work
19
        <li>$(wims_name_thsheet[5]): $[round(100*$got/$require)]%</li>
20
      !endif
21
      !if $severity_ss=1
22
        !set best=!getscorebest sheet=$tmp_sheet work=$tmp_work
23
        <li>$(wims_name_thsheet[10]): $[round(100*$best/$require)]%</li>
24
      !endif
25
      !if $severity_ss=2
26
        !set level=!getscorelevel sheet=$tmp_sheet work=$tmp_work
18051 bpr 27
      <li>$(wims_name_thsheet[13]): $[$level]/10</li>
18029 bpr 28
      !endif
18014 bpr 29
    !endif
30
    </ul>
31
  !endif
18051 bpr 32
  </div></div>
18014 bpr 33
!endif