Subversion Repositories wimsdev

Rev

Rev 12338 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 12338 Rev 13307
Line 24... Line 24...
24 
!if $job=prop and $nbsheet>0 and $type=doc
 24 
!if $job=prop and $nbsheet>0 and $type=doc
25 
  listsheetname=$empty
 25 
  listsheetname=$empty
26 
  !for k=1 to $nbsheet
 26 
  !for k=1 to $nbsheet
27 
    t=!record $k of wimshome/log/classes/$wims_class/sheets/.sheets
 27 
    t=!record $k of wimshome/log/classes/$wims_class/sheets/.sheets
28 
    t=!line 3 of $t
 28 
    t=!line 3 of $t
- 
 
 29 
    t=!replace internal , by , in $t
29 
    listsheetname=!append item $k : $t to $listsheetname
 30 
    listsheetname=!append item $k : $t to $listsheetname
30 
  !next k
 31 
  !next k
31 
!endif
 32 
!endif
32 
 
 33 
 
33 
!set wims_ariane_self=no
 34 
!set wims_ariane_self=no