1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| Quintiq file version 2.0
| #parent: #root
| Method PlanSupply (
| MacroPlan macroplan,
| String productid,
| Unit unit,
| String routingid,
| Real supplyquantity
| )
| {
| TextBody:
| [*
| products := construct( Product_MPs );
| product := macroplan.FindProduct( productid );
| products.Add( product );
|
| operation := select( unit, Operation, op, op.RoutingID() = routingid );
| periodtaskoperation := operation.FindPeriodTaskOperation( macroplan.StartOfPlanning(), operation.ID() );
|
| newsupply := select( periodtaskoperation, NewSupply, supply, supply.IsForProduct( products ) );
| newsupply.Update( supplyquantity, true );
| *]
| InterfaceProperties { Accessibility: 'Module' }
| }
|
|