Subversion Repositories wimsdev

Rev

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

Rev 14198 Rev 15763
Line 16... Line 16...
16 
  li_=4
 16 
  li_=4
17 
!endif
 17 
!endif
18 
ecnt_=!recordcnt wimshome/log/classes/$wims_class/$(type_)s/.$(type_)$num_
 18 
ecnt_=!recordcnt wimshome/log/classes/$wims_class/$(type_)s/.$(type_)$num_
19 
!for e_=1 to $ecnt_
 19 
!for e_=1 to $ecnt_
20 
  field_$e_=!record $e_ of wimshome/log/classes/$wims_class/$(type_)s/.$(type_)$num_
 20 
  field_$e_=!record $e_ of wimshome/log/classes/$wims_class/$(type_)s/.$(type_)$num_
21 
  field_$e_=!line 1 to 10 of $(field_$e_)\
 21 
  field_$e_=!line 1 to 11 of $(field_$e_)\
22 
\
 22 
\
23 
\
 23 
\
24 
\
 24 
\
25 
\
 25 
\
26 
\
 26 
\
27 
\
 27 
\
- 
 
 28 
\
- 
 
 29 
 
28 
 
 30 
 
29 
!next e_
 31 
!next e_
30 
list_=!values v for v=1 to $ecnt_
 32 
list_=!values v for v=1 to $ecnt_
31 
list_=!replace item number $source_ by $empty in $list_
 33 
list_=!replace item number $source_ by $empty in $list_
32 
!if $target_!=$empty
 34 
!if $target_!=$empty