Subversion Repositories wimsdev

Rev

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

Rev 11714 Rev 12335
Line 4... Line 4...
4 
!if $wims_class=$empty or ($wims_supertype!=0 and\
 4 
!if $wims_class=$empty or ($wims_supertype!=0 and\
5 
 ($wims_supertype!=2 or $wims_typename!=class) and\
 5 
    ($wims_supertype!=2 or $wims_typename!=class) and\
6 
 ($wims_supertype!=4 or $wims_typename notitemof class,course,program))
 6 
    ($wims_supertype!=4 or $wims_typename notitemof class,course,program))
7 
 error=bad_class
 7 
  error=bad_class
8 
 !exit
 8 
  !exit
9 
!endif
 9 
!endif
10 
 
 10 
 
11 
!defread wimshome/log/classes/$wims_class/.def
 11 
!defread wimshome/log/classes/$wims_class/.def
12 
!defread wimshome/log/classes/$wims_class/seq/.def
 12 
!defread wimshome/log/classes/$wims_class/seq/.def
13 
 
 13 
 
14 
!read lang/names.phtml.$moduclass_lang
 14 
!read lang/names.phtml.$moduclass_lang
15 
!read tabletheme
 15 
!read tabletheme
16 
 
 16 
 
17 
!if $wims_user=supervisor
 17 
!if $wims_user=supervisor
18 
 !bound job within config,addseq,moveup,show,delete,changeopt default show
 18 
  !bound job within config,addseq,moveup,show,delete,changeopt default show
19 
!else
 19 
!else
20 
 job=show
 20 
  job=show
21 
!endif
 21 
!endif
22 
 
 22 
 
23 
seq_cnt=!record 0 of wimshome/log/classes/$wims_class/seq/.sequences
 23 
seq_cnt=!record 0 of wimshome/log/classes/$wims_class/seq/.sequences
24 
seq_cnt=!line 1 of $seq_cnt
 24 
seq_cnt=!line 1 of $seq_cnt
25 
!read $job.proc
 25 
!read $job.proc
Line 27... Line 27...
27 
!if $wims_user=supervisor and $job iswordof addseq moveup show delete
 27 
!if $wims_user=supervisor and $job iswordof addseq moveup show delete
28 
  !read sheetindex
 28 
  !read sheetindex
29 
!endif
 29 
!endif
30 
 
 30 
 
31 
!if $(class_actcolor)!=$empty
 31 
!if $(class_actcolor)!=$empty
32 
   !read adm/class/seqcolors
 32 
  !read adm/class/seqcolors
33 
!endif
 33 
!endif