1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method SetNumberInStrings ( 
 |    Strings texts 
 |  ) as owning Strings 
 |  { 
 |    TextBody: 
 |    [* 
 |      textWithNumbers := construct( Strings ); 
 |      for( i := 0; i < texts.Size(); i++ ) 
 |      { 
 |        // for each text, prefix with running number. Example: 1. <text> 
 |        textWithNumbers.Add( ( [String] (i + 1) ).Concat( '. ' ).Concat( texts.Element( i ) ) ); 
 |      } 
 |      return &textWithNumbers; 
 |    *] 
 |    InterfaceProperties { Accessibility: 'Module' } 
 |  } 
 |  
  |