1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Quintiq file version 2.0
| #parent: #root
| Method VerifyUnitShiftPatternIsAllowed (
| MacroPlan macroplan,
| String unitid,
| String shiftpattern,
| Boolean isallowed
| )
| {
| Description: 'Verify UnitShiftPattern IsAllowed value'
| TextBody:
| [*
| unitshiftpattern := select( macroplan, Unit.UnitShiftPattern, up, up.UnitID() = unitid and up.ShiftPatternName() = shiftpattern );
| this.Run().AssertEqual( isallowed, unitshiftpattern.IsAllowed(), "Expect UnitShiftPattern for unit [" + unitid + "] Shift pattern [" + shiftpattern+ "] is allowed = " +[String]isallowed );
| *]
| InterfaceProperties { Accessibility: 'Module' }
| }
|
|
