Установить цены по виду цен соглашения на сервере

Функция ЗаполнитьЦеныПоСоглашениюСервер(ПоВсемСтрокам = Истина,НовыйДокумент)
Если ПоВсемСтрокам Тогда
МассивСтрок = Неопределено;
Иначе
//МассивСтрок = Новый Массив;
//Для Каждого Строка Из Элементы.Товары.ВыделенныеСтроки Цикл
//	МассивСтрок.Добавить(Объект.Товары.НайтиПоИдентификатору(Строка));
//КонецЦикла;
КонецЕсли;
НаборыВызовСервера.ДополнитьДоПолногоНабора(НовыйДокумент.Товары, МассивСтрок);
СтруктураПересчетаСуммы = ОбработкаТабличнойЧастиКлиентСервер.ПолучитьСтруктуруПересчетаСуммыНДСВСтрокеТЧ(НовыйДокумент);
СтруктураДействий = Новый Структура;
СтруктураДействий.Вставить("ПересчитатьСумму");
СтруктураДействий.Вставить("ПересчитатьСуммуНДС", СтруктураПересчетаСуммы);
СтруктураДействий.Вставить("ПересчитатьСуммуСНДС", СтруктураПересчетаСуммы);
СтруктураДействий.Вставить("ПересчитатьСуммуРучнойСкидки");
СтруктураДействий.Вставить("ПересчитатьСуммуСУчетомРучнойСкидки", Новый Структура("Очищать", Ложь));
СтруктураДействий.Вставить("ОчиститьАвтоматическуюСкидку");
ЦеныРассчитаны = ПродажиСервер.ЗаполнитьЦены(
НовыйДокумент.Товары,
МассивСтрок, // Массив строк или структура отбора
Новый Структура( // Параметры заполнения
"Дата, Валюта, Соглашение, Организация, РасчитыватьНаборы, ПоляЗаполнения",
НовыйДокумент.Дата,
НовыйДокумент.Валюта,
НовыйДокумент.Соглашение,
НовыйДокумент.Организация,
Истина,
"Цена, СтавкаНДС, ВидЦены, СрокПоставки"
),
СтруктураДействий);
Возврат ЦеныРассчитаны;
КонецФункции