Subversion Repositories wimsdev

Rev

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

Rev 12979 Rev 13170
Line 48... Line 48...
48 
!endif
 48 
!endif
49 
 
 49 
 
50 
:subclasses
 50 
:subclasses
51 
!if $wims_superclass!=$empty and $wims_superclass!=$wims_class
 51 
!if $wims_superclass!=$empty and $wims_superclass!=$wims_class
52 
  !if / isin $class_parent and $class_type=1
 52 
  !if / isin $class_parent and $class_type=1
- 
 
 53 
    !set tmp=!defof class_typename in wimshome/log/classes/$class_parent/.def
- 
 
 54 
    !if $tmp!=program
- 
 
 55 
      !!not an intercourse
53 
    !set pname=!defof class_description in wimshome/log/classes/$class_parent/.def
 56 
      !set pname=!defof class_description in wimshome/log/classes/$class_parent/.def
54 
    !set wims_ariane=!append line class_home $pname,1,module=adm/class/classes&type=$(tmp_)participant&auth_user=$ext_login&class=$class_parent\
 57 
      !set wims_ariane=!append line class_home $pname,1,module=adm/class/classes&type=$(tmp_)participant&auth_user=$ext_login&class=$class_parent\
55 
to $wims_ariane
 58 
to $wims_ariane
- 
 
 59 
    !endif
- 
 
 60 
    !reset tmp
56 
  !endif
 61 
  !endif
57 
  !if $seq!=$empty
 62 
  !if $seq!=$empty
58 
    !set wims_ariane=!append line class_home $wims_classname,1,cmd=resume to $wims_ariane
 63 
    !set wims_ariane=!append line class_home $wims_classname,1,cmd=resume to $wims_ariane
59 
  !else
 64 
  !else
60 
    !set wims_ariane=!append line class_home $wims_classname,8 to $wims_ariane
 65 
    !set wims_ariane=!append line class_home $wims_classname,8 to $wims_ariane