Subversion Repositories wimsdev

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

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