Subversion Repositories wimsdev

Rev

Rev 2718 | Rev 3064 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1.  
  2. $title
  3. <small>
  4. !href cmd=help&special_parm=share $wims_name_help
  5. </small>
  6. <p>
  7.  
  8. !if $sharing_all=$empty
  9.  $name_noresource
  10. !else
  11. !read themetable
  12.  $name_resource
  13.  $table_header
  14.  $table_hdtr <th>$wims_name_Type</th><th>$wims_name_class</th><th>$wims_name_Supervisor</th><th>$wims_name_action</th>
  15.  !for rec in $sharelist
  16.   !if $(sharing_$rec)!=$empty
  17.    $table_tr
  18.  !!  $name_sharelist
  19.    !set D_=!defof class_institution\
  20. class_description\
  21. class_supervisor in wimshome/log/classes/$(sharing_$rec)/.def
  22.    !distribute lines $D_ into i_,d_,s_
  23.    <td align="center">$(name_$rec)<td align="center">$d_ <br>$i_</td> <td align="center">$s_
  24.    <td align="center">
  25.    !href cmd=reply&job2=stopshare&nei=$(sharing_$rec)&stoprec=$rec $name_stopsharing
  26. . <small>
  27.    !href cmd=help&special_parm=stopshare $wims_name_help
  28.    </small>
  29.    </td>
  30.   !endif
  31.  !next rec
  32. $table_end
  33. !endif
  34. !if $sharable_all!=$empty
  35.  <p>$table_header
  36.  <caption>$name_classsharing</caption>
  37.  $table_hdtr<th>$wims_name_Type<th>$wims_name_class<th>$wims_name_Supervisor<th>$wims_name_Status
  38.  !for r in $sharable
  39.   !for cl in $(sharable_$r)
  40.    $table_tr<td align="center">$(name_$r)
  41.    !set D_=!defof class_institution\
  42. class_description\
  43. class_supervisor in wimshome/log/classes/$cl/.def
  44.    !distribute lines $D_ into i_,d_,s_
  45.    <td align="center">
  46.    !href cmd=reply&job2=def&nei=$cl $i_<br>$d_
  47.    <td align="center">$s_</td>
  48.    !set s_=!defof $(sharing_$r) in wimshome/log/classes/$cl/neighbors
  49.    <td align="center">
  50.    !if $s_=$wims_class
  51.     $name_active
  52.    !else
  53.     ---
  54.    !endif
  55.   !next cl
  56.  !next r
  57.  $table_end <p>
  58. !endif
  59.