Subversion Repositories wimsdev

Rev

Rev 10095 | Rev 12338 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 10095 Rev 12330
Line 1... Line 1...
1
!read adm/class/classlang names.phtml
1
!read adm/class/classlang names.phtml
2
 
2
 
3
wims_prefix=none
3
wims_prefix=none
4
 
4
 
5
!if $wims_user=supervisor
5
!if $wims_user=supervisor
6
 !bound job within prop,add,deldoc,adddocsh,chstatus default add
6
  !bound job within prop,add,deldoc,adddocsh,chstatus default add
7
!else
7
!else
8
 error=not_supervisor
8
  error=not_supervisor
9
 !exit
9
  !exit
10
!endif
10
!endif
11
 
11
 
12
title_limit=50
12
title_limit=50
13
desc_limit=255
13
desc_limit=255
14
nbsheet=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
14
nbsheet=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets
15
 
15
 
16
!read $job.proc
16
!read $job.proc
17
 
17
 
18
!if $job=prop and $nbsheet>0
18
!if $job=prop and $nbsheet>0
19
 listsheetname=$empty
19
  listsheetname=$empty
20
 !for k=1 to $nbsheet
20
  !for k=1 to $nbsheet
21
  t=!record $k of wimshome/log/classes/$wims_class/sheets/.sheets
21
    t=!record $k of wimshome/log/classes/$wims_class/sheets/.sheets
22
  t=!line 3 of $t
22
    t=!line 3 of $t
23
  listsheetname=!append item $k : $t to $listsheetname
23
    listsheetname=!append item $k : $t to $listsheetname
24
 !next k
24
  !next k
25
!endif
25
!endif
26
 
26
 
27
!set wims_ariane_self=no
27
!set wims_ariane_self=no