Subversion Repositories wimsdev

Rev

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

  1. !read adm/class/classname.phtml $wims_classname\
  2. $wims_institutionname
  3.  
  4. !read adm/title.phtml 1\
  5. $classname\
  6. $livret_title
  7.  
  8. !if $usercnt==0
  9.  $name_noyetparticipant
  10. !! !exit
  11. !endif
  12. !if $livret_nbcomp==0
  13.  $name_no_competence
  14.  !exit
  15. !endif
  16. !default note=0
  17. <p></p>
  18.  
  19. !! add varfilter
  20. !form reply
  21.  !read adm/varfilter html
  22. !formend
  23.  
  24. !read proc/legend.proc legend
  25.  
  26. $table_header
  27.  $table_hdtr
  28.    <th rowspan="2">$wims_name_lastname, $wims_name_firstname</th>
  29.    !for k=1 to $livret_nbcomp
  30.     <th valign="middle" colspan="$(nbpalier_$k)">
  31.      !set wims_ref_title=$(title_$k)
  32.      !href cmd=renew&job=addcomp&comp=$k $(name_icompetence)$k
  33.      !set wims_ref_class=wims_button
  34.      &nbsp;
  35.      !href cmd=renew&job=addcomp&comp=$k $wims_name_change
  36.     </th>
  37.     !if $k<$livret_nbcomp
  38.      <td style="width:3px;" rowspan="$[2+$usercnt]"></td>
  39.     !endif
  40.    !next k
  41.  </tr>
  42.  $table_hdtr
  43.   !for k=1 to $livret_nbcomp
  44.    !for j=1 to $(nbpalier_$k)
  45.     !let desc=!record $j of $livret_dir/.comp$k
  46.     !let desc=!line 1 of $desc
  47.     !let desc=!replace internal ' by \' in $desc
  48.    <th valign="middle">
  49.    <a onmouseover="Tip('$desc',$tooltip_parm)">$(name_ipalier)$j</a></th>
  50.   !next j
  51.  !next k
  52. </tr>
  53. !for i=1 to $usercnt
  54.  !set uu=!line $i of $userlist
  55.  !if $varfilter_!=$empty
  56.   !reset var_filter_test
  57.   !readproc adm/class/testfilter $(uu[1])\
  58. $varfilter_
  59.  !endif
  60.  !if $var_filter_test=1 or $varfilter_=$empty
  61.           $table_tr
  62.            <td>
  63.             !href cmd=reply&job=user&user=$(uu[1]) $(uu[2])
  64.             !if $(uu[1]) isitemof $wims_connectedlogin and $wims_user=supervisor
  65.              <img src="gifs/themes/$wims_theme_icon/connected.png" style="width:15px" alt="connected" />
  66.             !endif
  67.            </td>
  68.            !for k=1 to $livret_nbcomp
  69.             !for j=1 to $(nbpalier_$k)
  70.              !read adm/class/colors $(skillu_$i[$k;$j]),livret
  71.              <td style=$style_note>$output_note</td>
  72.             !next j
  73.            !next k
  74.           </tr>
  75.  !endif
  76. !next i
  77. $table_end
  78.  
  79.