Rev 4296 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
4026 | bpr | 1 | !read adm/css.phtml |
4039 | bpr | 2 | !read adm/class/classname.phtml $wims_classname\ |
4026 | bpr | 3 | $wims_institutionname |
1988 | bpr | 4 | |
1051 | bpr | 5 | !header1 |
1885 | bpr | 6 | <script type="text/javascript" src="scripts/js/wz_tooltip.js" language="Javascript"></script> |
23 | reyssat | 7 | |
2407 | bpr | 8 | |
23 | reyssat | 9 | !if $cmd=help |
2407 | bpr | 10 | !read lang/help.phtml.$moduclass_lang |
23 | reyssat | 11 | !goto end |
12 | !endif |
||
13 | |||
14 | !if $job!=$empty and $job!=sheets |
||
15 | !read $job.phtml |
||
16 | !goto end |
||
17 | !endif |
||
18 | |||
1336 | bpr | 19 | !read adm/title.phtml 1\ |
4026 | bpr | 20 | $classname\ |
1587 | bpr | 21 | $wims_name_part_list |
1336 | bpr | 22 | |
23 | reyssat | 23 | !if $error!=$empty |
24 | <p> |
||
2407 | bpr | 25 | !read lang/msg.phtml.$moduclass_lang |
23 | reyssat | 26 | <p> |
1587 | bpr | 27 | !href module=home $wims_name_class_home |
23 | reyssat | 28 | . <p> |
29 | !goto end |
||
30 | !endif |
||
31 | !if $usercnt==0 |
||
1587 | bpr | 32 | $name_noyetparticipant |
4223 | bpr | 33 | !if $wims_typename!=class |
23 | reyssat | 34 | [ |
4223 | bpr | 35 | !href module=adm/class/reguser&step=1&utype=1 $wims_name_addteacher |
36 | ] |
||
37 | !endif |
||
38 | [ |
||
1963 | guerimand | 39 | !href module=adm/class/reguser&step=1 $wims_name_addstudent |
23 | reyssat | 40 | ] |
1642 | bpr | 41 | [ |
42 | !href cmd=reply&job=csv $wims_name_csv |
||
43 | ] |
||
44 | |||
23 | reyssat | 45 | !else |
4223 | bpr | 46 | |
23 | reyssat | 47 | <center> |
48 | !set deleted=!sh cd $wims_home/log/classes/$wims_class/.users; ls .[0-9a-zA-Z]* 2>/dev/null |
||
49 | !set deleted=!trim $deleted |
||
4296 | bpr | 50 | !if $wims_typename=group and $wims_supertype=2 |
23 | reyssat | 51 | [ |
4223 | bpr | 52 | !href module=adm/class/userlist&job=teacher $wims_name_teacherlist |
53 | ] |
||
54 | [ |
||
55 | !href module=adm/class/reguser&step=1&utype=1 $wims_name_addteacher |
||
56 | ] |
||
4296 | bpr | 57 | !endif |
4223 | bpr | 58 | [ |
1963 | guerimand | 59 | !href module=adm/class/reguser&step=1 $wims_name_addstudent |
4223 | bpr | 60 | |
1343 | bpr | 61 | ] [ |
1587 | bpr | 62 | !href cmd=reply&job=csv $wims_name_csv |
23 | reyssat | 63 | ] |
64 | !if $deleted!=$empty |
||
65 | [ |
||
1587 | bpr | 66 | !href cmd=reply&job=recover $name_partdeleted |
23 | reyssat | 67 | ] |
68 | !endif |
||
69 | </center> |
||
2964 | bpr | 70 | !if $seq_cnt=0 |
71 | <p> |
||
72 | $name_warning_no_sequence |
||
73 | [ |
||
74 | !href module=adm/class/sequence&job=config $wims_name_config |
||
75 | ] |
||
76 | !endif |
||
23 | reyssat | 77 | <p>$table_header |
78 | !if $job_affi=notes |
||
1587 | bpr | 79 | <caption>$name_formula2</caption> |
23 | reyssat | 80 | !else |
81 | !let tmp=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets |
||
82 | !let tmp=!values v for v=1 to $tmp |
||
83 | !let showsheet=!listintersect $showsheet and $tmp |
||
84 | !if $job_affi=qualite |
||
1587 | bpr | 85 | <caption>$name_qualitygot</caption> |
23 | reyssat | 86 | !else |
1587 | bpr | 87 | <caption>$name_percentagedone</caption> |
23 | reyssat | 88 | !endif |
89 | !endif |
||
90 | !if $manual>0 and $job_affi=notes |
||
4218 | bpr | 91 | $table_hdtr<th rowspan="2">$wims_name_lastname, $wims_name_firstname</th> |
92 | <th colspan="3">$name_Average</th> |
||
23 | reyssat | 93 | !for j in $showsheet |
94 | !if E isin $j |
||
95 | !set k=!char 2 to -1 of $j |
||
4298 | obado | 96 | <th rowspan="2" class="name_exam"><small>$name_Exam $k</small></th> |
23 | reyssat | 97 | !else |
4298 | obado | 98 | <th rowspan="2" class="show_sheet"> |
23 | reyssat | 99 | <small> |
1888 | bpr | 100 | !set s=!record $j of wimshome/log/classes/$wims_class/sheets/.sheets |
101 | !set s=!line 3 of $s |
||
2081 | bpr | 102 | !set wims_ref_title=$s |
1587 | bpr | 103 | !href cmd=reply&job=showsheet&numshowsheet=$j $name_Sheet $j |
2081 | bpr | 104 | !!<a onmouseover="Tip('$s',$tooltip_parm)">$picto</a> |
23 | reyssat | 105 | </small></th> |
106 | !endif |
||
107 | !next j |
||
4298 | obado | 108 | $table_hdtr<th class="manual_notes"><small>$(name_manual_notes[1])</small></th> |
109 | <th class="manual_notes"><small>$(name_manual_notes[2])</small></th><th class="manual_notes"><small>$(name_manual_notes[3])</small> |
||
23 | reyssat | 110 | !else |
1587 | bpr | 111 | $table_hdtr<th>$wims_name_lastname, $wims_name_firstname</th> |
23 | reyssat | 112 | !if $job_affi=notes |
4298 | obado | 113 | <th class="average">$name_Average</th> |
23 | reyssat | 114 | !endif |
115 | !for j in $showsheet |
||
116 | !if E isin $j |
||
117 | !set k=!char 2 to -1 of $j |
||
4298 | obado | 118 | <th class="name_exam"><small>$name_Exam $k</small></th> |
23 | reyssat | 119 | !else |
120 | <th><small> |
||
1587 | bpr | 121 | !href cmd=reply&job=showsheet&numshowsheet=$j $name_Sheet $j |
23 | reyssat | 122 | </small></th> |
123 | !endif |
||
124 | !next j |
||
125 | !endif |
||
126 | !distribute item 0,0,0 into mean_tea,mean_auto,mean_glob |
||
127 | !distribute item 0,0,0 into cnt_tea,cnt_auto,cnt_glob |
||
128 | !for i=1 to $usercnt |
||
129 | !set uu=!record $i of wimshome/log/classes/$wims_class/.userlist |
||
130 | !distribute items $uu into lastname,firstname,uu |
||
131 | !set UU=!hex $uu |
||
132 | $table_tr<td> |
||
3088 | bpr | 133 | !href cmd=reply&job=getuser&getuser=$uu#sheet$(showsheet[1]) $name_student1 |
2938 | guerimand | 134 | !readproc adm/class/userscore |
23 | reyssat | 135 | !if $manual>0 and $job_affi=notes |
136 | !set glob=$[rint($manual*$(manual_$UU)+(100-$manual)*($per))/100] |
||
1893 | bpr | 137 | !if $glob>0 |
138 | !read adm/class/colors $[ceil($glob*10/$scoremax)] |
||
139 | <td style=$style_note>$glob |
||
140 | !else |
||
1895 | bpr | 141 | <td align="center">-- |
1893 | bpr | 142 | !endif |
143 | </td> |
||
144 | !if $(manual_$UU)>0 |
||
145 | !read adm/class/colors $[ceil($(manual_$UU)*10/$scoremax)] |
||
146 | <td style=$style_note>$(manual_$UU) |
||
147 | !else |
||
1895 | bpr | 148 | <td align="center">-- |
1893 | bpr | 149 | !endif |
150 | </td> |
||
151 | !if $per>0 |
||
152 | !read adm/class/colors $[ceil($per*10/$scoremax)] |
||
153 | <td style=$style_note>$per |
||
154 | !else |
||
1895 | bpr | 155 | <td align="center">-- |
1893 | bpr | 156 | !endif |
157 | </td> |
||
23 | reyssat | 158 | !distribute item $[$mean_glob+$glob],$[$mean_tea+$(manual_$UU)] into mean_glob,mean_tea |
159 | !if $glob>0 |
||
160 | !advance cnt_glob |
||
161 | !if $(manual_$UU)>0 |
||
162 | !advance cnt_tea |
||
163 | !endif |
||
164 | !if $per>0 |
||
165 | !advance cnt_auto |
||
166 | !endif |
||
167 | !endif |
||
168 | !else |
||
169 | !if $job_affi=notes |
||
170 | !if $per>0 |
||
1895 | bpr | 171 | !read adm/class/colors $[ceil($per*10/$scoremax)] |
1893 | bpr | 172 | <td style=$style_note>$per |
23 | reyssat | 173 | !advance cnt_auto |
174 | !advance cnt_glob |
||
1893 | bpr | 175 | !else |
1895 | bpr | 176 | <td align="center">-- |
23 | reyssat | 177 | !endif |
1893 | bpr | 178 | </td> |
23 | reyssat | 179 | !endif |
180 | !endif |
||
181 | !set mean_auto=$[$mean_auto+$per] |
||
182 | !for j in $showsheet |
||
183 | !if E isin $j |
||
184 | !set k=!char 2 to -1 of $j |
||
1999 | bpr | 185 | !set p_=$[rint(10*$scoremax*$(es_$k))/100] |
23 | reyssat | 186 | !if NaN isin $p_ |
187 | !set p_=0 |
||
188 | !endif |
||
2085 | bpr | 189 | !if $p_>0 |
1893 | bpr | 190 | !read adm/class/colors $[ceil($p_*10/$scoremax)] |
191 | <td style=$style_note>$p_ |
||
2085 | bpr | 192 | !else |
1999 | bpr | 193 | <td align="center">$p_ |
2085 | bpr | 194 | !endif |
1893 | bpr | 195 | </td> |
23 | reyssat | 196 | !else |
197 | !set p_=!line $j of $percents |
||
198 | !distribute words $p_ into p1,p2 |
||
199 | !if $job_affi=notes |
||
200 | !if $p2!=$empty |
||
1603 | bpr | 201 | !distribute item $[$p1/100],$[$p2/10] into x_,y_ |
23 | reyssat | 202 | !set p_=$[rint(100*$scoremax*$(f_$j))/100] |
203 | !else |
||
204 | !set p_=0 |
||
205 | !endif |
||
1893 | bpr | 206 | !if $p_>0 |
207 | !read adm/class/colors $[ceil(10*$p_/$scoremax)] |
||
208 | <td style=$style_note>$p_ |
||
209 | !else |
||
1895 | bpr | 210 | <td align="center">-- |
1893 | bpr | 211 | !endif |
212 | </td> |
||
23 | reyssat | 213 | !else |
214 | !if qualite iswordof $job_affi |
||
215 | !set p_=$p2 |
||
1893 | bpr | 216 | !if $p_>0 |
217 | !read adm/class/colors $[ceil($p_)] |
||
218 | <td style=$style_note>$p_ |
||
219 | !else |
||
1895 | bpr | 220 | <td align="center">-- |
1893 | bpr | 221 | !endif |
222 | </td> |
||
23 | reyssat | 223 | !else |
224 | !set p_=$p1 |
||
1893 | bpr | 225 | !if $p_>0 |
226 | !read adm/class/colors $[ceil($p_/10)] |
||
227 | <td style=$style_note>$p_ % |
||
228 | !else |
||
1895 | bpr | 229 | <td align="center">-- |
1893 | bpr | 230 | </td> |
231 | !endif |
||
23 | reyssat | 232 | !endif |
233 | !if $p2=$empty |
||
234 | !set $p_=0 |
||
235 | !endif |
||
236 | !endif |
||
237 | !endif |
||
238 | !set per_$j=$[$(per_$j)+$p_] |
||
239 | !if $p_>0 |
||
240 | !advance cnt_$j |
||
241 | !endif |
||
242 | !next j |
||
243 | !next i |
||
244 | !distribute item $[rint(100*$mean_auto/$usercnt)/100],\ |
||
245 | $[rint(100*$mean_tea/$usercnt)/100],\ |
||
246 | $[rint(100*$mean_glob/$usercnt)/100] into m_auto,m_tea,m_glob |
||
3049 | bpr | 247 | $table_hdtr<td align="center"><b>$name_classAverage</b></td> |
23 | reyssat | 248 | !if $job_affi=notes |
1893 | bpr | 249 | !if $manual>0 |
250 | !if $m_glob >0 |
||
251 | !read adm/class/colors $[ceil($m_glob*10/$scoremax)] |
||
252 | <td style=$style_note>$m_glob |
||
253 | !else |
||
3049 | bpr | 254 | <td align="center">-- |
1893 | bpr | 255 | !endif |
256 | </td> |
||
257 | !if $m_tea >0 |
||
258 | !read adm/class/colors $[ceil($m_tea*10/$scoremax)] |
||
259 | <td style=$style_note>$m_tea |
||
260 | !else |
||
3049 | bpr | 261 | <td align="center">-- |
1893 | bpr | 262 | !endif |
263 | </td> |
||
264 | !if $m_auto>0 |
||
265 | !read adm/class/colors $[ceil($m_auto*10/$scoremax)] |
||
266 | <td style=$style_note>$m_auto |
||
267 | !else |
||
3049 | bpr | 268 | <td align="center">-- |
1893 | bpr | 269 | !endif |
270 | </td> |
||
271 | !else |
||
272 | !if $m_auto>0 |
||
1904 | bpr | 273 | !read adm/class/colors $[ceil($m_auto*10/$scoremax)] |
1893 | bpr | 274 | <td style=$style_note>$m_auto |
275 | !else |
||
3049 | bpr | 276 | <td align="center">-- |
1893 | bpr | 277 | !endif |
278 | </td> |
||
279 | !endif |
||
23 | reyssat | 280 | !endif |
281 | !for j in $showsheet |
||
1893 | bpr | 282 | !if $[rint(100*$(per_$j)/max(1,$usercnt))/100]>0 |
283 | !if $job_affi=points |
||
284 | !read adm/class/colors $[ceil($(per_$j)/max(1,$usercnt)/10)] |
||
285 | <td style=$style_note>$[rint(100*$(per_$j)/max(1,$usercnt))/100] % |
||
286 | !else |
||
1904 | bpr | 287 | !read adm/class/colors $[ceil($(per_$j)/max(1,$usercnt)*10/$scoremax)] |
1893 | bpr | 288 | <td style=$style_note>$[rint(100*$(per_$j)/max(1,$usercnt))/100] |
289 | !endif |
||
290 | !else |
||
3049 | bpr | 291 | <td align="center">-- |
1893 | bpr | 292 | !endif |
293 | </td> |
||
23 | reyssat | 294 | !next j |
295 | !if $cnt_glob>0 |
||
296 | !distribute item $[rint(100*$mean_auto/max(1,$cnt_auto))/100],\ |
||
297 | $[rint(100*$mean_tea/max(1,$cnt_tea))/100],\ |
||
298 | $[rint(100*$mean_glob/max(1,$cnt_glob))/100] into m_auto,m_tea,m_glob |
||
3049 | bpr | 299 | $table_hdtr<td align="center"><b>$name_posAverage</b></td> |
23 | reyssat | 300 | !if $manual>0 |
1893 | bpr | 301 | !if $m_glob>0 |
302 | !read adm/class/colors $[ceil($m_glob*10/$scoremax)] |
||
303 | <td style=$style_note>$m_glob |
||
304 | !else |
||
3049 | bpr | 305 | <td align="center">-- |
1893 | bpr | 306 | !endif |
307 | </td> |
||
308 | !if $m_tea>0 |
||
309 | !read adm/class/colors $[ceil($m_tea*10/$scoremax)] |
||
310 | <td style=$style_note>$m_tea |
||
311 | !else |
||
3049 | bpr | 312 | <td align="center">-- |
1893 | bpr | 313 | !endif |
314 | </td> |
||
315 | !if $m_auto>0 |
||
316 | !read adm/class/colors $[ceil($m_auto*10/$scoremax)] |
||
317 | <td style=$style_note>$m_auto |
||
318 | !else |
||
3049 | bpr | 319 | <td align="center">-- |
1893 | bpr | 320 | !endif |
321 | </td> |
||
23 | reyssat | 322 | !else |
1893 | bpr | 323 | !if $m_auto>0 |
324 | !read adm/class/colors $[ceil($m_auto*10/$scoremax)] |
||
325 | <td style=$style_note>$m_auto |
||
326 | !else |
||
3049 | bpr | 327 | <td align="center">-- |
1893 | bpr | 328 | !endif |
329 | </td> |
||
23 | reyssat | 330 | !endif |
331 | !for j in $showsheet |
||
1893 | bpr | 332 | !if $[rint(100*$(per_$j)/max(1,$(cnt_$j)))/100]>0 |
333 | !read adm/class/colors $[ceil($(per_$j)/max(1,$(cnt_$j))*10/$scoremax)] |
||
334 | <td style=$style_note>$[rint(100*$(per_$j)/max(1,$(cnt_$j)))/100] |
||
335 | !else |
||
3049 | bpr | 336 | <td align="center">-- |
1893 | bpr | 337 | !endif |
338 | </td> |
||
23 | reyssat | 339 | !next j |
340 | !endif |
||
1893 | bpr | 341 | |
23 | reyssat | 342 | $table_end |
1587 | bpr | 343 | <p>$name_click</p> |
923 | bpr | 344 | !if $activecnt>1 |
23 | reyssat | 345 | <p> |
346 | !form reply |
||
4218 | bpr | 347 | <input type="hidden" name="job" value="sheets"> |
23 | reyssat | 348 | !set wims_formselect_switch=multiple size=$[min($activecnt,6)] |
4218 | bpr | 349 | <table border="0"> |
1587 | bpr | 350 | <tr><td>$name_pickup: |
923 | bpr | 351 | </td><td> |
23 | reyssat | 352 | !reset tmp |
1627 | bpr | 353 | !set seq_open=!defof sequence_open in wimshome/log/classes/$wims_class/seq/.def |
23 | reyssat | 354 | !for i=1 to $activecnt |
355 | !set sh=!line $i of $activesheets |
||
356 | !set se=!item 1 of $sh |
||
1627 | bpr | 357 | !if $seq_open!=yes |
358 | !set ti=!item 3 to -1 of $sh |
||
359 | !set ti=!replace internal , by , in $ti |
||
360 | !set tmp=!append item $se: $ti to $tmp |
||
361 | !else |
||
362 | !set ti=!item 4 to -1 of $sh |
||
363 | !set ti=!replace internal , by , in $ti |
||
364 | !set seq=!item 3 of $sh |
||
365 | !set tmp=!append item $seq/$se: $ti to $tmp |
||
366 | !endif |
||
23 | reyssat | 367 | !next i |
368 | !set ash=$activesh |
||
369 | !for i=1 to $eactivecnt |
||
370 | !set tt=!item $i of $activexams |
||
371 | !set l=!record $tt of wimshome/log/classes/$wims_class/exams/.exams |
||
372 | !set l=!line 4 of $l |
||
1162 | bpr | 373 | !set l=!replace internal , by , in $l |
1587 | bpr | 374 | !set tmp=!append item $name_Exam $tt: $l to $tmp |
23 | reyssat | 375 | !set ash=!append item E$tt to $ash |
376 | !next i |
||
377 | !formselect showsheet list $ash prompt $tmp |
||
923 | bpr | 378 | </td> |
4218 | bpr | 379 | <td><input type="submit" value="$wims_name_Show"></td> |
923 | bpr | 380 | </tr></table> |
23 | reyssat | 381 | </form> |
382 | !endif |
||
923 | bpr | 383 | <p> |
1587 | bpr | 384 | $name_post |
923 | bpr | 385 | !if $job_affi=notes |
1587 | bpr | 386 | !href cmd=reply&job_affi=qualite $(name_affi[1]) |
387 | , |
||
388 | !href cmd=reply&job_affi=points $(name_affi[2]) |
||
923 | bpr | 389 | !else |
390 | !if $job_affi=qualite |
||
1587 | bpr | 391 | !href cmd=reply&job_affi=notes $(name_affi[3]) |
392 | , |
||
393 | !href cmd=reply&job_affi=points $(name_affi[2]) |
||
923 | bpr | 394 | !else |
1587 | bpr | 395 | !href cmd=reply&job_affi=notes $(name_affi[3]) |
396 | , |
||
397 | !href cmd=reply&job_affi=qualite $(name_affi[1]) |
||
923 | bpr | 398 | !endif |
399 | !endif |
||
1587 | bpr | 400 | . </p> |
1603 | bpr | 401 | |
23 | reyssat | 402 | !endif (usercnt=0?) |
1293 | bpr | 403 | |
1868 | bpr | 404 | !set wims_menu_items=!append line sendmail,1,module=adm/class/sendmail\ |
405 | photoboard,1,module=adm/class/photoboard\ |
||
1587 | bpr | 406 | addstudent,1,module=adm/class/reguser&step=1\ |
1323 | guerimand | 407 | csv,1,cmd=reply&job=csv\ |
1868 | bpr | 408 | ,0,\ |
1323 | guerimand | 409 | formula,1,cmd=reply&job=formula&formula=prep\ |
410 | grades,1,module=adm/class/grades\ |
||
1336 | bpr | 411 | to $wims_menu_items |
3095 | guerimand | 412 | !if (($wims_supertype<4 and $wims_typename=class) or ($wims_supertype=4 and $wims_typename iswordof course program)) and $wims_showlivret!=no |
1868 | bpr | 413 | !set wims_menu_items=!append line livret,1,module=adm/class/livret\ |
414 | to $wims_menu_items |
||
415 | !endif |
||
1323 | guerimand | 416 | |
932 | bpr | 417 | !if $usercnt!=0 |
1868 | bpr | 418 | !set wims_menu_items=!append line ,0,\ |
419 | class_stat,1,module=adm/class/stat\ |
||
1293 | bpr | 420 | activity,1,module=adm/class/activity\ |
1336 | bpr | 421 | to $wims_menu_items |
932 | bpr | 422 | !endif |
423 | |||
23 | reyssat | 424 | !if $manual>0 |
1587 | bpr | 425 | <p>$name_manual_explanation</p> |
426 | <p><center> |
||
427 | $(name_manual_notes[1]) = $[$manual/100]* $(name_manual_notes[2]) + $[1-$manual/100]* $(name_manual_notes[3]) |
||
1162 | bpr | 428 | </center> <p> |
23 | reyssat | 429 | !endif |
430 | |||
431 | :end |
||
432 | !tail |
||
433 | |||
434 | !reset job,showsheet,getuser,getraw,delprep,deluser,formula,abandon,reg,\ |
||
233 | bpr | 435 | passcheck |