Каталог решений - Аналоги новых методов платформы ЗаписатьЗначениеJSON и ПрочитатьЗначениеJSON

Всем привет! Вышла новость о появлении новых методов по работе с JSON, которые появятся в платформе 8.3.23. Если кратко — новые методы ЗаписатьЗначениеJSON и ПрочитатьЗначениеJSON, будут позволять просто и без лишних движений преобразовывать значения 1С в JSON и обратно. 

Данная новость есть и на Infostart.ru, в комментарии под которой я собственно и написал, что непреодолимое желание написать данные методы у меня появилось сразу, как только в платформе 1С появилась поддержка JSON.

По просьбе участников сообщества выложил пример своих методов, на что получил совет опубликовать пример данных метода в отдельной статье, что, собственно, и делаю, дабы их увидела широкая общественность. Глядишь, еще кому пригодятся, ведь новая платформа выйдет довольно не скоро.

Собственно сами методы:

//Аналог ЗаписатьЗначениеJSON 
Функция ДанныеВJSON(Значение, Знач ПараметрыЗаписиJSON = Неопределено, НастройкиСериализации = Неопределено) Экспорт
    Если ПараметрыЗаписиJSON = Неопределено Тогда
        ПараметрыЗаписиJSON = Новый ПараметрыЗаписиJSON(, Символы.Таб);
    КонецЕсли;
    
    ЗаписьJSON = Новый ЗаписьJSON();
    ЗаписьJSON.УстановитьСтроку(ПараметрыЗаписиJSON);
    ЗаписатьJSON(ЗаписьJSON, Значение, НастройкиСериализации);
    Результат = ЗаписьJSON.Закрыть();    
    
    Возврат Результат;
КонецФункции

//Аналог ПрочитатьЗначениеJSON
Функция ДанныеИзJSON(ДанныеJSON, ИзФайла = Ложь, ПрочитатьВСоответствие = Ложь, ЗначениеПоУмолчанию = Неопределено, ОписаниеОшибки = "") Экспорт
    ЧтениеJSON = Новый ЧтениеJSON();
    
    Если ИзФайла = Истина Тогда
        ЧтениеJSON.ОткрытьФайл(ДанныеJSON);
    Иначе
        ЧтениеJSON.УстановитьСтроку(ДанныеJSON);
    КонецЕсли;
    
    Попытка
        Результат = ПрочитатьJSON(ЧтениеJSON, ПрочитатьВСоответствие);
    Исключение
        ОписаниеОшибки = КраткоеПредставлениеОшибки(ИнформацияОбОшибке());
        Результат = ЗначениеПоУмолчанию;
    КонецПопытки;
    
    Возврат Результат;
КонецФункции

Надеюсь, кому-то еще эти методы будут полезны, а фирма 1С сделает свои методы с функциональностью не хуже, чем у моих 🙂