Subversion Repositories wimsdev

Rev

Rev 17097 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
17070 guerimand 1 
!! verification de la classe
2 
!if $wims_class=$empty
3 
  !restart module=home
4 
!endif
5 
 
6 
!! gestion des autorisations sur les variables (securisation)
7 
wims_prefix=class user
8 
 
9 
maxsuggest=5
10 
maxuser=50
11 
 
12 
!readproc tabletheme
13 
 
14 
!! --------- gestion des jobs du module
15 
!if $wims_user=supervisor
16 
  listjob=userlist
17 
  defjob=userlist
18 
!else
19 
  listjob=swork
20 
  defjob=swork
21 
!endif
22 
!bound job within $listjob default $defjob
23 
 
24 
!! ------------- traitement commun à tous les jobs du module
25 
nbuser=!recordcnt wimshome/log/classes/$wims_class/.userlist
26 
!if $nbuser>$maxuser
27 
  error=toomanyuser
28 
  notallowed=1
29 
  !exit
30 
!endif
31 
 
32 
!if / isin $wims_class
33 
  userclass=$wims_superclass
34 
!else
35 
  userclass=$wims_class
36 
!endif
37 
 
38 
!! ------------ log du module
39 
wims_module_log=$job
40 
 
41 
!! lecture du fichier de langue
42 
!read adm/language lang/names.phtml
43 
 
44 
 
45 
!! lecture du fichier spécifique du job appelé
46 
!changeto $job.proc