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' }
|
}
|