hongji.li
2023-11-07 1a1ba3ad5ed9e4380185aa1ccad20204a0e5f115
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
Quintiq file version 2.0
#parent: #root
Method PTF_GetFileCountFromResultLog (
  String user,
  String pattern
) as Number id:Method_LibPTF_pnlTestController_PTF_GetFileCountFromResultLog
{
  #keys: '[104342.0.375565899]'
  Body:
  [*
    // Checks the number of result files in the result log directory
    files     := OS::ScanDirectory( this.PTF_GetResultLogPath(), pattern );
    filecount := 0;
    fileuser  := "";
    clientid  := "";
    
    traverse( files, Elements, f )
    {
      this.PTF_GetInfoFromResultLogPath( fileuser, clientid, f );
    
      if( fileuser.ToUpper() = user.ToUpper() )
      {
        filecount := filecount + 1;
      }
    }
    
    return filecount;
  *]
}