Subversion Repositories wimsdev

Rev

Rev 18051 | Rev 18091 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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