Subversion Repositories wimsdev

Rev

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

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