| 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 | | Quintiq file version 2.0 |  | #parent: #root |  | StaticMethod Unpack (JSON json, String type) as owning JSON |  | { |  |   TextBody: |  |   [* |  |     result := JSON::Null().Build(); |  |      |  |     json_type := ''; |  |     if( LibOpt_Message::TryGetType( json, json_type ) |  |         and json_type = type ) |  |     { |  |       result := json.Get( LibOpt_Message::JSON_Body() ); |  |     } |  |      |  |     return & result; |  |   *] |  | } | 
 |