Subversion Repositories wimsdev

Rev

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