Subversion Repositories wimsdev

Rev

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

Rev 17601 Rev 17627
Line 227... Line 227...
227 
      subclasses=!words2items $subclasses
 227 
      subclasses=!words2items $subclasses
228 
      subcnt=!recordcnt wimshome/log/classes/$wims_class/.subclasses
 228 
      subcnt=!recordcnt wimshome/log/classes/$wims_class/.subclasses
229 
      subclasscnt=!itemcnt $subclasses
 229 
      subclasscnt=!itemcnt $subclasses
230 
      subclass1=$wims_participate
 230 
      subclass1=$wims_participate
231 
    !endif
 231 
    !endif
232 
    subclass1_=!replace internal $wims_class/ by in $subclass1
 - 
 
233 
    subclass1_=!sort numeric items $subclass1_
 232 
    subclass1=!sort items $subclass1
234 
    subclass1=!makelist $wims_class/x for x in $subclass1_
 - 
 
235 
    subclass2=!listcomplement $subclass1 in $subclasses
 - 
 
236 
    !if $class_type iswordof 4 2
 233 
    !if $class_type iswordof 4 2
237 
      subclass3=$wims_supervise
 234 
      subclass3=$wims_supervise
238 
    !endif
 235 
    !endif
239 
    subclasscnt1=!itemcnt $subclass1
 236 
    subclasscnt1=!itemcnt $subclass1
240 
    subclasscnt2=!itemcnt $subclass2
 237 
    subclasscnt2=!itemcnt $subclass2