Quintiq file version 2.0
#parent: #root
Method PTF_ValidatePositiveNumericValue (
  String action,
  String value,
  Number parameternr
) as String id:Method_LibPTF_dlgCreateEditTestScript_PTF_ValidatePositiveNumericValue
{
  #keys: '[103546.0.109833665]'
  Body:
  [*
    // Validate the parameter - Positive numeric values
    errormsg := "";
    
    if( not value.Regex( "(^\d*\.?\d*[0-9]+\d*$)|(^[0-9]+\d*\.\d*$)" ) )
    {
      errormsg := 'Parameter #' + [String]parameternr + ' for action "' + action + '" should be a POSITIVE numeric value. Found '
                  + value + ' instead.' + String::NewLine();
    }
    
    return errormsg;
  *]
}