Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 3498 | obado | 1 | |
| 2 | scnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets |
||
| 3 | !for s=1 to $scnt |
||
| 4 | ecnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$s |
||
| 5 | !distribute item ,,, into reqs,weis |
||
| 6 | !for e=1 to $ecnt |
||
| 7 | r=!record $e of wimshome/log/classes/$wims_class/sheets/.sheet$s |
||
| 8 | !distribute lines $r into t_,t_,r_,w_ |
||
| 9 | r_=$[$r_] |
||
| 10 | w_=$[$w_] |
||
| 11 | reqs=!append word $r_ to $reqs |
||
| 12 | weis=!append word $w_ to $weis |
||
| 13 | !next e |
||
| 14 | !ifval $s=1 |
||
| 15 | !writefile wimshome/log/classes/$wims_class/sheets/.require $reqs |
||
| 16 | !writefile wimshome/log/classes/$wims_class/sheets/.weight $weis |
||
| 17 | !else |
||
| 18 | !appendfile wimshome/log/classes/$wims_class/sheets/.require $reqs |
||
| 19 | !appendfile wimshome/log/classes/$wims_class/sheets/.weight $weis |
||
| 20 | !endif |
||
| 21 | !next s |
||
| 22 |