Quintiq file version 2.0
#parent: #root
Method GetDialogNameFromResponse (ModeledResponseQuillImplementation impl) as String id:Method_GlobalStateTestGenerator_GetDialogNameFromResponse
{
  #keys: '[142876.9.1250937696]'
  Body:
  [*
    dialogname := '';
    
    value := impl.Body();
    value := value.ReplaceAll( ' ', '' );
    
    constructtext := 'construct(';
    start := value.FindString( constructtext, 0 );
    
    if( start >= 0 )
    {
      end := value.FindString( ')', start );
      text := value.SubString( start + constructtext.Length(), end - start - constructtext.Length() );
    
      try
      {
        x := construct( Dialog, text );
        if( not isnull( x ) )
        {
          dialogname := text;
        }
      }
      onerror
      {
      }
    }
    
    return dialogname;
  *]
}
