Модуль работы с файлами

Author: khorevaa

src/cmd/Модули/РаботаСФайлами.os

@@ -0,0 +1,49 @@
+#Использовать json
+
+Функция ПрочитатьФайл(Знач ПутьКФайлу) Экспорт
+	
+	ЧтениеТекста = Новый ЧтениеТекста(ПутьКФайлу, "UTF-8");
+	ТекстФайла = ЧтениеТекста.Прочитать();
+	ЧтениеТекста.Закрыть();
+
+	Возврат ТекстФайла;
+
+КонецФункции
+
+Процедура ЗаписатьФайл(Знач ПутьКФайлу, Знач ТекстФайла) Экспорт
+
+	ЗаписьТекста = Новый ЗаписьТекста(ПутьКФайлу);
+	ЗаписьТекста.Записать(ТекстФайла);
+	ЗаписьТекста.Закрыть();
+
+КонецПроцедуры
+
+Функция ОБъектВJson(Знач Объект, ПараметрыЗаписи = Неопределено) Экспорт
+	
+	Если ПараметрыЗаписи = Неопределено Тогда
+		ПараметрыЗаписи = Новый ПараметрыЗаписиJSON(ПереносСтрокJSON.Авто, " ", ,,,,,, Истина);
+	КонецЕсли;
+
+	ЗаписьJSON = Новый ЗаписьJSON;
+	ЗаписьJSON.УстановитьСтроку(ПараметрыЗаписи);
+	ЗаписатьJSON(ЗаписьJSON, Объект);
+	
+	Возврат ЗаписьJSON.Закрыть();
+
+КонецФункции
+
+Функция ОбъектИзJson(ТекстJSON, ЧитатьВСтруктуру = Ложь, ФорматДаты = Неопределено) Экспорт
+		
+	Если ФорматДаты = Неопределено Тогда
+		ФорматДаты = ФорматДатыJSON.ISO;
+	КонецЕсли;
+	ЧтениеJSON = Новый ЧтениеJSON;
+	ЧтениеJSON.УстановитьСтроку(ТекстJSON);
+	
+	Объект = ПрочитатьJSON(ЧтениеJSON,
+							НЕ ЧитатьВСтруктуру,,
+							ФорматДаты);
+	ЧтениеJSON.Закрыть();
+	Возврат Объект;
+	 
+КонецФункции