From 80ae5cde84686a93eed303c932d3d2612580dfe2 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: Wed, 8 Jul 2026 19:33:37 +0000 Subject: [PATCH] =?UTF-8?q?v3.0.0.15:=20fix=20=D0=97=D0=BD=D0=B0=D1=87?= =?UTF-8?q?=D0=B5=D0=BD=D0=B8=D0=B5=D0=92=D0=A0=D0=B5=D0=BA=D0=B2=D0=B8?= =?UTF-8?q?=D0=B7=D0=B8=D1=82=D0=A4=D0=BE=D1=80=D0=BC=D1=8B=20for=20Tabula?= =?UTF-8?q?rSection?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Configuration.xml | 2 +- .../Forms/Форма/Ext/Form/Module.bsl | 26 +++++++++---------- 2 files changed, 13 insertions(+), 15 deletions(-) diff --git a/Configuration.xml b/Configuration.xml index a741e0b..733ea86 100755 --- a/Configuration.xml +++ b/Configuration.xml @@ -60,7 +60,7 @@ Russian Language.Русский ООО "Профи-Софт", код партнера 42575-13, г.Байконур. - 3.0.0.9 + 3.0.0.14 Language.Русский diff --git a/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl b/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl index 015ea10..82acc6d 100644 --- a/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl +++ b/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl @@ -502,36 +502,34 @@ Процедура ИнициализироватьТаблицы() КонецПроцедуры -// Заполняет таблицы значений на сервере из массивов структур. +// Заполняет табличные части объекта из массивов структур. +// TabularSection не поддерживает РеквизитФормыВЗначение — работаем через Объект напрямую. &НаСервере Процедура ЗаполнитьТаблицыНаСервере(МассивДанных, МассивВзносов) - ТЗРасчет = РеквизитФормыВЗначение("Объект.ДанныеРасчетаЗП"); - ТЗРасчет.Очистить(); + // Очистка и заполнение ДанныеРасчетаЗП + Объект.ДанныеРасчетаЗП.Очистить(); Для Каждого Эл Из МассивДанных Цикл - Строка = ТЗРасчет.Добавить(); + Строка = Объект.ДанныеРасчетаЗП.Добавить(); ЗаполнитьЗначенияСвойств(Строка, Эл); КонецЦикла; - ЗначениеВРеквизитФормы(ТЗРасчет, "Объект.ДанныеРасчетаЗП"); - ТЗВзносы = РеквизитФормыВЗначение("Объект.ДанныеСтраховыхВзносов"); - ТЗВзносы.Очистить(); + // Очистка и заполнение ДанныеСтраховыхВзносов + Объект.ДанныеСтраховыхВзносов.Очистить(); Для Каждого Эл Из МассивВзносов Цикл - Строка = ТЗВзносы.Добавить(); + Строка = Объект.ДанныеСтраховыхВзносов.Добавить(); ЗаполнитьЗначенияСвойств(Строка, Эл); КонецЦикла; - ЗначениеВРеквизитФормы(ТЗВзносы, "Объект.ДанныеСтраховыхВзносов"); КонецПроцедуры // Записывает данные в документы 1С. +// Работает напрямую с TabularSection через Объект. &НаСервере Процедура ЗаписатьДанныеНаСервере() ГодЗагрузки = ТекущаяДата().Год(); Период = Дата(ГодЗагрузки, Объект.МесяцЗагрузки, 1); - ТЗРасчет = РеквизитФормыВЗначение("Объект.ДанныеРасчетаЗП"); - Объект.ЗаписатьДанныеРасчета(ТЗРасчет, Период); - ТЗВзносы = РеквизитФормыВЗначение("Объект.ДанныеСтраховыхВзносов"); - Если ТЗВзносы.Количество() > 0 Тогда - Объект.ЗаписатьДанныеСтраховыхВзносов(ТЗВзносы, Период); + Объект.ЗаписатьДанныеРасчета(Объект.ДанныеРасчетаЗП, Период); + Если Объект.ДанныеСтраховыхВзносов.Количество() > 0 Тогда + Объект.ЗаписатьДанныеСтраховыхВзносов(Объект.ДанныеСтраховыхВзносов, Период); КонецЕсли; КонецПроцедуры