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 |