Вот стандартный:

ВремРегистры = СоздатьОбъект("Регистры");
ВремВСклад = ВремРегистры.ВСклад;

Если ИтогиАктуальны()=0 Тогда
	ВремВСклад.ВременныйРасчет(1);
	ВремРегистры.РассчитатьРегистрыНа(ТекущийДокумент());
КонецЕсли;

ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
	Партии.УстановитьЗначениеФильтра("Товар", Товар,1);
	Партии.УстановитьЗначениеФильтра("Клиент", Клиент,1);
	Партии.УстановитьЗначениеФильтра("Заявка",ДокументИсточник,1);

	Партии.ВыгрузитьИтоги(ТаблИтогов,1,1);

	"Тут алгоритм обхода полученной ТЗ"
КонецЦикла;
 

А вот мой:

ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
	ЗапросВСклад = СоздатьОбъект("ODBCRecordSet");
	ТекстЗапросаВСклад = "
	|SELECT
	|	Рег.Товар	as [Товар 	$Справочник.Товары],
	|	Рег.Клиент	as [Клиент 	$Справочник.Клиенты],
	|	Рег.Заявка	as [Заявка 	$Документ],
	|	Рег.Счет	as [Счет 	$Документ],
	|   Рег.БазоваяСтоимостьОстаток	as БазоваяСтоимость,
	|   Рег.ОстатокТовараОстаток	as ОстатокТовара
	|FROM
	|	$РегистрОстатки.ВСклад(:ДатаРасчета~,,Товар = :Товар AND Клиент=:Клиент AND Заявка=:Заявка,(Товар,Клиент,Заявка,Счет), (БазоваяСтоимость,ОстатокТовара)) as Рег";

	ЗапросВСклад.УстановитьТекстовыйПараметр("ДатаРасчета",ДатаРасчета);
	ЗапросВСклад.УстановитьТекстовыйПараметр("Товар",Товар);
	ЗапросВСклад.УстановитьТекстовыйПараметр("Клиент",Клиент);
	ЗапросВСклад.УстановитьТекстовыйПараметр("Заявка",ДокументИсточник);

	Попытка
		ТаблИтогов = ЗапросВСклад.ВыполнитьИнструкцию(ТекстЗапросаВСклад);
	Исключение
		Сообщить(ЗапросВСклад.ПолучитьОписаниеОшибки());
	КонецПопытки;


	"Тут алгоритм обхода ТЗ"
КонецЦикла;
 

А зачем в цикле? Нельзя сразу для всех строк 1 запрос выполнить?

А  поле "Заявка" входит в индексы(отбор итогов, движений)?

kiruha писал(а) 15. Сентября 2008 :: 12:33:


Спасибо. Попробую индексы врубить, т.к. сейчас они отключены, но всетаки склоняюсь к устранению цикла и общете всего в запросе =\ думаю только так выйграю в скорости.

Дело в том, что  есть колчиество "Н" указанное в табличной части документа.
И Полученные результаты перебираются и списываются в разрезе "Заявок" и "Счетов", пока суммовое количество списания "ОстатокТовара" не достигнет "Н".

Пример:

Необходимо списать "Н" - 10 штук (количество по строке указанное в ТЧ).
Запрос вернул 5 строк с количеством (2,4,1,10,11).

Дак вот списание будет такое:
Заявка1, Счет1, колво - 2
Заявка1, Счет2, колво - 4
Заявка1, Счет3, колво - 1
Заявка1, Счет4, колво - 3 из 10

, а 11 будут не тронуты.

Как это реализовать без цикла пока ума не приложу.

А еще проще можно сделать с использованием индексированной таблицы