yanyuan
2023-10-09 0d5e8862a684d9d2945b35a6f46d9e2e459d3e36
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 );
    }
  *]
}