Subversion Repositories wimsdev

Rev

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

Rev 10189 Rev 11977
Line 12... Line 12...
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=!record 0 of wimshome/log/classes/$wims_class/courses
 - 
 
18 
 courses=!column 1 of $courses
 - 
 
19 
 courses=!items2lines $courses
 17 
 courses=!words2lines $ltcourses
20 
 courses=!replace internal / by , in $courses
 - 
 
21 
 courses=!columns 3 of $courses
 - 
 
22 
 courses=!text select 0123456789, in $courses
 - 
 
23 
 courses=!items2lines $courses
 - 
 
24 
!endif
 18 
!endif
25 
 
 19 
 
26 
list=!mexec proc/mkwork.sh
 20 
list=!mexec proc/mkwork.sh
27 
nbligne=!linecnt $list
 21 
nbligne=!linecnt $list
28 
 
 22