Subversion Repositories wimsdev

Rev

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

  1. !! --------------------  affiche le contenu de la feuille $sheet de la classe $wims_class
  2. !! langage is defined in adm/class/sheet/lang/names.phtml.$lang
  3.  
  4. $(name_activindividualisation): <span class="tt">$name</span>
  5.  
  6. !if $activetest=0
  7. !form reply
  8.   <input type="hidden" name="job" value="indiv" />
  9. !endif
  10.   $table_header
  11.   <caption>$name_contentindiv</caption>
  12.   <thead>
  13.     $table_hdtr
  14.       !for k=1 to 2
  15.         <th>$(name_shtab[$k])</th>
  16.       !next k
  17.       !for k=1 to $nb_val
  18.         <th>$(listval[$k])</th>
  19.       !next k  
  20.     </tr>
  21.   </thead>
  22.   <tbody>
  23.   !let num=0
  24.   !for i=1 to $exocnt
  25.     !set ex=!record $i of wimshome/log/classes/$wims_class/sheets/.sheet$sheet
  26.     !distribute lines $ex into di,pa,re,we,ti,de,dep,com,feed,icone,indiv$i
  27.     !for k in re,we
  28.       !let tmp=!row 2 to -1 of $($k)
  29.       !let $(k)_1=!column 1 of $tmp
  30.       !let $(k)_2=!column 2 of $tmp
  31.     !next k
  32.     $table_tr
  33.     <td id="td_exo_$i">$i</td>
  34.     <td> $ti </td>
  35.     !if $activetest=0
  36.         !for k=1 to $nb_val
  37.           !increase num
  38.           <td>
  39.             !if $(listval[$k]) isitemof $(indiv$i)
  40.               !let ch=checked="checked"
  41.             !else
  42.               !reset ch
  43.             !endif
  44.             <input type="checkbox" name="indiv$i" id="indiv$(i)_$k" value="$(listval[$k])" $ch />
  45.             <label for="weight$num">$(name_shtab[5])</label>
  46.             !let p=!positionof item $(listval[$k]) in $we_1
  47.             !if $p!=$empty
  48.               !let v=!item $p of $we_2
  49.             !else
  50.               !let v=$(we[1;])
  51.             !endif
  52.             <input type="text" name="weight$num" value="$v" id="weight$num" size="2" />
  53.             <label for="require$num">$(name_shtab[4])</label>
  54.             !let p=!positionof item $(listval[$k]) in $re_1
  55.             !if $p!=$empty
  56.               !let require$num=!item $p of $re_2
  57.             !else
  58.               !let require$num=$(re[1;])
  59.             !endif
  60.             !formselect require$num list $list_require
  61.           </td>
  62.         !next k
  63.       !reset indiv$i
  64.     !else
  65.       !for k=1 to $nb_val
  66.         <td>
  67.           !if $(listval[$k]) isitemof $(indiv$i)
  68.             &#x2705;
  69.            !let pw_=!positionof item $(listval[$k]) in $we_1
  70.             !let pr_=!positionof item $(listval[$k]) in $re_1
  71.             !if $pw_!=$empty
  72.               $(name_shtab[5])
  73.               !item $pw_ of $we_2
  74.               !if $pr_!=$empty
  75.                &nbsp;;&nbsp;
  76.               !endif
  77.             !endif
  78.             !if $pr_!=$empty
  79.               $(name_shtab[4])
  80.               !item $pr_ of $re_2
  81.             !endif          
  82.           !endif
  83.         </td>
  84.       !next k
  85.     !endif
  86.     </tr>
  87.   !next i
  88.   </tbody>
  89.   $table_end
  90.  
  91. !if $activetest=0
  92.   <div class="wimscenter wimsform">
  93.     <input type="submit" value="$wims_name_tosave" name="save_indiv"/>
  94.     !set wims_ref_class= wims_button wims_secondary_button
  95.     !href module=home $wims_name_giveup
  96.   </div>
  97. !formend
  98. !endif
  99.  
  100.