v3.0.0.15: fix ЗначениеВРеквизитФормы for TabularSection
This commit is contained in:
+1
-1
@@ -60,7 +60,7 @@
|
|||||||
<ScriptVariant>Russian</ScriptVariant>
|
<ScriptVariant>Russian</ScriptVariant>
|
||||||
<DefaultLanguage>Language.Русский</DefaultLanguage>
|
<DefaultLanguage>Language.Русский</DefaultLanguage>
|
||||||
<Vendor>ООО "Профи-Софт", код партнера 42575-13, г.Байконур.</Vendor>
|
<Vendor>ООО "Профи-Софт", код партнера 42575-13, г.Байконур.</Vendor>
|
||||||
<Version>3.0.0.9</Version>
|
<Version>3.0.0.14</Version>
|
||||||
<DefaultLanguage>Language.Русский</DefaultLanguage>
|
<DefaultLanguage>Language.Русский</DefaultLanguage>
|
||||||
<BriefInformation>
|
<BriefInformation>
|
||||||
<v8:item>
|
<v8:item>
|
||||||
|
|||||||
@@ -502,36 +502,34 @@
|
|||||||
Процедура ИнициализироватьТаблицы()
|
Процедура ИнициализироватьТаблицы()
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
// Заполняет таблицы значений на сервере из массивов структур.
|
// Заполняет табличные части объекта из массивов структур.
|
||||||
|
// TabularSection не поддерживает РеквизитФормыВЗначение — работаем через Объект напрямую.
|
||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура ЗаполнитьТаблицыНаСервере(МассивДанных, МассивВзносов)
|
Процедура ЗаполнитьТаблицыНаСервере(МассивДанных, МассивВзносов)
|
||||||
ТЗРасчет = РеквизитФормыВЗначение("Объект.ДанныеРасчетаЗП");
|
// Очистка и заполнение ДанныеРасчетаЗП
|
||||||
ТЗРасчет.Очистить();
|
Объект.ДанныеРасчетаЗП.Очистить();
|
||||||
Для Каждого Эл Из МассивДанных Цикл
|
Для Каждого Эл Из МассивДанных Цикл
|
||||||
Строка = ТЗРасчет.Добавить();
|
Строка = Объект.ДанныеРасчетаЗП.Добавить();
|
||||||
ЗаполнитьЗначенияСвойств(Строка, Эл);
|
ЗаполнитьЗначенияСвойств(Строка, Эл);
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
ЗначениеВРеквизитФормы(ТЗРасчет, "Объект.ДанныеРасчетаЗП");
|
|
||||||
|
|
||||||
ТЗВзносы = РеквизитФормыВЗначение("Объект.ДанныеСтраховыхВзносов");
|
// Очистка и заполнение ДанныеСтраховыхВзносов
|
||||||
ТЗВзносы.Очистить();
|
Объект.ДанныеСтраховыхВзносов.Очистить();
|
||||||
Для Каждого Эл Из МассивВзносов Цикл
|
Для Каждого Эл Из МассивВзносов Цикл
|
||||||
Строка = ТЗВзносы.Добавить();
|
Строка = Объект.ДанныеСтраховыхВзносов.Добавить();
|
||||||
ЗаполнитьЗначенияСвойств(Строка, Эл);
|
ЗаполнитьЗначенияСвойств(Строка, Эл);
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
ЗначениеВРеквизитФормы(ТЗВзносы, "Объект.ДанныеСтраховыхВзносов");
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
// Записывает данные в документы 1С.
|
// Записывает данные в документы 1С.
|
||||||
|
// Работает напрямую с TabularSection через Объект.
|
||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура ЗаписатьДанныеНаСервере()
|
Процедура ЗаписатьДанныеНаСервере()
|
||||||
ГодЗагрузки = ТекущаяДата().Год();
|
ГодЗагрузки = ТекущаяДата().Год();
|
||||||
Период = Дата(ГодЗагрузки, Объект.МесяцЗагрузки, 1);
|
Период = Дата(ГодЗагрузки, Объект.МесяцЗагрузки, 1);
|
||||||
ТЗРасчет = РеквизитФормыВЗначение("Объект.ДанныеРасчетаЗП");
|
Объект.ЗаписатьДанныеРасчета(Объект.ДанныеРасчетаЗП, Период);
|
||||||
Объект.ЗаписатьДанныеРасчета(ТЗРасчет, Период);
|
Если Объект.ДанныеСтраховыхВзносов.Количество() > 0 Тогда
|
||||||
ТЗВзносы = РеквизитФормыВЗначение("Объект.ДанныеСтраховыхВзносов");
|
Объект.ЗаписатьДанныеСтраховыхВзносов(Объект.ДанныеСтраховыхВзносов, Период);
|
||||||
Если ТЗВзносы.Количество() > 0 Тогда
|
|
||||||
Объект.ЗаписатьДанныеСтраховыхВзносов(ТЗВзносы, Период);
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user