Subversion Repositories wimsdev

scnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
!for s=1 to $scnt
 ecnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$s
 !distribute item ,,, into reqs,weis
 !for e=1 to $ecnt
  r=!record $e of wimshome/log/classes/$wims_class/sheets/.sheet$s
  !distribute lines $r into t_,t_,r_,w_
  r_=$[$r_]
  w_=$[$w_]
  reqs=!append word $r_ to $reqs
  weis=!append word $w_ to $weis
 !next e
 !ifval $s=1
  !writefile wimshome/log/classes/$wims_class/sheets/.require $reqs
  !writefile wimshome/log/classes/$wims_class/sheets/.weight $weis
 !else
  !appendfile wimshome/log/classes/$wims_class/sheets/.require $reqs
  !appendfile wimshome/log/classes/$wims_class/sheets/.weight $weis
 !endif
!next s