Subversion Repositories wimsdev

Rev

Rev 12316 | Rev 12656 | 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.  $table_hdtr
  7. !for k=1 to 5
  8.    <th>$(name_shtab[$k])</th>
  9. !next k
  10.    <th>$name_qnum</th>
  11. !for k=6 to 7
  12.    <th>$(name_shtab[$k])</th>
  13. !next k
  14. <th>$(name_shtab[10])</th>
  15. !if $activetest>=0
  16.   <th>$(name_shtab[8])</th>
  17. !endif
  18.  </tr>
  19. !for i=1 to $exocnt
  20.   !set ex=!record $i of wimshome/log/classes/$wims_class/sheets/.sheet$sheet
  21.   !distribute lines $ex into di,pa,re,we,ti,de,dep,com,feed,icone
  22.   $table_tr
  23.   <td id="td_exo_$i">$i</td>
  24.   <td>
  25.   !if $icone!=$empty
  26.     !set wims_ref_class=text_icon icon_$icone
  27.   !endif
  28.   !href cmd=new&module=$di&worksheet=$sheet&$pa $ti
  29.   </td>
  30.   <td>$de</td>
  31.   <td>$re</td>
  32.   <td>$we</td>
  33.   !set pa=!replace internal & by $ $ in $pa
  34.   !reset qnum
  35.   !!oef exercises
  36.   !set qnum=!getopt qnum in $pa
  37.   !if $qnum=
  38.    !!J.E. exercises
  39.     !set qnum=!getopt total_exos in $pa
  40.   !endif
  41.    <td>$qnum</td>
  42.    <td>
  43.   !if $dep!=$empty
  44.       $dep
  45.     !else
  46.      $
  47.   !endif
  48.    </td>
  49.    <td>$com</td>
  50.    <td>$feed</td>
  51.   !if $activetest>=0
  52.   <td>
  53.     !set wims_ref_class=wims_button
  54.     !href cmd=reply&job=prep_modify&modif=$i $(seriesaction[1])
  55.     !if $activetest=0
  56.    &nbsp;
  57.       !set wims_ref_class=wims_button wims_warning
  58.       !href cmd=reply&job=delete&delete=$i#list $(seriesaction[2])
  59.      !if $i>1
  60.     $
  61.         !set wims_ref_class=wims_button
  62.         !href cmd=reply&job=moveup&moveup=$i#td_exo_$[$i-1] $(seriesaction[3])
  63.      !endif
  64.     !endif
  65.   </td>
  66.   !endif
  67.   </tr>
  68. !next i
  69. $table_end
  70.