!! Modify informations on the exercises in a sheet
!!
!distribute lines
$wims_read_parm into
dir,parm_
,require_
,weight_
,title_
,desc_
,dep_
,comment_
,feedback_
,attribut_
!! !set orgtit_=!module title $dir
!set wims_form_method=post
!form reply
<input type="hidden" name="modif" value="$ex_" />
<input type="hidden" name="job" value="modify" />
<fieldset class="property_fields blockcenter">
<legend>$wims_name_properties</legend>
<div class="field box">
!! if the sheet is active, the fields that may be changed are
!! title, description, comment, feedback, attribut
<label for="mod_title">$wims_name_title</label>
!!($name_oldtitle <em>$orgtit</em>)
<input size="50" name="mod_title" id="mod_title" value="$title_" />
</div>
<div class="field box fullwidth">
<label for="mod_desc">$wims_name_Description</label>
<textarea name="mod_desc" id="mod_desc" class="iEdit" maxlength="$edesc_limit">$desc_</textarea>
<div class="formHelp">(< $edesc_limit)</div>
</div>
<div class="field box">
!read adm/class/attribut.phtml
</div>
<div class="field box fullwidth">
<label for="mod_comment">$(name_shtab[7])</label>
<textarea name="mod_comment" id="mod_comment" class="iEdit" maxlength="$edesc_limit">$comment_</textarea>
<div class="formHelp">$name_desc_comment (< $edesc_limit)</div>
</div>
!if $activetest <= 0
<div class="field box">
<label for="mod_require">$name_pointsasked</label>
<select name="mod_require" id="mod_require">
!for i=0 to $require_limit
!if $i=$[$require_/10]
<option value="$[10*$i]" selected="selected">$[10*$i]</option>
!else
<option value="$[10*$i]">$[10*$i]</option>
!endif
</select>
</div>
!set mod_exotrymax=$get_exotrymax
<div class="field box">
<label for="exotrymax">$name_exotrymax</label>
<input size="2" maxlength="2" name="mod_exotrymax" value="$mod_exotrymax" id="exotrymax" />
!set wims_ref_class=wims_button_help float_right
!href target=wims_mhelp cmd=help&special_parm=exotrymax $wims_name_help
</div>
<div class="field box">
<label for="mod_weight">$name_weight</label>
<input size="4" name="mod_weight" id="mod_weight" value="$weight_" />
!set wims_ref_class=wims_button_help float_right
!href target=wims_mhelp cmd=help&special_parm=weightexo $wims_name_help
</div>
<div class="field box">
<label for="mod_dep">$(name_shtab[6])</label>
<input size="40" name="mod_dep" id="mod_dep" value="$dep_" />
!set wims_ref_class=wims_button_help float_right
!href target=wims_mhelp cmd=help&special_parm=dependancies $wims_name_help
</div>
!endif
!set feedback__=!rows2lines $feedback_
<div class="field box">
<label for="mod_feedback">$(name_shtab[10])</label>
<textarea name="mod_feedback" id="mod_feedback" cols="60" class="nowrap">$feedback__</textarea>
!set wims_ref_class=wims_button_help float_right
!href target=wims_mhelp cmd=help&special_parm=feedback $wims_name_help
</div>
!if $activetest <= 0
!let oef=!defof category in wimshome/public_html/modules/$dir/INDEX
!default oef=!defof category in wimshome/public_html/modules/$dir/index
!if oef isitemof $oef
<div class="field box">
<strong>$(name_shtab[9])</strong>
!set parm__=$parm_
!let parm_=!replace internal & by ; in $parm_;
!let parm_=!replace internal scoredelay=; by scoredelay=0; in $parm_
!let parm_=!replace internal exo=; by exo=0; in $parm_
!let tmp_=!replace internal = by , in $parm_
!let tmp2_=!column 1 of $tmp_
!let tmp2_=!positionof item exo in $tmp2_
!let tmp_=!column 2 of $tmp_
!let tmp_=!item $tmp2_ of $tmp_
!let tmp_=!nospace $tmp_
!set wims_ref_class=wims_button float_right
!href cmd=intro&module=$dir&special_parm=&special_parm2=&special_parm3=exo=$tmp_;$parm_&special_parm4=$sheet,$modif $(seriesaction[1])
<pre>$dir
$parm_</pre>
</div>
!read getparm $parm__ exo qnum random
!set exocnt_=!itemcnt $get_exo
!read adm/class/exo_order.phtml
!endif
!endif activetest
</fieldset>
<div class="wimscenter wimsform">
<input type="submit" value="$wims_name_tosave" />
!set wims_ref_class=wims_button wims_secondary_button
!href cmd=resume $wims_name_giveup
</div>
!formend