yanweiyuan3
2023-08-09 588bc7829387dfc761cc25f06f77d4c81818bd10
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
26
Quintiq file version 2.0
#parent: #root
Method ExportLanes
{
  Description: 'Method to export lanes to message via QI'
  TextBody:
  [*
    // Initiate some variables including base NVT
    exportfilename := 'Lanes.xml';
    routename := 'QuintiqExportLanesFileRoute';
    basenvt := NamedValueTree::Create();
    basenvt.Root( GlobalParameters_MP::GetDatasetMPSync() );
    mp := this.MacroPlan();
    
    lanes := selectset( mp, Unit.Lane, ln, true );
    this.ExportObjectToNVT( basenvt, lanes, typeof( IOLane ) );
    
    lanelegs := selectset( lanes, Elements.LaneLeg, ll, true );
    this.ExportObjectToNVT( basenvt, lanelegs, typeof( IOLaneLeg ) );
    
    prodinlanes := selectset( mp, Product_MP.ProductInLane, pl, true );
    this.ExportObjectToNVT( basenvt, prodinlanes, typeof( IOProductInLane ) );
    
    this.ExportNVTToQI( exportfilename, routename, basenvt );
  *]
}