Subversion Repositories wimsdev

Rev

Rev 2271 | Rev 3066 | 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. !!!### langage independant
  3. !!
  4. !distribute lines $wims_read_parm into directory_,parm_,require_,weight_,title_,desc_,dep_,comment_
  5. !! !set orgtit_=!module title $directory_
  6.  <p><center><h3>$name_titlemodif $modif</h3></center>
  7.  !form reply
  8.   $table_header
  9.   <input type=hidden name="modif" value=$ex_>
  10.   <input type=hidden name="job" value=modify>
  11.   $table_tr
  12.    <td><b>$wims_name_title </b></td>
  13. !!<small>($name_oldtitle <em>$orgtit</em>)</small></td>
  14.    <td><input size="50" name="mod_title" value="$title_"></td>
  15.   </tr>
  16.   $table_tr
  17.    <td><b>$wims_name_Description</b></td>
  18.    <td><textarea name="mod_desc" rows="3" cols="60">$desc_</textarea></td>
  19.   </tr>
  20.   $table_tr
  21.    <td><b>$(name_shtab[7])</b> <small>($name_desc_comment)</small></td>
  22.    <td><textarea name="mod_comment" rows="3" cols="60">$comment_</textarea></td>
  23.   </tr>
  24.   $table_tr
  25.    <td><b>$name_pointsasked</b></td>
  26.    <td><input size="4" name="mod_require" value="$require_"></td>
  27.   </tr>
  28.   $table_tr
  29.    <td><b>$name_ofweight</b></td>
  30.    <td><input size="4" name="mod_weight" value="$weight_"></td>
  31.   </tr>
  32.   $table_tr
  33.    <td><b>$(name_shtab[6])</b> <small>[
  34.     !href target=wims_mhelp cmd=help&special_parm=dependancies $wims_name_help
  35.     ] </small>
  36.    </td>
  37.    <td><input size="40" name="mod_dep" value="$dep_"></td>
  38.    !reset mod_dep
  39.   </tr>
  40.   !let oef=!defof category in wimshome/public_html/modules/$directory_/INDEX
  41.   !if oef isitemof $oef
  42.    $table_tr
  43.     <td>
  44.      <b>$(name_shtab[9])</b>
  45.      !let parm_=!replace internal & by ; in $parm_
  46.      !let parm_=!replace internal scoredelay=; by scoredelay=0; in $parm_
  47.      !let parm_=!replace internal exo=; by exo=0; in $parm_
  48.      !let tmp_=!replace internal = by , in $parm_
  49.      !let tmp2_=!column 1 of $tmp_
  50.      !let tmp2_=!positionof item exo in $tmp2_
  51.      !let tmp_=!column 2 of $tmp_
  52.      !let tmp_=!item $tmp2_ of $tmp_
  53.      !let tmp_=!nospace $tmp_
  54.      !href target=wims_oef cmd=intro&module=$directory_&special_parm=&special_parm2=&special_parm3=exo=$tmp_;$parm_&special_parm4=$sheet,$modif $(seriesaction[1])
  55.     </td>
  56.     <td>$directory_ <br> $parm_ </td>
  57.    </tr>
  58.   !endif
  59.   $table_tr
  60.    <td colspan=2><center>
  61.     <input type="submit" value="$wims_name_change"> &nbsp;
  62.     !href cmd=resume $wims_name_giveup
  63.    </center></td>
  64.   </tr>
  65.  $table_end
  66. </form>
  67.