1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Quintiq file version 2.0
| #parent: #root
| StaticMethod CanSetAllowed (
| output String feedback_o,
| UnitShiftPatterns unitshiftpatterns,
| Boolean allowed
| ) remote as Boolean
| {
| Description: 'Precondition method to enable or disable shift patterns on units.'
| TextBody:
| [*
| // If there is at least one shift pattern whose state is not already in the target state, return true (no feedback).
| // Otherwise (all shift patterns are in the target state), return false and show corresponding message.
| isAllowed := UnitShiftPattern::HasShiftPatternUsed( feedback_o, unitshiftpatterns ) and UnitShiftPattern::HasAllowed( feedback_o, unitshiftpatterns, allowed );
| return isAllowed;
| *]
| }
|
|