Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
23 reyssat 1 
 
2 
sh=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
3 
!for i=1 to $sh
4 
 l=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets
5 
 l=!word 1 of $l
6 
 !if $l>0
7 
  asheets=!append item $i to $asheets
8 
 !endif
9 
!next i
10