Subversion Repositories wimsdev

Rev

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

Rev 9361 Rev 9572
Line 1... Line 1...
1 
!! change participant registration in subclasses of groupement
 1 
!! change participant registration in subclasses of groupement
2 
!! this job is actually limited to groupement type when user=supervisor (at the groupement level)
 2 
!! this job is actually limited to groupement type when user=supervisor (at the groupement level)
3 
 
 3 
 
4 
!! TODO : reflexion sur l'usage des variables techniques dans ce job ( pour sélectionner ou simplement afficher)
 4 
!! TODO : reflexion sur l'usage des variables techniques dans ce job ( pour sélectionner ou simplement afficher)
5 
 
 5 
 
6 
 
 - 
 
7 
!if $varfilter!=$empty
 - 
 
8 
   !reset varfilter_
 - 
 
9 
   !set varfilter_cnt=!linecnt $varfilter
 - 
 
10 
   !for v=1 to $varfilter_cnt
 - 
 
11 
    var_line=!singlespace $(varfilter[$v;])
 - 
 
12 
    var_line =!replace $ $ by , in $var_line
 - 
 
13 
    varfilter_=!append line $var_line to $varfilter_
 - 
 
14 
   !next v
 - 
 
15 
!endif
 - 
 
16 
 
 6 
 
17 
usercnt=!recordcnt wimshome/log/classes/$wims_class/.userlist
 7 
usercnt=!recordcnt wimshome/log/classes/$wims_class/.userlist
18 
 
 8 
 
19 
!! generate list of subclasses
 9 
!! generate list of subclasses
20 
nbsubclasses=!recordcnt wimshome/log/classes/$wims_class/.subclasses
 10 
nbsubclasses=!recordcnt wimshome/log/classes/$wims_class/.subclasses