1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
| Quintiq file version 2.0
| #parent: #root
| StaticMethod Create (
| Unit owner,
| ShiftPattern shiftpattern
| ) as UnitShiftPattern
| {
| Description: 'Creates a unitshiftpattern based on the shift pattern and unit.'
| TextBody:
| [*
| // Create unitshiftpattern
|
| // If the unitshiftpattern already exists, retrieve it.
| unitshiftpattern := UnitShiftPattern::FindUnitShiftPatternTypeIndex( owner.ID(), shiftpattern.Name() );
|
| if( isnull( unitshiftpattern ) )
| {
| unitshiftpattern := owner.UnitShiftPattern( relnew,
| UnitID := owner.ID(),
| ShiftPatternName := shiftpattern.Name() );
| }
|
| return unitshiftpattern;
| *]
| }
|
|
