Доброго времени суток!

Работать с ВК 1С++ начал только что... В связи с тем что базу перевели на скуль... База ТиС 9.2, двиг 27...

Тормозят отчеты и много е другое... Сделал вывод что единственный выход переписывать запросы на прямые. Возникли вопросы:

1. Возможны ли прямые запросу сразу к двум регистрам? что то типа вот этого:

     СтрПериод = ?(ДатаКонца>= ПолучитьДатуТА(),"",
     "Период с ДатаКонца по ДатаКонца;");      
     ТекстЗапроса =
     "//{{ЗАПРОС(Сформировать)
     |" + СтрПериод +
     "
     |Фирма                  = Регистр.ОстаткиТМЦ.Фирма,            
     |                 Регистр.РезервыТМЦ.Фирма;
     |УпрАналитика      = Регистр.ОстаткиТМЦ.Фирма.УпрАналитика,
     |                 Регистр.РезервыТМЦ.Фирма.УпрАналитика;
     |ЮрЛицо            = Регистр.ОстаткиТМЦ.Фирма.ЮрЛицо,      
     |                 Регистр.РезервыТМЦ.Фирма.ЮрЛицо;
     |Номенклатура      = Регистр.ОстаткиТМЦ.Номенклатура,      
     |                 Регистр.РезервыТМЦ.Номенклатура;
     |Склад                  = Регистр.ОстаткиТМЦ.Склад,            
     |                 Регистр.РезервыТМЦ.Склад;";
     
     ТекстЗапроса = ТекстЗапроса +
     "Количество = Регистр.ОстаткиТМЦ.Количество;
     |Резерв     = Регистр.РезервыТМЦ.Количество;
     |Функция КоличествоКонОст = КонОст(Количество);
     |Группировка Номенклатура"+?(ПоказатьОстатки.ТекущаяСтрока()>=2," Все","")+";";
                   
     Возврат ТекстЗапроса;
За конкретный пример как это будет выглядеть буду особенно благодарен!!

2. Приходится подрихтовать форму подбора (в части отображения остатков)... Воспользовался примером с мисты "Эффективное использование MSSQL ..." т.е.:

При открытии
 RS = СоздатьОбъект("ODBCRecordset");
           ТекстЗапроса = "
           |SELECT
           |    SUM($Рег.Количество) as Количество
           |FROM
           |    $РегистрИтоги.ОстаткиТМЦ as Рег
           |WHERE
           |    Рег.Period = :Дат AND
           |    $Рег.Склад = ? AND
           |    $Рег.Номенклатура = ?";      
     RS.УстановитьТекстовыйПараметр("Дат", ПолучитьДатуТА());            
   RS.Подготовить(ТекстЗапроса);
   RS.ПостроитьПараметры();
   RS.УстПараметр(1, Склад);
     
Функция ПолОстаток()
   RS.УстПараметр(2, ТекущийЭлемент());
   Возврат RS.ВыполнитьСкалярный();
КонецФункции

Показывает нули... Что не так?

Прошу прощение за возможно глупые вопросы!
Заранее спасибо за ответы...  

DrACe писал(а) 26. Мая 2009 :: 07:24:



Спасибо большое за ответ! Можно уточнить?

Как я понял в ВТ хранится запрос по одному регистру? примерно так:
     RS = СоздатьОбъект("ODBCRecordset");
     RS.УстБД1С();                   
     
     
     ТекстЗапроса = "
     |SELECT
     |    Рег.Номенклатура as [Номенклатура $Справочник.Номенклатура],
     |    Рег.КоличествоОстаток as Количество
     |FROM
     |    $РегистрОстатки.ОстаткиТМЦ(:Дат,,Номенклатура=:Ном AND Склад=:ВыбСклад,
     |                                                      Номенклатура, Количество) as Рег"; 
                 
     RS.УстановитьТекстовыйПараметр("Ном",Товар);
     RS.УстановитьТекстовыйПараметр("Дат",Дат);
     RS.УстановитьТекстовыйПараметр("ВыбСклад",Склад);
     
     ТЗ1 = RS.ВыполнитьИнструкцию(ТекстЗапроса);         
Т.е. для того чтобы мне получить резервы мне придется делать еще один запрос... Как я это понимаю... Или я не прав?

Спасибо!

DrACe писал(а) 26. Мая 2009 :: 07:38:


Вся фишка в том что со скулем то особо не знаком (пока... пытаюсь вникать по ходу)...
Еще раз спасибо!
Кстати точ то ты мне подсказал :
RS.УстановитьТекстовыйПараметр("Дат", НачМесяца(ПолучитьДатуТА())); Сработало!
Правда результат удручающий... работает медленнее чем штатная галка отображать остатки...