Subversion Repositories wimsdev

Rev

Rev 6235 | Rev 7909 | 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. !form reply
  11.   <fieldset class="property_fields">
  12.     <legend>$name_info</legend>
  13.  !href cmd=reply&comp=$comp&job=delcomp $wims_name_delete
  14.     <div class="field box">
  15.       <label for="cf_title">$name_title_comp</label>
  16.       <input size="50" name="cf_title" id="cf_title" value="$mem_title" />
  17.     </div>
  18.     <div class="field box">
  19.       <label for="cf_nbpalier">$name_cnt_palier</label>
  20.       <select name="cf_nbpalier" id="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.  !for k=1 to $mem_nbpalier
  30.   !let eold=!record $k of wimshome/log/classes/$wims_class/livret/.comp$comp
  31.   !distribute line $eold into name,eold
  32.    <div class="field box">
  33.      <label>$name_n_Palier $k <span class="wims_emph">$name</span></label>
  34.    !set wims_ref_class=wims_button
  35.    !href cmd=reply&job=modpalier&comp=$comp&palier=$k $wims_name_change
  36.    !set wims_ref_class=wims_button
  37.    !href cmd=reply&job=delpalier&comp=$comp&palier=$k $wims_name_delete
  38.    !if $eold!=
  39.      <ul>
  40.     !for l in $eold
  41.       <li>
  42.      !let t=!replace internal . by , in $l
  43.       $l
  44.       !line $(t[2]) of $(sheet$(t[1]))
  45.        </li>
  46.     !next l
  47.      </ul>
  48.    !endif
  49.    </div>
  50.  !next k
  51.    <div class="wimscenter wimsform">
  52.     <input type="submit" name="cf_set" value="$wims_name_tosave" />
  53.    </div>
  54. </fieldset>
  55.  
  56. !formend
  57. !set wims_menu_items=!append line back2,1,cmd=reply&job=home\
  58. to $wims_menu_items
  59.  
  60. !reset cf_nbpalier
  61.