Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
23 reyssat 1
# Variable calculations should be done in this file.
2
# It is read and interpreted by wims for all valid calls to the module.
8817 guerimand 3
 
2368 bpr 4
!read adm/class/classlang names.phtml
5205 guerimand 5
!read tabletheme
23 reyssat 6
 
8255 bpr 7
t=$
3934 guerimand 8
tmp=!replace internal & by $t  in $iniparm
9
tmp2=!getopt scoredelay in $tmp
10
tmp3=!replace internal + by , in $tmp2
11
iniparm=!replace internal scoredelay=$tmp2 by scoredelay=$tmp3 in $iniparm
12
 
23 reyssat 13
sheettot=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
14
wims_helper=chapter=3
15
wims_prefix=none
8255 bpr 16
require_limit=!defof MAX_REQUIRE in wimshome/public_html/bases/sys/define.conf
12309 bpr 17
 
8255 bpr 18
require_limit=$[$require_limit/10]
23 reyssat 19
 
7354 bpr 20
!read getparm $iniparm exo random qnum
21
exocnt_=!itemcnt $get_exo
23 reyssat 22
class=$wims_class
5199 guerimand 23
!if $wims_user!=supervisor
23 reyssat 24
 error=not_supervisor
25
 !exit
26
!endif
27
 
8817 guerimand 28
!bound job within exo,helpexo,addallexo default exo
10339 bpr 29
 
10253 bpr 30
!set wims_ariane_self=no
31
!if $job iswordof helpexo
32
  !set wims_title_title=!nosubst $wims_name_addh
33
  !set wims_ariane=!append line addh,8\
34
to $wims_ariane
35
!else
10339 bpr 36
  !set wims_ariane=!append line "$$wims_title_title",8\
10253 bpr 37
to $wims_ariane
38
!endif
39
 
5199 guerimand 40
!changeto $job.proc