Subversion Repositories wimsdev

Rev

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

  1.  
  2. !if $job=print
  3.  !changeto print.phtml
  4. !endif
  5.  
  6. !if $public!=P
  7.  !changeto class.phtml
  8. !endif
  9. !if $(module_title_$modu_lang)!=
  10.    !set module_title=$(module_title_$modu_lang)
  11. !endif
  12.  
  13. !header
  14.  
  15. !if $error!=$empty
  16.  !read lang/msg.phtml.$modu_lang
  17.  !tail
  18.  !exit
  19. !endif
  20.  
  21. !if $wims_user=supervisor and $job=raw
  22. <p>
  23. $name_textsource
  24. </p><hr><pre>
  25.  !sh awk 'BEGIN {a=0};\
  26.         /^:/ {a=1};\
  27.         a==1 {print}' bases/sheet/$sh.def
  28.  </pre><hr>
  29.  
  30. !set wims_menu_items=!append line participantview,1,cmd=resume&job=read \
  31. to $wims_menu_items
  32.  
  33.  !tail
  34.  !exit
  35. !endif
  36.  
  37. !set intro=!record 0 of $data
  38. !set dur=!words2items $(intro[3;])
  39. !distribute items $dur into duration,year
  40. !read adm/title.phtml 3\
  41. $sheet_title\
  42. $name_level $(intro[5;]), $name_duration $duration mn ($year)<br>$(intro[8;])\
  43.  
  44. <div class="wims_sheet_desc">$sheet_desc</div> <p>
  45.  
  46. $sheet_remark
  47. </p>
  48.  
  49. !if $n=0
  50.  $name_sheetempty
  51. !else
  52.  <div class="wims_sheet">
  53.  <ul class="wims_sheet_list">
  54.  !for i=1 to $n
  55.   !set ex=!record $i of $data
  56.   !distribute lines $ex into di,pa,require,we,ti,de
  57.   !set got=!word $i of $scores
  58.   !set mean=!word $i of $means
  59.   <li class="wims_sheet_list">$i.
  60.   !href module=$di&cmd=new&worksheet=$public$shn&$pa $ti
  61. , $de
  62.  </li>
  63.  !next i
  64.  </ul>
  65.  </div>
  66.  !if $wims_user=supervisor
  67.  !set wims_menu_items=!append line import,1,cmd=reply&job=import \
  68.  sheetsource,1,cmd=reply&job=raw\
  69.  to $wims_menu_items
  70.  !endif
  71. !endif
  72.  
  73. !set wims_menu_items=!append line printable,1,cmd=reply&job=print\
  74. to $wims_menu_items
  75.  
  76. !tail
  77.  
  78.