В начало

Автозаполнение цены

 

            Необходимо автоматически заполнять цену в документе «ПриходнаяНакладная», выбирая параметр «Цена» из непериодического регистра сведений «ЦеныПоставщиков».

Рис. 1. Структура документа «ПриходнаяНакладная» и регистра сведений «ЦеныПоставщиков» Рис. 1. Структура документа «ПриходнаяНакладная» и регистра сведений «ЦеныПоставщиков»

Рис. 1. Структура документа «ПриходнаяНакладная» и регистра сведений «ЦеныПоставщиков»

 

            Пишем в модуле формы документа «ПриходнаяНакладная» функцию для запроса цены из регистра сведений и процедуру для автозаполнения цены и пересчета итоговой суммы.

&НаСервере

Функция ЦенаИзРегистраСведений(НоменклатураИзДокумента)

       СтруктураПоиска = Новый Структура; //Создаем структуру

       СтруктураПоиска.Вставить("Контрагент", Объект.Контрагент);

       СтруктураПоиска.Вставить("Договор", Объект.Договор);

    СтруктураПоиска.Вставить("Номенклатура", НоменклатураИзДокумента);

        

       РезультатПоиска = РегистрыСведений.ЦеныПоставщиков.Получить(СтруктураПоиска);

       Возврат РезультатПоиска.Цена;

КонецФункции

 

&НаКлиенте

Процедура ТоварыНоменклатураПриИзменении(Элемент)

       Стр = Элементы.Товары.ТекущиеДанные; //Текущая строка табличной части

       Стр.Цена = ЦенаИзРегистраСведений(Стр.Номенклатура);

       Стр.Сумма = Стр.Цена * Стр.Количество;//Пересчет СУММЫ

КонецПроцедуры