Subversion Repositories wimsdev

Rev

Rev 12594 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
12569 bpr 1
# Variable calculations should be done in this file.
2
# It is read and interpreted by wims for all valid calls to the module.
3
 
4
!read adm/class/classlang names.phtml
5
!read tabletheme
6
 
7
class=$wims_class
8
!if $wims_user!=supervisor
9
  error=not_supervisor
10
  !exit
11
!endif
12
glossarytot=!recordcnt wimshome/log/classes/$wims_class/tool/.glossaryindex
13
!read getparm $module_init_parm iniparm gl
14
!set iniparm=$get_iniparm
15
!set gl_title=!getdef gl_title in $data_dir/$iniparm
16
!default gl=$get_gl
17
 
18
!bound job within add,mod,chstatus default mod
19
!!if $job=mod and $cmd=reply
20
 
21
!set wims_ariane=!append line Glossary,1,module=adm/tool/glossary\
22
to $wims_ariane
23
!if $gl>0
24
  !set wims_ariane=!append line Glossary $gl,1,module=adm/tool/glossary&gl=$gl\
25
to $wims_ariane
26
!endif
27
 
28
!!endif
29
 
30
!set wims_ariane_self=no
31
 
32
!changeto $job.proc