Subversion Repositories wimsdev

Rev

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

  1. !! --------------------  affiche le contenu de la feuille $sheet de la classe $wims_class
  2. !! langage is defined in adm/class/sheet/lang/names.phtml.$lang
  3.  
  4. $table_header
  5. <caption>$name_content</caption>
  6. <thead>
  7.   $table_hdtr
  8.     !for k=1 to 5
  9.       <th>$(name_shtab[$k])</th>
  10.     !next k
  11.     <th>$name_qnum</th>
  12.     !for k=6 to 7
  13.       <th>$(name_shtab[$k])</th>
  14.     !next k
  15.     <th>$(name_shtab[10])</th>
  16.     !if $activetest>=0
  17.       <th>$(name_shtab[8])</th>
  18.       !if $activetest=0
  19.         <th>$(name_shtab[11])</th>
  20.       !endif
  21.     !endif
  22.   </tr>
  23. </thead>
  24. <tbody>
  25. !for i=1 to $exocnt
  26.   !set ex=!record $i of wimshome/log/classes/$wims_class/sheets/.sheet$sheet
  27.   !distribute lines $ex into di,pa,bidon,bidon,ti,de,dep,com,feed,icone
  28.   $table_tr
  29.   <td id="td_exo_$i">$i</td>
  30.   <td>
  31.   !if $icone!=$empty
  32.     !set wims_ref_class=text_icon icon_$icone
  33.   !endif
  34.   !href cmd=new&module=$di&worksheet=$sheet&$pa $ti
  35.   </td>
  36.   <td>$de</td>
  37.   <td>
  38.     !getscorerequire sheet=$sheet work=$i
  39.   </td>
  40.   <td>
  41.     !getscoreweight sheet=$sheet work=$i
  42.   </td>
  43.   !set pa=!replace internal & by $ $ in $pa
  44.   !reset qnum
  45.   !!oef exercises
  46.   !set qnum=!getopt qnum in $pa
  47.   !if $qnum=
  48.     !!J.E. exercises
  49.     !set qnum=!getopt total_exos in $pa
  50.   !endif
  51.    <td>$qnum</td>
  52.    <td>
  53.   !if $dep!=$empty
  54.     $dep
  55.   !else
  56.     $
  57.   !endif
  58.    </td>
  59.    <td>$com</td>
  60.   !set feedbr=!rows2lines $feed
  61.   !set feedbr=!replace internal $\
  62. $ by </li><li> in <ul><li>$feedbr</li></ul>
  63.    <td style="text-align:left" class="small">
  64.   !if $feed!=$empty
  65.       $feedbr
  66.   !endif
  67.   </td>
  68.   !if $activetest>=0
  69.     <td>
  70.     !set wims_ref_class=wims_button
  71.     !href cmd=reply&job=prep_modify&modif=$i $(seriesaction[1])
  72.     !if $activetest=0
  73.       $
  74.       !set wims_ref_class=wims_button wims_warning
  75.       !href cmd=reply&job=delete&delete=$i#list $(seriesaction[2])
  76.      </td><td>
  77.       !read adm/sheet/moveafterform.phtml
  78.     !endif
  79.     </td>
  80.   !endif
  81.   </tr>
  82. !next i
  83. </tbody>
  84. $table_end
  85.