| Quintiq file version 2.0 | 
| #parent: #root | 
| Method ParseClassTypeQuery (JSON jsondata) | 
| { | 
|   TextBody: | 
|   [* | 
|     results := guard( jsondata.Get( 'results' ), null( JSON, owning ) ); | 
|      | 
|     if( guard( results.IsArray(), false ) ) | 
|     { | 
|       for( i := 0; i < results.Size(); i++ ) | 
|       { | 
|         result := results.Get( i ); | 
|          | 
|         if( not isnull( result ) ) | 
|         { | 
|           classtypenames := this.GetClassTypes( result ); | 
|           prevclasstype := null( Lib3DS_ClassType ); | 
|           traverse( classtypenames, Elements, classtypename ) | 
|           { | 
|             if( not isnull( prevclasstype ) ) | 
|             { | 
|               prevclasstype.ParentName( classtypename ); | 
|             } | 
|      | 
|             classtype := Lib3DS_ClassType::FindOrCreate( this, classtypename ); | 
|             prevclasstype := classtype;       | 
|           } | 
|         } | 
|       } | 
|     } | 
|   *] | 
|   InterfaceProperties { Accessibility: 'Module' } | 
| } |