Subversion Repositories wimsdev

Rev

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

Rev 10270 Rev 10517
Line 73... Line 73...
73 
 !next i
 73 
 !next i
74 
 donfile=$namevar
 74 
 donfile=$namevar
75 
 !for i=1 to $numsess
 75 
 !for i=1 to $numsess
76 
!!## need to check no "," in testoextra
 76 
!!## need to check no "," in testoextra
77 
  testoextra$i=!replace internal , by . in $(testoextra$i)
 77 
  testoextra$i=!replace internal , by . in $(testoextra$i)
78 
  nstud$i=$[max(0,$(nstud$i))]
 78 
  nstud$i=$[max(-1,$(nstud$i))]
79 
  !if NaN isin $(nstud$i)
 79 
  !if NaN isin $(nstud$i) or . isin $(nstud$i)
80 
    nstud$i=0
 80 
    nstud$i=-1
81 
  !endif
 81 
  !endif
82 
  donfile=!append line $(listval[$i]),$(nstud$i),$(testoextra$i) to $donfile
 82 
  donfile=!append line $(listval[$i]),$(nstud$i),$(testoextra$i) to $donfile
83 
 !next i
 83 
 !next i
84 
 !writefile $votedir/$vote.data :$donfile\
 84 
 !writefile $votedir/$vote.data :$donfile\
85 
:$testointro
 85 
:$testointro