Subversion Repositories wimsdev

Rev

Rev 14441 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14441 Rev 15763
Line 7... Line 7...
7
 
7
 
8
scnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
8
scnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
9
!for s=1 to $scnt
9
!for s=1 to $scnt
10
  sheet_$s=!record $s of wimshome/log/classes/$wims_class/sheets/.sheets
10
  sheet_$s=!record $s of wimshome/log/classes/$wims_class/sheets/.sheets
11
  !! CAREFUL : need to take two line more than number of line you wish (bug cmd !line ?)
11
  !! CAREFUL : need to take two line more than number of line you wish (bug cmd !line ?)
12
  sheet_$s=!line 1 to 11 of $(sheet_$s)\
12
  sheet_$s=!line 1 to 12 of $(sheet_$s)\
-
 
13
\
-
 
14
\
13
\
15
\
14
\
16
\
15
\
17
\
16
\
18
\
17
\
19
\
18
\
20
\
19
\
21
\
20
\
22
\
21
 
-
 
22
 
23
 
23
!next s
24
!next s
24
 
25
 
25
!if $update_field!=0
26
!if $update_field!=0
26
  sheet_$sheet=!replace line number $update_field by $update_content in $(sheet_$sheet)
27
  sheet_$sheet=!replace line number $update_field by $update_content in $(sheet_$sheet)