Subversion Repositories wimsdev

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
12378 bpr 1
!set tcnt=!recordcnt wimshome/log/classes/$wims_class/tool/.toolindex
2
!reset ts_list tt_list ti_list tde_list tdw_list
3
!for i=1 to $tcnt
4
  !set t__=!record $i of wimshome/log/classes/$wims_class/tool/.toolindex
5
  !distribute lines $t__ into s_,t_,ti_,de_,o_,w_
6
  !if $o_>0
7
    !set ts_list=!append line $s_ to $ts_list
8
    !set tt_list=!append line $t_ to $tt_list
9
    !set ti_list=!append line $ti_ to $ti_list
10
    !set tde_list=!append line $de_ to $tde_list
11
    !set tdw_list=!append line $w_ to $tw_list
12
  !endif
13
!next i
14
!set tcnt=!linecnt $ts_list