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;
| *]
| }
|
|