Subversion Repositories wimsdev

Rev

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

Rev 9649 Rev 12330
Line 2... Line 2...
2 
 
 2 
 
3 
!if NaN isin $[$doc/10] or $doc<1 or $doc>$doctot
 3 
!if NaN isin $[$doc/10] or $doc<1 or $doc>$doctot
4 
    error=baddocnumber
 4 
  error=baddocnumber
5 
    !exit
 5 
  !exit
6 
!endif
 6 
!endif
7 
sdoc=$doc
 7 
sdoc=$doc
8 
tmp=!record $sdoc of wimshome/log/classes/$wims_class/doc/.docindex
 8 
tmp=!record $sdoc of wimshome/log/classes/$wims_class/doc/.docindex
9 
s=!line 5 of $tmp
 9 
s=!line 5 of $tmp
10 
tmp=!replace internal line number 5 by $[1-$s] in $tmp
 10 
tmp=!replace internal line number 5 by $[1-$s] in $tmp