Видимо я совсем отупел, что не могу перевести "черный" запрос в прямой

Это "черный"
     Запрос = СоздатьОбъект("Запрос");
     
     ТекстЗапроса =
     "//{{ЗАПРОС(ЗаказНаряд)
     |Период с ДатаНачала по ДатаКонца;
     |ОбрабатыватьДокументы Проведенные;
     |Курс = Документ.ЗаказНаряд.Курс;
     |ЗаказНаряд = Документ.ЗаказНаряд.ТекущийДокумент;
     |Номенклатура = Документ.ЗаказНаряд.Номенклатура;
     |Сумма = Документ.ЗаказНаряд.Сумма;
     |Функция ВсегоСуммаЗЧ = Сумма(Сумма*(?(ПустоеЗначение(Курс)=1,1,Курс))) Когда (Номенклатура.Вид() = ""Номенклатура"");
     |Функция ВсегоСуммаРаб = Сумма(Сумма*(?(ПустоеЗначение(Курс)=1,1,Курс))) Когда (Номенклатура.Вид() = ""ПереченьРабот"");
     |Группировка ЗаказНаряд упорядочить по ЗаказНаряд.ДатаДок;
     |"//}}ЗАПРОС
    ;
     // Если ошибка в запросе, то выход из процедуры
     Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
           Возврат;
     КонецЕсли; 
     ТЗ = СоздатьОбъект("ТаблицаЗначений");
     Запрос.Выгрузить(ТЗ, 1, 0);
     ТЗ.ВыбратьСтроку();

А дальше полный тупняк, дошел только сюда и все:

ТекстЗапроса = "
     |SELECT
     |  Жур.IDDoc as [Док $Документ],
     |  Жур.IDDocDef as Док_вид,
     |  Док.$ОбщийРеквизит.Курс as Курс
     |FROM
     |  1SJourn Жур
     |INNER JOIN
     |  $Документ.ЗаказНаряд as Док ON Док.IDDoc = Жур.IDDoc
     |WHERE
     |  Жур.Date BETWEEN :НачДата~~ AND :КонДата~~ AND
     |  Жур.IDDocDef = $ВидДокумента.ЗаказНаряд AND
     |  Жур.Closed = 1";
     ЗапросДБФ.УстановитьТекстовыйПараметр("НачДата", ДатаНачала);
     ЗапросДБФ.УстановитьТекстовыйПараметр("КонДата", ДатаКонца);
     ТЗ = ЗапросДБФ.ВыполнитьИнструкцию(ТекстЗапроса);
     ТЗ.ВыбратьСтроку();

Может не туда иду? Пните в нужном направлении, пожалуйста...

kiruha писал(а) 17. Апреля 2008 :: 14:21:


А как в данном случае получить в выходной таблице сам документ?
Понятно, что таб часть должна участвовать в запросе. Однако мне
надо получить на выходе:

Док                                СуммаЗЧ                       СуммаРабот

Заказ-наряд №1             100                                120
Заказ-наряд №2             1000                              1200         и т. д.

По отдельности к документам за период и табличным частям получается выполнить,
а как их связать вместе ума не приложу.

kiruha писал(а) 18. Апреля 2008 :: 06:07:


Спасибо, kiruha, что не оставляешь. Наверное, да, сложноват. Но ведь и хочется 
оптимизировать рабочую обработку.

Вот так работает, но выводит документ столько раз, сколько строк в табличной части.
Как свернуть?

ТекстЗапроса = "
    |SELECT
    |  Жур.IDDoc as [Док $Документ],
    |  Жур.IDDocDef as Док_вид
    |FROM
    |  $ДокументСтроки.ЗаказНаряд as ТаблЧастьЗаказ
    |LEFT JOIN
    |  1SJourn as Жур ON Жур.IDDoc = ТаблЧастьЗаказ.IDDoc
    |WHERE
    |  Жур.Date BETWEEN :НачДата~~ AND :КонДата~~ AND
    |  Жур.IDDocDef = $ВидДокумента.ЗаказНаряд AND
    |  Жур.Closed = 1";

 

kiruha писал(а) 18. Апреля 2008 :: 08:25:



ОК. Этап 2 пройден на мой взгляд успешно. Группировка работает.
В ниже приведенном коде (на мой взгляд) должна быть сумма только
по номенклатуре, исключая работы. Ан нет все равно общая сумма по документу.
Что не так?

 ТекстЗапроса = "
    |SELECT
    |   Жур.IDDoc as [Док $Документ.ЗаказНаряд],
    |   SUM($ТаблЧастьЗаказ.Сумма) as Сумма
    |FROM
    |   $ДокументСтроки.ЗаказНаряд as ТаблЧастьЗаказ
    |INNER JOIN
    |	$Справочник.Номенклатура AS Номенклатура ON $ТаблЧастьЗаказ.Номенклатура = Номенклатура.ID
    |LEFT JOIN
    |   1SJourn as Жур ON Жур.IDDoc = ТаблЧастьЗаказ.IDDoc
    |WHERE
    |   Жур.Date BETWEEN :НачДата~~ AND :КонДата~~ AND
    |   Жур.IDDocDef = $ВидДокумента.ЗаказНаряд AND
    |   Жур.Closed = 1
    |GROUP BY
    |   Жур.IDDoc ";
 

JohnyDeath писал(а) 18. Апреля 2008 :: 09:00:


"Номенклатура" - справочник Номенклатура
"Работа"             - справочник ПереченьРабот

В табличной части документа Идентификатор колонки Номенклатура тип Справочник,
т. е. может быть как Номенклатура тик и ПереченьРабот

По-моему достатосно просто "нормально" соединиться по INNER

kiruha писал(а) 18. Апреля 2008 :: 10:19:


Эти два этапа положительного результата не дали.
СуммаЗЧ = 0, Где ошибка;

 ТекстЗапроса = "
    |SELECT
    |   Жур.IDDoc as [Док $Документ.ЗаказНаряд],
    |   SUM(ICASE(ISNULL(Номенклатура.ID), 0 ,$ТаблЧастьЗаказ.Сумма)) as СуммаЗЧ
    |FROM
    |   $ДокументСтроки.ЗаказНаряд as ТаблЧастьЗаказ
    |LEFT JOIN
    |	$Справочник.Номенклатура AS Номенклатура ON $ТаблЧастьЗаказ.Номенклатура = Номенклатура.ID
    |LEFT JOIN
    |   1SJourn as Жур ON Жур.IDDoc = ТаблЧастьЗаказ.IDDoc
    |WHERE
    |   Жур.Date BETWEEN :НачДата~~ AND :КонДата~~ AND
    |   Жур.IDDocDef = $ВидДокумента.ЗаказНаряд AND
    |   Жур.Closed = 1
    |GROUP BY
    |   Жур.IDDoc";
 

kiruha писал(а) 18. Апреля 2008 :: 12:17:


Огроменное спасибо за пинки и подсказки.
Вот так все работает.

ТекстЗапроса = "
    |SELECT
    |   Жур.IDDoc as [Док $Документ.ЗаказНаряд],
    |   SUM(ICASE(ISNULL(Номенклатура.ID), 0 ,$ТаблЧастьЗаказ.Сумма)) as СуммаЗЧ,
    |   SUM(ICASE(ISNULL(ПереченьРабот.ID), 0 ,$ТаблЧастьЗаказ.Сумма)) as СуммаРаб
    |FROM
    |   $ДокументСтроки.ЗаказНаряд as ТаблЧастьЗаказ
    |LEFT JOIN
    |	$Справочник.Номенклатура AS Номенклатура ON RIGHT($ТаблЧастьЗаказ.Номенклатура,9) = Номенклатура.ID
    |LEFT JOIN
    |	$Справочник.ПереченьРабот AS ПереченьРабот ON RIGHT($ТаблЧастьЗаказ.Номенклатура,9) = ПереченьРабот.ID
    |LEFT JOIN
    |   1SJourn as Жур ON Жур.IDDoc = ТаблЧастьЗаказ.IDDoc
    |WHERE
    |   Жур.Date BETWEEN :НачДата~~ AND :КонДата~~ AND
    |   Жур.IDDocDef = $ВидДокумента.ЗаказНаряд AND
    |   Жур.Closed = 1
    |GROUP BY
    |   Жур.IDDoc";
 

А можно следующий пинок в сторону "высшей математики" (попадание в индекс)?

Kondarat писал(а) 19. Апреля 2008 :: 06:55:


Еще не до конца.
Возможна ситуация когда Номенклатура.ID и ПереченьРабот.ID совпадут - тогда результат будет неверен.
В соединении ON еще необходимо добавить условие что
$ТаблЧастьЗаказ.Номенклатура именно нужный справочник.

В принципе после этого можно будет обойтись вообще без соединения - а сразу прописать условие в ICASE

kiruha писал(а) 19. Апреля 2008 :: 08:14:


Да, блин, рано радовался. Видимо до высшей математики еще далеко.
Видимо $ТаблЧастьЗаказ.Номенклатура надо проверить на Вид. А вот как это сделать в соединении ON не могу догадаться.
Может подскажите?

Похоже догадался. Так:

|LEFT JOIN
|	$Справочник.Номенклатура AS Номенклатура ON RIGHT($ТаблЧастьЗаказ.Номенклатура,9) = Номенклатура.ID
|								 AND($ВидСправочника36.Номенклатура + Номенклатура.ID  = $ТаблЧастьЗаказ.Номенклатура)
|LEFT JOIN
|	$Справочник.ПереченьРабот AS ПереченьРабот ON RIGHT($ТаблЧастьЗаказ.Номенклатура,9) = ПереченьРабот.ID
|								  AND($ВидСправочника36.ПереченьРабот + ПереченьРабот.ID  = $ТаблЧастьЗаказ.Номенклатура)

 

kiruha писал(а) 21. Апреля 2008 :: 07:24:


Спасибо, точно и работает быстрее. Только почему-то СуммаЗЧ выводится нормально, а СуммаРаб округляется до целого?
Вот мой код:

ТекстЗапроса = "
    |SELECT
    |   Жур.IDDoc as [Док $Документ.ЗаказНаряд],
    |	Жур.Date AS ДатаДок,
    |   SUM(ICASE(LEFT($ТаблЧастьЗаказ.Номенклатура,4) = $ВидСправочника36.Номенклатура
    |	,$ТаблЧастьЗаказ.Сумма
    |	,0)
    |	) as СуммаЗЧ,
    |   SUM(ICASE(LEFT($ТаблЧастьЗаказ.Номенклатура,4) = $ВидСправочника36.ПереченьРабот
    |	,$ТаблЧастьЗаказ.Сумма
    |	,0)
    |	) as СуммаРаб
    |FROM
    |   $ДокументСтроки.ЗаказНаряд as ТаблЧастьЗаказ
    |LEFT JOIN
    |   1SJourn as Жур ON Жур.IDDoc = ТаблЧастьЗаказ.IDDoc
    |WHERE
    |   Жур.Date BETWEEN :НачДата~~ AND :КонДата~~ AND
    |   Жур.IDDocDef = $ВидДокумента.ЗаказНаряд AND
    |   Жур.Closed = 1
    |GROUP BY
    |   Жур.IDDoc, Жур.Date
    |ORDER BY
    |	ДатаДок
    |";

 

kiruha писал(а) 21. Апреля 2008 :: 07:44:


kiruha, ты мегачеловек. Теперь все хорошо.
Ты от меня еще не устал? Ну, если нет, подскажи еще одну фишку:
как бы сразу сумму умножить на Курс документа, если он конечно есть.
Курс - общий реквизит документа.

     |,      CAST(LEFT(Жур.Date_Time_IDDoc, 8) as DateTime) as ДатаДок

У этого человека - ДБФ