Subversion Repositories wimsdev

Rev

Rev 14335 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14335 Rev 17099
Line 59... Line 59...
59 
      cadd_limit=!item $(keyposition[5]) of $data
 59 
      cadd_limit=!item $(keyposition[5]) of $data
60 
      !bound cadd_limit between 0 and $class_limit default $class_limit
 60 
      !bound cadd_limit between 0 and $class_limit default $class_limit
61 
    !else
 61 
    !else
62 
      cadd_limit=$class_limit
 62 
      cadd_limit=$class_limit
63 
    !endif
 63 
    !endif
- 
 
 64 
    !read adm/gateway/mkindex
64 
    !readproc adm/gateway/addclass $sup,$cname
 65 
    !readproc adm/gateway/addclass $sup,$cname
65 
    !if $error!=$empty
 66 
    !if $error!=$empty
66 
      listerror=!append line $classk,$error to $listerror
 67 
      listerror=!append line $classk,$error to $listerror
67 
    !endif
 68 
    !endif
68 
    !reset error
 69 
    !reset error