Вась, я понимаю твое состояние, но ты бы успокоился, попробовал бы вопспользоваться поиском по этому ресурсу, эта тема тут обсасывалась неоднократно...
не найдешь, помогу тебе поисковиком воспользоваться...

pvase писал(а) 27. Октября 2006 :: 09:05:

ну как минимум $РегистрОстаткиОбороты

pvase писал(а) 27. Октября 2006 :: 09:05:

думаю стоит почитать:
http://www.1cpp.ru/forum/YaBB.pl?num=1158643277/0#0
http://www.1cpp.ru/forum/YaBB.pl?num=1157379745/0#0
и аналогичные ветки... а вообще очень сильно помогает дока, в твоем случае нада с доки начинать... причем по SQL...

pvase писал(а) 27. Октября 2006 :: 09:39:

Вась, ни в одной доке не рекомендуют делать группировку по полю, по которому нет индекса, в то время, когда есть связанное с ним поле, по которому есть индекс, а тем более уникальных... на основании какой доки ды фиганул группировку по полю, по которому нет индекса?

5-й ответ был по опводу твоей статьи...
а речь об индексах не о твоей временной таблице, а том как ты строишь запрос к существующим таблицам...

Вася, сколько раз тебе объяснять, что 1С++ - это чистый T-SQL, за исключением того, что у него есть свой метапарсер, который облегчает тебе работу с объектами 1С???

а может все таки

select TabDate.MyDate, TabOst. ...
from TabDate
left outer join $VT...  as TabOst ON TabData.MyDate=TabOst.Date 

berezdetsky писал(а) 27. Октября 2006 :: 11:55:

ты точно в этом уверен?

просто мое решение по Все Дни, а у тя Все Дни + Все Клиенты

У Васи просто изначально было:

Таблица остатков left join Таблица дат 

я как бы ему на это указал, он согласился через 3 года шо этот джоин никакого ни физического, ни логического смысла не несет, но при этом стал везде справшивать как же все таки ему то сделать, не понимая что всего то навсего ему нада было стороны поменять... вобщем судя по тому шо Вася не понимает 3-й день чо ему сделать чтобы появились "провалившиеся" даты, мной был сделан вывод что он не совсем понимает что тако джион вообще, и уже 3-й день советую ознакомиться с документацией, у Васи же 1С++ уже 3-й виновата в том, что не так приджинивается у него все, хотя изначально он 1С++ не юзал...

berezdetsky писал(а) 27. Октября 2006 :: 11:55:

А как я могу в запросе, указанном в 0, обратится в вирутальной таблице, ведь она создается во время выполнения запроса? Как я могу знать ее имя, или есть зитрое указание на данные с VT?

pvase писал(а) 27. Октября 2006 :: 12:59:
 
Цитата:

Или я не понял вопрос.

pvase писал(а) 27. Октября 2006 :: 13:23:

ВТ - это Виртуальная Таблица
Вась, сколько раз мне тебе посоветовать прочесть доку и не пытаться атаковать ветрянные мельницы?
причем доку как по SQL, так и 1С++
в миллионный раз повторяю, 1С++ это тоже самое что и T-SQL...

Цитата:

$РегистрОстаткиОбороты - является вирутальной таблицей. К вашему сведению в T-SQL вирутальной таблицы вообще нет, она есть только в описании к 1С++, а єто типичаня временная таблица, причем даже не уверен что эта таблица вообще полностью висит в tempdb, скорее всего она там как хранилище, а разные методы с виртуальными таблицами - есть просто обработка самой временной таблицей (хотя могу и ошибатся, возможно что временную таблицу каждый раз создают и каждый раз это новая ВТ, но не думаю что разработчики 1С++ не могли предусмотреть оставлять ее в tempdb и дальнейшуюю ее обработку через методы, по принципу временных иртогов в 1С).

Цитата:

Я не спорю компонента суппер, и можно что хочешь в ней исправить (если знаешь С++).
А на счет select ... from Tab1 "join" (select ... from Tab2) as Tab3 ON Tab1....=Tab3.... - полностью согласен, если долго не работешь с подобным начинаешь забывать, надо подчитать (хотя помню что читал же это года 3 назад), но уже все забыл .

Вот пример. Правда так и не получилось запихнуть в подзарос (виртуальную таблицу) все даты - поэтому пришлось извратиться с временной таблицей:

	НачДата = '01.01.2006';
	КонДата = '30.09.2006';
	глODBCRecordset.Отладка(1);
	глODBCRecordset.ВыполнитьСкалярный("
	|IF EXISTS (SELECT * from tempdb..sysobjects where id = object_id('tempdb..#ТабИт'))
	|DROP TABLE #ТабИт");
	глODBCRecordset.УстановитьТекстовыйПараметр("НачДата",НачДата);
	глODBCRecordset.УстановитьТекстовыйПараметр("КонДата",КонДата);
	Текст = "
	|
	|SELECT
	|    Рег.Клиент as Клиент,
	|    Рег.Период AS Период,
	|    Рег.СуммаГРННачальныйОстаток as СуммаГРННачальныйОстаток,
	|    Рег.СуммаГРНПриход as СуммаГРНПриход,
	|    Рег.СуммаГРНРасход as СуммаГРНРасход,
	|    Рег.СуммаГРНКонечныйОстаток as СуммаГРНКонечныйОстаток
	|INTO #ТабИт
	|FROM
	|    $РегистрОстаткиОбороты.Взаиморасчеты(:НачДата, :КонДата~, День, ДвиженияИГраницыПериода,
	|										 ,,
	|										(Клиент), (СуммаГРН)) as Рег
	|";      
	глODBCRecordset.ВыполнитьСкалярный(Текст);
	Текст = "
	|Declare @PERIODN Char(8)
	|Declare @PERIODK Char(23)
	|SET @PERIODN = '"+глMDW.ПолучитьСтрИзДаты(НачДата)+"'			  -- Начало периода
	|SET @PERIODK = '"+глMDW.ПолучитьСтрИзДаты(КонДата)+"'			  -- Конец периода
    |
	|IF EXISTS (SELECT * from tempdb..sysobjects where id = object_id('tempdb..#Клиенты_Дата'))
	|DROP TABLE #Клиенты_Дата
	|
	|SELECT ТабКл.Клиент, ТабД.Дата
	|INTO #Клиенты_Дата
	|FROM (SELECT DISTINCT Клиент FROM #ТабИт) AS ТабКл,
	|(select A.date AS Дата
	|from (select date = cast((b.number * 0x100) + a.number as datetime)
	|from master..spt_values a
	|join master..spt_values b
	|	on (b.number * 0x100) + a.number <= cast(cast(@PERIODK  as datetime) as integer)
	|	and (b.number * 0x100) + a.number >= cast(cast(@PERIODN as datetime) as integer)
	|where
	|	a.type = 'p'
	|	and b.type = 'p'
	|	and b.number * 0x100 <= cast(cast(@PERIODK as datetime) as integer)
	|) as A
	|--order by A.date
	|) AS ТабД";
	глODBCRecordset.ВыполнитьСкалярный(Текст);
	Текст = "
	|SELECT
	|	T.Клиент AS [Клиент $Справочник.Клиенты],
	|	T.Дата AS Дата,
	|	SUM(ISNULL(T.СуммаГРННачальныйОстаток,0)) AS СуммаГРННачальныйОстаток,
	|	SUM(ISNULL(T.СуммаГРНПриход,0)),
	|	SUM(ISNULL(T.СуммаГРНРасход,0)),
	|	SUM(ISNULL(T.СуммаГРНКонечныйОстаток,0))
	|FROM(
	|	SELECT
	|		ПолнТаб.Клиент,
	|		ПолнТаб.Дата,
	|		CASE WHEN ТабДан.СуммаГРННачальныйОстаток IS NOT NULL THEN ТабДан.СуммаГРННачальныйОстаток ELSE
	|		(SELECT Таб2.СуммаГРННачальныйОстаток FROM #ТабИт AS Таб2 WHERE (Таб2.Клиент = ПолнТаб.Клиент) AND (Таб2.Период = (SELECT MAX(Таб3.Период) FROM #ТабИт AS Таб3 WHERE (Таб3.Клиент = ПолнТаб.Клиент) AND (Таб3.Период <=ПолнТаб.Дата))))
	| 		END
	|		AS СуммаГРННачальныйОстаток,
	|		ТабДан.СуммаГРНПриход AS СуммаГРНПриход,
	|		ТабДан.СуммаГРНРасход AS СуммаГРНРасход,
	|		CASE WHEN ТабДан.СуммаГРНКонечныйОстаток IS NOT NULL THEN ТабДан.СуммаГРНКонечныйОстаток ELSE
	|		(SELECT Таб2.СуммаГРНКонечныйОстаток FROM #ТабИт AS Таб2 WHERE (Таб2.Клиент = ПолнТаб.Клиент) AND (Таб2.Период = (SELECT MAX(Таб3.Период) FROM #ТабИт AS Таб3 WHERE (Таб3.Клиент = ПолнТаб.Клиент) AND (Таб3.Период <=ПолнТаб.Дата))))
	|		END	AS СуммаГРНКонечныйОстаток
	|
	|	FROM #Клиенты_Дата AS ПолнТаб
	|	LEFT OUTER JOIN #ТабИт AS ТабДан
	|		ON ((ПолнТаб.Клиент = ТабДан.Клиент) AND (ПолнТаб.Дата = ТабДан.Период))
	|	) AS T
	|GROUP BY
	|	T.Клиент,
	|	T.Дата
	|ORDER BY
	|	T.Клиент,
	|	T.Дата";
	ТЗ = СоздатьОбъект("ТаблицаЗначений");
	Попытка
		//ТЗ = глODBCRecordset.ВыполнитьИнструкцию("SELECT * FROM #ТабИт ORDER BY Клиент, Период");
		ТЗ = глODBCRecordset.ВыполнитьИнструкцию(Текст);
	Исключение      
		глODBCRecordset.ПолучитьОписаниеОшибки();
		Сообщить(Текст);
	КонецПопытки;
 

Не уверен что и этот код оптимальный по скорости выполнения, так как получение итоговой таблицы возложено на SQL, хотя можно было прямо в 1С проверять, если остатки равны 0 (NULL в запросе) - то брать последний существующий сотаток.

Прошу прощения. не очень вчитывался в тему. возможно это и обсуждалось выше. Времени нет =(

реализовать ключевое слова "все" в sql можно через OLAP кубы... это обсуждалось на itland.ru

http://itland.ru/forum//index.php?showtopic=10356&st=0

berezdetsky писал(а) 27. Октября 2006 :: 11:41:

Это все работает, но в записях с вставленными записями дней остаток всегда ноль, а это не правильно.
Может кто знает как заполнить остатки в запросе по вставленным дням

berezdetsky писал(а) 09. Ноября 2006 :: 16:17:


Спасибо, правда я уже сам допер.
а идея такая-же <= :КонДата

Короче вот как у меня получилось


процедура РасчетКолвоДней()
     рс.ВыполнитьИнструкцию("CREATE TABLE #Дни (День DateTime)");
     для промДата=НачДата по КонДата Цикл          
           рс.УстановитьТекстовыйПараметр("промДата",промДата);
           рс.ВыполнитьИнструкцию("INSERT #Дни VALUES (:промДата)");
     КонецЦикла;

     рс.УстановитьТекстовыйПараметр("НачДата",НачДата);
     рс.УстановитьТекстовыйПараметр("КонДата",КонДата);
     рс.УложитьСписокОбъектов(ВыбТовары, "#ВыбТовары", "Номенклатура");
     рс.УложитьСписокОбъектов(ВыбВидыДеятельности, "#Производители", "Контрагенты"); [/tt]      
     
     
     
     рс.УстановитьТекстовыйПараметр("ВыбТовары",ВыбТовары.РазмерСписка());
     писка());

     Состояние("Расчет остатков...");

     ТекстЗапроса = "
     |select Товар, Период, ОстатокТовараНАчальныйОстаток  ОстатокТовараНАчальныйОстаток
     |,ОстатокТовараПриход ОстатокТовараПриход
     |,ОстатокТовараПриход ОстатокТовараРасход          
     |,ОстатокТовараКонечныйОстаток ОстатокТовараКонечныйОстаток
     |into #ОстаткиТоваров
     |from
     |$РегистрОстаткиОбороты.ОстаткиТоваров(:НачДата,:КонДата~,День
     |            ,ActionsAndPeriodBoundaries
     |       ,
     |            INNER JOIN $Справочник.Номенклатура Товары ON Товары.id = Товар
     |            ,
     |            (:ВыбТовары='0' or Товар in (select val from #ВыбТовары))
     |and      (:ВыбВидыДеятельности='0' or $Товары.Производитель in (select val from #Производители))
     |            ,Товар,ОстатокТовара)  ОстаткиТоваров
     |";  
     тб = рс.ВыполнитьИнструкцию(ТекстЗапроса);
     //тб.ВыбратьСтроку();

     Состояние("Расчет кол-ва дней...");
     рс.УстановитьТекстовыйПараметр("ВыбТовары",ВыбТовары.РазмерСписка());
     писка());
     
     
     тб = СоздатьОбъект("ТаблицаЗначений");
     ТекстЗапроса = "
     |select ДниТовары.Товар, ДниТовары.День,
     |CASE WHEN
     |isnull(Остатки.ОстатокТовараНАчальныйОстаток+Остатки.ОстатокТовараПриход,
     |(select top 1 Ост.ОстатокТовараКонечныйОстаток from #ОстаткиТоваров Ост
     |where Ост.Период <= ДниТовары.День and Ост.Товар = ДниТовары.Товар
     |order by Ост.Товар, Ост.Период Desc
     |))
     |>0 THEN 1 ELSE 0 END
     |ЕстьОстаток
     |from
     |(select День, Тов.id Товар  from #Дни CROSS JOIN $Справочник.Номенклатура Тов
     |Where (:ВыбТовары='0' or Тов.id in (select val from #ВыбТовары))
     |and (:ВыбВидыДеятельности='0' or $Тов.Производитель in (select val from #Производители))
     |) ДниТовары
     |LEFT OUTER JOIN
     |#ОстаткиТоваров  as Остатки ON Остатки.Период = ДниТовары.День and Остатки.Товар = ДниТовары.Товар
     |";  
     
     ТекстЗапроса = "
     |SELECT Товар,
     //|ЕстьОстаток, День
     |SUM(ЕстьОстаток) КолДней
     |INTO #Остатки
     |FROM ("+ТекстЗапроса+") ЕстьОстатки
     |GROUP BY Товар
     //|order by Товар, День
     |";
     
     тб = рс.ВыполнитьИнструкцию(ТекстЗапроса);
конецпроцедуры