Subversion Repositories wimsdev

Rev

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

Rev 7755 Rev 13607
Line 2... Line 2...
2
!readproc primitives/getlimit.proc parms
2
!readproc primitives/getlimit.proc parms
3
 
3
 
-
 
4
<ul class="inline">
4
!for i=1 to $(choices$parmcnt)
5
!for i=1 to $(choices$parmcnt)
-
 
6
  <li>
5
 !reset checked
7
    !reset checked
6
 !if $i iswordof $(parm$parmcnt)
8
    !if $i iswordof $(parm$parmcnt)
7
  !set checked=checked="checked"
9
      !set checked=checked="checked"
8
 !endif
10
    !endif
9
 <input type="radio" name="parm$parmcnt" value="$i" $checked />
11
    <input type="radio" name="parm$parmcnt" id="parm$(parmcnt)_$i" value="$i" $checked />
-
 
12
    <label for="parm$(parmcnt)_$i">
10
 !item $i of $parms
13
      !item $i of $parms
-
 
14
    </label>
11
 !set ll=!item $i of $limits
15
    !set ll=!item $i of $limits
12
 !if $ll>0
16
    !if $ll>0
13
  !set remain=$[max(0,$ll-0$(vcnt_$(parmcnt)_$i))]
17
      !set remain=$[max(0,$ll-0$(vcnt_$(parmcnt)_$i))]
14
  ($remain $name_remaining)
18
      ($remain $name_remaining)
15
 !else
19
    !else
16
  !if $(vcnt_$(parmcnt)_$i)!=$empty and $vshow=1
20
      !if $(vcnt_$(parmcnt)_$i)!=$empty and $vshow=1
17
   ($(vcnt_$(parmcnt)_$i))
21
        ($(vcnt_$(parmcnt)_$i))
18
  !endif
22
      !endif
19
 !endif
23
    !endif
20
.&nbsp;
24
  </li>
21
!next i
25
!next i
-
 
26
</ul>
22
 
27