Skip to content

Commit

Permalink
arkuznetsov#14 Добавил обработку параметра ЗаписыватьПустойСписок
Browse files Browse the repository at this point in the history
  • Loading branch information
alexey-stepanenko committed Jul 7, 2023
1 parent 86f0753 commit 27df4f8
Showing 1 changed file with 20 additions and 2 deletions.
22 changes: 20 additions & 2 deletions src/Классы/ВыводДанныхВФайлJSON.os
Original file line number Diff line number Diff line change
Expand Up @@ -17,6 +17,8 @@
Перем ОбрабатыватьКакМассив; // Булево - Истина - входящий массив будет обработан поэлементно;
// Ложь - входящий массив будет обработан как 1 значение.
Перем ДанныеДляСохранения; // Массив - буфер данных для сохранения в файл JSON
Перем ЗаписыватьПустойСписок; // Булево - Истина - Записывать данные в файл, даже если результат пустой;
// Ложь - Файл записываться не будет.

#Область ПрограммныйИнтерфейс

Expand Down Expand Up @@ -71,6 +73,14 @@
"Истина - входящий массив будет обработан поэлементно;
|Ложь - входящий массив будет обработан как 1 значение.");

ДобавитьОписаниеПараметра(Параметры,
"ЗаписыватьПустойСписок",
"Булево",
,
Ложь,
"Истина - Записывать данные в файл, даже если результат пустой;
|Ложь - Файл записываться не будет.");

Возврат Параметры;

КонецФункции // ОписаниеПараметров()
Expand Down Expand Up @@ -152,6 +162,12 @@
Иначе
ОбрабатыватьКакМассив = Истина;
КонецЕсли;

Если ПараметрыОбработки.Свойство("ЗаписыватьПустойСписок") Тогда
ЗаписыватьПустойСписок = ПараметрыОбработки.ЗаписыватьПустойСписок;
Иначе
ЗаписыватьПустойСписок = Ложь;
КонецЕсли;

КонецПроцедуры // УстановитьПараметрыОбработкиДанных()

Expand Down Expand Up @@ -198,6 +214,8 @@
КонецЕсли;
ИначеЕсли ВРег(ИмяПараметра) = ВРег("ОбрабатыватьКакМассив") Тогда
ОбрабатыватьКакМассив = Значение;
ИначеЕсли ВРег(ИмяПараметра) = ВРег("ЗаписыватьПустойСписок") Тогда
ЗаписыватьПустойСписок = Значение;
Иначе
Возврат;
КонецЕсли;
Expand Down Expand Up @@ -289,10 +307,10 @@
Процедура ЗаписатьДанныеВФайл()

Если НЕ ТипЗнч(ДанныеДляСохранения) = Тип("Массив") Тогда
Возврат;
ДанныеДляСохранения = Новый Массив;
КонецЕсли;

Если ДанныеДляСохранения.Количество() = 0 Тогда
Если ДанныеДляСохранения.Количество() = 0 И Не ЗаписыватьПустойСписок Тогда
Возврат;
КонецЕсли;

Expand Down

1 comment on commit 27df4f8

@arkuznetsov
Copy link

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Зачем такие сложности, просто пусть всегда записывается пустой список в таких случаях.

Please sign in to comment.