Subversion Repositories wimsdev

Rev

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

Rev 12485 Rev 12488
Line 1... Line 1...
1 
 
 1 
 
2 
!if $error!=$empty
 2 
!if $error!=$empty
3 
 <div class="wims_msg alert">
 3 
  <div class="wims_msg alert">
4 
 !read msg.phtml
 4 
  !read msg.phtml
5 
 </div><p>
 5 
  </div><p>
6 
 !href module=home $wims_name_class_home
 6 
  !href module=home $wims_name_class_home
7 
 </p>
 7 
  </p>
8 
 !goto end
 8 
  !goto end
9 
!endif
 9 
!endif
10 
!if $user!=$empty
 10 
!if $user!=$empty
11 
  !readdef wimshome/log/classes/$wims_class/.users/$user
 11 
  !readdef wimshome/log/classes/$wims_class/.users/$user
12 
  !distribute item $user_lastname,$user_firstname into lastname,firstname
 12 
  !distribute item $user_lastname,$user_firstname into lastname,firstname
13 
!endif
 13 
!endif
Line 17... Line 17...
17 
  !form reply
 17 
  !form reply
18 
  <input type="hidden" name="job" value="select" />
 18 
  <input type="hidden" name="job" value="select" />
19 
  <input type="hidden" name="status" value="OK" />
 19 
  <input type="hidden" name="status" value="OK" />
20 
  <fieldset class="property_fields halfwidth blockcenter">
 20 
  <fieldset class="property_fields halfwidth blockcenter">
21 
    <legend>$name_title
 21 
    <legend>$name_title
22 
      !if $user!=$empty
 22 
    !if $user!=$empty
23 
        ($name_student)
 23 
      ($name_student)
24 
      !endif
 24 
    !endif
25 
    </legend>
 25 
    </legend>
26 
   <div class="field box">
 26 
   <div class="field box">
27 
       <label for="showsheet">$name_showsheet</label>
 27 
      <label for="showsheet">$name_showsheet</label>
28 
       <br />
 28 
      <br />
29 
    !set wims_formselect_switch=multiple size="$[min($activelist_cnt,10)]"
 29 
    !set wims_formselect_switch=multiple size="$[min($activelist_cnt,10)]"
30 
    !formselect showsheet list $activlist prompt $(shs_title[$(activlist)])
 30 
    !formselect showsheet list $activlist prompt $(shs_title[$(activlist)])
31 
    </div>
 31 
    </div>
32 
    <div class="wimscenter wimsform">
 32 
    <div class="wimscenter wimsform">
33 
      <input type="submit" value="$wims_name_Show" />
 33 
      <input type="submit" value="$wims_name_Show" />
34 
    </div>
 34 
    </div>
35 
       !read choix.phtml
 35 
    !read choix.phtml
36 
   </fieldset>
 36 
   </fieldset>
37 
  !formend
 37 
  !formend
38 
!else
 38 
!else
39 
!if $usercnt==0
 39 
!if $usercnt==0
40 
  $name_noparticipant
 40 
  $name_noparticipant
41 
!else
 41 
!else
42 
 !default showsheet=$activlist
 42 
  !default showsheet=$activlist
43 
 !default graphics=0
 43 
  !default graphics=0
44 
 !if $graphics=1
 44 
  !if $graphics=1
45 
   !default choice=first
 45 
    !default choice=first
46 
   !if $choice=all
 46 
    !if $choice=all
47 
     !set choice=first
 47 
      !set choice=first
48 
   !endif
 48 
    !endif
49 
 !else
 49 
  !else
50 
   !if $choice!=login
 50 
    !if $choice!=login
51 
     !reset loginlist
 51 
      !reset loginlist
52 
   !endif
 52 
    !endif
53 
 !endif
 53 
  !endif
54 
 !set nbth=4
 54 
  !set nbth=4
55 
 !if $user=$empty
 55 
  !if $user=$empty
56 
  <p>$name_click</p>
 56 
    <p>$name_click</p>
57 
 !endif
 - 
 
58 
 !if $graphics!=1
 - 
 
59 
   <script src="scripts/js/tablesort.js"></script>
 - 
 
60 
   <script src="scripts/js/tablesort.number.js"></script>
 - 
 
61 
   !set table_id=TABLE_userlist
 - 
 
62 
   !set table_class=sortable
 - 
 
63 
 !endif
 - 
 
64 
 $table_header
 - 
 
65 
 <thead>
 - 
 
66 
 $table_hdtr
 - 
 
67 
   <th colspan="5"></th>
 - 
 
68 
   !for j in $showsheet
 - 
 
69 
     !if $(activ[$j])>0
 - 
 
70 
       <th colspan="2" class="small">$wims_name_Sheet $j <br />$(shs_title[$j])<br />($(nbexo$j) $name_exo)</th>
 - 
 
71 
       !increase nbth
 - 
 
72 
       !increase nbth
 - 
 
73 
     !endif
 - 
 
74 
   !next j
 - 
 
75 
 </tr>
 - 
 
76 
 $table_hdtr
 - 
 
77 
   <th scope="col">$wims_name_lastname, $wims_name_firstname</th>
 - 
 
78 
   <th scope="col">$name_lastconnexion</th>
 - 
 
79 
   <th scope="col" data-sort-method="number">$name_nbsessions</th>
 - 
 
80 
   <th scope="col" class="small" data-sort-method="number">$wims_name_cnt_exo<br /> ($nbexototal $name_exo)</th>
 - 
 
81 
   <th>$name_total</th>
 - 
 
82 
   !for j in $showsheet
 - 
 
83 
     !if $(activ[$j])>0
 - 
 
84 
       <th class="small" scope="col" data-sort-method="number">$name_cnt_exo</th>
 - 
 
85 
       <th class="small" scope="col" data-sort-method="number">$name_time</th>
 - 
 
86 
     !endif
 - 
 
87 
   !next j
 - 
 
88 
 </tr>
 - 
 
89 
 </thead>
 - 
 
90 
 <tbody>
 - 
 
91 
!!!no efficient !
 - 
 
92 
!set nbpart=0
 - 
 
93 
 !for m=1 to $usercnt
 - 
 
94 
  !if $nbpart > $limitpart and $choice!=all
 - 
 
95 
    !break
 - 
 
96 
  !endif
 57 
  !endif
- 
 
 58 
  !if $graphics!=1
97 
  !set uu=!record $m of wimshome/log/classes/$wims_class/.userlist
 59 
    <script src="scripts/js/tablesort.js"></script>
98 
  !distribute items $uu into lastname,firstname,uu
 60 
    <script src="scripts/js/tablesort.number.js"></script>
99 
  !if $choice=first and $m=1
 61 
    !set table_id=TABLE_userlist
100 
    !default user=$uu
 62 
    !set table_class=sortable
101 
  !endif
 63 
  !endif
102 
 !if $choice=all or ($choice=login and $uu isitemof $loginlist and $user=$empty) \
 - 
 
103 
   or ($choice=select and $uu isitemof $select_user)\
 64 
  $table_header
- 
 
 65 
  <thead>
104 
   or $uu=$user\
 66 
  $table_hdtr
105 
   or ($choice=filter and $varfilter_!=$empty)
 67 
  <th colspan="5"></th>
106 
  !if $varfilter_!=$empty
 68 
  !for j in $showsheet
107 
    !reset var_filter_test
 69 
    !if $(activ[$j])>0
108 
    !readproc adm/vfilter/testfilter $uu\
 70 
      <th colspan="2" class="small">$wims_name_Sheet $j <br />$(shs_title[$j])<br />($(nbexo$j) $name_exo)</th>
109 
$varfilter_
 - 
 
110 
    !if $var_filter_test!=1
 71 
      !increase nbth
111 
      !goto enduser
 72 
      !increase nbth
112 
    !endif
 73 
    !endif
- 
 
 74 
  !next j
- 
 
 75 
  </tr>
- 
 
 76 
  $table_hdtr
- 
 
 77 
  <th scope="col">$wims_name_lastname, $wims_name_firstname</th>
- 
 
 78 
  <th scope="col">$name_lastconnexion</th>
- 
 
 79 
  <th scope="col" data-sort-method="number">$name_nbsessions</th>
- 
 
 80 
  <th scope="col" class="small" data-sort-method="number">$wims_name_cnt_exo<br /> ($nbexototal $name_exo)</th>
- 
 
 81 
  <th>$name_total</th>
- 
 
 82 
  !for j in $showsheet
- 
 
 83 
    !if $(activ[$j])>0
- 
 
 84 
      <th class="small" scope="col" data-sort-method="number">$name_cnt_exo</th>
- 
 
 85 
      <th class="small" scope="col" data-sort-method="number">$name_time</th>
113 
  !endif
 86 
    !endif
- 
 
 87 
  !next j
- 
 
 88 
  </tr>
- 
 
 89 
  </thead>
- 
 
 90 
  <tbody>
- 
 
 91 
  !!!no efficient !
- 
 
 92 
  !set nbpart=0
- 
 
 93 
  !for m=1 to $usercnt
- 
 
 94 
    !if $nbpart > $limitpart and $choice!=all
- 
 
 95 
      !break
- 
 
 96 
    !endif
- 
 
 97 
    !set uu=!record $m of wimshome/log/classes/$wims_class/.userlist
- 
 
 98 
    !distribute items $uu into lastname,firstname,uu
- 
 
 99 
    !if $choice=first and $m=1
- 
 
 100 
      !default user=$uu
- 
 
 101 
    !endif
- 
 
 102 
    !if $choice=all or ($choice=login and $uu isitemof $loginlist and $user=$empty) \
- 
 
 103 
        or ($choice=select and $uu isitemof $select_user)\
- 
 
 104 
        or $uu=$user\
- 
 
 105 
        or ($choice=filter and $varfilter_!=$empty)
- 
 
 106 
      !if $varfilter_!=$empty
- 
 
 107 
        !reset var_filter_test
- 
 
 108 
        !readproc adm/vfilter/testfilter $uu\
- 
 
 109 
$varfilter_
- 
 
 110 
        !if $var_filter_test!=1
- 
 
 111 
          !goto enduser
- 
 
 112 
        !endif
- 
 
 113 
      !endif
114 
  !set getraw=$uu
 114 
      !set getraw=$uu
115 
  !increase nbpart
 115 
      !increase nbpart
116 
  !readproc raw.proc
 116 
      !readproc raw.proc
117 
  $table_tr
 117 
      $table_tr
118 
  <td>
 118 
      <td>
119 
   !href module=adm/class/userscore&job=getuser&getuser=$uu#sheet$(showsheet[1]) $name_student
 119 
      !href module=adm/class/userscore&job=getuser&getuser=$uu#sheet$(showsheet[1]) $name_student
120 
  </td>
 120 
      </td>
121 
  !for h = 1 to 2*$sheetcnt + 4
 121 
      !for h = 1 to 2*$sheetcnt + 4
122 
    !set h1=$[($h+$h%2)/2-2]
 122 
        !set h1=$[($h+$h%2)/2-2]
123 
    !if $h <=4 or ($h>4 and $(activ[$h1])>0) and $h1 isitemof $showsheet
 123 
        !if $h <=4 or ($h>4 and $(activ[$h1])>0) and $h1 isitemof $showsheet
124 
     !if $h>2 and . notin $[$h/2]
 124 
          !if $h>2 and . notin $[$h/2]
125 
      !if $(data[$h])!=$empty
 125 
            !if $(data[$h])!=$empty
126 
        !let tmp=!replace internal : by , in $(data[$h])
 126 
              !let tmp=!replace internal : by , in $(data[$h])
127 
        !let tmp=$[$(tmp[1])*3600+$(tmp[2])*60+$(tmp[3])]
 127 
              !let tmp=$[$(tmp[1])*3600+$(tmp[2])*60+$(tmp[3])]
128 
      !else
 128 
            !else
129 
        !let tmp=-1
 129 
              !let tmp=-1
- 
 
 130 
            !endif
- 
 
 131 
            <td data-sort="$tmp">$(data[$h])
- 
 
 132 
          !else
- 
 
 133 
            <td data-sort="$(data[$h])">$(data[$h])
- 
 
 134 
          !endif
- 
 
 135 
          !if $h=3 and $(data[$h])!=$empty and $(data[-1])>0
- 
 
 136 
            <span style="color:orange">+ $(data[-1])</span>
- 
 
 137 
          !endif
- 
 
 138 
          !set h2=$[$h%2]
- 
 
 139 
          !if $h1 isitemof $showsheet and $h2=1
- 
 
 140 
            !if , isin $showsheet
- 
 
 141 
              !set bb=!select $databyday where column 1=$h1
- 
 
 142 
            !else
- 
 
 143 
              !set bb=$(databyday[1;])
- 
 
 144 
            !endif
- 
 
 145 
            !if $bb!=$empty
- 
 
 146 
              !set bb=!exec pari vecsum($(bb[6]))
- 
 
 147 
              <span style="color:orange">+ $bb</span>
- 
 
 148 
            !endif
- 
 
 149 
          !endif
- 
 
 150 
          </td>
- 
 
 151 
        !endif
- 
 
 152 
      !next
- 
 
 153 
      </tr>
- 
 
 154 
      !if $graphics=1
- 
 
 155 
        $table_tr
- 
 
 156 
        <td colspan="$[$nbth+1]" style="text-align:left;">
- 
 
 157 
        !read exobyday.phtml
- 
 
 158 
        </td></tr>
130 
      !endif
 159 
      !endif
131 
      <td data-sort="$tmp">$(data[$h])
 - 
 
132 
     !else
 - 
 
133 
      <td data-sort="$(data[$h])">$(data[$h])
 - 
 
134 
     !endif
 - 
 
135 
     !if $h=3 and $(data[$h])!=$empty and $(data[-1])>0
 - 
 
136 
        <span style="color:orange">+ $(data[-1])</span>
 - 
 
137 
     !endif
 - 
 
138 
     !set h2=$[$h%2]
 - 
 
139 
     !if $h1 isitemof $showsheet and $h2=1
 - 
 
140 
       !if , isin $showsheet
 - 
 
141 
         !set bb=!select $databyday where column 1=$h1
 - 
 
142 
       !else
 - 
 
143 
         !set bb=$(databyday[1;])
 - 
 
144 
       !endif
 - 
 
145 
       !if $bb!=$empty
 - 
 
146 
         !set bb=!exec pari vecsum($(bb[6]))
 - 
 
147 
         <span style="color:orange">+ $bb</span>
 - 
 
148 
       !endif
 - 
 
149 
     !endif
 - 
 
150 
    </td>
 - 
 
151 
    !endif
 160 
    !endif
- 
 
 161 
  :enduser
152 
  !next
 162 
  !next
153 
  </tr>
 - 
 
154 
 !if $graphics=1
 - 
 
155 
  $table_tr
 - 
 
156 
  <td colspan="$[$nbth+1]" style="text-align:left;">
 - 
 
157 
  !read exobyday.phtml
 - 
 
158 
  </td></tr>
 - 
 
159 
 !endif
 - 
 
160 
!endif
 - 
 
161 
:enduser
 - 
 
162 
!next
 - 
 
163 
</tbody>
 163 
  </tbody>
164 
$table_end
 164 
  $table_end
165 
!if $graphics!=1
 165 
  !if $graphics!=1
166 
  <script>
 166 
    <script>
167 
    new Tablesort(document.getElementById('TABLE_userlist'));
 167 
      new Tablesort(document.getElementById('TABLE_userlist'));
168 
  </script>
 168 
    </script>
169 
!endif
 169 
  !endif
170 
!endif
 170 
!endif
171 
 
 171 
 
172 
!if $user!=$empty and $choice!=all
 172 
!if $user!=$empty and $choice!=all
173 
 !distribute item scores,livret1 into sc,li
 173 
  !distribute item scores,livret1 into sc,li
174 
 !set parmuser1=&job=getuser&getuser=$user
 174 
  !set parmuser1=&job=getuser&getuser=$user
175 
 !set parmuser2=&job=user&user=$user
 175 
  !set parmuser2=&job=user&user=$user
176 
!else
 176 
!else
177 
 !distribute item Score1,livret into sc,li
 177 
  !distribute item Score1,livret into sc,li
178 
!endif
 178 
!endif
179 
!set wims_menu_items=!append line itemsep,0,$wims_name_Evaluation $user\
 179 
!set wims_menu_items=!append line itemsep,0,$wims_name_Evaluation $user\
180 
back2 $user,1,cmd=new&user=$user\
 180 
back2 $user,1,cmd=new&user=$user\
181 
$sc,1,module=adm/class/userscore&job_affi=notes$parmuser1\
 181 
$sc,1,module=adm/class/userscore&job_affi=notes$parmuser1\
182 
$li,1,module=adm/class/livret$parmuser2\
 182 
$li,1,module=adm/class/livret$parmuser2\