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