to Z1
т.е. так?

стрдатыТА=строка(формат(НачМесяца(ПолучитьДатуТА()),"ДГГГГММДД"));
глОстТовара = СоздатьОбъект("ODBCRecordset");
ТекстЗапроса = "
|SELECT
|      SUM($Рег.ОстатокТовара)
|FROM
|      $РегистрИтоги.ОстаткиТоваров Рег (NoLock)
|WHERE
|Рег.PERIOD= cast ('"+стрдатыТА+"'as datetime) AND
|      $Рег.Товар = ?
|";

P.S. А как очистить кеш?
по поводу 2 запросов, наверно, в этом есть смысл, но в данном случае я хотел оценить прирост производительности от прямых запросов по сравнению с реальной ситуацией. А сейчас получение остатков идет через Регистр.СводныйОстаток(), с маленькими нюансами - возможны фильтры еще по одному из измерений.

to Z1
а насчет разогрева Вы правы - несколько раз запускал повторно и каждый раз 1 попытка была дольше всех отстальных.
Но это не касается СводныйОстаток 

Z1 писал(а) 22. Сентября 2010 :: 14:40:


У меня он тоже выигрывает, но только при включенном Отборе Итогов
И только из кеша. 

Перед каждым пестом очищал кеш и буфер
Сформировать1 Стандартный сводный остаток
Сформировать2 Прямой запрос + Параметр как у Вас
(сам так никогда не пишу )
Сформировать3 Прямой запрос + УстановитьТекстовыйПараметр
(сам так всегда пишу )

Процедура Сформировать1()
 спр=СоздатьОбъект("Справочник.СкладскиеЯчейки");

     Для Инд=1 По 10 Цикл
	     Сообщить("Попытка № "+Инд);

	     спр.ВыбратьЭлементы(0);
	     А=0;
	     ОбщееНачало=_GetPerformanceCounter();
	     Пока Спр.ПолучитьЭлемент()=1 Цикл
		     Если Спр.ЭтоГруппа()=1 Тогда
			     Продолжить;
		     КонецЕсли;
		     );
		     А=А+1;
		     Если А=1000 Тогда
			     Прервать;
		     КонецЕсли;
	     КонецЦикла;
	     ОбщееВремя=(_GetPerformanceCounter()-ОбщееНачало)/1000;
	     Сообщить("Регистр = "+ОбщееВремя);
     КонецЦикла;
КонецПроцедуры


Процедура Сформировать2()
 	спр=СоздатьОбъект("Справочник.СкладскиеЯчейки");
	стрдатыТА=строка(формат(НачМесяца(ПолучитьДатуТА()),"ДГГГГММДД"));
	стрдатыТА = " cast('" + стрдатыТА + "' as " +  ТипДата_sql  + "  )";
    глОстТовара = СоздатьОбъект("ODBCRecordset");
ТекстЗапроса = "
     |SELECT
     |	SUM($Рег.ОстатокТовара)
     |FROM
     |	$РегистрИтоги.ОстаткиТоваров Рег (NoLock)
     |WHERE
     |	Рег.PERIOD="+стрдатыТА+" AND
     |	$Рег.СклЯчейка = ?
     |";
	Если глОстТовара.Подготовить(ТекстЗапроса)=0 тогда
	     сообщить("Ошибка подготовки запроса остатков по складу (гл)! "+глОстТовара.ПолучитьОписаниеОшибки()+РазделительСтрок+"Свяжитесь с админитсратором!!!");
     КонецЕсли;
	глОстТовара.ПостроитьПараметры();
     Для Инд=1 По 10 Цикл
	     Сообщить("Попытка № "+Инд);

	     спр.ВыбратьЭлементы(0);
	     А=0;
	     ОбщееНачало=_GetPerformanceCounter();
	     Пока Спр.ПолучитьЭлемент()=1 Цикл
		     Если Спр.ЭтоГруппа()=1 Тогда
			     Продолжить;
				КонецЕсли;
				глОстТовара.УстПараметр(1, Спр.ТекущийЭлемент() );
			     ост=глОстТовара.ВыполнитьСкалярный();
		     А=А+1;
		     Если А=1000 Тогда
			     Прервать;
		     КонецЕсли;
	     КонецЦикла;
	     ОбщееВремя=(_GetPerformanceCounter()-ОбщееНачало)/1000;
	     Сообщить("Прямойзапрос Параметр = "+ОбщееВремя);
     КонецЦикла;
КонецПроцедуры

Процедура Сформировать3()
 	спр=СоздатьОбъект("Справочник.СкладскиеЯчейки");
	стрдатыТА=строка(формат(НачМесяца(ПолучитьДатуТА()),"ДГГГГММДД"));
	стрдатыТА = " cast('" + стрдатыТА + "' as " +  ТипДата_sql  + "  )";
    глОстТовара = СоздатьОбъект("ODBCRecordset");
ТекстЗапроса = "
     |SELECT
     |	SUM($Рег.ОстатокТовара)
     |FROM
     |	$РегистрИтоги.ОстаткиТоваров Рег (NoLock)
     |WHERE
     |	Рег.PERIOD="+стрдатыТА+" AND
     |	$Рег.СклЯчейка = :Зн_Ячейки
     |";
	 глОстТовара.РежимRPC(1);
     Для Инд=1 По 10 Цикл
	     Сообщить("Попытка № "+Инд);

	     спр.ВыбратьЭлементы(0);
	     А=0;
	     ОбщееНачало=_GetPerformanceCounter();
	     Пока Спр.ПолучитьЭлемент()=1 Цикл
		     Если Спр.ЭтоГруппа()=1 Тогда
			     Продолжить;
				КонецЕсли;
				глОстТовара.УстановитьТекстовыйПараметр("Зн_Ячейки", Спр.ТекущийЭлемент());

			     ост=глОстТовара.ВыполнитьСкалярный();
		     А=А+1;
		     Если А=1000 Тогда
			     Прервать;
		     КонецЕсли;
	     КонецЦикла;
	     ОбщееВремя=(_GetPerformanceCounter()-ОбщееНачало)/1000;
	     Сообщить("Прямойзапрос   УстановитьТекстовыйПараметр= "+ОбщееВремя);
     КонецЦикла;
КонецПроцедуры

 

Z1 писал(а) 22. Сентября 2010 :: 14:53:


и код, пожалуйста, тоже

тест 3
Попытка № 1
Прямойзапрос   УстановитьТекстовыйПараметр= 0.824
Попытка № 2
Прямойзапрос   УстановитьТекстовыйПараметр= 0.766
Попытка № 3
Прямойзапрос   УстановитьТекстовыйПараметр= 0.764
Попытка № 4
Прямойзапрос   УстановитьТекстовыйПараметр= 0.774
Попытка № 5
Прямойзапрос   УстановитьТекстовыйПараметр= 0.795
Попытка № 6
Прямойзапрос   УстановитьТекстовыйПараметр= 0.762
Попытка № 7
Прямойзапрос   УстановитьТекстовыйПараметр= 0.778
Попытка № 8
Прямойзапрос   УстановитьТекстовыйПараметр= 0.761
Попытка № 9
Прямойзапрос   УстановитьТекстовыйПараметр= 0.765
Попытка № 10
Прямойзапрос   УстановитьТекстовыйПараметр= 0.763

Z1 писал(а) 22. Сентября 2010 :: 15:05:


А если вот так вот попробовать:
ТекстЗапроса = "
     |SET NOCOUNT ON
     |declare @ВыбЯчейка as VarChar(9)
     |SET @ВыбЯчейка = ?
     |SELECT
     |      SUM($Рег.ОстатокТовара)
     |FROM
     |      $РегистрИтоги.ОстаткиТоваров Рег (NoLock)
     |WHERE
     |      Рег.PERIOD="+стрдатыТА+" AND
     |      $Рег.СклЯчейка = @ВыбЯчейка
     |";
Сразу скажу - как часто упоминается на форуме sql.ru однозначное описание параметра по типу приводит к правильному построению плана запроса.