Subversion Repositories wimsdev

Rev

Rev 12429 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 12429 Rev 13049
Line 3... Line 3...
3
!if $wims_user=supervisor
3
!if $wims_user=supervisor
4
  !readproc adm/whoconnect
4
  !readproc adm/whoconnect
5
!endif
5
!endif
6
 
6
 
7
!if $wims_class=$empty or ($wims_supertype!=0 and \
7
!if $wims_class=$empty or ($wims_supertype!=0 and \
8
 ($wims_supertype!=2 or $wims_typename!=class) and\
8
  ($wims_supertype!=2 or $wims_typename!=class) and\
9
 ($wims_supertype!=4 or ($wims_typename notwordof course and /0// notin $wims_class//)))
9
  ($wims_supertype!=4 or ($wims_typename notwordof course program\
-
 
10
  and /0// notin $wims_class//)))
10
  error=bad_class
11
  error=bad_class
11
  !exit
12
  !exit
12
!endif
13
!endif
13
 
14
 
14
!defread wimshome/log/classes/$wims_class/.def
15
!defread wimshome/log/classes/$wims_class/.def
Line 17... Line 18...
17
!if $wims_user!=supervisor and $class_showlivret!=yes
18
!if $wims_user!=supervisor and $class_showlivret!=yes
18
  error=closedlivret
19
  error=closedlivret
19
  !reset job
20
  !reset job
20
  !exit
21
  !exit
21
!endif
22
!endif
22
 
-
 
23
 
23
 
24
!default livret_minac=9
24
!default livret_minac=9
25
 
-
 
26
livret_nonactivesheet=!listunion $livret_nonactivesheet and $nasheets
25
livret_nonactivesheet=!listunion $livret_nonactivesheet and $nasheets
27
 
26
 
28
!read lang/names.phtml.$moduclass_lang
27
!read lang/names.phtml.$moduclass_lang
29
 
28
 
30
!read tabletheme
29
!read tabletheme
31
name_icompetence=!char 1 of $name_Competences
30
name_icompetence=!char 1 of $name_Competences
32
name_ipalier=!char 1 of $name_n_Palier
31
name_ipalier=!char 1 of $name_n_Palier
33
 
32
 
34
!if $livret_supervise=yes
33
!if $livret_supervise=yes
35
  !bound job within see,modpalier,userlist,config,addcomp,user,delpalier,delcomp,save default userlist
34
  !bound job within see,modpalier,userlist,config,addcomp,user,delpalier,delcomp,save default userlist
-
 
35
  !if $wims_typename iswordof program
-
 
36
    !bound job within see,modpalier,config,addcomp,delpalier,delcomp,save default config
-
 
37
  !endif
36
!else
38
!else
37
  !bound job within user,see default user
39
  !bound job within user,see default user
38
  user=$wims_user
40
  user=$wims_user
39
!endif
41
!endif
40
 
42