Subversion Repositories wimsdev

Rev

Rev 10401 | Rev 10593 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
10161 obado 1 
!! Insert a link to other classes in breadcrumbs.
10172 bpr 2 
!if $wims_user=$empty
3 
  !exit
4 
!endif
10351 bpr 5 
!if $auth_method isitemof $auth_method_list and ($wims_user!=$wims_realuser)
10172 bpr 6 
  !set tmp_=auth
7 
!else
8 
   !reset tmp_
9 
!endif
10401 bpr 10 
 
10172 bpr 11 
!if $wims_user!=supervisor
12 
  !goto nosupervisor
13 
!endif
14 
:supervisor
15 
!set superclass_description=!defof class_description in wimshome/log/classes/$wims_superclass/.def
16 
!if $wims_superclass!=$empty and $wims_superclass!=$wims_class
17 
  !if $auth_method isitemof $auth_method_list
10486 obado 18 
    !set wims_ariane=!append line "$superclass_description",1,module=adm/class/classes&type=$(tmp_)supervisor&auth_user=$ext_login&class=$wims_superclass\
10169 bpr 19 
to $wims_ariane
10172 bpr 20 
  !else
10486 obado 21 
    !set wims_ariane=!append line "$superclass_description",1,module=adm/class/classes&type=$(tmp_)supervisor&class=$wims_superclass\
10169 bpr 22 
to $wims_ariane
10486 obado 23 
  !endif
24 
!!else
25 
  !!if $wims_otherclass!=$empty
26 
    !!reset tmp_
27 
    !!set wims_ariane=!append line "$superclass_description",1,module=adm/class/classes&type=$(tmp_)supervisor&class=$wims_superclass to $wims_ariane
28 
  !!endif
10172 bpr 29 
!endif
30 
 
31 
!goto subclasses
32 
:nosupervisor
33 
 
10486 obado 34 
!!if $wims_otherclass!=$empty and $wims_superclass=$wims_class and $tmp_=$empty
35 
  !!set wims_ariane=!append line U_oclass,1,module=adm/class/classes&type=participant to $wims_ariane
36 
!!endif
10172 bpr 37 
!if $wims_superclass!=$empty and $wims_superclass!=$wims_class
38 
    !if $auth_method isitemof $auth_method_list
39 
       !set superclass_description=!defof class_description in wimshome/log/classes/$wims_superclass/.def
40 
       !set wims_ariane=!append line "$superclass_description",1,module=adm/class/classes&type=$(tmp_)participant&class=$wims_superclass\
41 
to $wims_ariane
10161 obado 42 
    !endif
10042 bpr 43 
!endif
10169 bpr 44 
 
10172 bpr 45 
:subclasses
10169 bpr 46 
!if $wims_superclass!=$empty and $wims_superclass!=$wims_class
47 
  !if / isin $class_parent and $class_type=1
48 
    !set pname=!defof class_description in wimshome/log/classes/$class_parent/.def
10172 bpr 49 
    !set wims_ariane=!append line "$pname",1,module=adm/class/classes&type=$(tmp_)supervisor&class=$class_parent\
50 
to $wims_ariane
10169 bpr 51 
  !endif
52 
  !set wims_ariane=!append line "$wims_classname",8 to $wims_ariane
10486 obado 53 
 !!else
10172 bpr 54 
   !!set superclass_description=!defof class_description in wimshome/log/classes/$wims_superclass/.def
10401 bpr 55 
   !!set wims_ariane=!append line "$superclass_description",8 to $wims_ariane
10169 bpr 56 
!endif