v3.0.0.91

2026-07-17 17:19:42 +00:00
parent 9e739aa65f
commit 8504860515
2 changed files with 23 additions and 3 deletions
@@ -172,8 +172,28 @@
 #Область СерверныеПроцедуры

 &НаСервере
-Процедура ЗаполнитьТаблицыНаСервере(МассивДанных, МассивВзносов, МассивНДФЛ, МассивСотрудников)
-    ЗагрузкаДанныхИзExcel_ЗаписьВРегистры.ЗаполнитьТЧ(МассивДанных, МассивВзносов, МассивНДФЛ, МассивСотрудников, Объект.ДанныеРасчетаЗП, Объект.ДанныеСтраховыхВзносов, Объект.ДанныеНДФЛ, Объект.Сотрудники);
+Процедура ЗаполнитьТаблицыНаСервере(МассивДанных, МассивВзносов, МассивНДФЛ, МассивСотрудников) Экспорт
+    ТЧЗП = Объект.ДанныеРасчетаЗП;
+    ТЧВзносы = Объект.ДанныеСтраховыхВзносов;
+    ТЧНДФЛ = Объект.ДанныеНДФЛ;
+    ТЧСотрудники = Объект.Сотрудники;
+    ТЧЗП.Очистить(); ТЧВзносы.Очистить(); ТЧНДФЛ.Очистить(); ТЧСотрудники.Очистить();
+    Для Каждого Строка Из МассивДанных Цикл
+        НоваяСтрока = ТЧЗП.Добавить();
+        ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
+    КонецЦикла;
+    Для Каждого Строка Из МассивВзносов Цикл
+        НоваяСтрока = ТЧВзносы.Добавить();
+        ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
+    КонецЦикла;
+    Для Каждого Строка Из МассивНДФЛ Цикл
+        НоваяСтрока = ТЧНДФЛ.Добавить();
+        ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
+    КонецЦикла;
+    Для Каждого Строка Из МассивСотрудников Цикл
+        НоваяСтрока = ТЧСотрудники.Добавить();
+        ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
+    КонецЦикла;
 КонецПроцедуры

 #КонецОбласти