lazhen
2025-01-09 8afe90b633046db39042aada36b88193062f8cff
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 CheckCSVFile (
  String foldername,
  String expectedstring
)
{
  Description: 'Read a csv file and verify that the information is correct'
  TextBody:
  [*
    folder := foldername;
    exportpath := LibSCIIntegration_Utility::GetSettingValueExportPath();
    
    file := folder + LibSCIIntegration_Utility::ExtensionFile() /* .csv */;
    OS::CreateDirectory( exportpath + '\' + folder );
    doc := OSFile::Construct()
    doc.Open( exportpath + '\' + folder + '\' + file, 'Read', true );
    content := doc.ReadTextToEnd();
    doc.Close();
    
    this.Run().AssertEqual( expectedstring, content, 'Error for ' + foldername + ' export' );
  *]
  InterfaceProperties { Accessibility: 'Module' }
}