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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method Generate 
 |  { 
 |    TextBody: 
 |    [* 
 |      DomainModel::DomainStream()->( dm ) 
 |      { 
 |        gp := this.TG_TestGenerator().TG_GlobalParameter(); 
 |        module := select( dm, QuillModules, qm, qm.Name() = gp.TestModuleName() ); 
 |        module.SelectForEdit(); 
 |         
 |        if( this.GenerateAllowed() ) 
 |        { 
 |          description := ''; // TODO 
 |          accessibility := 'Public'; // TODO 
 |           
 |          CG_CodeGenerator::CreateUpdateObjectType( gp.TestModuleName(), 
 |                                                    typeof( Object ), 
 |                                                    this.CreatedName(), 
 |                                                    description, 
 |                                                    accessibility ); 
 |        } 
 |      } 
 |    *] 
 |  } 
 |  
  |