| 1
2
3
4
5
6
7
8
9
10
11
12
13
 | | Quintiq file version 2.0 |  | #parent: #root |  | Function CalcPeggingDuration |  | { |  |   TextBody: |  |   [* |  |     // MJN3 Oct-21-2016 (created) |  |      |  |     value := guard( this.PeggingEnd() - this.PeggingStart(), Duration::Zero() );  |  |      |  |     this.PeggingDuration( value ); |  |   *] |  | } | 
 |