Subversion Repositories wimsdev

Rev

Rev 11977 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
# Variable calculations should be done in this file.
2
# It is read and interpreted by wims for all valid calls to the module.
3
 
10189 bpr 4
!if $class_expiration=$empty
14043 bpr 5
  !defread wimshome/log/classes/$wims_class/.def
23 reyssat 6
!endif
7
!if $class_expiration=$empty
14043 bpr 8
  error=bad_class
9
  !exit
23 reyssat 10
!endif
11
 
8138 guerimand 12
jour_begin=$class_creation
13
jour_end=!char 1 to 8 of $wims_now
14
 
23 reyssat 15
!if $cdt_supervise!=yes
14043 bpr 16
  class_parent=!text select 0123456789/ in $class_parent
17
  courses=!words2lines $ltcourses
23 reyssat 18
!endif
8138 guerimand 19
 
23 reyssat 20
list=!mexec proc/mkwork.sh
21
nbligne=!linecnt $list
8138 guerimand 22
 
23
!if $cdt_nbdate>$max_defaffi
14043 bpr 24
  list=!line -$max_defaffi to -1 of $list
25
  nbligne=!linecnt $list
26
  jour_begin=$(list[1;1])
8138 guerimand 27
!endif
28
 
23 reyssat 29
job=work