| Quintiq file version 2.0 | 
| #parent: #root | 
| Function CalcSuggestedModeledType | 
| { | 
|   TextBody: | 
|   [* | 
|     selection := select( this, TG_UIResponseArgument, arg, | 
|                          arg.Name() = 'selection' | 
|                          and arg.ArgumentType() <> '' ); | 
|      | 
|     if( isnull( selection ) ) | 
|     { | 
|       selection := minselect( this, TG_UIResponseArgument, arg, | 
|                               arg.IsBinding() | 
|                               and arg.ArgumentType() <> '', | 
|                               arg.Name() ); | 
|     } | 
|      | 
|     value := guard( selection.ArgumentType(), '' ); | 
|      | 
|     if( value = '' ) | 
|     { | 
|       databinding := this.DialogDataBinding(); | 
|       value := databinding; | 
|     } | 
|      | 
|     value := value.ReplaceAll( 'shadow[', '' ) | 
|                   .ReplaceAll( 'structured[', '' ) | 
|                   .ReplaceAll( ']', '' ); | 
|      | 
|     this.SuggestedModeledType( value ); | 
|   *] | 
|   InterfaceProperties { Accessibility: 'Module' } | 
| } |