Subversion Repositories wimsdev

Rev

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

  1. !!
  2. !! page edition to add exo to a sheet
  3. !!
  4.  
  5. !if $step=0
  6.  $name_insert <span class="tt wims_fname">$dir</span>
  7.  !if $iniparm!=$empty
  8.   $name_parm
  9.  <p>
  10.  <span class="tt wims_parm">
  11.   !replace internal & by &amp; in $iniparm
  12.   </span>
  13.  </p>
  14.  !endif
  15.  
  16.  !form reply
  17.   <p>
  18.  $name_choose_helpexo <input type="text" name="note" value="$note" size="4" />.
  19.  </p>
  20.   $name_choose :
  21.   <select name="picksheet" onchange="submit()">
  22.    !for i=1 to $sheetcnt
  23.     !set sh=!line $i of $sheets
  24.     !set se=!item 1 of $sh
  25.     !set nb=!item 2 of $sh
  26.     !set ti=!item 3 to -1 of $sh
  27.     !if $i=$picksheet
  28.      <option value="$se" selected="selected">$wims_name_Sheet $se: $ti</option>
  29.     !else
  30.      <option value="$se">$wims_name_Sheet $se: $ti</option>
  31.     !endif
  32.    !next i
  33.   </select>
  34.   <p>
  35.   $name_choose_series :</p>
  36.   $table_header
  37.    $table_hdtr<th>$name_series</th><th>$name_actualhelp</th></tr>
  38.    !for i=1 to $(sheets[$picksheet;2])
  39.     !let don=!record $i of wimshome/log/classes/$wims_class/sheets/.sheet$picksheet
  40.     !let ti=!line 5 of $don
  41.     !let he=!line 9 of $don
  42.     $table_tr
  43.      <td>
  44.       !href cmd=reply&job=helpexo&picksheet=$picksheet&step=1&exo=$i $ti
  45.      </td>
  46.      <td>$he</td>
  47.     </tr>
  48.    !next i
  49.   $table_end
  50.   <div class="wimscenter wimsform"><input type="submit" value="$wims_name_Insert" />
  51.   <input type="hidden" value="helpexo" name="job" /></div>
  52.  
  53. !formend
  54.  $name_clickhelp
  55. !else
  56.  $name_end
  57.  $picksheet.
  58.  !set wims_menu_items=!append line sheetcheck,1, module=adm/class/sheet&sheet=$picksheet\
  59. to $wims_menu_items
  60. !endif
  61.