mORMot Open Source

arvin

Member

Registered: 2017-08-31

Posts: 3

TDocVariantData.ToJSON loosing values

docVar: TDocVariantData
...

--debug docVar
--[Evaluate/Modify]
--Result:
(271, [dvoIsObject], ('type_temp', 'sxhzjbxx', '', '', '', '', '', '', '', '', '', '', '', '', '', ''), (2101, '[{"DE02_01_039_001":"DE02_01_039_001","DE02_01_040_00":"DE02_01_040_00","DE02_01_026_01":123,"DE02_01_032_02":"DE02_01_032_02","DE02_01_031_01":"DE02_01_031_01","DE02_01_030_01":"DE02_01_030_01","DE02_01_005_01_01":"DE02_01_005_01_01","DE01_00_021_00":"DE01_00_021_00","DE01_00_022_01":"DE01_00_022_01","DE01_00_008_01":"DE01_00_008_01","DE08_10_908_00":"DE08_10_908_00","DE01_00_010_00":"DE01_00_010_00","DE01_00_014_01":"DE01_00_014_01","DE02_01_060_00":"DE02_01_060_00","DE02_01_052_01":"DE02_01_052_01","DE08_10_007_01":"DE08_10_007_01","DE02_01_010_14":"DE02_01_010_14","DE02_01_024_01":"DE02_01_024_01","DE02_01_009_01_11":"DE02_01_009_01_11","DE02_01_009_02_11":"DE02_01_009_02_11","DE02_01_009_03_11":"DE02_01_009_03_11","DE02_01_009_04_11":"DE02_01_009_04_11","DE02_01_009_05_11":"DE02_01_009_05_11","DE02_01_009_06_11":"DE02_01_009_06_11","DE02_01_047_01":1,"DE02_01_010_01":"DE02_01_010_01","DE02_01_039_011":"DE02_01_039_011","DE02_01_010_02":"DE02_01_010_02","DE02_01_044_01":"DE02_01_044_01","DE08_10_025_01":"DE08_10_025_01","DE08_10_052_01":"DE08_10_052_01","CT08_10_052_01":"CT08_10_052_01"}]', Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned, Unassigned), 1)

...
Memo1.Lines.Text := docVar.ToJSON;   //{"type_temp":2101}  ???

why loosing 'sxhzjbxx'   ?

ab

Administrator

From: France

Registered: 2010-06-21

Posts: 14,240

Website

Re: TDocVariantData.ToJSON loosing values

Because Count=1

arvin

Member

Registered: 2017-08-31

Posts: 3

Re: TDocVariantData.ToJSON loosing values

Thanks.