| 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 | | Quintiq file version 2.0 |  | #parent: #root |  | Function CalcIsLeadTimeAmongOperationsUnique |  | { |  |   TextBody: |  |   [* |  |     // since all lead times are expected to be unique ( for sanity check ), simply take the LeadTime of the firstOperation and check that all operations have  |  |     // that lead time |  |     firstOperation := this.FirstOperation(); |  |     initalLeadTime := guard( firstOperation.LeadTime(), Duration::Zero() ); |  |     value := forall( this, Operation, operation, operation.LeadTime() = initalLeadTime ); |  |      |  |     this.IsLeadTimeAmongOperationsUnique( value ); |  |   *] |  | } | 
 |