Выгрузка из 1С в JSON

[SEMEN-YU]

Добрый день, коллеги. УПП , 8.3.10.2466
Подскажите, как в json перенести значение Число?
Есть такой код

Код Выделить Развернуть

ЗаписьJSON = Новый ЗаписьJSON;
ЗаписьJSON.ПроверятьСтруктуру = Ложь;

ПараметрыЗаписиJSON = Новый ПараметрыЗаписиJSON( , Символы.Таб);

ЗаписьJSON.ОткрытьФайл(ИмяФайла, КодировкаТекста.UTF8, , ПараметрыЗаписиJSON);

ЗаписьJSON.ЗаписатьНачалоМассива();

Для Каждого Стр Из тз_ Цикл
ЗаписьJSON.ЗаписатьНачалоОбъекта();
Для Каждого Колонка Из тз_.Колонки Цикл
ЗаписьJSON.ЗаписатьИмяСвойства(СокрЛП(Колонка.Имя));
ЗаписьJSON.ЗаписатьЗначение(СокрЛП(Стр[Колонка.Имя]));             
КонецЦикла;
ЗаписьJSON.ЗаписатьКонецОбъекта();
КонецЦикла;
ЗаписьJSON.ЗаписатьКонецМассива();

ЗаписьJSON.Закрыть();

Запросом выгружаются данные. Есть с типом значения Число. Но в json записываюся как строка.
Вот так
        "ЦФО": "Э1",
      "Категория": "НМА",
      "Квартал": "3кв.2021г",
      "СрезНа": "703,1",           ------ должно быть число
      "СтоимостьДенег": "18,65",   ------ должно быть число
      "ИНВНомер": "00061"


Заранее спасибо за ответы.

[LexaK]

SEMEN-YU, а зачем вы ТАК выводите (циклы в циклах)? Джисон как-то сериализуется
создайте массив структур и одной командой сразу все выгружайте!

[SEMEN-YU]

LexaK, скажите это поможет решить вопрос с числами?
И вы иметет в виду массив нужно создавать по типу Массив = Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку("Колона");? Для каждой колонки

[LexaK]

SEMEN-YU, да, должно помочь, Джинсон понимает просты типы данных!
там что одной командой выгрузил, то тоже одной командой и читаешь
выгруженные и загруженные данные будут совпадать

[LexaK]

SEMEN-YU, вот пример, посмотрите

Код Выделить Развернуть


//Джинс

ОбъектСериализации = Новый Массив;
ОбъектСериализации.Добавить(10000);
ОбъектСериализации.Добавить(ТекущаяДата());
ОбъектСериализации.Добавить("тест");

ЗаписиJSON = Новый ЗаписьJSON;
ЗаписиJSON.УстановитьСтроку();
НастройкиСериал = Новый НастройкиСериализацииJSON;
НастройкиСериал.ВариантЗаписиДаты = ВариантЗаписиДатыJSON.ЛокальнаяДата;
НастройкиСериал.ФорматСериализацииДаты = ФорматДатыJSON.ISO;
СериализаторXDTO.ЗаписатьJSON(ЗаписиJSON, ОбъектСериализации, НазначениеТипаXML.Явное);
результат = ЗаписиJSON.Закрыть();
Сообщить(результат);


//результат
{
"#type": "jv8:Array",
"#value": [
{
"#type": "jxs:decimal",
"#value": 10000
},
{
"#type": "jxs:dateTime",
"#value": "2021-10-22T17:46:51"
},
{
"#type": "jxs:string",
"#value": "тест"
}
]
}


[SEMEN-YU]

LexaK, с массивом на вашем примере вроде понятно.
Но как всё таки обработать Результат запроса?
В массив добавить все колонки нет возможности насколько я понимаю

[LexaK]

SEMEN-YU,

В массив добавить все колонки нет возможности насколько я понимаю

Есть возможность. Вам написали выше! Внимательнее читайте ответы! 

[SEMEN-YU]

LexaK, Возможно для вас всё кристально понятно. Для меня это не так.
Спасибо за ответы, но если хотите действительно помочь приведите по возможности пример. Если нет, то спасибо и на этом.

[LexaK]

SEMEN-YU, пожалуйста! обращайтесь еще! 
а совет был такой

создайте массив структур и одной командой сразу все выгружайте!

тут вроде все элементарно, массив, структуры - что сложного в этом?

[antoneus]

СокрЛП вообще-то преобразует значение в строку.