!set statut=!line 1 of $wims_read_parm
!set compsup=!line 2 to -1 of $wims_read_parm
!set compsup1=!column 2 to -1 of $compsup
!set col1=!column 1 of $compsup1
!set col1=!listuniq $col1
!set col1cnt=!itemcnt $col1
<ul class="wims_subclasses">
!for j1=1 to $col1cnt
!set cls1=$wims_superclass/$(col1[$j1])
!let don
=!defof class_typename
,class_description
,class_supervisor in wimshome
/log/classes
/$cls1/.def
<li><span class="wims_classes_direct_$(don[1])">
!if $cls1 isitemof $(user_$statut)
!if $statut=supervise
!href module=adm/class/classes&type=authsupervisor&class=$cls1&auth_user=supervisor $(don[2])
!else
!href module=adm/class/classes&type=authparticipant&class=$cls1&auth_user=$u_ $(don[2])
!endif
!else
$(don[2])
!endif
</span>
!set compsup2=!select $compsup1 where column 1=$(col1[$j1])
!set col2=!column 2 of $compsup2
!set col2=!listuniq $col2
!set col2cnt=!itemcnt $col2
!if $col2cnt>0
!set compsup2=!column 2 to -1 of $compsup2
<ul class="wims_subclasses">
!for j2=1 to $col2cnt
!set cls2=!nospace $cls1/$(col2[$j2])
!let don
=!defof class_typename
,class_description
,class_supervisor in wimshome
/log/classes
/$cls2/.def
<li><span class="wims_classes_direct_$(don[1])">
!if $cls2 isitemof $(user_$statut)
!if $statut=supervise
!href module=adm/class/classes&type=authsupervisor&class=$cls2&auth_user=supervisor $(don[2])
!else
!href module=adm/class/classes&type=authparticipant&class=$cls2&auth_user=$u_ $(don[2])
!endif
!else
$(don[2])
!endif
</span>
!set compsup3=!select $compsup2 where column 1=$(col2[$j2])
!set col3=!column 2 of $compsup3
!set col3=!listuniq $col3
!set col3cnt=!itemcnt $col3
!if $col3cnt!=0
<ul>
!set compsup3=!column 2 to -1 of $compsup3
!for j3=1 to $col3cnt
!set cls3=!nospace $cls2/$(col3[$j3])
!let don
=!defof class_typename
,class_description
,class_supervisor in wimshome
/log/classes
/$cls3/.def
<li><span class="wims_classes_direct_$(don[1])">
!if $cls3 isitemof $(user_$statut)
!if $statut=supervise
!href module=adm/class/classes&type=authsupervisor&class=$cls3&auth_user=supervisor $(don[2])
!else
!href module=adm/class/classes&type=authparticipant&class=$cls3&auth_user=$u_ $(don[2])
!endif
($(don[3]))
!else
$(don[2])
!endif
</span>
</li>
</ul>
!endif col3cnt
</li>
</ul>
!endif col2cnt
</li>
</ul>