Subversion Repositories wimsdev

Rev

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

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