Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method PTF_SetCurrentExecutionStatus ( 
 | 
  String status 
 | 
) id:Method_LibPTF_pnlTestRunner_PTF_SetCurrentExecutionStatus 
 | 
{ 
 | 
  #keys: '[105690.0.897072056]' 
 | 
  Body: 
 | 
  [* 
 | 
    // Set current execution status 
 | 
    vhPTFExecutionStatus.Value( status ); 
 | 
     
 | 
    // Set the status label 
 | 
    frame         := Application.Frame(); 
 | 
    formptfstatus := select( frame, SubComponents.astype( LibPTF_frmPTFStatus ), c, true ); 
 | 
     
 | 
    if( not isnull( formptfstatus ) ) 
 | 
    { 
 | 
      formptfstatus.lblStatus().Text( status ); 
 | 
    } 
 | 
  *] 
 | 
} 
 |