chenqinghong
2024-05-07 3ec06a830367465068963156dcc1d8e522571c13
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_WriteLogLineForAction (
  String str
) id:Method_LibPTF_pnlTestRunner_PTF_WriteLogLineForAction
{
  #keys: '[102890.0.1882321261]'
  Body:
  [*
    // Log the executed action information in result log
    path := vhResultLogPath.Value();
    
    if ( path.Length() > 0 )
    {
      filename := ApplicationScope.Session().CurrentUser().ShortName() + '_' + [String]ApplicationScope.Session().ClientId() + LibPTF::FileExtTempResult();
      fullpath := path + filename ;
    
      file := OSFile::Construct();
      file.Open( fullpath, 'Append', true );
    
      if( this.PTF_RequiredActionLogData() )
      {
        file.WriteTextLine( str );
      }
    
      file.Close();
    }
  *]
}