1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
| Quintiq file version 2.0
| #parent: #root
| Method GenerateOpenDialogMethod
| {
| TextBody:
| [*
| error( "FIXME - TG_UIDialog.GenerateOpenDialogMethod" );
|
| /*
| FIXME // TODO FIXME
|
| DomainModel::DomainStream()->( dm )
| {
| gp := this.TG_TestGenerator().TG_GlobalParameter();
| module := select( dm, QuillModules, qm, qm.Name() = gp.TestModuleName() );
| module.SelectForEdit();
|
| objecttypename := this.CreatedName();
| objdef := select( dm, ObjectDefinitions.Elements, o, o.Name() = objecttypename );
|
| name := this.CreatedName();
| body := ''; // TODO: this.GetBody();
| description := ''; // TODO
| accessibility := 'Public'; // TODO
|
| cg := CG_CodeGenerator::Construct();
| cg.CreateMethodArgument( 'run',
| 'LibUTF_IterationRun',
| false,
| false,
| false,
| false )
| .CreateMethodArgument( 'company',
| 'Company', // TODO
| false,
| false,
| false,
| false );
|
| returntype := this.CreatedName();
|
| cg_nvt := LibInt_MessageAccessor::CreateEmptyMessage();
| LibInt_MessageAccessor::SetBodyAsObject( cg_nvt, cg );
|
| returnowning := false;
|
| CG_CodeGenerator::CreateStaticMethod( gp.TestModuleName(),
| objecttypename,
| name,
| returntype,
| returnowning,
| body,
| description,
| accessibility,
| cg_nvt );
| }
| *]
| InterfaceProperties { Accessibility: 'Module' }
| }
|
|
