Rev 11977 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 11977 | Rev 14043 | ||
---|---|---|---|
Line 4... | Line 4... | ||
4 | !if $class_expiration=$empty |
4 | !if $class_expiration=$empty |
5 | !defread wimshome/log/classes/$wims_class/.def |
5 | !defread wimshome/log/classes/$wims_class/.def |
6 | !endif |
6 | !endif |
7 | !if $class_expiration=$empty |
7 | !if $class_expiration=$empty |
8 | error=bad_class |
8 | error=bad_class |
9 | !exit |
9 | !exit |
10 | !endif |
10 | !endif |
11 | 11 | ||
12 | jour_begin=$class_creation |
12 | jour_begin=$class_creation |
13 | jour_end=!char 1 to 8 of $wims_now |
13 | jour_end=!char 1 to 8 of $wims_now |
14 | 14 | ||
15 | !if $cdt_supervise!=yes |
15 | !if $cdt_supervise!=yes |
16 | class_parent=!text select 0123456789/ in $class_parent |
16 | class_parent=!text select 0123456789/ in $class_parent |
17 | courses=!words2lines $ltcourses |
17 | courses=!words2lines $ltcourses |
18 | !endif |
18 | !endif |
19 | 19 | ||
20 | list=!mexec proc/mkwork.sh |
20 | list=!mexec proc/mkwork.sh |
21 | nbligne=!linecnt $list |
21 | nbligne=!linecnt $list |
22 | 22 | ||
23 | !if $cdt_nbdate>$max_defaffi |
23 | !if $cdt_nbdate>$max_defaffi |
24 | list=!line -$max_defaffi to -1 of $list |
24 | list=!line -$max_defaffi to -1 of $list |
25 | nbligne=!linecnt $list |
25 | nbligne=!linecnt $list |
26 | jour_begin=$(list[1;1]) |
26 | jour_begin=$(list[1;1]) |
27 | !endif |
27 | !endif |
28 | 28 | ||
29 | job=work |
29 | job=work |