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
| StaticMethod SetInitialPackagingInventory (
| MacroPlan macroPlan,
| InterfaceDataset interfaceDataset
| )
| {
| TextBody:
| [*
| iids := maxset( interfaceDataset, InventoryInterfaceData, tempIID, true, tempIID.Date() );
|
| traverse ( iids, Elements, iid, exists( iid, InventoryInterfaceDataDetail, tempIIDD, tempIIDD.InventoryPoint() = "SMEC" or tempIIDD.InventoryPoint() = "PMTL" ) ) {
| traverse ( iid, InventoryInterfaceDataDetail, iidd, iidd.InventoryPoint() = "SMEC" or iidd.InventoryPoint() = "PMTL" ) {
| factory := ifexpr( iidd.InventoryPoint() = "SMEC", "长春工厂", "大连工厂" );
|
| ppcell := select( macroPlan, PackagingPlanRow.PackagingPlanCell, tempPPCell,
| tempPPCell.PackagingPlanRow().ProductID() = iidd.PartNumber() and
| tempPPCell.PackagingPlanColumn().StartDate() = ( macroPlan.StartOfPlanning().Date() - 1 ) and
| tempPPCell.PackagingPlanRow().Factory() = factory );
| ppcell.PackagingInventory( iidd.Quantity() );
| }
| }
| *]
| }
|
|
