Subversion Repositories wimsdev

Rev

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

Rev 9686 Rev 9688
Line 11... Line 11...
11 
    error=bad_sheet
 11 
    error=bad_sheet
12 
    !reset job
 12 
    !reset job
13 
    !changeto var.proc
 13 
    !changeto var.proc
14 
!endif
 14 
!endif
15 
 
 15 
 
- 
 
 16 
exocnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$sheet
- 
 
 17 
!if $exocnt=0
- 
 
 18 
 !reset job
- 
 
 19 
 !changeto var.proc
- 
 
 20 
!endif
16 
 
 21 
 
17 
!sh cd $wims_home/log/classes/$wims_class/sheets/\
 22 
!sh cd $wims_home/log/classes/$wims_class/sheets/\
18 
cp .sheet$sheet .sheet$[$scnt+1]
 23 
cp .sheet$sheet .sheet$[$scnt+1]
19 
 
 24 
 
20 
p=!record $sheet of wimshome/log/classes/$wims_class/sheets/.sheets
 25 
p=!record $sheet of wimshome/log/classes/$wims_class/sheets/.sheets