Subversion Repositories wimsdev

Rev

Rev 17333 | Rev 17871 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 17333 Rev 17527
Line 180... Line 180...
180 
  test=
 180 
  test=
181 
  !for s=$sheet to $scnt
 181 
  !for s=$sheet to $scnt
182 
    l=!record $s of wimshome/log/classes/$wims_class/sheets/.sheets
 182 
    l=!record $s of wimshome/log/classes/$wims_class/sheets/.sheets
183 
    l=!line 1 of $l
 183 
    l=!line 1 of $l
184 
    !if $l>0
 184 
    !if $l>0
185 
     test=notclean
 185 
      test=notclean
186 
    !endif
 186 
    !endif
187 
  !next s
 187 
  !next s
188 
  !if $test=$empty
 188 
  !if $test=$empty
189 
    update_field=0
 189 
    update_field=0
190 
    !read proc/update.docindex
 190 
    !read proc/update.docindex