Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
23 reyssat 1 
 
2 
!set form_OK=Envoyer la modification
3 
!set form_titlename=Titre
4 
!set form_caption=Propriétés du niveau
5 
!set title=$class_description
6 
!set sup=$class_Supervisor
7 
!set alevel=$class_level
8 
!read scripts/levelform.phtml
9 
<p>
10 
!if $classcnt=0
11 
 Ce niveau n'a pas encore de classes.
1290 bpr 12 
 !href cmd=reply&job=addclass $wims_name_addclass
23 reyssat 13 
.<sup>
1290 bpr 14 
 !href cmd=help&special_parm=structure#class $wims_name_help
23 reyssat 15 
</sup>
16 
!else
17 
 $table_header
18 
 <caption>Classes disponibles<sup>
1290 bpr 19 
 !href cmd=help&special_parm=structure#class $wims_name_help
23 reyssat 20 
 </sup>dans ce niveau <small>
1290 bpr 21 
 !href cmd=reply&job=addclass $wims_name_addclass
23 reyssat 22 
 </small></caption>
23 
 $table_hdtr
24 
 <th>Code<th>Nom</th><th>-</th><th>Responsable</th>
25 
 <th><small>Cours</small></th>
26 
 <th><small>Participants</small></th>
27 
 </tr>
28 
 !for i=1 to $classcnt
29 
   !set l=!line $i of $classes
30 
   !distribute items $l into l_,s_,t_,n_
31 
   !set c=!record 0 of $classdir1/$l_/courses
32 
   !set c=!nonempty lines $c
33 
   !set c=!linecnt $c
34 
   $table_tr<td align=center>$l_</td>
35 
   <td align=center>
36 
   !href cmd=reply&job=class&class=$l_ $t_
37 
   </td><td align=center><small>
38 
    !href cmd=reply&job=delclass&del=$l_ effacer
39 
   </small>
40 
   </td><td align=center>
41 
   !if $s_!=$empty
42 
    !if $s_=supervisor
43 
     $name_supervisor
44 
    !else
45 
     !default n_=$s_
46 
     !href cmd=reply&job=modteacher&teacher=$s_ $n_
47 
    !endif
48 
   !else
49 
    Non disponible
50 
   !endif
51 
   </td><td align=center>$c</td>
52 
   !set c=!recordcnt $classdir1/$l_/.userlist
53 
   <td align=center>$c</td>
54 
 !next i
55 
 $table_end
56 
 
57 
!endif
58 
 
59 
<p>
60 
!if $progcnt=0
61 
 Ce niveau n'a pas encore de programmes d'enseignement.
1290 bpr 62 
 !href cmd=reply&job=addprog $wims_name_addprog
23 reyssat 63 
.<sup>
1290 bpr 64 
 !href cmd=help&special_parm=structure#program $wims_name_help
23 reyssat 65 
 </sup>
66 
!else
67 
 $table_header
68 
 <caption>Programmes d'enseignement disponibles<sup>
1290 bpr 69 
 !href cmd=help&special_parm=structure#program $wims_name_help
23 reyssat 70 
 </sup>dans ce niveau <small>
1290 bpr 71 
 !href cmd=reply&job=addprog $wims_name_addprog
23 reyssat 72 
 </small></caption>
73 
 $table_hdtr
74 
 <th>Code<th>Nom</th><th>-</th><th>Responsable</th>
75 
 <th><small>Cours</small></th>
76 
 </tr>
77 
 !for i=1 to $progcnt
78 
   !set l=!line $i of $programs
79 
   !distribute items $l into l_,s_,t_,n_
80 
   !set c=!record 0 of $classdir1/$l_/courses
81 
   !set c=!nonempty lines $c
82 
   !set c=!linecnt $c
83 
   $table_tr<td align=center>$l_</td>
84 
   <td align=center>
85 
   !href cmd=reply&job=prog&prog=$l_ $t_
86 
   </td><td align=center><small>
87 
    !href cmd=reply&job=delprog&del=$l_ effacer
88 
   </small>
89 
   </td><td align=center>
90 
   !if $s_!=$empty
91 
    !if $s_=supervisor
92 
     $name_supervisor
93 
    !else
94 
     !default n_=$s_
95 
     !href cmd=reply&job=modteacher&teacher=$s_ $n_
96 
    !endif
97 
   !else
98 
    Non disponible
99 
   !endif
100 
   </td><td align=center>$c
101 
 !next i
102 
 $table_end
1336 bpr 103 
!set wims_menu_items=!append line addclass,1,cmd=reply&job=addclass\
1290 bpr 104 
addprog,1,cmd=reply&job=addprog\
1336 bpr 105 
to $wims_menu_items
23 reyssat 106 
!endif
107 
 
108 
!reset title
109