From ef18b0b56304c8d96c819e0fd2a58a672eb3d6a2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=D0=9A=D0=BE=D1=80=D1=8F=D0=BA=D0=B8=D0=BD=20=D0=90=D0=BB?= =?UTF-8?q?=D0=B5=D0=BA=D1=81=D0=B5=D0=B9?= Date: Thu, 27 Jul 2023 16:00:40 +0300 Subject: [PATCH] endlines --- .../Forms/ТекущиеВзаиморасчеты/Module.bsl | 44 +++--- .../Forms/ФормаЭлемента/Module.bsl | 16 +-- .../src/Catalogs/Контрагенты/ObjectModule.bsl | 12 +- .../Forms/ФормаЭлемента/Module.bsl | 8 +- .../Forms/ФормаСпискаСОстатками/Module.bsl | 10 +- .../CommandModule.bsl | 2 +- .../OrdinaryApplicationModule.bsl | 10 +- .../Заказ/Forms/ФормаДокумента/Module.bsl | 132 +++++++++--------- .../Forms/ФормаДокумента/Module.bsl | 8 +- .../ОперацияПоУчетуТоваров/ObjectModule.bsl | 38 ++--- .../src/Documents/Оплата/ObjectModule.bsl | 14 +- .../ПоступлениеДенег/ObjectModule.bsl | 14 +- .../Forms/ФормаДокумента/Module.bsl | 100 ++++++------- .../Documents/ПриходТовара/ObjectModule.bsl | 16 +-- .../Forms/ФормаДокумента/Module.bsl | 132 +++++++++--------- .../HTTPServices/ОписанияТоваров/Module.bsl | 4 +- .../src/HTTPServices/Товары/Module.bsl | 4 +- .../Commands/ОстаткиПоСкладу/CommandModule.bsl | 2 +- 18 files changed, 283 insertions(+), 283 deletions(-) diff --git a/fixtures/demo-configuration/src/AccumulationRegisters/Взаиморасчеты/Forms/ТекущиеВзаиморасчеты/Module.bsl b/fixtures/demo-configuration/src/AccumulationRegisters/Взаиморасчеты/Forms/ТекущиеВзаиморасчеты/Module.bsl index ffa78cd3..47d53743 100644 --- a/fixtures/demo-configuration/src/AccumulationRegisters/Взаиморасчеты/Forms/ТекущиеВзаиморасчеты/Module.bsl +++ b/fixtures/demo-configuration/src/AccumulationRegisters/Взаиморасчеты/Forms/ТекущиеВзаиморасчеты/Module.bsl @@ -1,25 +1,25 @@ -&НаСервере -Процедура Заполнить() - Запрос = Новый Запрос("ВЫБРАТЬ - | ВзаиморасчетыОстатки.Контрагент, - | ВзаиморасчетыОстатки.Валюта, - | ВзаиморасчетыОстатки.СуммаОстаток КАК СуммаОстаток - |ИЗ - | РегистрНакопления.Взаиморасчеты.Остатки КАК ВзаиморасчетыОстатки +&НаСервере +Процедура Заполнить() + Запрос = Новый Запрос("ВЫБРАТЬ + | ВзаиморасчетыОстатки.Контрагент, + | ВзаиморасчетыОстатки.Валюта, + | ВзаиморасчетыОстатки.СуммаОстаток КАК СуммаОстаток + |ИЗ + | РегистрНакопления.Взаиморасчеты.Остатки КАК ВзаиморасчетыОстатки |АВТОУПОРЯДОЧИВАНИЕ"); - Выборка = Запрос.Выполнить().Выбрать(); - Пока Выборка.Следующий() Цикл - НоваяСтрока = ТаблицаОстатков.Добавить(); - НоваяСтрока.Контрагент = Выборка.Контрагент; - НоваяСтрока.Валюта = Выборка.Валюта; - Если Выборка.СуммаОстаток > 0 Тогда - НоваяСтрока.НашДолг = Выборка.СуммаОстаток; - Иначе - НоваяСтрока.ДолгНам = Выборка.СуммаОстаток * -1; - КонецЕсли; - КонецЦикла - -КонецПроцедуры + Выборка = Запрос.Выполнить().Выбрать(); + Пока Выборка.Следующий() Цикл + НоваяСтрока = ТаблицаОстатков.Добавить(); + НоваяСтрока.Контрагент = Выборка.Контрагент; + НоваяСтрока.Валюта = Выборка.Валюта; + Если Выборка.СуммаОстаток > 0 Тогда + НоваяСтрока.НашДолг = Выборка.СуммаОстаток; + Иначе + НоваяСтрока.ДолгНам = Выборка.СуммаОстаток * -1; + КонецЕсли; + КонецЦикла + +КонецПроцедуры &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) @@ -29,7 +29,7 @@ &НаКлиенте Процедура ТаблицаОстатковВыбор(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка) ПоказатьЗначение( ,ТаблицаОстатков.НайтиПоИдентификатору(ВыбраннаяСтрока).Контрагент); - СтандартнаяОбработка = Ложь; + СтандартнаяОбработка = Ложь; КонецПроцедуры &НаКлиенте diff --git a/fixtures/demo-configuration/src/Catalogs/Контрагенты/Forms/ФормаЭлемента/Module.bsl b/fixtures/demo-configuration/src/Catalogs/Контрагенты/Forms/ФормаЭлемента/Module.bsl index a513b74d..f83bbf59 100644 --- a/fixtures/demo-configuration/src/Catalogs/Контрагенты/Forms/ФормаЭлемента/Module.bsl +++ b/fixtures/demo-configuration/src/Catalogs/Контрагенты/Forms/ФормаЭлемента/Module.bsl @@ -102,9 +102,9 @@ КонецФункции -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// &НаКлиенте Процедура ПриОткрытии(Отказ) @@ -135,7 +135,7 @@ #КонецЕсли КонецПроцедуры - + &НаКлиенте Процедура НовыйРасчетныйСчетВыполнить() @@ -146,11 +146,11 @@ // Подготовка параметров и открытие формы нового расчетного счета контрагента. ЗначенияЗаполнения = Новый Структура(); - ЗначенияЗаполнения.Вставить("НаименованиеЗаполнить", "Р/С " + Объект.Наименование); - ЗначенияЗаполнения.Вставить("Владелец", Объект.Ссылка); - СтруктураПараметров = Новый Структура("ЗначенияЗаполнения", ЗначенияЗаполнения); + ЗначенияЗаполнения.Вставить("НаименованиеЗаполнить", "Р/С " + Объект.Наименование); + ЗначенияЗаполнения.Вставить("Владелец", Объект.Ссылка); + СтруктураПараметров = Новый Структура("ЗначенияЗаполнения", ЗначенияЗаполнения); ОткрытьФорму("Справочник.РасчетныеСчетаКонтрагентов.ФормаОбъекта", СтруктураПараметров); - + КонецПроцедуры &НаКлиенте diff --git a/fixtures/demo-configuration/src/Catalogs/Контрагенты/ObjectModule.bsl b/fixtures/demo-configuration/src/Catalogs/Контрагенты/ObjectModule.bsl index 811dcf2f..f640b651 100644 --- a/fixtures/demo-configuration/src/Catalogs/Контрагенты/ObjectModule.bsl +++ b/fixtures/demo-configuration/src/Catalogs/Контрагенты/ObjectModule.bsl @@ -1,8 +1,8 @@ -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ ОБЪЕКТА +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ ОБЪЕКТА -//////////////////////////////////////////////////////////////////////////////// -// Обработчик события "Проверка заполнения" +//////////////////////////////////////////////////////////////////////////////// +// Обработчик события "Проверка заполнения" Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты) // Если это группа, @@ -32,10 +32,10 @@ Если НЕ ПустаяСтрока(Улица) Тогда // Тогда, должны быть заполнены и поля Регион, Город, и Дом. - ПроверяемыеРеквизиты.Добавить("Регион"); + ПроверяемыеРеквизиты.Добавить("Регион"); ПроверяемыеРеквизиты.Добавить("Город"); ПроверяемыеРеквизиты.Добавить("Дом"); - + КонецЕсли; КонецПроцедуры diff --git a/fixtures/demo-configuration/src/Catalogs/НастройкиТорговогоОборудования/Forms/ФормаЭлемента/Module.bsl b/fixtures/demo-configuration/src/Catalogs/НастройкиТорговогоОборудования/Forms/ФормаЭлемента/Module.bsl index 7c13be7a..522f54be 100644 --- a/fixtures/demo-configuration/src/Catalogs/НастройкиТорговогоОборудования/Forms/ФормаЭлемента/Module.bsl +++ b/fixtures/demo-configuration/src/Catalogs/НастройкиТорговогоОборудования/Forms/ФормаЭлемента/Module.bsl @@ -1,13 +1,13 @@ -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) Если Параметры.Ключ.Пустая() Тогда - Объект.БитДанных = 8; + Объект.БитДанных = 8; Объект.Скорость = 9600; Объект.Порт = "COM1"; diff --git a/fixtures/demo-configuration/src/Catalogs/Товары/Forms/ФормаСпискаСОстатками/Module.bsl b/fixtures/demo-configuration/src/Catalogs/Товары/Forms/ФормаСпискаСОстатками/Module.bsl index 6433958a..76329951 100644 --- a/fixtures/demo-configuration/src/Catalogs/Товары/Forms/ФормаСпискаСОстатками/Module.bsl +++ b/fixtures/demo-configuration/src/Catalogs/Товары/Forms/ФормаСпискаСОстатками/Module.bsl @@ -1,7 +1,7 @@ -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// - +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// + &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) @@ -12,7 +12,7 @@ СправочникСписок.Параметры.УстановитьЗначениеПараметра("ПоВсемСкладам", Ложь); СправочникСписок.Параметры.УстановитьЗначениеПараметра("Склад", Параметры.ОстаткиПоСкладу); - + Иначе Отказ = Истина; diff --git a/fixtures/demo-configuration/src/CommonCommands/УстановитьСканерШтрихкодов/CommandModule.bsl b/fixtures/demo-configuration/src/CommonCommands/УстановитьСканерШтрихкодов/CommandModule.bsl index e73c8d75..fbcb089b 100644 --- a/fixtures/demo-configuration/src/CommonCommands/УстановитьСканерШтрихкодов/CommandModule.bsl +++ b/fixtures/demo-configuration/src/CommonCommands/УстановитьСканерШтрихкодов/CommandModule.bsl @@ -9,4 +9,4 @@ // Подключение внешней компоненты НачатьУстановкуВнешнейКомпоненты(, "ОбщийМакет.ДрайверСканераШтрихкодов"); -КонецПроцедуры +КонецПроцедуры diff --git a/fixtures/demo-configuration/src/Configuration/OrdinaryApplicationModule.bsl b/fixtures/demo-configuration/src/Configuration/OrdinaryApplicationModule.bsl index c240a3b6..78652721 100644 --- a/fixtures/demo-configuration/src/Configuration/OrdinaryApplicationModule.bsl +++ b/fixtures/demo-configuration/src/Configuration/OrdinaryApplicationModule.bsl @@ -1,5 +1,5 @@ -//////////////////////////////////////////////////////////////////////////////// -// ПЕРЕМЕННЫЕ МОДУЛЯ -// - -Перем ДрайверСканераШтрихкодов Экспорт; // Сканер штрихкодов +//////////////////////////////////////////////////////////////////////////////// +// ПЕРЕМЕННЫЕ МОДУЛЯ +// + +Перем ДрайверСканераШтрихкодов Экспорт; // Сканер штрихкодов diff --git a/fixtures/demo-configuration/src/Documents/Заказ/Forms/ФормаДокумента/Module.bsl b/fixtures/demo-configuration/src/Documents/Заказ/Forms/ФормаДокумента/Module.bsl index c6de7336..7e22398e 100644 --- a/fixtures/demo-configuration/src/Documents/Заказ/Forms/ФормаДокумента/Module.bsl +++ b/fixtures/demo-configuration/src/Documents/Заказ/Forms/ФормаДокумента/Module.bsl @@ -5,33 +5,33 @@ &НаКлиенте Перем АдресТоваровВХранилище; -//////////////////////////////////////////////////////////////////////////////// -// ПРОЦЕДУРЫ И ФУНКЦИИ -// - -// Функция возвращает цену определенного товара на дату согласно виду цены -// -// Параметры: -// Дата – Дата – дата, на которую определяется цена. -// Товар – СправочникСсылка.Товары – товар, цена которого определяется. -// ВидЦен – СправочникСсылка.ВидыЦен – вид цены. -// -// Возвращаемое значение: -// Число - Цена товара на определенную дату, согласно виду цены. +//////////////////////////////////////////////////////////////////////////////// +// ПРОЦЕДУРЫ И ФУНКЦИИ +// + +// Функция возвращает цену определенного товара на дату согласно виду цены +// +// Параметры: +// Дата – Дата – дата, на которую определяется цена. +// Товар – СправочникСсылка.Товары – товар, цена которого определяется. +// ВидЦен – СправочникСсылка.ВидыЦен – вид цены. +// +// Возвращаемое значение: +// Число - Цена товара на определенную дату, согласно виду цены. &НаСервереБезКонтекста -Функция ПолучитьЦенуТовара(Дата, Товар, ВидЦен) - ЦенаТовара = РегистрыСведений.ЦеныТоваров.ПолучитьПоследнее( - Дата, Новый Структура("Товар, ВидЦен", Товар, ВидЦен)); - Возврат ЦенаТовара.Цена; -КонецФункции - -// Функция возвращает вид цены для указанного покупателя -// -// Параметры: -// Покупатель – СправочникСсылка.Контрагенты – контрагент. -// -// Возвращаемое значение: -// СправочникСсылка.ВидыЦен - Вид цены для указанного покупателя. +Функция ПолучитьЦенуТовара(Дата, Товар, ВидЦен) + ЦенаТовара = РегистрыСведений.ЦеныТоваров.ПолучитьПоследнее( + Дата, Новый Структура("Товар, ВидЦен", Товар, ВидЦен)); + Возврат ЦенаТовара.Цена; +КонецФункции + +// Функция возвращает вид цены для указанного покупателя +// +// Параметры: +// Покупатель – СправочникСсылка.Контрагенты – контрагент. +// +// Возвращаемое значение: +// СправочникСсылка.ВидыЦен - Вид цены для указанного покупателя. &НаСервереБезКонтекста Функция ПолучитьВидЦенПокупателя(Покупатель) Запрос = Новый Запрос(); @@ -41,7 +41,7 @@ Если Выборка.Следующий() Тогда Возврат Выборка.ВидЦен; КонецЕсли; - Возврат Справочники.ВидыЦен.ПустаяСсылка(); + Возврат Справочники.ВидыЦен.ПустаяСсылка(); КонецФункции // Функция определяет услуга это или нет @@ -50,19 +50,19 @@ Возврат ?(Товар.Вид = Перечисления.ВидыТоваров.Услуга, Истина, Ложь); -КонецФункции - +КонецФункции + // Процедура устанавливает цены товаров и вычисляет суммы по каждой строке -// табличной части Товары. -// -// Параметры: -// Нет. -// -// Возвращаемое значение: -// Нет. +// табличной части Товары. +// +// Параметры: +// Нет. +// +// Возвращаемое значение: +// Нет. &НаСервере Процедура ПересчитатьЦеныИСуммыТоваров(ПересчитатьДляВсехТоваров) - Запрос = Новый Запрос(); + Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | ЦеныТоваровСрезПоследних.Цена, | ЦеныТоваровСрезПоследних.Товар @@ -70,14 +70,14 @@ | РегистрСведений.ЦеныТоваров.СрезПоследних( | , | ВидЦен = &ВидЦены - | И Товар В (&Товары)) КАК ЦеныТоваровСрезПоследних"; + | И Товар В (&Товары)) КАК ЦеныТоваровСрезПоследних"; Запрос.УстановитьПараметр("ВидЦены", Объект.ВидЦен); - Товары = Новый Массив(); - Для каждого Стр Из Объект.Товары Цикл - Товары.Добавить(Стр.Товар); - КонецЦикла; + Товары = Новый Массив(); + Для каждого Стр Из Объект.Товары Цикл + Товары.Добавить(Стр.Товар); + КонецЦикла; Запрос.УстановитьПараметр("Товары", Товары); - + ТЗЦены = Запрос.Выполнить().Выгрузить(); ТЗЦены.Индексы.Добавить("Товар"); Для каждого Стр Из Объект.Товары Цикл @@ -93,8 +93,8 @@ Стр.СуммаИзменена = Ложь; Стр.ЭтоУслуга = ЭтоУслуга(Стр.Товар); КонецЦикла; -КонецПроцедуры - +КонецПроцедуры + // Функция помещает список товаров во временное хранилище и возвращает адрес &НаСервере Функция ПоместитьТоварыВХранилище() @@ -109,17 +109,17 @@ КонецПроцедуры -// Функция возвращает ссылку на текущую строку в списке товаров -// -// Параметры: -// Нет. -// -// Возвращаемое значение: -// СправочникСсылка.Товары - Текущий товар в списке. +// Функция возвращает ссылку на текущую строку в списке товаров +// +// Параметры: +// Нет. +// +// Возвращаемое значение: +// СправочникСсылка.Товары - Текущий товар в списке. &НаКлиенте -Функция ПолучитьТекущуюСтрокуТовары() - Возврат Элементы.Товары.ТекущиеДанные; -КонецФункции +Функция ПолучитьТекущуюСтрокуТовары() + Возврат Элементы.Товары.ТекущиеДанные; +КонецФункции // Процедура вычисляет дополнительные данные строки документа &НаКлиентеНаСервереБезКонтекста @@ -143,16 +143,16 @@ КонецФункции -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// &НаКлиенте Процедура ТоварыТоварПриИзменении(Элемент) - Стр = ПолучитьТекущуюСтрокуТовары(); + Стр = ПолучитьТекущуюСтрокуТовары(); Стр.ЭтоУслуга = ЭтоУслуга(Стр.Товар); Стр.Цена = ПолучитьЦенуТовара(Объект.Дата, Стр.Товар, Объект.ВидЦен); - Стр.Количество = ?(Стр.ЭтоУслуга ИЛИ Стр.Количество = 0, 1, Стр.Количество); + Стр.Количество = ?(Стр.ЭтоУслуга ИЛИ Стр.Количество = 0, 1, Стр.Количество); Стр.Сумма = Стр.Количество * Стр.Цена; ЗаполнитьДополнительныеДанныеСтроки(Стр); КонецПроцедуры @@ -177,15 +177,15 @@ &НаКлиенте Процедура ТоварыЦенаПриИзменении(Элемент) - Стр = ПолучитьТекущуюСтрокуТовары(); + Стр = ПолучитьТекущуюСтрокуТовары(); Стр.Сумма = Стр.Количество * Стр.Цена; ЗаполнитьДополнительныеДанныеСтроки(Стр); КонецПроцедуры &НаКлиенте Процедура ТоварыКоличествоПриИзменении(Элемент) - Стр = ПолучитьТекущуюСтрокуТовары(); - Стр.Сумма = Стр.Количество * Стр.Цена; + Стр = ПолучитьТекущуюСтрокуТовары(); + Стр.Сумма = Стр.Количество * Стр.Цена; ЗаполнитьДополнительныеДанныеСтроки(Стр); КонецПроцедуры @@ -194,8 +194,8 @@ Стр = ПолучитьТекущуюСтрокуТовары(); ЗаполнитьДополнительныеДанныеСтроки(Стр); КонецПроцедуры - -// Обработчик команды подбора + +// Обработчик команды подбора &НаКлиенте Процедура КомандаПодбор() #Если МобильныйКлиент Тогда @@ -206,7 +206,7 @@ АдресТоваровВХранилище = ПоместитьТоварыВХранилище(); ПараметрыПодбора = Новый Структура("АдресТоваровДокумента, ВидЦен, Склад", АдресТоваровВХранилище, Объект.ВидЦен, Объект.Склад); ФормаПодбора = ОткрытьФорму(Имя, ПараметрыПодбора, ЭтотОбъект); -КонецПроцедуры +КонецПроцедуры &НаКлиенте Процедура ОрганизацияПриИзменении(Элемент) diff --git a/fixtures/demo-configuration/src/Documents/ОперацияПоУчетуТоваров/Forms/ФормаДокумента/Module.bsl b/fixtures/demo-configuration/src/Documents/ОперацияПоУчетуТоваров/Forms/ФормаДокумента/Module.bsl index a877d820..ca717b8f 100644 --- a/fixtures/demo-configuration/src/Documents/ОперацияПоУчетуТоваров/Forms/ФормаДокумента/Module.bsl +++ b/fixtures/demo-configuration/src/Documents/ОперацияПоУчетуТоваров/Forms/ФормаДокумента/Module.bsl @@ -1,7 +1,7 @@ -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// - +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// + &НаКлиенте Процедура ОрганизацияПриИзменении(Элемент) diff --git a/fixtures/demo-configuration/src/Documents/ОперацияПоУчетуТоваров/ObjectModule.bsl b/fixtures/demo-configuration/src/Documents/ОперацияПоУчетуТоваров/ObjectModule.bsl index c578aa71..041171e1 100644 --- a/fixtures/demo-configuration/src/Documents/ОперацияПоУчетуТоваров/ObjectModule.bsl +++ b/fixtures/demo-configuration/src/Documents/ОперацияПоУчетуТоваров/ObjectModule.bsl @@ -1,26 +1,26 @@ -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// // Обработчик копирования документа выполняет также копирование движений -Процедура ПриКопировании(ОбъектКопирования) - ОбъектКопирования.Движения.ТоварныеЗапасы.Прочитать(); - Для каждого ИсхЗапись Из ОбъектКопирования.Движения.ТоварныеЗапасы Цикл - Запись = Движения.ТоварныеЗапасы.Добавить(); - Запись.ВидДвижения = ИсхЗапись.ВидДвижения; - Запись.Товар = ИсхЗапись.Товар; - Запись.Склад = ИсхЗапись.Склад; - Запись.Количество = ИсхЗапись.Количество; - КонецЦикла; -КонецПроцедуры +Процедура ПриКопировании(ОбъектКопирования) + ОбъектКопирования.Движения.ТоварныеЗапасы.Прочитать(); + Для каждого ИсхЗапись Из ОбъектКопирования.Движения.ТоварныеЗапасы Цикл + Запись = Движения.ТоварныеЗапасы.Добавить(); + Запись.ВидДвижения = ИсхЗапись.ВидДвижения; + Запись.Товар = ИсхЗапись.Товар; + Запись.Склад = ИсхЗапись.Склад; + Запись.Количество = ИсхЗапись.Количество; + КонецЦикла; +КонецПроцедуры // Обработчик события, предшествующего записи, устанавливает всем -// движениям дату самого документа -Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения) +// движениям дату самого документа +Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения) - Для каждого Запись Из Движения.ТоварныеЗапасы Цикл - Запись.Период = Дата; - КонецЦикла; + Для каждого Запись Из Движения.ТоварныеЗапасы Цикл + Запись.Период = Дата; + КонецЦикла; -КонецПроцедуры +КонецПроцедуры \ No newline at end of file diff --git a/fixtures/demo-configuration/src/Documents/Оплата/ObjectModule.bsl b/fixtures/demo-configuration/src/Documents/Оплата/ObjectModule.bsl index a9fcda91..153ee636 100644 --- a/fixtures/demo-configuration/src/Documents/Оплата/ObjectModule.bsl +++ b/fixtures/demo-configuration/src/Documents/Оплата/ObjectModule.bsl @@ -1,8 +1,8 @@ -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// - +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// + Процедура ОбработкаПроведения(Отказ, Режим) // Формирование движения регистра накопления Взаиморасчеты Движения.Взаиморасчеты.Записывать = Истина; @@ -10,7 +10,7 @@ Движение.ВидДвижения = ВидДвиженияНакопления.Расход; Движение.Период = Дата; Движение.Контрагент = Поставщик; - Движение.Сумма = Сумма; + Движение.Сумма = Сумма; Движение.Валюта = Валюта; КонецПроцедуры @@ -20,7 +20,7 @@ Поставщик = ДанныеЗаполнения.Поставщик; Организация = ДанныеЗаполнения.Организация; Сумма = ДанныеЗаполнения.Товары.Итог("Сумма"); - ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("СправочникСсылка.Контрагенты") Тогда + ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("СправочникСсылка.Контрагенты") Тогда ЗапросПоКонтрагенту = Новый Запрос("ВЫБРАТЬ | Контрагенты.ЭтоГруппа @@ -34,7 +34,7 @@ Возврат; КонецЕсли; - Поставщик = ДанныеЗаполнения.Ссылка; + Поставщик = ДанныеЗаполнения.Ссылка; КонецЕсли; КонецПроцедуры diff --git a/fixtures/demo-configuration/src/Documents/ПоступлениеДенег/ObjectModule.bsl b/fixtures/demo-configuration/src/Documents/ПоступлениеДенег/ObjectModule.bsl index 421a6c5f..1e120735 100644 --- a/fixtures/demo-configuration/src/Documents/ПоступлениеДенег/ObjectModule.bsl +++ b/fixtures/demo-configuration/src/Documents/ПоступлениеДенег/ObjectModule.bsl @@ -1,10 +1,10 @@ - -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// + +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// Процедура ОбработкаПроведения(Отказ, Режим) - // Формирование движения регистра накопления Взаиморасчеты + // Формирование движения регистра накопления Взаиморасчеты Движения.Взаиморасчеты.Записывать = Истина; Движение = Движения.Взаиморасчеты.Добавить(); Движение.ВидДвижения = ВидДвиженияНакопления.Приход; @@ -19,7 +19,7 @@ Валюта = ДанныеЗаполнения.Валюта; Покупатель = ДанныеЗаполнения.Покупатель; Организация = ДанныеЗаполнения.Организация; - ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("СправочникСсылка.Контрагенты") Тогда + ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("СправочникСсылка.Контрагенты") Тогда ЗапросПоКонтрагенту = Новый Запрос("ВЫБРАТЬ | Контрагенты.ЭтоГруппа @@ -33,7 +33,7 @@ Возврат; КонецЕсли; - Покупатель = ДанныеЗаполнения.Ссылка; + Покупатель = ДанныеЗаполнения.Ссылка; КонецЕсли; КонецПроцедуры diff --git a/fixtures/demo-configuration/src/Documents/ПриходТовара/Forms/ФормаДокумента/Module.bsl b/fixtures/demo-configuration/src/Documents/ПриходТовара/Forms/ФормаДокумента/Module.bsl index 2171bc38..e73758e8 100644 --- a/fixtures/demo-configuration/src/Documents/ПриходТовара/Forms/ФормаДокумента/Module.bsl +++ b/fixtures/demo-configuration/src/Documents/ПриходТовара/Forms/ФормаДокумента/Module.bsl @@ -1,14 +1,14 @@ -//////////////////////////////////////////////////////////////////////////////// -// ПРОЦЕДУРЫ И ФУНКЦИИ -// - -// Функция возвращает закупочную цену определенного товара на дату -// -// Параметры: -// Дата – Дата – дата, на которую определяется цена. -// Товар – СправочникСсылка.Товары – товар, цена которого определяется. -// -// Возвращаемое значение: +//////////////////////////////////////////////////////////////////////////////// +// ПРОЦЕДУРЫ И ФУНКЦИИ +// + +// Функция возвращает закупочную цену определенного товара на дату +// +// Параметры: +// Дата – Дата – дата, на которую определяется цена. +// Товар – СправочникСсылка.Товары – товар, цена которого определяется. +// +// Возвращаемое значение: // Число - Цена товара на определенную дату. &НаСервереБезКонтекста Функция ПолучитьЦенуТовара(Дата, Товар) @@ -21,29 +21,29 @@ КонецФункции -// Функция возвращает ссылку на текущую строку в списке товаров -// -// Параметры: -// Нет. -// -// Возвращаемое значение: -// СправочникСсылка.Товары - Текущий товар в списке. +// Функция возвращает ссылку на текущую строку в списке товаров +// +// Параметры: +// Нет. +// +// Возвращаемое значение: +// СправочникСсылка.Товары - Текущий товар в списке. &НаКлиенте Функция ПолучитьТекущуюСтрокуТовары() Возврат Элементы.Товары.ТекущиеДанные; -КонецФункции +КонецФункции -// Функция возвращает товар по штрихкоду +// Функция возвращает товар по штрихкоду &НаСервереБезКонтекста -Функция ПолучитьТоварПоШтрихкоду(Штрихкод) - Возврат Справочники.Товары.НайтиПоРеквизиту("Штрихкод", Штрихкод); -КонецФункции - - -// Функция добавляет товар в накладную или увеличивает кол-во уже добавленного +Функция ПолучитьТоварПоШтрихкоду(Штрихкод) + Возврат Справочники.Товары.НайтиПоРеквизиту("Штрихкод", Штрихкод); +КонецФункции + + +// Функция добавляет товар в накладную или увеличивает кол-во уже добавленного &НаКлиенте Функция ДобавитьТовар(Товар) - + Строки = Объект.Товары.НайтиСтроки(Новый Структура("Товар", Товар)); Если Строки.Количество() > 0 Тогда @@ -51,25 +51,25 @@ Элемент = Строки[0]; Иначе - - Элемент = Объект.Товары.Добавить(); - Элемент.Товар = Товар; + + Элемент = Объект.Товары.Добавить(); + Элемент.Товар = Товар; Элемент.Цена = ПолучитьЦенуТовара(Объект.Дата, Товар); - + КонецЕсли; - - Элемент.Количество = Элемент.Количество + 1; + + Элемент.Количество = Элемент.Количество + 1; Элемент.Сумма = Элемент.Количество * Элемент.Цена; Элементы.Товары.ТекущаяСтрока = Элемент.ПолучитьИдентификатор(); Элементы.Товары.ТекущийЭлемент = Элементы.Товары.ПодчиненныеЭлементы.ТоварыКоличество; Элементы.Товары.ИзменитьСтроку(); - -КонецФункции - -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// + +КонецФункции + +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// &НаКлиенте Процедура ТоварыТоварПриИзменении(Элемент) @@ -83,34 +83,34 @@ &НаКлиенте Процедура ТоварыЦенаПриИзменении(Элемент) - Стр = ПолучитьТекущуюСтрокуТовары(); + Стр = ПолучитьТекущуюСтрокуТовары(); Стр.Сумма = Стр.Количество * Стр.Цена; - + КонецПроцедуры &НаКлиенте Процедура ТоварыКоличествоПриИзменении(Элемент) - Стр = ПолучитьТекущуюСтрокуТовары(); + Стр = ПолучитьТекущуюСтрокуТовары(); Стр.Сумма = Стр.Количество * Стр.Цена; - + КонецПроцедуры -&НаКлиенте +&НаКлиенте Процедура ВнешнееСобытие(Источник, Событие, Данные) Если Источник = "СканерШтрихкода" Тогда Если ВводДоступен() Тогда - Товар = ПолучитьТоварПоШтрихкоду(Данные); - Если НЕ Товар.Пустая() Тогда - ДобавитьТовар(Товар); + Товар = ПолучитьТоварПоШтрихкоду(Данные); + Если НЕ Товар.Пустая() Тогда + ДобавитьТовар(Товар); КонецЕсли КонецЕсли - + КонецЕсли - -КонецПроцедуры + +КонецПроцедуры &НаКлиенте Процедура ОрганизацияПриИзменении(Элемент) diff --git a/fixtures/demo-configuration/src/Documents/ПриходТовара/ObjectModule.bsl b/fixtures/demo-configuration/src/Documents/ПриходТовара/ObjectModule.bsl index 32212929..d467041c 100644 --- a/fixtures/demo-configuration/src/Documents/ПриходТовара/ObjectModule.bsl +++ b/fixtures/demo-configuration/src/Documents/ПриходТовара/ObjectModule.bsl @@ -16,16 +16,16 @@ КонецЦикла; - // Создание движения в регистре накопления Взаиморасчеты + // Создание движения в регистре накопления Взаиморасчеты Движения.Взаиморасчеты.Записывать = Истина; - Движение = Движения.Взаиморасчеты.Добавить(); - Движение.ВидДвижения = ВидДвиженияНакопления.Приход; - Движение.Период = Дата; - Движение.Контрагент = Поставщик; + Движение = Движения.Взаиморасчеты.Добавить(); + Движение.ВидДвижения = ВидДвиженияНакопления.Приход; + Движение.Период = Дата; + Движение.Контрагент = Поставщик; Движение.Валюта = Валюта; Если Валюта.Пустая() Тогда - + Движение.Сумма = Товары.Итог("Сумма"); Иначе @@ -37,8 +37,8 @@ Иначе Движение.Сумма = Товары.Итог("Сумма") / Курс; КонецЕсли; - - КонецЕсли; + + КонецЕсли; КонецПроцедуры diff --git a/fixtures/demo-configuration/src/Documents/РасходТовара/Forms/ФормаДокумента/Module.bsl b/fixtures/demo-configuration/src/Documents/РасходТовара/Forms/ФормаДокумента/Module.bsl index 7ed8082a..3c89284f 100644 --- a/fixtures/demo-configuration/src/Documents/РасходТовара/Forms/ФормаДокумента/Module.bsl +++ b/fixtures/demo-configuration/src/Documents/РасходТовара/Forms/ФормаДокумента/Module.bsl @@ -5,33 +5,33 @@ &НаКлиенте Перем АдресТоваровВХранилище; -//////////////////////////////////////////////////////////////////////////////// -// ПРОЦЕДУРЫ И ФУНКЦИИ -// - -// Функция возвращает цену определенного товара на дату согласно виду цены -// -// Параметры: -// Дата – Дата – дата, на которую определяется цена. -// Товар – СправочникСсылка.Товары – товар, цена которого определяется. -// ВидЦен – СправочникСсылка.ВидыЦен – вид цены. -// -// Возвращаемое значение: -// Число - Цена товара на определенную дату, согласно виду цены. +//////////////////////////////////////////////////////////////////////////////// +// ПРОЦЕДУРЫ И ФУНКЦИИ +// + +// Функция возвращает цену определенного товара на дату согласно виду цены +// +// Параметры: +// Дата – Дата – дата, на которую определяется цена. +// Товар – СправочникСсылка.Товары – товар, цена которого определяется. +// ВидЦен – СправочникСсылка.ВидыЦен – вид цены. +// +// Возвращаемое значение: +// Число - Цена товара на определенную дату, согласно виду цены. &НаСервереБезКонтекста -Функция ПолучитьЦенуТовара(Дата, Товар, ВидЦен) - ЦенаТовара = РегистрыСведений.ЦеныТоваров.ПолучитьПоследнее( - Дата, Новый Структура("Товар, ВидЦен", Товар, ВидЦен)); - Возврат ЦенаТовара.Цена; -КонецФункции - -// Функция возвращает вид цены для указанного покупателя -// -// Параметры: -// Покупатель – СправочникСсылка.Контрагенты – контрагент. -// -// Возвращаемое значение: -// СправочникСсылка.ВидыЦен - Вид цены для указанного покупателя. +Функция ПолучитьЦенуТовара(Дата, Товар, ВидЦен) + ЦенаТовара = РегистрыСведений.ЦеныТоваров.ПолучитьПоследнее( + Дата, Новый Структура("Товар, ВидЦен", Товар, ВидЦен)); + Возврат ЦенаТовара.Цена; +КонецФункции + +// Функция возвращает вид цены для указанного покупателя +// +// Параметры: +// Покупатель – СправочникСсылка.Контрагенты – контрагент. +// +// Возвращаемое значение: +// СправочникСсылка.ВидыЦен - Вид цены для указанного покупателя. &НаСервереБезКонтекста Функция ПолучитьВидЦенПокупателя(Покупатель) Запрос = Новый Запрос(); @@ -41,7 +41,7 @@ Если Выборка.Следующий() Тогда Возврат Выборка.ВидЦен; КонецЕсли; - Возврат Справочники.ВидыЦен.ПустаяСсылка(); + Возврат Справочники.ВидыЦен.ПустаяСсылка(); КонецФункции // Функция определяет услуга это или нет @@ -50,19 +50,19 @@ Возврат ?(Товар.Вид = Перечисления.ВидыТоваров.Услуга, Истина, Ложь); -КонецФункции - +КонецФункции + // Процедура устанавливает цены товаров и вычисляет суммы по каждой строке -// табличной части Товары. -// -// Параметры: -// Нет. -// -// Возвращаемое значение: -// Нет. +// табличной части Товары. +// +// Параметры: +// Нет. +// +// Возвращаемое значение: +// Нет. &НаСервере Процедура ПересчитатьЦеныИСуммыТоваров(ПересчитатьДляВсехТоваров) - Запрос = Новый Запрос(); + Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | ЦеныТоваровСрезПоследних.Цена, | ЦеныТоваровСрезПоследних.Товар @@ -70,14 +70,14 @@ | РегистрСведений.ЦеныТоваров.СрезПоследних( | , | ВидЦен = &ВидЦены - | И Товар В (&Товары)) КАК ЦеныТоваровСрезПоследних"; + | И Товар В (&Товары)) КАК ЦеныТоваровСрезПоследних"; Запрос.УстановитьПараметр("ВидЦены", Объект.ВидЦен); - Товары = Новый Массив(); - Для каждого Стр Из Объект.Товары Цикл - Товары.Добавить(Стр.Товар); - КонецЦикла; + Товары = Новый Массив(); + Для каждого Стр Из Объект.Товары Цикл + Товары.Добавить(Стр.Товар); + КонецЦикла; Запрос.УстановитьПараметр("Товары", Товары); - + ТЗЦены = Запрос.Выполнить().Выгрузить(); ТЗЦены.Индексы.Добавить("Товар"); Для каждого Стр Из Объект.Товары Цикл @@ -93,8 +93,8 @@ Стр.СуммаИзменена = Ложь; Стр.ЭтоУслуга = ЭтоУслуга(Стр.Товар); КонецЦикла; -КонецПроцедуры - +КонецПроцедуры + // Функция помещает список товаров во временное хранилище и возвращает адрес &НаСервере Функция ПоместитьТоварыВХранилище() @@ -109,17 +109,17 @@ КонецПроцедуры -// Функция возвращает ссылку на текущую строку в списке товаров -// -// Параметры: -// Нет. -// -// Возвращаемое значение: -// СправочникСсылка.Товары - Текущий товар в списке. +// Функция возвращает ссылку на текущую строку в списке товаров +// +// Параметры: +// Нет. +// +// Возвращаемое значение: +// СправочникСсылка.Товары - Текущий товар в списке. &НаКлиенте -Функция ПолучитьТекущуюСтрокуТовары() - Возврат Элементы.Товары.ТекущиеДанные; -КонецФункции +Функция ПолучитьТекущуюСтрокуТовары() + Возврат Элементы.Товары.ТекущиеДанные; +КонецФункции // Процедура вычисляет дополнительные данные строки документа &НаКлиентеНаСервереБезКонтекста @@ -130,16 +130,16 @@ КонецПроцедуры -//////////////////////////////////////////////////////////////////////////////// -// ОБРАБОТЧИКИ СОБЫТИЙ -// +//////////////////////////////////////////////////////////////////////////////// +// ОБРАБОТЧИКИ СОБЫТИЙ +// &НаКлиенте Процедура ТоварыТоварПриИзменении(Элемент) - Стр = ПолучитьТекущуюСтрокуТовары(); + Стр = ПолучитьТекущуюСтрокуТовары(); Стр.ЭтоУслуга = ЭтоУслуга(Стр.Товар); Стр.Цена = ПолучитьЦенуТовара(Объект.Дата, Стр.Товар, Объект.ВидЦен); - Стр.Количество = ?(Стр.ЭтоУслуга ИЛИ Стр.Количество = 0, 1, Стр.Количество); + Стр.Количество = ?(Стр.ЭтоУслуга ИЛИ Стр.Количество = 0, 1, Стр.Количество); Стр.Сумма = Стр.Количество * Стр.Цена; ЗаполнитьДополнительныеДанныеСтроки(Стр); КонецПроцедуры @@ -164,15 +164,15 @@ &НаКлиенте Процедура ТоварыЦенаПриИзменении(Элемент) - Стр = ПолучитьТекущуюСтрокуТовары(); + Стр = ПолучитьТекущуюСтрокуТовары(); Стр.Сумма = Стр.Количество * Стр.Цена; ЗаполнитьДополнительныеДанныеСтроки(Стр); КонецПроцедуры &НаКлиенте Процедура ТоварыКоличествоПриИзменении(Элемент) - Стр = ПолучитьТекущуюСтрокуТовары(); - Стр.Сумма = Стр.Количество * Стр.Цена; + Стр = ПолучитьТекущуюСтрокуТовары(); + Стр.Сумма = Стр.Количество * Стр.Цена; ЗаполнитьДополнительныеДанныеСтроки(Стр); КонецПроцедуры @@ -181,8 +181,8 @@ Стр = ПолучитьТекущуюСтрокуТовары(); ЗаполнитьДополнительныеДанныеСтроки(Стр); КонецПроцедуры - -// Обработчик команды подбора + +// Обработчик команды подбора &НаКлиенте Процедура КомандаПодбор() #Если МобильныйКлиент Тогда @@ -193,7 +193,7 @@ АдресТоваровВХранилище = ПоместитьТоварыВХранилище(); ПараметрыПодбора = Новый Структура("АдресТоваровДокумента, ВидЦен, Склад", АдресТоваровВХранилище, Объект.ВидЦен, Объект.Склад); ФормаПодбора = ОткрытьФорму(Имя, ПараметрыПодбора, ЭтотОбъект); -КонецПроцедуры +КонецПроцедуры &НаСервере Процедура ПересчитатьНаСервере() diff --git a/fixtures/demo-configuration/src/HTTPServices/ОписанияТоваров/Module.bsl b/fixtures/demo-configuration/src/HTTPServices/ОписанияТоваров/Module.bsl index 1cbe4e05..2446dceb 100644 --- a/fixtures/demo-configuration/src/HTTPServices/ОписанияТоваров/Module.bsl +++ b/fixtures/demo-configuration/src/HTTPServices/ОписанияТоваров/Module.bsl @@ -39,8 +39,8 @@ Ответ.УстановитьТелоИзСтроки("Неизвестное имя метода"); КонецЕсли; - - Возврат Ответ; + + Возврат Ответ; КонецФункции diff --git a/fixtures/demo-configuration/src/HTTPServices/Товары/Module.bsl b/fixtures/demo-configuration/src/HTTPServices/Товары/Module.bsl index 31bcf907..1bf10a29 100644 --- a/fixtures/demo-configuration/src/HTTPServices/Товары/Module.bsl +++ b/fixtures/demo-configuration/src/HTTPServices/Товары/Module.bsl @@ -70,7 +70,7 @@ Возврат Ответ; - + КонецФункции Функция СоздатьXMLПоВыборке(Выборка) @@ -212,5 +212,5 @@ КонецПопытки; Возврат Ответ; - + КонецФункции diff --git a/fixtures/demo-configuration/src/Reports/ОстаткиТоваровНаСкладах/Commands/ОстаткиПоСкладу/CommandModule.bsl b/fixtures/demo-configuration/src/Reports/ОстаткиТоваровНаСкладах/Commands/ОстаткиПоСкладу/CommandModule.bsl index 13ed27c9..f121cd1b 100644 --- a/fixtures/demo-configuration/src/Reports/ОстаткиТоваровНаСкладах/Commands/ОстаткиПоСкладу/CommandModule.bsl +++ b/fixtures/demo-configuration/src/Reports/ОстаткиТоваровНаСкладах/Commands/ОстаткиПоСкладу/CommandModule.bsl @@ -4,5 +4,5 @@ ПараметрыФормы = Новый Структура("Отбор,КлючНазначенияИспользования,СформироватьПриОткрытии", Новый Структура("Склад", ПараметрКоманды), "ОстаткиПоСкладу", Истина); ОткрытьФорму("Отчет.ОстаткиТоваровНаСкладах.Форма", ПараметрыФормы, ПараметрыВыполненияКоманды.Источник, ПараметрыВыполненияКоманды.Уникальность, ПараметрыВыполненияКоманды.Окно); - + КонецПроцедуры