Subversion Repositories wimsdev

Rev

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

  1. !set wims_form_method=post
  2. !read adm/title.phtml 1\
  3. $classname\
  4. $name_severitylevels
  5.  
  6. !form reply
  7. <input type="hidden" name="job" value="formula" />
  8. $name_formula_comment
  9. <input size="5" name="maxscore" value="$scoremax" />.
  10. $table_header
  11. <caption>$wims_name_Sheets</caption>
  12. $table_hdtr<th>$(name_formula[1])</th><th>$wims_name_title</th><th>$wims_name_Status</th>
  13.   <th>$(name_formula[2])</th><th>$(name_formula[3])</th></tr>
  14. !for i=1 to $totsheets
  15.  !set t_=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets
  16.  !set k_=!line $i of $defaultformula
  17.  !distribute word $k_ into w$i,s$i,ss$i
  18.  !default w$i=1
  19.  !default s$i=2
  20.  !default ss$i=0
  21.  !distribute line $t_ into a_,b_,c_,d_
  22.  !set a_=!char 1 of $a_
  23.  !set S_=!item $a_+1 of $name_sheetstatut
  24.  
  25.  $table_tr<td>$i</td>
  26.  <td>$c_</td><td>$S_</td>
  27.  <td><input size="5" name="w$i" value="$(w$i)" /></td>
  28.  <td>
  29.  !set formula_list=!record 0 of adm/class/sheetformula
  30.  !formselect s$i list 0,1,2,3,4,5,6 prompt $formula_list
  31.  I=
  32. !formselect ss$i list 0,1,2 prompt I0,I1,I2
  33.  </td></tr>
  34. !next i
  35. $table_end
  36. $table_header
  37. <caption>$wims_name_Examens</caption>
  38. $table_hdtr<th>$(name_formula[1])</th><th>$wims_name_title</th><th>$wims_name_Status</th>
  39.   <th>$(name_formula[2])</th><th>$(name_formula[3])</th></tr>
  40. !for i=1 to $totexams
  41.  !set ew$i=!line $i of $examweights
  42.  !default ew$i=1
  43.  !set t_=!record $i of wimshome/log/classes/$wims_class/exams/.exams
  44.  !set a_=!word 1 of $t_
  45.  !set c_=!line 4 of $t_
  46.  !set S_=!item $a_+1 of $name_sheetstatut
  47.  
  48.  $table_tr<td>$name_Exam $i</td>
  49.  <td>$c_</td><td>$S_</td>
  50.  <td><input size="5" name="ew$i" value="$(ew$i)" /></td>
  51.  <td>--</td>
  52.  </tr>
  53. !next i
  54. $table_end
  55. <div class="wimscenter wimsform">
  56. <input type="submit" name="formula" value="$wims_name_tosave" />
  57. &nbsp;<input type="submit" value="$wims_name_giveup" />
  58. </div>
  59.  
  60. !formend
  61. !set wims_menu_items=!append line back2,1,cmd=resume\
  62. to $wims_menu_items
  63. !reset formula
  64.