Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
1319 guerimand 1
 
2
!if $cf_abandon!=$empty
3
 !reset cf_abandon
4
 job=userlist
5
 !read userlist.proc
6
 !exit
7
!endif
8
 
9
!if $cf_set!=$empty
10
 !reset cf_set
11
 cf_title=!trim $cf_title
12
 !if $cf_title=$empty
1859 guerimand 13
  cf_title=$wims_name_livret
1319 guerimand 14
 !endif
15
 cf_description=!singlespace $cf_description
16
 cf_title=!singlespace $cf_title
17
 cf_title=!char 1 to 50 of $cf_title
18
 cf_description=!char 1 to 1024 of $cf_description
9563 guerimand 19
 !readproc proc/legend.proc save
1319 guerimand 20
 cf_nonactivesheet=!nospace $cf_nonactivesheet
21
 cf_nonactivesheet=!listintersect $cf_nonactivesheet and $asheets
1951 guerimand 22
 !bound cf_scoreoption within class,livret default $livret_scoreoption
3095 guerimand 23
 !bound cf_show2user within yes,no default $class_showlivret
24
 !bound cf_showempty within yes,no default $livret_showempty
1951 guerimand 25
 cf_scoreview=$[rint($cf_scoreview)]
26
 !bound cf_scoreview between -1 and 4 default $livret_scoreview
1768 guerimand 27
 !bound cf_minac between 0 and 10 default 9
1319 guerimand 28
 !setdef !set livret_title=$cf_title\
29
!set livret_description=$cf_description\
1768 guerimand 30
!set livret_nonactivesheet=$cf_nonactivesheet\
1951 guerimand 31
!set livret_scoreview=$cf_scoreview\
32
!set livret_scorecolor=$cf_scorecolor1,$cf_scorecolor2,$cf_scorecolor3,$cf_scorecolor4,$cf_scorecolor5,$cf_scorecolor6,$cf_scorecolor7,$cf_scorecolor8,$cf_scorecolor9,$cf_scorecolor10,$cf_scorecolor11\
33
!set livret_scoreoption=$cf_scoreoption\
3095 guerimand 34
!set livret_minac=$cf_minac\
9563 guerimand 35
!set livret_showempty=$cf_showempty\
36
!set livret_legende2=$cf_legend2\
37
!set livret_legende3=$cf_legend3\
38
!set livret_legende4=$cf_legend4\
39
!set livret_legende5=$cf_legend5\
40
!set livret_legende6=$cf_legend6\
41
!set livret_legende7=$cf_legend7\
42
!set livret_legende8=$cf_legend8\
43
!set livret_legende9=$cf_legend9\
44
!set livret_legende10=$cf_legend10\
45
!set livret_legende11=$cf_legend11 in $livret_dir/.def
3097 guerimand 46
 !setdef !set class_showlivret=$cf_show2user in wimshome/log/classes/$wims_class/.def
3095 guerimand 47
 !readdef $livret_dir/.def
3099 bpr 48
 !set class_showlivret=$cf_show2user
1319 guerimand 49
!else
3099 bpr 50
 !for k in title,description,nonactivesheet,minacquis,scoreoption,scoreview,\
9563 guerimand 51
   scorecolor1,scorecolor2,scorecolor3,scorecolor4,scorecolor5,scorecolor6,scorecolor7,\
52
   scorecolor8,scorecolor9,scorecolor10,scorecolor11,legend1,legend2,legend3,legend4,legend5,legend6,legend7,legend8,legend9,legend10
1319 guerimand 53
  cf_$k=$(livret_$k)
54
 !next k
55
!endif
56
 
57