Subversion Repositories wimsdev

Rev

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

  1. !! on a besoin de databyday
  2. !set dataelse=!line 2 to -1 of $databyday
  3. !if $dataelse=$empty
  4.  !exit
  5. !endif
  6. !set datax=!declosing $(databyday[1;1])
  7. !set day=!declosing $(databyday[1;2])
  8. !set datay=!declosing $(databyday[1;3])
  9. !set dataz=!declosing $(databyday[1;4])
  10. !set datagood=!declosing $(databyday[1;5])
  11. !set datanew=!declosing $(databyday[1;6])
  12.  
  13. !set nbs=!itemcnt $showsheet_
  14. <h2 class="activity_title">
  15. !if $nbs=1
  16.   $wims_name_Sheet
  17. !else
  18.   $wims_name_Sheets
  19. !endif
  20. !replace internal , by ,$ $ in $showsheet_
  21. </h2>
  22. !read draw
  23.  
  24. !if $nbs>1
  25. !!on regarde chacune des feuilles
  26.    !distribute items $wims_name_Sheet,$wims_name_Sheets into name,names
  27. !else
  28. !!on regarde chacun des exos
  29.   !distribute items $wims_name_Exercise, $wims_name_sheet_exos $showsheet_ into name,names
  30. !endif
  31.  !set linecnt=!linecnt $dataelse
  32.  <hr />
  33.   <h2 class="activity_title">$names</h2>
  34.  <ul class="inline">
  35.  !for nn=1 to $linecnt
  36.      !set line=!line $nn of $dataelse
  37.      !set exo=$(line[1])
  38.      !set datay=!declosing $(line[3])
  39.      !if $datay=$empty
  40.        !break
  41.      !endif
  42.      !set dataz=!declosing $(line[4])
  43.      !set datagood=!declosing $(line[5])
  44.      !set datanew=!declosing $(line[6])
  45.      <li style="vertical-align:bottom;">
  46.      !read draw
  47.  <p class="activity_title wimscenter">$name $exo</p>
  48.      </li>
  49.  !next
  50.   </ul>
  51. !endif
  52.  
  53.