admin-ps/zagruzka-dannyh-iz-excel
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

v3.0.0.26

Browse Source
This commit is contained in:
Профи-Софт
2026-07-09 14:45:03 +00:00
parent 6a078ab00e
commit e6e3d3651b
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Configuration.xml
+1 -1
View File
@@ -56,7 +56,7 @@
<ScriptVariant>Russian</ScriptVariant> <ScriptVariant>Russian</ScriptVariant>
<DefaultRoles/> <DefaultRoles/>
<Vendor>ООО "Профи-Софт", код партнера 42575-13, г.Байконур.</Vendor> <Vendor>ООО "Профи-Софт", код партнера 42575-13, г.Байконур.</Vendor>
<Version>3.0.0.25</Version> <Version>3.0.0.26</Version>
<Caption/> <Caption/>
<ShortCaption/> <ShortCaption/>
<DefaultLanguage>Language.Русский</DefaultLanguage> <DefaultLanguage>Language.Русский</DefaultLanguage>
DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl
+2 -2
View File
@@ -225,7 +225,7 @@
С.Вставить("ВсегоНаРуки", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 55, ФИО)); С.Вставить("ВсегоНаРуки", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 55, ФИО));
С.Вставить("ЗарплатаЗаПервуюПоловину", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 44, ФИО)); С.Вставить("ЗарплатаЗаПервуюПоловину", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 44, ФИО));
С.Вставить("ПремияАванс", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 45, ФИО)); С.Вставить("ПремияАванс", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 45, ФИО));
С.ВыплатыВМежрасчетный = ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 46, ФИО); С.Вставить("ВыплатыВМежрасчетный", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 46, ФИО);
// Расчёт итогов // Расчёт итогов
С.Вставить("ИтогоУдержано", С.Вставить("ИтогоУдержано",
С.НДФЛ + С.ПрофВзнос + С.ИсполнительныеДокументы + С.ПФСофинансирование С.НДФЛ + С.ПрофВзнос + С.ИсполнительныеДокументы + С.ПФСофинансирование
@@ -295,7 +295,7 @@
&НаКлиенте &НаКлиенте
Процедура ПрочитатьExcelНаКлиенте() Процедура ПрочитатьExcelНаКлиенте()
Состояние("Копирование файла...", 5); Состояние("Копирование файла...", 5);
ВременныйФайл = КаталогВременныхФайлов() + "temp_24647.xls"; ВременныйФайл = КаталогВременныхФайлов() + "temp_" + Строка(ТекущаяДатаВСекундах()) + ".xls";
КопироватьФайл(Объект.ПутьКФайлу, ВременныйФайл); КопироватьФайл(Объект.ПутьКФайлу, ВременныйФайл);
КонтекстExcel = ОткрытьФайлExcel(ВременныйФайл); КонтекстExcel = ОткрытьФайлExcel(ВременныйФайл);
Если КонтекстExcel = Неопределено Тогда УдалитьФайлы(ВременныйФайл); Возврат; КонецЕсли; Если КонтекстExcel = Неопределено Тогда УдалитьФайлы(ВременныйФайл); Возврат; КонецЕсли;