Народ помогите плиззз, нужно собрать именно из регистра остатки движение остатков, тоесть нач,приход,расход,кон остатков и движения документов по ним. есть ниже следующий запрос и он работает, НО не могу в Индтз вывести еще документы, тоесть чтобы по ним сгруппировать и получится по датам документов группировка, как в типовой версии 1С:Торговля Ведомость по остаткам!
[code] рс = СоздатьОбъект("ODBCRecordset"); рс.Отладка(1); ТекстЗапроса = "-- qryMaker:Отчет1.2008.07.22.16.13.43 |SELECT | ОборотыТМЦ.ТМЦ [ТМЦ $Справочник.ТМЦ] | , ОборотыТМЦ.Склад [Склад $Справочник.МестаХранения] | , ОборотыТМЦ.Фирма [Фирма $Справочник.Фирмы] | , Sum(ОборотыТМЦ.КоличествоНачальныйОстаток) НачКолОстаток | , Sum(ОборотыТМЦ.КоличествоПриход) КолПриход | , Sum(ОборотыТМЦ.КоличествоРасход) КолРасход | , Sum(ОборотыТМЦ.КоличествоКонечныйОстаток) КонКолОстаток | , Sum(ОборотыТМЦ.ТранспНачальныйОстаток) НачТранспОстаток | , Sum(ОборотыТМЦ.ТранспПриход) ТранспПриходС | , Sum(ОборотыТМЦ.ТранспРасход) ТранспРасходС | , Sum(ОборотыТМЦ.ТранспКонечныйОстаток) КонТранспОстаток |FROM $РегистрОстаткиОбороты.ОстаткиТМЦ(:ДатаНачала,:ДатаКонца~,Document,,,"; Если (ПустоеЗначение(Фирма)=0) и (ПустоеЗначение(Склад)=0) Тогда ТекстЗапроса=ТекстЗапроса+"(Фирма = :Фирма) AND (Склад = :Склад),"; ИначеЕсли ПустоеЗначение(Фирма)=0 Тогда ТекстЗапроса=ТекстЗапроса+"(Фирма = :Фирма),"; ИначеЕсли ПустоеЗначение(Склад)=0 Тогда ТекстЗапроса=ТекстЗапроса+"(Склад = :Склад),"; Иначе ТекстЗапроса=ТекстЗапроса+","; КонецЕсли; ТекстЗапроса = ТекстЗапроса+" | (Фирма, Склад, ТМЦ), | (Количество, Трансп)) AS ОборотыТМЦ (NoLock) |GROUP BY ОборотыТМЦ.Фирма | , ОборотыТМЦ.Склад | , ОборотыТМЦ.ТМЦ |"; рс.УстановитьТекстовыйПараметр("ДатаНачала",ДатаНачала); рс.УстановитьТекстовыйПараметр("ДатаКонца",ДатаКонца); рс.УстановитьТекстовыйПараметр("Фирма",Фирма); рс.УстановитьТекстовыйПараметр("Склад",Склад); рс.УстановитьТекстовыйПараметр("ТМЦ",ТМЦ); тз=СоздатьОбъект("ИндексированнаяТаблица"); рс.ВыполнитьИнструкцию(ТекстЗапроса,тз,1); тз.ВыбратьСтроку();
[/code]
|