Subversion Repositories wimsdev

Rev

Rev 2854 | Rev 3049 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

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