Quintiq file version 2.0
#parent: #root
Method PTF_GetList (
  String formname,
  String listname,
  output String errormsg_o
) as internal[List] id:Method_LibPTF_pnlTestRunner_PTF_GetList
{
  #keys: '[103546.0.58986087]'
  Body:
  [*
    // Find a List component based on List name
    targetform := Application.Frame().FindChildObject( formname );
    errormsg_o := "";
    list       := null( List );
    
    if( not isnull( targetform ) )
    {
      targetcomponent := this.PTF_FindComponent( targetform, listname );
    
      if( not isnull( targetcomponent )
          and targetcomponent.istype( List ) )
      {
        list := targetcomponent.astype( List );
      }
      else
      {
        errormsg_o := "List : " + '"' + listname + '"' + " is not found, please check your test script.";
      }
    }
    else
    {
      errormsg_o := "Form : " + '"' + formname + '"' + " is not found, please check your test script.";
    }
    
    return list;
  *]
}