Subversion Repositories wimsdev

Rev

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

  1. !! fichier de modification des informations sur les exercices d'une feuille
  2. !!
  3. !distribute lines $wims_read_parm into directory_,parm_,require_,weight_,title_,desc_,dep_,comment_,feedback_
  4. !! !set orgtit_=!module title $directory_
  5. !read adm/title.phtml 1\
  6. \
  7. $name_titlemodif $modif
  8. !form reply
  9.   $table_header
  10.   <input type="hidden" name="modif" value="$ex_"/>
  11.   <input type="hidden" name="job" value="modify"/>
  12. !!what can be changed even if the sheet is active
  13. !if $activetest > 0
  14.    $table_tr
  15.    <td>$(name_shtab[10])
  16.   &nbsp;
  17.    !set wims_ref_class=wims_button_help
  18.    !href target=wims_mhelp cmd=help&special_parm=feedback $wims_name_help
  19.    </td>
  20.    <td>
  21.    <textarea name="mod_feedback" rows="1" cols="60" wrap="off">$feedback_</textarea></td>
  22.    </tr>
  23. !else
  24.   $table_tr
  25.    <td>$wims_name_title</td>
  26. !!<small>($name_oldtitle <em>$orgtit</em>)</small></td>
  27.    <td><input size="50" name="mod_title" value="$title_"/></td>
  28.   </tr>
  29.   $table_tr
  30.    <td>$wims_name_Description</td>
  31.    <td><textarea name="mod_desc" rows="3" cols="60">$desc_</textarea></td>
  32.   </tr>
  33.   $table_tr
  34.    <td>$(name_shtab[7]) <small>($name_desc_comment)</small></td>
  35.    <td><textarea name="mod_comment" rows="3" cols="60">$comment_</textarea></td>
  36.   </tr>
  37.   $table_tr
  38.    <td>$name_pointsasked</td>
  39.    <td><input size="4" name="mod_require" value="$require_"/></td>
  40.   </tr>
  41.   $table_tr
  42.    <td>$name_weight</td>
  43.    <td><input size="4" name="mod_weight" value="$weight_"/></td>
  44.   </tr>
  45.   $table_tr
  46.    <td>$(name_shtab[6])
  47.    &nbsp;
  48.    !set wims_ref_class=wims_button_help
  49.     !href target=wims_mhelp cmd=help&special_parm=dependancies $wims_name_help
  50.    </td>
  51.    <td><input size="40" name="mod_dep" value="$dep_"/></td>
  52.    !reset mod_dep
  53.   </tr>
  54.   $table_tr
  55.    <td>$(name_shtab[10])
  56.    &nbsp;
  57.    !set wims_ref_class=wims_button_help
  58.     !href target=wims_mhelp cmd=help&special_parm=feedback $wims_name_help
  59.    </td>
  60.    <td><textarea name="mod_feedback" rows="1" cols="60" wrap="off">$feedback_</textarea></td>
  61.   </tr>
  62.  
  63.   !let oef=!defof category in wimshome/public_html/modules/$directory_/INDEX
  64.   !if oef isitemof $oef
  65.    $table_tr
  66.     <td>
  67.      $(name_shtab[9])
  68.      !let parm_=!replace internal & by ; in $parm_
  69.      !let parm_=!replace internal scoredelay=; by scoredelay=0; in $parm_
  70.      !let parm_=!replace internal exo=; by exo=0; in $parm_
  71.      !let tmp_=!replace internal = by , in $parm_
  72.      !let tmp2_=!column 1 of $tmp_
  73.      !let tmp2_=!positionof item exo in $tmp2_
  74.      !let tmp_=!column 2 of $tmp_
  75.      !let tmp_=!item $tmp2_ of $tmp_
  76.      !let tmp_=!nospace $tmp_
  77.      !set wims_ref_class=wims_button
  78.      !href target=wims_oef cmd=intro&module=$directory_&special_parm=&special_parm2=&special_parm3=exo=$tmp_;$parm_&special_parm4=$sheet,$modif $(seriesaction[1])
  79.     </td>
  80.     <td>$directory_ <br/> $parm_ </td>
  81.    </tr>
  82.   !endif
  83. !endif activetest > 0
  84.   $table_tr
  85.    <td colspan="2" style="text-align:center;">
  86.     <input type="submit" value="$wims_name_tosave"/> &nbsp;
  87.     !set wims_ref_class=wims_button
  88.     !href cmd=resume $wims_name_giveup
  89.    </td>
  90.   </tr>
  91.  $table_end
  92.  
  93. !formend
  94.