chenqinghong
2024-05-07 3ec06a830367465068963156dcc1d8e522571c13
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
27
28
29
Quintiq file version 2.0
#parent: #root
Method ToJSON (Boolean asDelta_i) as String
{
  TextBody:
  [*
    jsonString := "";
    converter  := DateTimeToString::ISOConverter();  // Formats as “Y-M-DTH:m:s”, e.g. “2015-11-19T13:30:03"
    
    if( asDelta_i )
    {
      value := this.Value() - this.PreviousValue();
    
      jsonString := '{"Path":"'                + this.Path() + '"'
                  + ',"Value":'                + [String]value
                  + ',"LastUpdated":"'         + converter.Convert( this.LastUpdated() ) + '"'
                  + ',"PreviousLastUpdated":"' + converter.Convert( this.PreviousLastUpdated() ) + '"}';
    }
    else
    {
      jsonString := '{"Path":"'        + this.Path() + '"'
                  + ',"Value":'        + [String]this.Value()
                  + ',"LastUpdated":"' + converter.Convert( this.LastUpdated() ) + '"'
                  + ',"LastReset":"'   + converter.Convert( this.LastReset() ) + '"}';
    }
    
    return jsonString;
  *]
}