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_WriteLogLineForStartEndClient (
  String str
) id:Method_LibPTF_pnlTestRunner_PTF_WriteLogLineForStartEndClient
{
  #keys: '[104342.0.783826731]'
  Body:
  [*
    // Write start and end client information to the log file
    path := vhResultLogPath.Value();
    
    if ( path.Length() > 0 )
    {
      filename := ApplicationScope.Session().CurrentUser().ShortName() + '_' + [String]ApplicationScope.Session().ClientId() + '_startclient' + LibPTF::FileExtStartEndClientLog();
      fullpath  := path + filename ;
    
      file := OSFile::Construct();
      file.Open( fullpath, 'Append', true );
    
      if( this.PTF_RequiredActionLogData() )
      {
        file.WriteTextLine( str );
      }
    
      file.Close();
    }
  *]
}