Subversion Repositories wimsdev

!!menumodubox2.proc :
!! Adds all superclass links for supervisor in wims_rm_0 for navigation menus,
!! when class_type=2 (group)

!set wims_rm_0 = !append line itemsep,0,$wims_name_class\
addclass,1,module=adm/class/regclass\
cloneclass,1,module=adm/class/regclass&job=cloneexemple\
to $wims_rm_0

!set wims_rm_0 = !append line itemsep,0,$wims_name_classtools\
to $wims_rm_0

!read themes/_procs/classtools.proc

!set wims_rm_0=$wims_rm_0\
  itemsep,0,$wims_name_classactivity\
  forum,1,module=adm/forum/mboard
!endif

!set wims_rm_0 = $wims_rm_0\
itemsep,0,$wims_name_manage
!read themes/_procs/supervisorusermanage.proc

!set wims_rm_0 = $wims_rm_0\
itemsep,0,$wims_name_configuration
!read themes/_procs/supervisorconfig.proc 0

!read themes/_procs/extlink.proc cnt
!if $class_ent_n0 >0
  !set wims_rm_0 = !append line itemsep,0,$wims_name_otherclasses to $wims_rm_0
  !set tmp_exists=yes
  !read themes/_procs/extlink.proc proc
!endif
!if $class_type isin 024 and $auth_method notwordof cas
  !if $tmp_exists!=yes
    !set wims_rm_0 = !append line itemsep,0,$wims_name_otherclasses to $wims_rm_0
  !endif
  !read themes/_procs/supervisorotherclass.proc
!endif
!reset tmp_exists
!set wims_homeref_n0 = !linecnt $wims_rm_0