Subversion Repositories wimsdev

Rev

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

Rev 1625 Rev 1627
Line 2... Line 2...
2 
 
 2 
 
3 
wims_prefix=class user seq
 3 
wims_prefix=class user seq
4
- 
 
5 
!if $wims_class=$empty or ($wims_supertype!=0 and\
 4 
!if $wims_class=$empty or ($wims_supertype!=0 and\
6 
 ($wims_supertype!=2 or $wims_typename!=class) and\
 5 
 ($wims_supertype!=2 or $wims_typename!=class) and\
7 
 ($wims_supertype!=4 or $wims_typename notitemof class,course,program))
 6 
 ($wims_supertype!=4 or $wims_typename notitemof class,course,program))
8 
 error=bad_class
 7 
 error=bad_class
9 
 !exit
 8 
 !exit