Subversion Repositories wimsdev

Rev

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

Rev 12555 Rev 12784
Line 13... Line 13...
13 
!!
 13 
!!
14 
!! output
 14 
!! output
15 
!! variable echoose contain list of series selected format $sheet.$exo
 15 
!! variable echoose contain list of series selected format $sheet.$exo
16 
!!
 16 
!!
17 
 
 17 
 
18 
$name_selectsheet
 - 
 
19 
<select name="ltsheets" onchange="submit()" value="$ltsheets">
 - 
 
20 
!let ltsheets=!listintersect $asheets and $ltsheets
 - 
 
21 
!if $ltsheets=$empty
 - 
 
22 
  !let ltsheets=$asheets
 - 
 
23 
!endif
 - 
 
24 
!if $ltsheets=$asheets
 - 
 
25 
  <option value="$asheets" selected="selected">$name_All</option>
 - 
 
26 
!else
 18 
 
27 
  <option value="$asheets">$name_All</option>
 - 
 
28 
!endif
 - 
 
29 
!for k in $asheets
 - 
 
30 
  !if $ltsheets=$k
 - 
 
31 
    <option value="$k" selected="selected">
 - 
 
32 
  !else
 - 
 
33 
    <option value="$k">
 - 
 
34 
  !endif
 - 
 
35 
  !let t=!record $k of wimshome/log/classes/$wims_class/sheets/.sheets
 - 
 
36 
  $k :
 - 
 
37 
  !line 3 of $t
 - 
 
38 
  </option>
 - 
 
39 
!next k
 - 
 
40 
</select>
 - 
 
41 
!let checked=$empty
 19 
!let checked=$empty
42 
!set  select_option=style="width: 400px;" multiple="multiple" size="15"
 20 
!set  select_option=style="width: 400px;" multiple="multiple" size="15"
43 
<table class="wimscenter wimsnoborder">
 21 
<table class="wimscenter wimstable">
- 
 
 22 
  <thead>
- 
 
 23 
    <tr>
- 
 
 24 
      <th>$name_Availables</th>
- 
 
 25 
      <th> </th>
- 
 
 26 
      <th>$name_Selected</th>
- 
 
 27 
    </tr>
- 
 
 28 
  </thead>
- 
 
 29 
  <tbody>
44 
 <tr>
 30 
  <tr>
45 
  <td valign="top">
 31 
    <td style="vertical-align:top">
- 
 
 32 
 
- 
 
 33 
      !! list of alvailable sheets
- 
 
 34 
      <div>
- 
 
 35 
        <label for="ltsheets">$name_selectsheet</label>
- 
 
 36 
        <select id="ltsheets" name="ltsheets"  value="$ltsheets"
- 
 
 37 
                onchange="filterSelectExoSheet(this.form.elements['select_sheet1'], this.form.elements['ltsheets'])"
- 
 
 38 
                >
- 
 
 39 
          !let ltsheets=!listintersect $asheets and $ltsheets
- 
 
 40 
          !if $ltsheets=$empty
- 
 
 41 
            !let ltsheets=$asheets
- 
 
 42 
          !endif
- 
 
 43 
          !if $ltsheets=$asheets
- 
 
 44 
            <option value="$asheets" selected="selected">$name_All</option>
- 
 
 45 
          !else
- 
 
 46 
            <option value="$asheets">$name_All</option>
- 
 
 47 
          !endif
- 
 
 48 
          !for k in $asheets
- 
 
 49 
            !if $ltsheets=$k
- 
 
 50 
              <option value="$k" selected="selected">
- 
 
 51 
            !else
- 
 
 52 
              <option value="$k">
- 
 
 53 
            !endif
- 
 
 54 
            !let t=!record $k of wimshome/log/classes/$wims_class/sheets/.sheets
- 
 
 55 
            $k :
- 
 
 56 
            !line 3 of $t
- 
 
 57 
            </option>
- 
 
 58 
          !next k
- 
 
 59 
        </select>
- 
 
 60 
      </div>
- 
 
 61 
 
- 
 
 62 
      !! Available exercices
46 
   <select  $select_option name="select_sheet1" ondblclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'add')">
 63 
      <select  $select_option name="select_sheet1" ondblclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'add')">
47 
!for i in $asheets
 64 
      !for i in $asheets
48 
  !set t=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$i
 65 
        !set t=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$i
49 
  !for j=1 to $t
 66 
        !for j=1 to $t
50 
    !if $i.$j isitemof $echoose
 67 
          !if $i.$j isitemof $echoose
51 
      !set r=!record $j of wimshome/log/classes/$wims_class/sheets/.sheet$i
 68 
            !set r=!record $j of wimshome/log/classes/$wims_class/sheets/.sheet$i
52 
      !distribute line $r into r1,r2,r3,r4,r5,r6
 69 
            !distribute line $r into r1,r2,r3,r4,r5,r6
53 
      !let checked=!append line <option value="$i.$j">$i.$j : $r5</option> to $checked
 70 
            !let checked=!append line <option value="$i.$j" data-sheetId="$i">$i.$j : $r5</option> to $checked
54 
    !else
 71 
          !else
55 
      !if $i isitemof $ltsheets
 72 
            !if $i isitemof $ltsheets
56 
        !set r=!record $j of wimshome/log/classes/$wims_class/sheets/.sheet$i
 73 
              !set r=!record $j of wimshome/log/classes/$wims_class/sheets/.sheet$i
57 
        !distribute line $r into r1,r2,r3,r4,r5,r6
 74 
              !distribute line $r into r1,r2,r3,r4,r5,r6
58 
        <option value="$i.$j">$i.$j : $r5 </option>
 75 
              <option value="$i.$j" data-sheetId="$i">$i.$j : $r5</option>
59 
      !endif
 76 
            !endif
60 
    !endif
 77 
          !endif
61 
  !next j
 78 
        !next j
62 
!next i
 79 
      !next i
63 
  </select>
 80 
      </select>
64 
  </td>
 81 
    </td>
65 
  <td>
 82 
    <td>
66 
   <input name="add" value=" &gt;&gt; " type="button" onclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'add'); return false;"/>
 83 
      <input class="wims_button" name="add" title="$wims_name_append" value=" &rarr; " type="button" onclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'add'); return false;"/>
67 
   <br/>
 84 
      <br/>
68 
   <input name="remove" value=" &lt;&lt; " type="button" onclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'remove'); return false;"/>
 85 
      <input class="wims_button" name="remove" title="$wims_name_Remove" value=" &larr; " type="button" onclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'remove'); return false;"/>
69 
  </td>
 86 
    </td>
70 
  <td valign="top">
 87 
    <td style="vertical-align:top">
- 
 
 88 
      !! Selected exercices
71 
   <select $select_option name="select_sheet2" ondblclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'remove')">$checked</select>
 89 
      <select $select_option name="select_sheet2" ondblclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'remove')">$checked</select>
72 
   <select style="overflow: hidden; visibility: hidden; width: 1px; height: 0;" name="echoose" multiple="multiple" size="10">$checked</select>
 90 
      <select style="overflow: hidden; visibility: hidden; width: 1px; height: 0;" name="echoose" multiple="multiple" size="10">$checked</select>
73 
  </td>
 91 
    </td>
74 
 </tr>
 92 
  </tr>
- 
 
 93 
  </tbody>
75 
</table>
 94 
</table>