From 31b6177ce4188e5a0b6ec190eca1b9d70df137fb Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=D0=9F=D1=80=D0=BE=D1=84=D0=B8-=D0=A1=D0=BE=D1=84=D1=82?= Date: Thu, 23 Jul 2026 08:11:37 +0000 Subject: [PATCH] v3.0.0.111 --- Configuration.xml | 2 +- .../ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl | 4 +--- 2 files changed, 2 insertions(+), 4 deletions(-) diff --git a/Configuration.xml b/Configuration.xml index 18df647..e97e1f9 100755 --- a/Configuration.xml +++ b/Configuration.xml @@ -56,7 +56,7 @@ Russian ООО "Профи-Софт", код партнера 42575-13, г.Байконур. - 3.0.0.110 + 3.0.0.111 Language.Русский diff --git a/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl b/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl index 9ce4027..540fe56 100644 --- a/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl +++ b/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl @@ -87,12 +87,11 @@ ТаблДок = Новый ТабличныйДокумент; ТаблДок.Прочитать(ПутьВрем); УдалитьФайлы(ПутьВрем); - УдалитьФайлы(ПутьВрем); // Проверяем наличие листа "Расчет" ЛистРасчет = Неопределено; Для Каждого Область Из ТаблДок.Области Цикл - Если Область.ТипОбласти = 1 И ВРег(Область.Имя) = "РАСЧЕТ" Тогда + Если ВРег(Область.Имя) = "РАСЧЕТ" Тогда ЛистРасчет = Область.Имя; Прервать; КонецЕсли; @@ -114,7 +113,6 @@ МассивНДФЛ = Новый Массив; Счетчик = 0; Для Каждого Область Из ТаблДок.Области Цикл - Если Область.ТипОбласти <> 1 Тогда Продолжить; КонецЕсли; ИмяЛиста = Область.Имя; Если ВРег(ИмяЛиста) = "РАСЧЕТ" Тогда Продолжить; КонецЕсли; ФИО = СокрЛП("" + ТаблДок.Область(ИмяЛиста + "|C2").Текст);