Subversion Repositories wimsdev

Rev

Rev 10803 | Rev 12429 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2368 bpr 1
!read adm/class/classlang names.phtml
1319 guerimand 2
wims_prefix=class user livret
5224 guerimand 3
!if $wims_user=supervisor
9349 bpr 4
 !readproc adm/whoconnect
5224 guerimand 5
!endif
1319 guerimand 6
 
10799 bpr 7
!if $wims_class=$empty or ($wims_supertype!=0 and \
10803 guerimand 8
 ($wims_supertype!=2 or $wims_typename!=class) and\
9
 ($wims_supertype!=4 or ($wims_typename notwordof course and /0// notin $wims_class//)))
1319 guerimand 10
 error=bad_class
11
 !exit
12
!endif
13
 
14
!defread wimshome/log/classes/$wims_class/.def
1845 guerimand 15
!defread $livret_dir/.def
1319 guerimand 16
 
12031 guerimand 17
!if $wims_user!=supervisor and $class_showlivret!=yes
18
    error=closedlivret
19
    !reset job
20
    !exit
21
!endif
22
 
23
 
1768 guerimand 24
!default livret_minac=9
25
 
3040 guerimand 26
livret_nonactivesheet=!listunion $livret_nonactivesheet and $nasheets
27
 
2368 bpr 28
!read lang/names.phtml.$moduclass_lang
29
 
1319 guerimand 30
!read tabletheme
1951 guerimand 31
name_icompetence=!char 1 of $name_Competences
32
name_ipalier=!char 1 of $name_n_Palier
1319 guerimand 33
 
1845 guerimand 34
!if $livret_supervise=yes
4344 guerimand 35
 !bound job within see,modpalier,userlist,config,addcomp,user,delpalier,delcomp,save default userlist
1319 guerimand 36
!else
4344 guerimand 37
 !bound job within user,see default user
1319 guerimand 38
 user=$wims_user
39
!endif
40
 
1845 guerimand 41
livret_nbcomp=!recordcnt $livret_dir/.comps
1951 guerimand 42
!for k=1 to $livret_nbcomp
43
  t=!record $k of $livret_dir/.comps
44
  !distribute line $t into title_$k,nbpalier_$k
45
!next k
1319 guerimand 46
 
47
!read $job.proc