Subversion Repositories wimsdev

Rev

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

Rev 1005 Rev 2510
Line 24... Line 24...
24
    </tr>
24
    </tr>
25
    !for i=1 to $foncsnb
25
    !for i=1 to $foncsnb
26
    !set fonc=!trim $(foncsrecord[$i;])
26
    !set fonc=!trim $(foncsrecord[$i;])
27
    !set fonc=!char 2 to -2 of $fonc
27
    !set fonc=!char 2 to -2 of $fonc
28
      <tr>
28
      <tr>
29
        <td bgcolor=$(coulors[$i%3+1;])>
29
        <td bgcolor="$(coulors[$i%3+1;])">
30
	  $fonc
30
	  $fonc
31
	</td>
31
	</td>
32
	<td bgcolor=$(coulors[$i%3+1;])>
32
	<td bgcolor="$(coulors[$i%3+1;])">
33
	  <select name=typnb>
33
	  <select name=typnb>
34
            !for j=1 to $Nbtyp
34
            !for j=1 to $Nbtyp
35
              <option value=$j
35
              <option value=$j
36
                 !if $(foncstypList[$i])=$j
36
                 !if $(foncstypList[$i])=$j
37
		   selected
37
		   selected