lazhen
2025-01-09 8afe90b633046db39042aada36b88193062f8cff
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Quintiq file version 2.0
#parent: #root
Method PTF_SetCurrentAction () id:Method_LibPTF_pnlTestRunner_PTF_SetCurrentAction
{
  #keys: '[103546.0.80611555]'
  Body:
  [*
    // Sets the current action on the LibPTF_FormPTFStatus
    currentaction := this.PTF_GetCurrentAction();
    frame         := Application.Frame();
    formptfstatus := select( frame, SubComponents.astype( LibPTF_frmPTFStatus ), c, true );
    
    if( not isnull( formptfstatus ) )
    {
      formptfstatus.lblCurrentAction().Text( currentaction );
    }
  *]
}