| 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 | | Quintiq file version 2.0 |  | #parent: #root |  | Function CalcDuration |  | { |  |   Description: 'Duration of period' |  |   TextBody: |  |   [* |  |     value := Duration::Zero(); |  |     if( this.Start() > DateTime::MinDateTime() and this.End() > DateTime::MinDateTime() ) |  |     { |  |       value := this.End() - this.Start(); |  |     } |  |     this.Duration( value ); |  |   *] |  | } | 
 |