1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| Quintiq file version 2.0
| #parent: #root
| StaticMethod Pack (owning JSONBuilder json, String type) as owning JSON
| {
| TextBody:
| [*
| result := JSON::Object();
|
| result.Add( LibOpt_Message::JSON_Type(), type );
|
| result.Add( LibOpt_Message::JSON_Body(), json );
|
| return & result.Build();
| *]
| }
|
|
