PR

yypsybs

2023-09-19 93b4b535d06d9dd71039827e759bfc211c3ff4ef

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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Quintiq file version 2.0
#parent: #root
Method ExportGeneral (
  Boolean isbinaryexport,
  output BinaryValues binaryvalues,
  output Strings brokernames
)
{
  Description: 'Export currencies, unit of measurement, priorities and shift patterns to excel'
  TextBody:
  [*
    // If data are to be exported as binary value
    if( isbinaryexport )
    {
      progress( 'Exporting currencies', DateTime::ActualTime() );
      currencies := this.MP_ExportCurrenciesBroker().ExecuteToXLS( true ) ;
      this.UpdateExportBinary( currencies, typeof( MP_ExportCurrenciesBroker ).ShortName(), binaryvalues, brokernames );  
      
      progress( 'Exporting units of measurement', DateTime::ActualTime() );
      uoms := this.MP_ExportUnitOfMeasuresBroker().ExecuteToXLS( true );
      this.UpdateExportBinary( uoms, typeof( MP_ExportUnitOfMeasuresBroker ).ShortName(), binaryvalues, brokernames );
      
      progress( 'Exporting priorities', DateTime::ActualTime() );
      prorioties := this.MP_ExportPrioritiesBroker().ExecuteToXLS( true );
      this.UpdateExportBinary( prorioties, typeof ( MP_ExportPrioritiesBroker ).ShortName(), binaryvalues, brokernames );
    }
    // If data are not to be exported as binary value
    else
    {
      progress( 'Exporting currencies', DateTime::ActualTime() );
      this.MP_ExportCurrenciesBroker().Execute();
      
      progress( 'Exporting units of measurement', DateTime::ActualTime() );
      this.MP_ExportUnitOfMeasuresBroker().Execute();
      
      progress( 'Exporting priorities', DateTime::ActualTime() );
      this.MP_ExportPrioritiesBroker().Execute();
    }
  *]
}