diff --git a/Configuration.xml b/Configuration.xml index 3013e19..07cc59d 100755 --- a/Configuration.xml +++ b/Configuration.xml @@ -56,7 +56,7 @@ Russian ООО "Профи-Софт", код партнера 42575-13, г.Байконур. - 3.0.0.66 + 3.0.0.67 Language.Русский diff --git a/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl b/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl index 9f57a99..20bc87e 100644 --- a/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl +++ b/DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl @@ -1,8 +1,3 @@ -Перем ГодЗагрузкиМодуль; -Перем СтрокаОрганизацияМодуль; -Перем СтрокаСтатьяФинансированияМодуль; -Перем СтрокаСтатьяРасходовМодуль; - #Область ОбработчикиСобытийФормы &НаСервере @@ -42,7 +37,7 @@ Сообщить("Нет данных для записи!"); Возврат; КонецЕсли; - ЗаписатьДанныеНаСервере(ГодЗагрузкиМодуль, СтрокаОрганизацияМодуль, СтрокаСтатьяФинансированияМодуль, СтрокаСтатьяРасходовМодуль); + ЗаписатьДанныеНаСервере(Объект._ГодЗагрузки, Объект._ОрганизацияНаименование, Объект._СтатьяФинансированияНаименование, Объект._СтатьяРасходовКод); Сообщить("Данные записаны!"); КонецПроцедуры @@ -322,21 +317,21 @@ ГодЗначение = ЛистРасчет.Cells(3, 1).Value; Если ЗначениеЗаполнено(ГодЗначение) Тогда Попытка - ГодЗагрузкиМодуль = Число(ГодЗначение); + Объект._ГодЗагрузки = Число(ГодЗначение); Исключение - ГодЗагрузкиМодуль = 0; + Объект._ГодЗагрузки = 0; КонецПопытки; Иначе - ГодЗагрузкиМодуль = 0; + Объект._ГодЗагрузки = 0; КонецЕсли; - МесяцТекст = НомерМесяцаВТекст(Объект.МесяцЗагрузки) + " " + ГодЗагрузкиМодуль; + МесяцТекст = НомерМесяцаВТекст(Объект.МесяцЗагрузки) + " " + Объект._ГодЗагрузки; Организация = СокрЛП(Строка(ЛистРасчет.Cells(4, 20).Value)); СтатьяФинансирования = СокрЛП(Строка(ЛистРасчет.Cells(8, 20).Value)); СтатьяРасходов = "211"; // Сохраняем строковые значения для передачи на сервер - СтрокаОрганизацияМодуль = Организация; - СтрокаСтатьяФинансированияМодуль = СтатьяФинансирования; - СтрокаСтатьяРасходовМодуль = СтатьяРасходов; + Объект._ОрганизацияНаименование = Организация; + Объект._СтатьяФинансированияНаименование = СтатьяФинансирования; + Объект._СтатьяРасходовКод = СтатьяРасходов; // Строка начала данных НачальнаяСтрока = 0; Для Ном = 17 По 30 Цикл