| 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 |  | Function CalcSeqnrWithinSameGroup |  | { |  |   TextBody: |  |   [* |  |     // cye1 Jan-12-2018 (created) |  |      |  |     value := 0; |  |      |  |     if ( not isnull( this.PreviousWithinSameGroup() ) ) |  |     { |  |       value := this.PreviousWithinSameGroup().SeqnrWithinSameGroup() + 1;   |  |     } |  |      |  |     this.SeqnrWithinSameGroup( value ); |  |   *] |  | } | 
 |