Rev 2368 | Rev 2935 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
maxcomp=20
maxpalier=5
!if $wims_user=supervisor
livret_supervise=yes
!else
livret_supervise=no
!endif
livret_dir=wimshome/log/classes/$wims_class/livret
Livret_dir=$wims_home/log/classes/$wims_class/livret
!readdef $livret_dir/.def
!if $livret_defined!=yes
!sh mkdir -p $Livret_dir;
!filewrite $livret_dir/.def !set livret_title=$wims_name_livret\
!set livret_description=$empty\
!set livret_defined=yes\
!set livret_scoreview=-1\
!set livret_scoreoption=class
!readdef $livret_dir/.def
!endif
!if $livret_supervise=yes
sh=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
!for i=1 to $sh
l=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets
l=!word 1 of $l
!if $l>0
asheets=!append item $i to $asheets
!endif
nbs=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$i
sheet$i=$empty
!for k=1 to $nbs
d=!record $k of wimshome/log/classes/$wims_class/sheets/.sheet$i
!distribute line $d into bla,bla,bla,bla,r5,r6
sheet$i=!append line <b>$r5</b> <small>$r6</small> to $(sheet$i)
!next k
!next i
!endif
!distribute line $livret_scorecolor\
$livret_scoreview into wims_scorecolor,wims_scoreview
!default wims_scorecolor=,red,red,red,orange,orange,orange,yellow,yellow,green,green
!default wims_scoreview=-1
!if class isin $livret_scoreoption
wims_scorecolor=!defof class_scorecolor in wimshome/log/classes/$wims_class/.def
!endif