Quintiq file version 2.0
#parent: pnlTestScript/btnValidateScript
Response OnClick () id:Response_pnlTestScript_btnValidateScript_OnClick
{
  #keys: '[103546.0.70164228]'
  Body:
  [*
    // Validate the script
    errormsg := Dialog.PTF_ValidateScript( edtActionScript.Text() );
    
    if( errormsg.Length() > 0 )
    {
      errormsg := "The following error is found in the script:" + String::NewLine() + String::NewLine() + errormsg;
      MessageBox::Warning( this, errormsg, "OK", 1);
    }
    else
    {
      MessageBox::Information( this, "No errors for standard actions' parameters in script.", "OK" );
    }
  *]
  CanBindMultiple: false
  DefinitionID: 'Responsedef_GUIButtonBase_OnClick'
}