Quintiq file version 2.0
|
#parent: #root
|
Method GetBody () as String
|
{
|
TextBody:
|
[*
|
returntype := '';
|
text := 'run.RegisterFailure( "Not implemented yet." );';
|
|
if( this.MenuOpensDialog() )
|
{
|
returntype := guard( this.TG_UIObjectDialogBound().CreatedName(), '' );
|
|
text := text + '
|
|
instance := null( Object ); // TODO
|
|
iowrapper := construct( @RETURNTYPE@,
|
DatasetMDSID := @DATASETNAME@.MDSID(),
|
DatasetKey := @DATASETNAME@.Key(),
|
InstanceKey := guard( instance.Key(), Key::ZeroKey() ) );
|
|
return &iowrapper;';
|
}
|
|
text := text + '
|
|
/* CODE BELOW COPIED FROM DESIGNER RESPONSE
|
|
';
|
|
text := text.ReplaceAll( '@RETURNTYPE@', returntype )
|
.ReplaceAll( '@DATASETNAME@', 'company' ); // TODO
|
|
text := text + this.Body();
|
|
return text;
|
*]
|
}
|
