test add pdm file

chaiyunying

2023-10-31 1b9eac61da893ad7caf22a1f30c8fd604748d222

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
Quintiq file version 2.0
#parent: #root
Method ExportToDataManager () id:Method_DialogEDIExportDEV_ExportToDataManager
{
  #keys: '[124808.0.894741491]'
  Body:
  [*
    // Export to data manager
    MacroPlan.ExportToDM( LibDEF_DataRepository,
                          CheckBoxSalesDemandsDM.Checked(),
                          SelectionSalesDemand.Data(),
                          CheckBoxNewSalesDemandsSet.Checked(),
                          EditorSalesDemand.Text(),
                          CheckBoxMPSPlanDM.Checked() and RadioButtonGroupMPSCMode.BoundValue() = 'DEF',
                          SelectionMPSPlan.Data(), 
                          EditorMPSPlan.Text().Length() > 0,
                          EditorMPSPlan.Text() );
     
    if( CheckBoxMPSPlanDM.Checked() and RadioButtonGroupMPSCMode.BoundValue() <> 'DEF' )
    {
      filename := MPSyncUtility::GetExportFileName( typeof( MP_ExportMPSPlanBroker ).Name() );
      filepath := EditorMPSCExcelPath.Text() + "/" + filename + ".xlsx";
      data := BinaryValue::Construct();
      MacroPlan.ExportToMPSync( MPSync, data );
      Application.WriteBinaryFile( filepath, data.AsBinaryData() );
    }
  *]
}