Subversion Repositories wimsdev

Rev

Rev 8817 | 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
17
#### for transitional periode
18
require_limit=200
19
####
20
require_limit=$[$require_limit/10]
23 reyssat 21
 
7354 bpr 22
!read getparm $iniparm exo random qnum
23
exocnt_=!itemcnt $get_exo
23 reyssat 24
class=$wims_class
5199 guerimand 25
!if $wims_user!=supervisor
23 reyssat 26
 error=not_supervisor
27
 !exit
28
!endif
29
 
8817 guerimand 30
!bound job within exo,helpexo,addallexo default exo
10253 bpr 31
!set wims_ariane_self=no
32
!if $job iswordof helpexo
33
  !set wims_title_title=!nosubst $wims_name_addh
34
  !set wims_ariane=!append line addh,8\
35
to $wims_ariane
36
!else
37
  !set wims_ariane=!append line $job,8\
38
to $wims_ariane
39
!endif
40
 
5199 guerimand 41
!changeto $job.proc