Subversion Repositories wimsdev

Rev

Rev 13495 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2788 guerimand 1 
!! this process allow to generate a list (echoose) of series of exercices taken in active sheet
2 
!!
3 
!! to work this script need
4 
!! variables defined :
5 
!! asheets : list of active sheets
6 
!! echoose : list of actual series selected
7 
!! language variable to be defined
8 
!! name_All, name_selectsheet
9 
!! add to main.phtml before header
10 
!! !let js=!record 0 of js/chooselist.js
11 
!! !let wims_html_header=!append line $js to $wims_html_header
12 
!! in var.def echoose and ltsheets need to be define to any
13 
!!
14 
!! output
15 
!! variable echoose contain list of series selected format $sheet.$exo
16 
!!
17 
 
12784 obado 18 
 
2855 bpr 19 
!let checked=$empty
12555 bpr 20 
!set  select_option=style="width: 400px;" multiple="multiple" size="15"
12784 obado 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>
30 
  <tr>
31 
    <td style="vertical-align:top">
32 
 
13495 obado 33 
      !! list of available sheets
12784 obado 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
13495 obado 63 
      <select $select_option name="select_sheet1" id="select_sheet1"
64 
              ondblclick="moveSelections(this.form.elements['select_sheet1'], this.form.elements['select_sheet2'], this.form.elements['echoose'], 'add')">
12784 obado 65 
      !for i in $asheets
66 
        !set t=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$i
67 
        !for j=1 to $t
68 
          !if $i.$j isitemof $echoose
69 
            !set r=!record $j of wimshome/log/classes/$wims_class/sheets/.sheet$i
70 
            !distribute line $r into r1,r2,r3,r4,r5,r6
71 
            !let checked=!append line <option value="$i.$j" data-sheetId="$i">$i.$j : $r5</option> to $checked
72 
          !else
73 
              !set r=!record $j of wimshome/log/classes/$wims_class/sheets/.sheet$i
74 
              !distribute line $r into r1,r2,r3,r4,r5,r6
13495 obado 75 
              <option value="$i.$j" data-sheetId="$i"
76 
              !if $i notitemof $ltsheets
77 
                style="display:none;"
78 
              !endif
79 
              >$i.$j : $r5</option>
12784 obado 80 
          !endif
81 
        !next j
82 
      !next i
83 
      </select>
84 
    </td>
85 
    <td>
17186 bpr 86 
      <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;">
87 
      <br>
88 
      <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;">
12784 obado 89 
    </td>
90 
    <td style="vertical-align:top">
91 
      !! Selected exercices
92 
      <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>
93 
      <select style="overflow: hidden; visibility: hidden; width: 1px; height: 0;" name="echoose" multiple="multiple" size="10">$checked</select>
94 
    </td>
95 
  </tr>
96 
  </tbody>
5874 bpr 97 
</table>