Subversion Repositories wimsdev

Rev

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

Rev 6235 Rev 7755
Line 2... Line 2...
2 
!readproc primitives/getlimit.proc parms
 2 
!readproc primitives/getlimit.proc parms
3 
 
 3 
 
4 
!for i=1 to $(choices$parmcnt)
 4 
!for i=1 to $(choices$parmcnt)
5 
 !reset checked
 5 
 !reset checked
6 
 !if $i iswordof $(parm$parmcnt)
 6 
 !if $i iswordof $(parm$parmcnt)
7 
  !set checked=checked
 7 
  !set checked=checked="checked"
8 
 !endif
 8 
 !endif
9 
 <input type="checkbox" name="parm$parmcnt" value="$i" checked="$checked" />
 9 
 <input type="checkbox" name="parm$parmcnt" value="$i" $checked />
10 
 !item $i of $parms
 10 
 !item $i of $parms
11 
 !set ll=!item $i of $limits
 11 
 !set ll=!item $i of $limits
12 
 !if $ll>0
 12 
 !if $ll>0
13 
  !set remain=$[max(0,$ll-0$(vcnt_$(parmcnt)_$i))]
 13 
  !set remain=$[max(0,$ll-0$(vcnt_$(parmcnt)_$i))]
14 
  ($remain $name_remaining)
 14 
  ($remain $name_remaining)