$title
!set wims_ref_class=wims_button_help
!href cmd=help&special_parm=share $wims_name_help
!if $sharing_all=$empty
<p>$name_noresource</p>
!else
!read themetable
<p>$name_resource</p>
$table_header
$table_hdtr <th>$wims_name_Type</th><th>$wims_name_class</th><th>$wims_name_Supervisor</th><th>$wims_name_action</th>
!for rec in $sharelist
!if $(sharing_$rec)!=$empty
$table_tr
!! $name_sharelist
!set D_=!defof class_institution\
class_description\
class_supervisor in wimshome
/log/classes
/$
(sharing_
$rec)/.def
!distribute lines $D_ into i_,d_,s_
<td>$(name_$rec)<td>$d_ <br>$i_</td> <td>$s_
</td><td>
!set wims_ref_class=wims_button
!href cmd=reply&job2=stopshare&nei=$(sharing_$rec)&stoprec=$rec $name_stopsharing
.
!set wims_ref_class=wims_button_help
!href cmd=help&special_parm=stopshare $wims_name_help
</td>
!endif
$table_end
!endif
!if $sharable_all!=$empty
$table_header
<caption>$name_classsharing</caption>
$table_hdtr<th>$wims_name_Type</th><th>$wims_name_class</th><th>$wims_name_Supervisor</th><th>$wims_name_Status</th>
!for r in $sharable
!for cl in $(sharable_$r)
$table_tr<td>$(name_$r)
!set D_=!defof class_institution\
class_description\
class_supervisor in wimshome
/log/classes
/$cl/.def
!distribute lines $D_ into i_,d_,s_
</td><td>
!set wims_ref_class=wims_button
!href cmd=reply&job2=def&nei=$cl $i_<br>$d_
</td><td>$s_</td>
!set s_
=!defof $
(sharing_
$r) in wimshome
/log/classes
/$cl/neighbors
</td><td>
!if $s_=$wims_class
$name_active
!else
---
!endif
</tr>
$table_end
!endif