Rev 10019 | Rev 15569 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 10019 | Rev 12555 | ||
---|---|---|---|
Line 6... | Line 6... | ||
6 | !!! FIXME max of session number |
6 | !!! FIXME max of session number |
7 | !!! do reset only if the variable is non empty, if not it creates a variable |
7 | !!! do reset only if the variable is non empty, if not it creates a variable |
8 | !!! and gives some "variable_name_buffer_overflow" |
8 | !!! and gives some "variable_name_buffer_overflow" |
9 | 9 | ||
10 | !for i in $activexams |
10 | !for i in $activexams |
11 | !if $(Dureeexam_$i)!=$empty |
11 | !if $(Dureeexam_$i)!=$empty |
12 | !reset Dureeexam_$i |
12 | !reset Dureeexam_$i |
13 | !endif |
13 | !endif |
14 | !if $(Dureeexam_$i)!=$empty |
14 | !if $(Dureeexam_$i)!=$empty |
15 | !reset Dureeexam_$i |
15 | !reset Dureeexam_$i |
16 | !endif |
16 | !endif |
17 | !for jj=1 to 64 |
17 | !for jj=1 to 64 |
18 | !! jj correspond to maximum of number sessions |
18 | !! jj correspond to maximum of number sessions |
19 | !if $(duree$(jj)_$(i))!=$empty |
19 | !if $(duree$(jj)_$(i))!=$empty |
20 | !reset duree$(jj)_$(i) |
20 | !reset duree$(jj)_$(i) |
21 | !endif |
21 | !endif |
22 | !if $(exam_$jj)!=$empty |
22 | !if $(exam_$jj)!=$empty |
23 | !reset exam_$jj |
23 | !reset exam_$jj |
24 | !endif |
24 | !endif |
25 | !! jj correspond to exos in an exam |
25 | !! jj correspond to exos in an exam |
26 | !if $(exam$(i)_$jj)!=$empty |
26 | !if $(exam$(i)_$jj)!=$empty |
27 | !reset exam$(i)_$jj |
27 | !reset exam$(i)_$jj |
28 | !endif |
28 | !endif |
29 | !next |
29 | !next |
30 | !next |
30 | !next |
31 | 31 | ||
32 | sc=!record 0 of wimshome/log/classes/$wims_class/score/$uu.exam |
32 | sc=!record 0 of wimshome/log/classes/$wims_class/score/$uu.exam |
33 | !if $sc=$empty |
33 | !if $sc=$empty |
34 | !exit |
34 | !exit |
35 | !endif |
35 | !endif |
36 | nsc=!linecnt $sc |
36 | nsc=!linecnt $sc |
37 | 37 | ||
38 | 38 | ||
39 | !for i=1 to $nsc |
39 | !for i=1 to $nsc |
40 | l=!line $i of $sc |
40 | l=!line $i of $sc |
41 | !distribute words $l into e_,s_,t__,T_,i_,S_,t_ |
41 | !distribute words $l into e_,s_,t__,T_,i_,S_,t_ |
42 | !if $S_=0 |
42 | !if $S_=0 |
43 | !reset jj |
43 | !reset jj |
Line 50... | Line 50... | ||
50 | start$(jj)_$e_=$t_ |
50 | start$(jj)_$e_=$t_ |
51 | dur$(jj)_$e_=$T_ |
51 | dur$(jj)_$e_=$T_ |
52 | !endif |
52 | !endif |
53 | !if $t__ issametext -1 |
53 | !if $t__ issametext -1 |
54 | duree$(jj)_$(e_)=$[$T_ - $(dur$(jj)_$e_)] |
54 | duree$(jj)_$(e_)=$[$T_ - $(dur$(jj)_$e_)] |
55 | !endif |
55 | !endif |
56 | !endif |
56 | !endif |
57 | !next |
57 | !next |
58 | !for i in $activexams |
58 | !for i in $activexams |
59 | !if $(Dureeexam_$i)!=$empty |
59 | !if $(Dureeexam_$i)!=$empty |
60 | !reset Dureeexam_$i |
60 | !reset Dureeexam_$i |
61 | !endif |
- | |
62 | !for e=1 to 64 |
- | |
63 | !if $(Exam_$(i)_$(e))!=$empty |
- | |
64 | !reset Exam_$(i)_$(e) |
- | |
65 | !endif |
- | |
66 | !if $(exam$(i)_$e)!=$empty |
- | |
67 | !reset exam$(i)_$e |
- | |
68 | !endif |
61 | !endif |
- | 62 | !for e=1 to 64 |
|
- | 63 | !if $(Exam_$(i)_$(e))!=$empty |
|
- | 64 | !reset Exam_$(i)_$(e) |
|
- | 65 | !endif |
|
- | 66 | !if $(exam$(i)_$e)!=$empty |
|
- | 67 | !reset exam$(i)_$e |
|
- | 68 | !endif |
|
69 | !next |
69 | !next |
70 | !for ses_ in $checksessions |
70 | !for ses_ in $checksessions |
71 | !set jj=!positionof item $ses_ in $checksessions |
71 | !set jj=!positionof item $ses_ in $checksessions |
72 | !if $(duree$(jj)_$i)!=$empty |
72 | !if $(duree$(jj)_$i)!=$empty |
73 |
|
73 | Dureeexam_$i=!append item $(duree$(jj)_$i) to $(Dureeexam_$i) |
74 | !endif |
74 | !endif |
75 | !next |
75 | !next |
76 | !next |
76 | !next |
77 | 77 | ||
78 | !!details des notes examens par session |
78 | !!details des notes examens par session |
79 | !for ses_ in $checksessions |
79 | !for ses_ in $checksessions |
80 |
|
80 | !set jj=!positionof item $ses_ in $checksessions |
81 |
|
81 | !set ss=!sh grep "$ses_" $wims_home/log/classes/$wims_class/noscore/$uu | grep "score" | awk -F"\t" '{print $$1}' | awk -F" " '{print $$3,$$4,$$6}' |
82 |
|
82 | !set ss=!lines2rows $ss |
83 |
|
83 | !set ss=!words2items $ss |
84 | !!perhaps several different exams in one session. |
84 | !!perhaps several different exams in one session. |
85 |
|
85 | !for i in $(exam_$(jj)) |
86 |
|
86 | !set s_=!select $ss where column 1=$i |
87 |
|
87 | !set nbx=!recordcnt wimshome/log/classes/$wims_class/exams/.exam$i |
88 |
|
88 | !for k_=1 to $nbx |
89 |
|
89 | !reset s |
90 |
|
90 | !set s=!select $s_ where column 2=$k_ |
91 |
|
91 | !set s=$(s[3]) |
92 |
|
92 | !if $s!=$empty |
93 |
|
93 | !set s=$[rint($s*$scoremax)/10] |
94 |
|
94 | !endif |
95 |
|
95 | !set Exam_$(i)_$(jj)=$(Exam_$(i)_$(jj)) $s, |
96 |
|
96 | !next |
97 |
|
97 | !next |
98 | !next |
98 | !next |