Subversion Repositories wimsdev

Rev

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

Rev 1373 Rev 4176
Line 17... Line 17...
17 
!if $quser=supervisor
 17 
!if $quser=supervisor
18 
 deffile=supervisor
 18 
 deffile=supervisor
19 
!else
 19 
!else
20 
 deffile=.users/$quser
 20 
 deffile=.users/$quser
21 
!endif
 21 
!endif
22 
userdeffile=wimshome/log/classes/$qclass/$deffile
 - 
 
23 
class_superclass=!defof class_superclass in $classdeffile
 22 
class_superclass=!defof class_superclass in $classdeffile
24 
 
 23 
 
25 
!if $class_superclass=
 24 
!if $class_superclass=
- 
 
 25 
 userdeffile=wimshome/log/classes/$qclass/$deffile
26 
 test=!defof user_exists in $userdeffile
 26 
 test=!defof user_exists in $userdeffile
27 
 !if $test!=yes
 27 
 !if $test!=yes
28 
   !if $job!=getclassesuser
 28 
   !if $job!=getclassesuser
29 
    !goto baduser
 29 
    !goto baduser
30 
   !endif
 30 
   !endif
Line 33... Line 33...
33 
    listclassesuser=!append item $qclass to $listclassesuser
 33 
    listclassesuser=!append item $qclass to $listclassesuser
34 
   !endif
 34 
   !endif
35 
  !endif
 35 
  !endif
36 
 !exit
 36 
 !exit
37 
!else
 37 
!else
38 
 !!on regarde si user existe dans la superclasse
 38 
 # on regarde si user existe dans la superclasse
39 
 userdeffile=wimshome/log/classes/$class_superclass/$deffile
 39 
 userdeffile=wimshome/log/classes/$class_superclass/$deffile
40 
 test=!defof user_exists in $userdeffile
 40 
 test=!defof user_exists in $userdeffile
41 
  !if $test!=yes
 41 
 !if $test!=yes
42 
   !goto baduser
 42 
   error=user not present in superclass.
43 
   !exit
 43 
   !exit
44 
 !endif
 44 
 !endif
45 
 test=!defof user_participate in $userdeffile
 45 
 test=!defof user_participate in $userdeffile
46 
 ### contient les classes auxquelles est inscrit l'étudiant et les cours non obligatoires
 46 
 ### contient les classes auxquelles est inscrit l'étudiant et les cours non obligatoires
47 
 test=!items2words $test
 47 
 test=!items2words $test