admin
2025-01-22 7e31442f0e9b07764e9c6a9680d3d4aeba5fe1de
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 ExportPeriods
{
  Description: 'Method to export periods to message via QI'
  TextBody:
  [*
    // Initiate some variables including base NVT
    exportfilename := 'Periods.xml';
    routename := 'QuintiqExportPeriodsFileRoute';
    basenvt := NamedValueTree::Create();
    basenvt.Root( GlobalParameters_MP::GetDatasetMPSync() );
    mp := this.MacroPlan();
    
    periodparams := construct( PeriodParameter_MPs );
    periodparams.Add( mp.PeriodParameter_MP() );
    this.ExportObjectToNVT( basenvt, periodparams, typeof( IOPeriodParameter_MP ) );
    
    periodspecs := selectset( mp, PeriodSpecification_MP, ps, not ps.IsDummyPlanningPeriod() );
    this.ExportObjectToNVT( basenvt, periodspecs, typeof( IOPeriodSpecification_MP ) );
    
    this.ExportNVTToQI( exportfilename, routename, basenvt );
  *]
}