Subversion Repositories wimsdev

Rev

Rev 13049 | 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
12429 bpr 4
  !readproc adm/whoconnect
5224 guerimand 5
!endif
1319 guerimand 6
 
15267 guerimand 7
!readproc adm/allowlink/livret.proc
8
!if $wims_allowlink_cdt=no
12429 bpr 9
  error=bad_class
10
  !exit
1319 guerimand 11
!endif
12
 
13
!defread wimshome/log/classes/$wims_class/.def
1845 guerimand 14
!defread $livret_dir/.def
1319 guerimand 15
 
12031 guerimand 16
!if $wims_user!=supervisor and $class_showlivret!=yes
12429 bpr 17
  error=closedlivret
18
  !reset job
19
  !exit
12031 guerimand 20
!endif
21
 
1768 guerimand 22
!default livret_minac=9
3040 guerimand 23
livret_nonactivesheet=!listunion $livret_nonactivesheet and $nasheets
24
 
2368 bpr 25
!read lang/names.phtml.$moduclass_lang
26
 
1319 guerimand 27
!read tabletheme
1951 guerimand 28
name_icompetence=!char 1 of $name_Competences
29
name_ipalier=!char 1 of $name_n_Palier
1319 guerimand 30
 
1845 guerimand 31
!if $livret_supervise=yes
12429 bpr 32
  !bound job within see,modpalier,userlist,config,addcomp,user,delpalier,delcomp,save default userlist
13049 bpr 33
  !if $wims_typename iswordof program
34
    !bound job within see,modpalier,config,addcomp,delpalier,delcomp,save default config
35
  !endif
1319 guerimand 36
!else
12429 bpr 37
  !bound job within user,see default user
38
  user=$wims_user
1319 guerimand 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