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

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