Subversion Repositories wimsdev

Rev

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

  1. !!
  2. !! page edition to add exo for help 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 class="wimscenter">
  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.   <input type="submit" value="$wims_name_change" />
  20.   </p>
  21.   $name_choose :
  22.   <select name="picksheet" onchange="submit()">
  23.   !for i=1 to $sheetcnt
  24.     !set sh=!line $i of $sheets
  25.     !set se=!item 1 of $sh
  26.     !set nb=!item 2 of $sh
  27.     !set ti=!item 3 to -1 of $sh
  28.     !if $i=$picksheet
  29.       <option value="$se" selected="selected">$wims_name_Sheet $se: $ti</option>
  30.     !else
  31.       <option value="$se">$wims_name_Sheet $se: $ti</option>
  32.     !endif
  33.   !next i
  34.   </select>
  35.   <p>
  36.   $name_choose_series :</p>
  37.   $table_header
  38.   $table_hdtr<th>$name_series</th><th>$name_actualhelp</th></tr>
  39.   !for i=1 to $(sheets[$picksheet;2])
  40.     !let don=!record $i of wimshome/log/classes/$wims_class/sheets/.sheet$picksheet
  41.     !let ti=!line 5 of $don
  42.     !let he=!line 9 of $don
  43.     $table_tr
  44.     <td>
  45.     !href cmd=reply&job=helpexo&picksheet=$picksheet&step=1&exo=$i $ti
  46.     </td>
  47.     <td>$he</td>
  48.     </tr>
  49.   !next i
  50.   $table_end
  51.   <input type="hidden" value="helpexo" name="job" />
  52.   !formend
  53.   $name_clickhelp
  54. !else
  55.   $name_end $picksheet, ex. $exo ($note)
  56.   !set wims_menu_items=!append line sheetcheck,1,module=adm/class/sheet&sheet=$picksheet\
  57. to $wims_menu_items
  58. !endif
  59.