Subversion Repositories wimsdev

Rev

Rev 9644 | Rev 9682 | 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 
 
1406 bpr 16 
 
9623 guerimand 17 
!read $job.proc
1406 bpr 18 
 
9634 guerimand 19 
!if $job=prop and $nbsheet>0
20 
listsheetname=$empty
21 
!for k=1 to $nbsheet
22 
 t=!record $k of wimshome/log/classes/$wims_class/sheets/.sheets
23 
 t=!line 3 of $t
24 
 listsheetname=!append item $k : $t to $listsheetname
25 
!next k
9644 guerimand 26 
!endif