Subversion Repositories wimsdev

Rev

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

  1. !! Modify informations on the exercises in a sheet
  2. !!
  3. !distribute lines $wims_read_parm into directory_,parm_,require_,weight_,title_,desc_,dep_,comment_,feedback_
  4. !! !set orgtit_=!module title $directory_
  5.  
  6. !form reply
  7. !reset table_center
  8.    <input type="hidden" name="modif" value="$ex_" />
  9.    <input type="hidden" name="job" value="modify" />
  10.    <fieldset class="property_fields blockcenter">
  11.       <legend>$wims_name_properties</legend>
  12.       <div class="field box">
  13. !! if the sheet is active, the fields that may be changed are
  14. !! title, description, comment, feedback
  15.         <label for="mod_title">$wims_name_title</label>
  16. !!($name_oldtitle <em>$orgtit</em>)
  17.         <input size="50" name="mod_title" id="mod_title" value="$title_" />
  18.       </div>
  19.       <div class="field box">
  20.         <label for="mod_desc">$wims_name_Description</label>
  21.       <textarea name="mod_desc" id ="mod_desc" rows="3" cols="60">$desc_</textarea>
  22.       </div>
  23.       <div class="field box">
  24.         <label for="mod_comment">$(name_shtab[7])</label>
  25.         <textarea name="mod_comment" id="mod_comment" rows="3" cols="60">$comment_</textarea>
  26.         <div class="formHelp">$name_desc_comment</div>
  27.       </div>
  28.  !if $activetest <= 0
  29.       <div class="field box">
  30.         <label for="mod_require">$name_pointsasked</label>
  31.         <input size="4" name="mod_require" id="mod_require" value="$require_" />
  32.       </div>
  33.       <div class="field box">
  34.         <label for="mod_weight">$name_weight</label>
  35.         <input size="4" name="mod_weight" id="mod_weight" value="$weight_" />
  36.       </div>
  37.       <div class="field box">
  38.          <label for="mod_dep">$(name_shtab[6])</label>
  39.          <input size="40" name="mod_dep" id="mod_dep" value="$dep_" />
  40.     !set wims_ref_class=wims_button_help float_right
  41.      !href target=wims_mhelp cmd=help&special_parm=dependancies $wims_name_help
  42.     !reset mod_dep
  43.        </div>
  44.   !endif
  45.    <div class="field box">
  46.      <label for="mod_feedback">$(name_shtab[10])</label>
  47.      <textarea name="mod_feedback" id="mod_feedback" rows="1" cols="60" class="nowrap">$feedback_</textarea>
  48.      !set wims_ref_class=wims_button_help float_right
  49.      !href target=wims_mhelp cmd=help&special_parm=feedback $wims_name_help
  50.    </div>
  51.   !if $activetest <= 0
  52.    !let oef=!defof category in wimshome/public_html/modules/$directory_/INDEX
  53.    !default oef=!defof category in wimshome/public_html/modules/$directory_/index
  54.    !if oef isitemof $oef
  55.      <div class="field box">
  56.         <label for="">$(name_shtab[9])</label>
  57.       !set parm__=$parm_
  58.       !let parm_=!replace internal & by ; in $parm_
  59.       !let parm_=!replace internal scoredelay=; by scoredelay=0; in $parm_
  60.       !let parm_=!replace internal exo=; by exo=0; in $parm_
  61.       !let tmp_=!replace internal = by , in $parm_
  62.       !let tmp2_=!column 1 of $tmp_
  63.       !let tmp2_=!positionof item exo in $tmp2_
  64.       !let tmp_=!column 2 of $tmp_
  65.       !let tmp_=!item $tmp2_ of $tmp_
  66.       !let tmp_=!nospace $tmp_
  67.       !set wims_ref_class=wims_button float_right
  68.       !href cmd=intro&module=$directory_&special_parm=&special_parm2=&special_parm3=exo=$tmp_;$parm_&special_parm4=$sheet,$modif $(seriesaction[1])
  69.       <pre>
  70.       $directory_
  71.       $parm_
  72.       </pre>
  73.      </div>
  74.      <div class="field box">
  75.     !read getparm $parm__ exo qnum random
  76.     !set exocnt_=!itemcnt $get_exo
  77.  
  78.     !if $get_qnum=$exocnt_ and $get_random=0 and $get_qnum>1
  79.      <div class="field box">
  80.         <label for="">$name_order</label>
  81.      !set wims_ref_class=wims_button_help float_right
  82.       !href target=wims_mhelp cmd=help&special_parm=series $wims_name_help
  83.  
  84.       <table>
  85.   !for ex = 1 to $exocnt_
  86.    !! ne fonctionne pas dans une classe
  87.    !set tt_ex=!lookup $(get_exo[$ex]) in wimshome/public_html/modules/$directory_/Extitles
  88.    !default tt_ex= $(get_exo[$ex])
  89.       <tr><td>$tt_ex</td><td>
  90.       <input name="update_ex$ex" size="5" value="$ex" />
  91.       </td></tr>
  92.   !next
  93.        </table>
  94.      </div>
  95.      !endif
  96.     !endif
  97.  !endif activetest = 0
  98.    <div class="wimscenter wimsform">
  99.      <input type="submit" value="$wims_name_tosave" /> &nbsp;
  100.      !set wims_ref_class=wims_button
  101.      !href cmd=resume $wims_name_giveup
  102.    </div>
  103.   </fieldset>
  104.  
  105. !formend
  106.