Subversion Repositories wimsdev

!!##!! language independant

!read adm/class/classname.phtml $wims_classname\

$wims_institutionname

!default livret_title=$(module_title_$lang)

!read adm/title.phtml 1\

$classname\

$livret_title\

$name_job

!form reply

  <fieldset class="property_fields">

    <legend>$name_info</legend>

    !set wims_ref_class=wims_button float_right wims_warning

    !href cmd=reply&comp=$comp&job=delcomp $wims_name_delete

    <div class="field box">

      <label for="cf_title">$name_title_comp</label>

      <input size="50" name="cf_title" id="cf_title" value="$mem_title">

    </div>

    <div class="field box">

      <label for="cf_nbpalier">$name_cnt_palier</label>

      <select name="cf_nbpalier" id="cf_nbpalier" onchange="submit()">

      !for i=1 to $maxpalier

        !if $i=$mem_nbpalier

          <option value="$i" selected="selected">$i</option>

        !else

          <option value="$i">$i</option>

        !endif

      !next i

      </select>

    </div>

    !for k=1 to $mem_nbpalier

      !let eold=!record $k of wimshome/log/classes/$wims_class/livret/.comp$comp

      !distribute line $eold into name,eold

      <div class="field box">

        <label>$name_n_Palier $k <span class="wims_emph">$name</span></label>

        !set wims_ref_class=wims_button

        !href cmd=reply&job=modpalier&comp=$comp&palier=$k $wims_name_change

        !set wims_ref_class=wims_button

        !href cmd=reply&job=delpalier&comp=$comp&palier=$k $wims_name_delete

        !if $eold!=

          <ul>

          !for l in $eold

            <li>

              !let t=!replace internal . by , in $l

              $l

              !line $(t[2]) of $(sheet$(t[1]))

            </li>

          !next l

         </ul>

        !endif

      </div>

    !next k

    <div class="wimscenter wimsform">

      <input type="submit" name="cf_set" value="$wims_name_tosave">

    </div>

  </fieldset>

!formend

!reset cf_nbpalier