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 );
    }
  *]
}