Subversion Repositories wimsdev

Rev

Rev 12489 | Rev 13250 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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