Subversion Repositories wimsdev

Rev

Rev 14088 | Blame | Compare with Previous | Last modification | View Log | RSS feed

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