Subversion Repositories wimsdev

Rev

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

  1. !read adm/css.phtml
  2. !read lang/names.phtml.$moduclass_lang
  3. !read adm/class/classname.phtml $wims_classname\
  4. $wims_institutionname
  5.  
  6. !header1
  7. !read adm/title.phtml 1\
  8. $classname\
  9. $module_title
  10.  
  11. !set wims_menu_items=!append line part_list,1,module=adm/class/userlist\
  12.  to $wims_menu_items
  13. !if $cmd!=reply
  14. $name_intro
  15.  
  16. !form reply
  17. <input type="hidden" name="job" value="all"/>  
  18. <div class="wimscenter wimsform"><input type="submit" name="reg" value="$wims_name_tosave"/></div>
  19.  
  20. <fieldset>
  21. <legend>$name_menu
  22. </legend>
  23. $name_expert
  24. &nbsp;
  25. &nbsp;
  26. !set wims_ref_class=wims_button_help
  27. !href cmd=help $wims_name_help
  28.  
  29.  
  30. <table class="wimscenter">
  31. <tr><td>
  32. !default job=$job
  33. !formcheckbox job list filter prompt $name_filter
  34. </td><td><textarea name="variable" cols="20" rows="3">$variable</textarea>
  35. </td></tr>
  36. <tr><td>
  37. !formcheckbox job list login prompt $name_loginlist
  38.  </td><td>  
  39.    <textarea name="loginlist" cols="20" rows="5">$loginlist</textarea>
  40.    </td></tr>
  41.    </table>
  42.  
  43. </fieldset>  
  44.  
  45. !formend
  46. !goto end
  47. !endif
  48.  
  49. !if $photourl_exists=0
  50.  <center> $name_nophoto</center>
  51.  !goto end
  52. !endif
  53. !set cmp=0
  54. !set cmp_tr=0
  55. <table><tr>
  56. !for l_ = 1 to $cnt
  57.   !set ll=$[ceil($l_/$lim)]
  58.   !set u=!line $[$l_ - ($ll-1)*$lim] of $(list_user$ll)
  59.   !if $(u[1])!=
  60.   <td style="width:120px;"><span>
  61.   !if $(u[4])!=
  62.     !href module=adm/class/userlist&job=getuser&getuser=$(u[1]) <img border="0" width="120px" src="$(u[4])" alt="$(u[2]) $(u[3])" />
  63.     <br/>$(u[2]) $(u[3])
  64.   !else
  65.      !href module=adm/class/userlist&job=getuser&getuser=$(u[1]) $(u[2]) $(u[3])
  66.   !endif
  67.   </span></td>
  68.   !increase cmp_tr
  69.   !increase cmp
  70.   !if $cmp_tr=6
  71.   </tr>
  72.   !reset cmp_tr
  73.   <tr>
  74.   !endif
  75.   !endif
  76.   !reset u
  77. !next
  78. </table>
  79.  
  80. !if $cmd=reply
  81.  !set wims_menu_items=!append line back2,1,cmd=resume\
  82.  to $wims_menu_items
  83. !endif
  84. :end
  85. !tail
  86.