2_4_6_177

This commit is contained in:
Компания 1С committed 2018-09-26 23:46:00 +03:00
1 parent f85c33a2fe
commit b783b07432
12 files changed
+323 -257

No files matched your search

@@ -103,7 +103,21 @@
Число = Ячейка.Значение;
ИначеЕсли ЗначениеЗаполнено(Ячейка.Текст) Тогда
ОписаниеТипаЧисло = Новый ОписаниеТипов("Число");
Число = ОписаниеТипаЧисло.ПривестиЗначение(Ячейка.Текст);
ТекстЯчейки = Ячейка.Текст;
Если СтрНачинаетсяС(ТекстЯчейки, "(")
И СтрЗаканчиваетсяНа(ТекстЯчейки, ")") Тогда
ТекстЯчейки = СтрЗаменить(ТекстЯчейки, "(", "");
ТекстЯчейки = СтрЗаменить(ТекстЯчейки, ")", "");
Число = ОписаниеТипаЧисло.ПривестиЗначение(ТекстЯчейки);
Если Число > 0 Тогда
Число = -Число;
КонецЕсли;
Иначе
Число = ОписаниеТипаЧисло.ПривестиЗначение(ТекстЯчейки);
КонецЕсли;
Иначе
Продолжить;
КонецЕсли;