Subversion Repositories wimsdev

Rev

Rev 9351 | Rev 9811 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !!!###language independant
  2.  
  3. !read adm/title.phtml 1\
  4. $classname\
  5. $name_workdetail
  6.  
  7. <div class="wimscenter"><span class="wimsemph">
  8. !if $wims_user=supervisor
  9.   !reset css_connected
  10.   !if $getuser isitemof $wims_connectedlogin
  11.     !set css_connected=class="wims_connected"
  12.     !set wims_ref_title=connected
  13.   !endif
  14.   <span $css_connected>
  15.  !href module=adm/class/usermanage/&job=userprop&getuser=$getuser $name_studentloc
  16.   </span>
  17. !else
  18.  $name_studentloc
  19. !endif
  20. </span><br /><span class="small">$wims_name_Login: <span class="tt">$getuser</span>
  21. !if $user_external_auth!=$empty
  22. (<span class="tt">$user_external_auth</span>)
  23. !endif
  24. !if $user_email!=$empty
  25. <br />
  26. $wims_name_email: <a href="mailto:$user_email">$user_email</a>
  27. !endif
  28. </span>
  29. </div>
  30.   !if $user_photourl!=
  31.    <img src="$user_photourl" width="100px" style="position:absolute;top:50px;right:5%;" alt="$name_student2" />
  32.   !endif
  33. !if $eremain>0
  34.  <br class="spacer" />
  35.  $name_activesession:
  36.  !href cmd=reply&job=userexam&getuser=$getuser $esession
  37. !else
  38. !! ----- transférer dans usermanage (il s'agit d'un lien de transfert de score pour déplacer des élèves d'une classe à l'autre (dans un portail ou un groupement)
  39. !! !if $wims_user=supervisor and $wims_supertype iswordof 2 4
  40. !!  !readproc adm/gateway/transfer $getuser test
  41. !!  !if $transfer_test>0
  42. !!   !href module=adm/class/usermanage&job=transfer&getuser=$getuser $name_transfer
  43. !!  !endif
  44. !! !endif
  45. !endif
  46.  
  47.  <br class="spacer" />
  48.  
  49. !if $manual>0 and $gcnt>0 and $teacher!=$empty
  50.  $table_header
  51.  <caption><span class="small">
  52.  $name_minmax:
  53.  $min_glob/$mean_glob/$max_glob</span></caption>
  54.  $table_hdtr<th>$wims_name_name</th><th>$(wims_name_thsheet[6])</th><th>$(wims_name_thsheet[9])</th></tr>
  55.  $table_tr<th>$name_manualscore</th>
  56.      <td>$manual%</td>
  57.      !read adm/class/colors $[ceil(10*$mav/$scoremax)]
  58.      <td style=$style_note>$mav</td></tr>
  59.  $table_tr<th>$name_autoscore</th>
  60.      <td>$[100-$manual]%</td>
  61.      !read adm/class/colors $[ceil(10*$per/$scoremax)]
  62.      <td style=$style_note>$per</td></tr>
  63.  $table_tr<th>$name_globalaverage / $scoremax</th>
  64.      <td>100%</td>
  65.      !read adm/class/colors $[ceil(10*$globalav/$scoremax)]
  66.      <td style=$style_note>$globalav</td></tr>
  67.  $table_end
  68.  $table_header
  69.  $table_hdtr<th colspan="3">$name_manualscore
  70.  !if $wims_user=supervisor
  71.   <br />
  72.   !href lang=$lang&module=adm/class/grades&method=user&un=$getuser $wims_name_change
  73.  !endif
  74.  </th></tr>
  75.  $table_hdtr<th>$(wims_name_thsheet[2])</th><th>$(wims_name_thsheet[4])</th><th>$(wims_name_thsheet[9])</th></tr>
  76.  !set v_=0
  77.  !for i=1 to $gcnt
  78.   $table_tr<td>$(titles[2+$i])</td><td>$(w$i)</td>
  79.   !read adm/class/colors $[10*ceil($(g_$i))/$scoremax]
  80.   <td style=$style_note>$(g_$i)</td></tr>
  81.  !next i
  82.  $table_hdtr<th colspan="2">$name_Average</th>
  83.  !read adm/class/colors $[ceil(10*$mav/$scoremax)]
  84.  <td style=$style_note>$mav</td></tr>
  85.  $table_end
  86. !else
  87.  <div class="wimscenter">
  88.  $name_globalaverage: <b>$per</b> / $scoremax.
  89.  !if $min_glob<$scoremax
  90.   <br /><span class="small">$name_minmax:
  91.   $min_glob/$mean_glob/$max_glob</span>
  92.  !endif
  93.  </div>
  94. !endif
  95.  
  96.  
  97. !!readdef wimshome/log/classes/$wims_class/.def
  98. !!default class_topscores=0
  99. !if $class_topscores>0
  100.  
  101.  $table_header$table_hdtr<th colspan="2">$name_topten</td></tr>
  102.  !for i=1 to $class_topscores
  103.   !set L=!line $i of $TT
  104.   !if $class_anonymtopscores=yes
  105.    !set name=$i
  106.   !else
  107.    !set name=!item 1 of $L
  108.    !set firstname=!item 2 of $L
  109.    !set name=$name $firstname
  110.   !endif
  111.   !set avg=!item 4 of $L
  112. $table_tr<td class="small" style="text-align:right;font-weight:bold">
  113.   $name &nbsp;</td>
  114. <td style="text-align:left" class="small">&nbsp;$avg</td></tr>
  115.  !next i
  116.  $table_end
  117.  
  118. !endif
  119.  
  120. !if $eactivecnt>0
  121.  $table_header$table_hdtr<th colspan="4">$name_examnote
  122.  !if $wims_user=supervisor or $class_examshow!=no
  123.   <span class="small">
  124.   !href cmd=reply&job=examcheck&checkuser=$getuser [$wims_name_detail]
  125.   </span>
  126.  !endif
  127.  </th></tr>
  128.  $table_hdtr
  129.   <th>$(wims_name_thsheet[1])</th>
  130.   <th>$(wims_name_thsheet[2])</th>
  131.   <th>$(wims_name_thsheet[9])/$scoremax</th>
  132.  </tr>
  133.  !for i in $activexams
  134.   !set l=!record $i of wimshome/log/classes/$wims_class/exams/.exams
  135.   !set t=!line 4 of $l
  136.  
  137.   $table_tr<td>$i</td>
  138.   <td>$t</td>
  139.   !if $[rint(10*$(es_$i)*$scoremax)/100]>0
  140.    !read adm/class/color $[ceil($(es_$i))]
  141.    <td style=$style_note>$[rint(10*$(es_$i)*$scoremax)/100]</td>
  142.   !else
  143.    <td>--</td>
  144.   !endif
  145.   </tr>
  146.  !next i
  147.  $table_end
  148. !endif
  149. !for i=1 to $activecnt
  150.  !set l_=!line $i of $activesheets
  151.  !distribute items $l_ into n_,e_
  152.  !set L_=!line $n_ of $defaultformula
  153.  !reset A_ B_ C_
  154.  !distribute word $L_ into A_,B_,C_
  155.  !default A_=1
  156.  !default B_=2
  157.  !default C_=0
  158.  !set t_=!item 3 to -1 of $l_
  159.  !set t_=!char 1 to $title_limit of $t_
  160.  !set v_=!getscorerequire sheet=$n_ user=$getuser
  161.  !set w_=!wordcnt $v_
  162.  !set S_=0
  163.  !for k=1 to $w_
  164.   !set a_=!word $k of $v_
  165.   !set S_=$[$S_+$a_]
  166.  !next k
  167.  !set sw=!line $[$n_+1] of $shweights
  168.  !set q=!word 2 of $sw
  169.  !set sw=!word 3 of $sw
  170.  !default sw=0
  171.  !default q=2
  172.  !if $S_<=0
  173.   !goto next
  174.  !endif
  175.  !set seq_open=!defof sequence_open in wimshome/log/classes/$wims_class/seq/.def
  176.  !if $seq_open!=yes
  177.    !set hat=$name_Sheet $n_&nbsp;: $t_
  178.  !else
  179.   !set hat=$wims_name_sequence $(t_[1])&nbsp;: $(t_[2..-1])
  180.  !endif
  181.  <a id="sheet$n_"></a>
  182.  <br class="spacer" />
  183.   !if $wims_user=supervisor
  184.     !set nb_indic=5
  185.   !else
  186.     !if $q!=1
  187.       !set nb_indic=3
  188.     !else
  189.       !set nb_indic=2
  190.     !endif
  191.   !endif
  192.  
  193.   !endif
  194.   !set P_=!line $n_ of $percents
  195.  !distribute words $P_ into p1,p2,p3,p4
  196.   !if $p2!=$empty
  197.    !distribute item $[$p1/100],$[$p2/10],$[$p3/100],$[$p4/100] into x0_,y_,x1_,x2_
  198.    !set ff_$n_=!mathsubst Q=$y_ in $(f_$n_)
  199.    !for sev=0 to 2
  200.      !set ff_$n_=!mathsubst I$sev=$(x$(sev)_) in $(ff_$n_)
  201.    !next
  202.    !set p_=$[ceil(10*$scoremax*$(ff_$n_))/10]
  203.   !endif
  204.  $table_header$table_hdtr<th colspan="$[$nb_indic+5]" style="text-align:left">
  205.  !if $p2!=$empty
  206.    !href module=adm/sheet&sh=$n_ $hat
  207.    <br />
  208.    $(wims_name_thsheet[4]): $A_
  209.    <br />
  210.    !set wims_ref_class=wims_button_help
  211.    !href cmd=help&special_parm=$n_ $(wims_name_thsheet[8])
  212.    !!!lowercase $(f_$n_)
  213. !!global note
  214.   !if $(min_$n_)<$scoremax
  215.     <br />$name_minmax: $(min_$n_)/$(mean_$n_)/$(max_$n_)
  216.    !endif
  217. !!
  218.    <div class="float_right">
  219. !!!FIXME should put a list ?
  220.     $(wims_name_thsheet[9]): $p_ / $scoremax.
  221.      <br />
  222.     !if $wims_user=supervisor or $q!=1
  223.       $(wims_name_thsheet[7]): $p2/10
  224.       <br />
  225.     !endif
  226.     !if $wims_user=supervisor or $sw=0
  227.    !! $(wims_name_thsheet[5])
  228.      $(wims_name_thsheet[5]): $p1%
  229.      <br />
  230.     !endif
  231.     !if $wims_user=supervisor or $sw=1
  232.    !! $(wims_name_thsheet[10])
  233.      $(wims_name_thsheet[10]): $p3%
  234.      <br />
  235.     !endif
  236.     !if $wims_user=supervisor or $sw=2
  237.    !! $(wims_name_thsheet[13])
  238.     $(wims_name_thsheet[13]): $[$p4/10]/10
  239.     !endif
  240.  !else
  241.   !href module=adm/sheet&sh=$n_ $hat
  242.  !endif
  243.  </th></tr>
  244.  $table_hdtr
  245.      <th>$(wims_name_thsheet[1])</th><th>$(wims_name_thsheet[2])</th>
  246.      <th>$(wims_name_thsheet[3])</th><th>$(wims_name_thsheet[4])</th>
  247.      !if $wims_user=supervisor or $q!=1
  248. !!qualite
  249.       <th>$(wims_name_thsheet[7])</th>
  250.      !endif
  251.     !if $wims_user=supervisor or $sw=0
  252. !!I0: percentage work (related to cumul)
  253.     <th>$(wims_name_thsheet[5])</th>
  254.     !endif
  255.     !if $wims_user=supervisor or $sw=1
  256. !!I1: best percentage
  257.      <th>$(wims_name_thsheet[10])</th>
  258.     !endif
  259.     !if $wims_user=supervisor or $sw=2
  260. !!I2: level
  261.      <th>$(wims_name_thsheet[13])</th>
  262.     !endif
  263. !!last
  264.      <th>$(wims_name_thsheet[12])</th>
  265. !!number try
  266.      <th>$(wims_name_thsheet[11])</th></tr>
  267.  !for j=1 to $e_
  268.   !let d=!record $j of wimshome/log/classes/$wims_class/sheets/.sheet$n_
  269.   !distribute line $d into t,t,req_,weight_,title_,t
  270.   $table_tr<td>$j</td>
  271.   <td>$(title_)</td>
  272.   <td>$(req_)</td>
  273.   <td>$(weight_)</td>
  274.   !set try=!getscoretry user=$getuser sheet=$n_ work=$j
  275.   !if $try<=0
  276.    !set makelist=!makelist <td>--</td> for j=1 to $nb_indic
  277.    !replace , by in $makelist
  278.   !else
  279.    !if $wims_user=supervisor or $q!=1
  280.   !!quality
  281.     !set d_=!getscorequality user=$getuser sheet=$n_ work=$j
  282.     !default d_=0
  283.     !read adm/class/colors $[ceil($d_)]
  284.      <td style=$style_note>$d_</td>
  285.    !endif
  286. !!cumul
  287.     !if $wims_user=supervisor or $sw=0
  288.      !set d_=!getscore user=$getuser sheet=$n_ work=$j
  289.      !default d_=0
  290. !!   !read adm/class/colors $[ceil(10*$d_/$(req_))]
  291. !!   <td style=$style_note>$d_</td>
  292. !!percentage
  293.     !if $(req_)>0
  294.      !read adm/class/colors $[ceil(10*$d_/$(req_))]
  295.      <td style=$style_note>$[round(100*$d_/$(req_))]%</td>
  296.     !else
  297.      <td>--</td>
  298.     !endif
  299.    !endif
  300.    !if $wims_user=supervisor or $sw=1
  301. !!best percentage
  302.    !set best=!getscorebest user=$getuser sheet=$n_ work=$j
  303.    !read adm/class/colors $[ceil(10*$best/$req_)]
  304.    <td style=$style_note>$[round($[$best*100/$req_])]%</td>
  305.    !endif
  306.    !if $wims_user=supervisor or $sw=2
  307. !!level
  308.     !set level=!getscorelevel user=$getuser sheet=$n_ work=$j
  309.     !read adm/class/colors $[min(ceil($level+0.1),10)]
  310.     <td style=$style_note>$level</td>
  311.    !endif
  312. !!last
  313.    !set last=!getscorelast user=$getuser sheet=$n_ work=$j
  314.    !read adm/class/colors $[ceil($last)]
  315.    <td style=$style_note>$last
  316.    </td>
  317.  
  318. !endif try
  319. !!try
  320.    <td>
  321.     $try
  322.    </td>
  323.   </tr>
  324.  !next j
  325.  $table_end
  326. !read wimshome/public_html/themes/_widgets/topback.phtml
  327. :next
  328. !next i
  329.  
  330. !if $exologs!=$empty
  331.  !set wims_menu_items=!append line reg_ex,1,module=adm/class/exolog&cmd=new&job=list&checkuser=$getuser\
  332.  to $wims_menu_items
  333. !endif
  334. !set wims_menu_items=!append line rawdata,1,cmd=reply&job=getraw&getraw=$getuser\
  335.  ,0,\
  336. to $wims_menu_items
  337.  
  338. !if $wims_user=supervisor
  339.  !set wims_menu_items=!append line \
  340.  account,1,module=adm/class/usermanage&job=userprop&getuser=$getuser\
  341. to $wims_menu_items
  342.  !if (($wims_supertype<3 and $wims_typename=class) or ($wims_supertype=4 and $wims_typename=course)) and $wims_showlivret!=no
  343.   !set wims_menu_items=!append line livret1,1,module=adm/class/livret&job=user&user=$getuser\
  344.  to $wims_menu_items
  345.   !set wims_menu_items=!append line activity1,1,module=adm/class/activity&job=exobyday&user=$getuser\
  346.  to $wims_menu_items
  347.  !endif
  348.   !set wims_menu_items=!append line ,0, \
  349.   part_list,1,cmd=resume\
  350.  to $wims_menu_items
  351.   !read adm/class/getnextuser $wims_class,$getuser,getuser,getuser
  352. !else
  353.  !if $wims_showlivret!=no
  354.   !set livret_nbcomp=!recordcnt wimshome/log/classes/$wims_class/livret/.comps
  355.   !if $livret_nbcomp >0
  356.    !set wims_menu_items=!append line livret,1,module=adm/class/livret to $wims_menu_items
  357.   !endif
  358.  !endif
  359. !endif
  360.  <br class="spacer" />
  361.