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

v3.0.0.67

Browse Source
This commit is contained in:
Профи-Софт
2026-07-14 05:14:14 +00:00
parent 4497ed6f6e
commit 919c573195
2 changed files with 9 additions and 14 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.66</Version> <Version>3.0.0.67</Version>
<Caption/> <Caption/>
<ShortCaption/> <ShortCaption/>
<DefaultLanguage>Language.Русский</DefaultLanguage> <DefaultLanguage>Language.Русский</DefaultLanguage>
DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl
+8 -13
View File
@@ -1,8 +1,3 @@
Перем ГодЗагрузкиМодуль;
Перем СтрокаОрганизацияМодуль;
Перем СтрокаСтатьяФинансированияМодуль;
Перем СтрокаСтатьяРасходовМодуль;
#Область ОбработчикиСобытийФормы #Область ОбработчикиСобытийФормы
&НаСервере &НаСервере
@@ -42,7 +37,7 @@
Сообщить("Нет данных для записи!"); Сообщить("Нет данных для записи!");
Возврат; Возврат;
КонецЕсли; КонецЕсли;
ЗаписатьДанныеНаСервере(ГодЗагрузкиМодуль, СтрокаОрганизацияМодуль, СтрокаСтатьяФинансированияМодуль, СтрокаСтатьяРасходовМодуль); ЗаписатьДанныеНаСервере(Объект._ГодЗагрузки, Объект._ОрганизацияНаименование, Объект._СтатьяФинансированияНаименование, Объект._СтатьяРасходовКод);
Сообщить("Данные записаны!"); Сообщить("Данные записаны!");
КонецПроцедуры КонецПроцедуры
@@ -322,21 +317,21 @@
ГодЗначение = ЛистРасчет.Cells(3, 1).Value; ГодЗначение = ЛистРасчет.Cells(3, 1).Value;
Если ЗначениеЗаполнено(ГодЗначение) Тогда Если ЗначениеЗаполнено(ГодЗначение) Тогда
Попытка Попытка
ГодЗагрузкиМодуль = Число(ГодЗначение); Объект._ГодЗагрузки = Число(ГодЗначение);
Исключение Исключение
ГодЗагрузкиМодуль = 0; Объект._ГодЗагрузки = 0;
КонецПопытки; КонецПопытки;
Иначе Иначе
ГодЗагрузкиМодуль = 0; Объект._ГодЗагрузки = 0;
КонецЕсли; КонецЕсли;
МесяцТекст = НомерМесяцаВТекст(Объект.МесяцЗагрузки) + " " + ГодЗагрузкиМодуль; МесяцТекст = НомерМесяцаВТекст(Объект.МесяцЗагрузки) + " " + Объект._ГодЗагрузки;
Организация = СокрЛП(Строка(ЛистРасчет.Cells(4, 20).Value)); Организация = СокрЛП(Строка(ЛистРасчет.Cells(4, 20).Value));
СтатьяФинансирования = СокрЛП(Строка(ЛистРасчет.Cells(8, 20).Value)); СтатьяФинансирования = СокрЛП(Строка(ЛистРасчет.Cells(8, 20).Value));
СтатьяРасходов = "211"; СтатьяРасходов = "211";
// Сохраняем строковые значения для передачи на сервер // Сохраняем строковые значения для передачи на сервер
СтрокаОрганизацияМодуль = Организация; Объект._ОрганизацияНаименование = Организация;
СтрокаСтатьяФинансированияМодуль = СтатьяФинансирования; Объект._СтатьяФинансированияНаименование = СтатьяФинансирования;
СтрокаСтатьяРасходовМодуль = СтатьяРасходов; Объект._СтатьяРасходовКод = СтатьяРасходов;
// Строка начала данных // Строка начала данных
НачальнаяСтрока = 0; НачальнаяСтрока = 0;
Для Ном = 17 По 30 Цикл Для Ном = 17 По 30 Цикл