陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
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 );
  *]
  InterfaceProperties { Accessibility: 'Module' }
}