lazhen
2025-01-07 b3987122cbbc46c5c59d3173f37fca3170b6dc5a
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' }
}