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