v3.0.0.112

DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl

@@ -104,8 +104,8 @@
     // Читаем шапку листа "Расчет"
     ГодЗагрузки = "" + ПрочитатьЧислоИзТД(ТаблДок, ЛистРасчет, 4, 1);
     МесяцЗагрузки = Число(ПрочитатьЧислоИзТД(ТаблДок, ЛистРасчет, 4, 1));
-    Организация = СокрЛП("" + ТаблДок.Область(ЛистРасчет + "|T4").Текст);
-    СтатьяФинансирования = СокрЛП("" + ТаблДок.Область(ЛистРасчет + "|T8").Текст);
+    Организация = СокрЛП(ПрочитатьСтрокуИзТД(ТаблДок, ЛистРасчет, 4, 20));
+    СтатьяФинансирования = СокрЛП(ПрочитатьСтрокуИзТД(ТаблДок, ЛистРасчет, 8, 20));
 
     // === ЭТАП 1: Обход листов сотрудников ===
     КэшФИО = Новый Соответствие;
@@ -240,6 +240,15 @@
     КонецПопытки;
 КонецФункции
 
+&НаСервере
+Функция ПрочитатьСтрокуИзТД(ТаблДок, ИмяОбласти, Строка, Колонка)
+    Попытка
+        Возврат СокрЛП("" + ТаблДок.Область(ИмяОбласти + "|C" + Колонка + "|" + Строка + "|" + Строка).Текст);
+    Исключение
+        Возврат "";
+    КонецПопытки;
+КонецФункции
+
 &НаСервере
 Процедура ЗаполнитьТаблицыНаСервере(МассивДанных, МассивВзносов, МассивНДФЛ, МассивСотрудников)
     Объект.ДанныеРасчетаЗП.Очистить();