Subversion Repositories wimsdev

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1406 bpr 1
maxseq=30
2
 
3
!if ($wims_supertype<3 and $wims_typename=class) or ($wims_supertype=4 and $wims_typename iswordof course program icourse)
4
 sequence_supervise=yes
5
 !readdef wimshome/log/classes/$wims_class/seq/.def
6
 !if $sequence_defined!=yes
7
  !sh mkdir -p $wims_home/log/classes/$wims_class/seq;
8
  !filewrite wimshome/log/classes/$wims_class/seq/.def !set sequence_defined=yes\
9
  !set sequence_Title=$wims_name_sequence\
10
  !set sequence_reverse=no
11
 !endif
12
 !readdef wimshome/log/classes/$wims_class/seq/.def
13
!else
14
 sequence_supervise=no
15
error=no_seq
16
!exit
17
!endif
18
 
19
!set sheetcnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
20
!set docpubliccnt=!recordcnt wimshome/log/classes/$wims_class/doc/.docindex
21
!set examcnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exams
22
!set votecnt=!recordcnt wimshome/log/classes/$wims_class/vote/.votes
23
!set doccnt=!recordcnt wimshome/log/classes/$wims_class/doc/.index
24
!set docpubliccnt=!recordcnt wimshome/log/classes/$wims_class/doc/.docindex