Subversion Repositories wimsdev

Rev

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

  1. !!##!! language independant
  2. !read adm/class/classname.phtml $wims_classname\
  3. $wims_institutionname
  4.  
  5. !read adm/title.phtml 1\
  6. $classname\
  7. $livret_title\
  8. $name_job
  9.  
  10. <hr style="width:40%"/>
  11.  
  12. !form reply
  13.   <ul>
  14.  <li>$name_info [
  15.  !href cmd=reply&comp=$comp&job=delcomp $wims_name_delete
  16.   ] :
  17.   <ul>
  18.    <li>$name_title_comp: <input size="50" name="cf_title" value="$mem_title"/>.</li>
  19.    <li>$name_cnt_palier:
  20.     <select  name="cf_nbpalier" onchange="submit()">
  21.     !for i=1 to $maxpalier
  22.      !if $i=$mem_nbpalier
  23.       <option value="$i" selected="selected">$i</option>
  24.      !else
  25.       <option value="$i">$i</option>
  26.      !endif
  27.     !next i
  28.     </select>
  29.    </li>
  30.   </ul>
  31.   <input type="submit" name="cf_set" value="$wims_name_tosave"/>
  32.  </li>
  33.  !for k=1 to $mem_nbpalier
  34.   !let eold=!record $k of wimshome/log/classes/$wims_class/livret/.comp$comp
  35.   !distribute line $eold into name,eold
  36.   <li>$name_n_Palier $k : <span class="wims_emph">$name</span><small> [
  37.    !href cmd=reply&job=modpalier&comp=$comp&palier=$k $wims_name_change
  38.    &nbsp;
  39.    !href cmd=reply&job=delpalier&comp=$comp&palier=$k $wims_name_delete
  40.    ] </small>
  41.    !if $eold!=
  42.    <ul>
  43.     !for l in $eold
  44.      !let t=!replace internal . by , in $l
  45.      <li> $l
  46.       !line $(t[2]) of $(sheet$(t[1]))
  47.      </li>
  48.     !next l    
  49.    </ul>
  50.    !endif
  51.   </li>
  52.  !next k
  53. </ul>
  54.  
  55. !formend
  56. !set wims_menu_items=!append line back2,1,cmd=reply&job=home\
  57. to $wims_menu_items
  58.  
  59. !reset cf_nbpalier
  60.