У меня сначала находятся товары из накладных за период, они мне нужны вместе с количеством (запрос долго работает, перебор накладных быстрее, ну да ладно). Потом к списку товаров ищутся спецификации, они тоже нужны в явном виде, потом ищется номенклатура из спецификаций - в остатках, чтобы узнать себестоимость.
Есть вероятность, что в одном запросе это работало бы быстрее?

может тебе надо посмотреть, как делается разузлование ?

Запрос долго работает, перебор накладных быстрее - у меня этот пункт вызывает смущение.

(0) >запрос долго работает, перебор накладных быстрее

враки

Запрос даже как-то неудобно просить - вдруг там что-то личное?

Вот вся история:
    ДокОтчет = Документы.ОтчетПроизводстваЗаСмену.ПустаяСсылка();    
    
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    РеализацияТоваровУслугТовары.Номенклатура КАК Номенклатура,
    |    РеализацияТоваровУслугТовары.Количество КАК Количество,
    |    РеализацияТоваровУслугТовары.Ссылка.Дата
    |ИЗ
    |    Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслугТовары
    |ГДЕ
    |    РеализацияТоваровУслугТовары.Ссылка.Дата МЕЖДУ &ВыбНачПериода И &ВыбКонПериода
    |    И НЕ РеализацияТоваровУслугТовары.Ссылка.ПометкаУдаления
    |ИТОГИ
    |    СУММА(Количество)
    |ПО
    |    Номенклатура";
    
    Запрос.УстановитьПараметр("ВыбНачПериода", НачалоДня(ВыбНачПериода));
    Запрос.УстановитьПараметр("ВыбКонПериода", КонецДня(ВыбКонПериода));
    ЕстьСтроки = Ложь;
    ТабЗапрос = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам, "Номенклатура");

    ДокОтчет = Документы.ОтчетПроизводстваЗаСмену.СоздатьДокумент();
        ДокОтчет.Дата = НачалоДня(ВыбНачПериода);
        ДокОтчет.Комментарий   = "Создан автоматически";
        ДокОтчет.Ответственный = Пользователи.ТекущийПользователь();
        ДокОтчет.ДляСписанияНДСиспользоватьСчетИАналитикуУчетаЗатрат = Истина;
        ДокОтчет.Организация = БухгалтерскийУчетПереопределяемый.ПолучитьЗначениеПоУмолчанию("ОсновнаяОрганизация");
        ДокОтчет.Склад       = БухгалтерскийУчетПереопределяемый.ПолучитьЗначениеПоУмолчанию("ОсновнойСклад");
        //ДокОтчет.ПодразделениеОрганизации = БухгалтерскийУчетПереопределяемый.ПолучитьЗначениеПоУмолчанию("ОсновноеПодразделениеОрганизации");
        Пока ТабЗапрос.Следующий() Цикл
            ЕстьСтроки = Истина;
            НоваяСтрока                  = ДокОтчет.Продукция.Добавить();
            НоваяСтрока.Счет             = ПланыСчетов.Хозрасчетный.НайтиПоКоду("43");
            НоваяСтрока.Номенклатура     = ТабЗапрос.Номенклатура;
            НоваяСтрока.Количество       = ТабЗапрос.Количество;
            НоваяСтрока.НоменклатурнаяГруппа = НоваяСтрока.Номенклатура.НоменклатурнаяГруппа;
            НоваяСтрока.ЕдиницаИзмерения =   НоваяСтрока.Номенклатура.ЕдиницаИзмерения;
        КонецЦикла;
        
    Если ЕстьСтроки Тогда
        ДокОтчет.Записать();
    КонецЕсли;
    СписокНомен = ДокОтчет.Продукция.Выгрузить(,"Номенклатура");
    ЗапросПоСпецификациям = Новый Запрос;
    ЗапросПоСпецификациям.Текст =
    "ВЫБРАТЬ
    |    СпецификацииНоменклатурыИсходныеКомплектующие.Номенклатура,
    |    СпецификацииНоменклатурыИсходныеКомплектующие.Количество,
    |    СпецификацииНоменклатурыИсходныеКомплектующие.Ссылка,
    |    СпецификацииНоменклатурыИсходныеКомплектующие.Ссылка.Владелец
    |ИЗ
    |    Справочник.СпецификацииНоменклатуры.ИсходныеКомплектующие КАК СпецификацииНоменклатурыИсходныеКомплектующие
    |ГДЕ
    |    СпецификацииНоменклатурыИсходныеКомплектующие.Ссылка.Владелец В(&СписокНомен)
    |    И СпецификацииНоменклатурыИсходныеКомплектующие.Ссылка.ПометкаУдаления = &Ложь";
    ЗапросПоСпецификациям.УстановитьПараметр("СписокНомен", СписокНомен);
    ЗапросПоСпецификациям.УстановитьПараметр("Ложь", Ложь);
    СписокСпецификаций =  ЗапросПоСпецификациям.Выполнить().Выгрузить();
    ТаблицаМат = Новый ТаблицаЗначений;
    ТаблицаМат.Колонки.Добавить("НоменклатураВладелец");
    ТаблицаМат.Колонки.Добавить("КоличествоВладелец");
    ТаблицаМат.Колонки.Добавить("Номенклатура"); // Это материал
    ТаблицаМат.Колонки.Добавить("Количество");
    ТаблицаМат.Колонки.Добавить("НоменклатурнаяГруппа");
    ТаблицаМат.Колонки.Добавить("СебестоимостьЕд");
    ТаблицаМат.Колонки.Добавить("Себестоимость");
    Для каждого СтрПрод из ДокОтчет.Продукция Цикл
        СтрокиСпец = СписокСпецификаций.НайтиСтроки(Новый Структура ("Владелец",СтрПрод.Номенклатура));
        Если СтрокиСпец.Количество()>0 Тогда
            СтрПрод.Спецификация = СтрокиСпец[0].ссылка;
            Для ии = 0 по СтрокиСпец.Количество()-1 Цикл
                Если  (СтрПрод.Спецификация = СтрокиСпец[ии].ссылка)и(СтрокиСпец[ии].Количество>0) Тогда
                    СтрТаблицаМат = ТаблицаМат.Добавить();
                    СтрТаблицаМат.Номенклатура = СтрокиСпец[ии].Номенклатура;
                    СтрТаблицаМат.Количество   = СтрокиСпец[ии].Количество;
                    СтрТаблицаМат.НоменклатурнаяГруппа = СтрПрод.Номенклатура.НоменклатурнаяГруппа;
                    СтрТаблицаМат.НоменклатураВладелец =  СтрПрод.Номенклатура;
                    СтрТаблицаМат.КоличествоВладелец   = СтрПрод.Количество;
                КонецЕсли;
                                
            КонецЦикла;
        КонецЕсли;
    КонецЦикла;
    ТабПром = ТаблицаМат.Скопировать();
    ТабПром.Свернуть("Номенклатура","Количество");
    СписокМат = ТабПром.ВыгрузитьКолонку("Номенклатура");
    ЗапросПоМат = Новый Запрос;
    ЗапросПоМат.Текст =
    "ВЫБРАТЬ
    |    ХозрасчетныйОстатки.Счет,
    |    ХозрасчетныйОстатки.Субконто1,
    |    ХозрасчетныйОстатки.СуммаОстатокДт,
    |    ХозрасчетныйОстатки.КоличествоОстатокДт
    |ИЗ
    |    РегистрБухгалтерии.Хозрасчетный.Остатки(&ВыбКонПериода, Счет = &ВыбСчет, ,Субконто1 В (&СписокМат)) КАК ХозрасчетныйОстатки"; //    
    ЗапросПоМат.УстановитьПараметр("ВыбКонПериода", КонецДня(ВыбКонПериода));
    ЗапросПоМат.УстановитьПараметр("СписокМат", СписокМат);
    ЗапросПоМат.УстановитьПараметр("ВыбСчет", ПланыСчетов.Хозрасчетный.СырьеИМатериалы);
    РезультатМат = ЗапросПоМат.Выполнить().Выгрузить();
    
    Для каждого СтрМат из ТаблицаМат Цикл
        СтрокиМат = РезультатМат.НайтиСтроки(Новый Структура ("Субконто1",СтрМат.Номенклатура));
        Если СтрокиМат.Количество()>0 Тогда
            Если СтрокиМат[0].КоличествоОстатокДт<>0 Тогда
                СтрМат.СебестоимостьЕд = СтрокиМат[0].СуммаОстатокДт/СтрокиМат[0].КоличествоОстатокДт;
            Иначе
                СтрМат.СебестоимостьЕд = 0;
            КонецЕсли;
        Иначе
            СтрМат.СебестоимостьЕд = 0;
        КонецЕсли;
    СтрМат.Себестоимость = СтрМат.СебестоимостьЕд*СтрМат.Количество*СтрМат.КоличествоВладелец;    
    КонецЦикла;
    ТабПром = ТаблицаМат.Скопировать();
    ТабПром.Свернуть("Номенклатура,НоменклатурнаяГруппа","Количество,Себестоимость");
    ДокОтчет.Материалы.Загрузить(ТабПром);
    Для каждого СтрМат из ДокОтчет.Материалы Цикл
           СтрМат.ЕдиницаИзмерения = СтрМат.Номенклатура.ЕдиницаИзмерения;
           СтрМат.Счет = ПланыСчетов.Хозрасчетный.СырьеИМатериалы;
    КонецЦикла;
    ТабПром = ТаблицаМат.Скопировать();
    ТабПром.Свернуть("НоменклатураВладелец","Себестоимость");
    Для каждого СтрПрод из ДокОтчет.Продукция Цикл
        СтрокиСпец = ТабПром.НайтиСтроки(Новый Структура ("НоменклатураВладелец",СтрПрод.Номенклатура));
        Если СтрокиСпец.Количество()>0 Тогда
            СтрПрод.ПлановаяСтоимость = СтрокиСпец[0].Себестоимость/СтрПрод.Количество;
            СтрПрод.СуммаПлановая = СтрокиСпец[0].Себестоимость;
        КонецЕсли;
    КонецЦикла;
    ДокОтчет.Записать();
    СтрВозврата = Новый Структура;
    СтрВозврата.Вставить("Док",ДокОтчет.Ссылка);
    Возврат(СтрВозврата);

Долго работает только первая честь, всё остальное быстро.

(5) упп ?

Так как называется, говорите, франч?

Пакетным запросом пробовала? Теория отвечает просто - сервер надо трясти пореже. Поэтому один запрос лучше, чем три на ту же тему.

бухгалтерия 3.0

Про теорию я знаю! Но если разница в доли секунды, то не вижу смысла - так-то писать гораздо легче.
Не представляю себе, как это всё упихнуть в один.

Регистры придумали для того, чтобы не трясти документы от царя Гороха.

Зачем учитывать не проведенные документы?

(12) реализации в регистры не пишут уже? или не проведенные нужны?

(12) сорри... к (10) писал

Именно в этом идея. Накладные выписываются по сути вместо заявок, потом делают выпуск продукции, потом уже отгрузку на основании этого выпуска.
Трясем не от царя гороха, а за один день обычно.

(5)
1. зачем тебе непроведенные документы?
2. зачем тебе итоги?
3. вместо "Пока ТабЗапрос.Следующий() Цикл" сделать ДокОтчет.Продукция.Загрузить(Запрос.Выполнить().Выгрузить()); недостающие поля вытянуть в запросе

Непроведенные нужны.
Итоги - потому что иначе у меня одна и та же номенклатура встречалась 10 раз.
3. Наверное, можно, но так нагляднее. Это влияет на скорость?

(18) сгруппировать тогда может

(18) 2. про группировку не слышала?

а вот за это надо сразу увольнять

    |    И СпецификацииНоменклатурыИсходныеКомплектующие.Ссылка.ПометкаУдаления = &Ложь";
    ЗапросПоСпецификациям.УстановитьПараметр("Ложь", Ложь);

Ага!

В цикле
    НоваяСтрока.Счет             = ПланыСчетов.Хозрасчетный.НайтиПоКоду("43");

Вот это
Если ЕстьСтроки Тогда
        ДокОтчет.Записать();
    КонецЕсли;

=
Если Докотчет.товары.количество() тогда

Да и ДокОтчет.Записать() есть в самом конце.

|    И  Не СпецификацииНоменклатурыИсходныеКомплектующие.Ссылка.ПометкаУдаления"; ?

Да и ДокОтчет.Записать() есть в самом конце. - это уже поправила.

(22) уже лучше)

НоваяСтрока.Счет             = ПланыСчетов.Хозрасчетный.ГотоваяПродукция; - а так?

(20) Вы не поверите, но я такой код нашел в штатной бухгалтерии 3.0. Форма документа УстановкаЦенНоменклатуры, процедура ЗаполнитьТоварыСервер. :)

(24) Только вчера в книжке именно так прочитала!

(25) сделай через объявление переменной перед циклом

(0) Всё равно в трейсере SQL Server'а надо смотреть.

(26) действительно

(25) а однажды заполнить и потом использовать
[Справочник.Номенклатура.Реквизит.ОсновнаяСпецификацияНоменклатуры]

не предлагать?

(25) см (17) п. 3 - в запросе сразу вытягивать все требуемые поля, чтобы через точку ничего не было.

(28) Вот прямо принципиально что-то изменится?

(33) - (31) глянь

(33) карма повысится

(31)а однажды заполнить и потом использовать  - счет??
У них почему-то не выбрана как основная.

(19) Чем сгруппировать лучше, чем итоги?
Почему за "Ложь = Ложь" увольнять, если так в книжке и на скорость не влияет?

Вы пишите! Я попробую перестроиться. Надо же, чтоб хоть простой код не приводил в ужас программистов.

(37) http://lurkmore.to/Индусский_код

(36) так заполни...
что значит "счет??"

и номенклатура + количество предлагаю брать из проводок 90 - 4101

(37) гораздо лучше... просто поверь

(18) [Непроведенные нужны]

зачем?

(40) документы могут быть не проведены.

(43) - (42) ???

(37) >Чем сгруппировать лучше, чем итоги?

это разные вещи... в твоем случае надо именно группировать

(37) лучше сгруппировать.

(44) а я откуда знаю?  Это больше вопрос к (0).

(47) ну ты же (42) писал

а (0) на (42) молчит почему то

(48) извиняюсь (43) писал

(43) проведение это просто флаг

(51)Проведение не просто флаг, а  с методической точки зрения  - окончательное подтверждение завершения операций. При формировании документов на основании проведенных я бы добавил проверку на проведенные документы и если есть непроведенные за выбранный период, то отказ от дальнейших действий. Это прежде всего избавление от бомбы замедленного действия.

Я уже 2 раза написала - обрабатываемые документы не проведены, для них моей программой готовится выпуск продукции, а после проведения выпуска будут проведены накладные.

Напишите, как надо было сгруппировать  (и почему)

(52) надо движения смотреть, а не флаги

Хорошо, что никто не сказал, что всё можно засунуть в один запрос.

(56) нужно после того как сделаешь обязательным (31)

(54) ппц, а переключиться в конструкторе на вкладку группировка не проще чем спрашивать на мисте?

Вкладка не ответит на вопрос - почему!

(59) ну хотя бы отпадет часть вопроса "как"

(59) по итогам будут все строки + итоговые строки по номенклатуре

по группировке будут только сгруппированные строки по номенклатуре и ссуммированное количество

думаю тебе нужно второе

Автору сменить специальность.
Ну не шмогла.

(5) кстати не бывает что продукция состоит из другой продукции, если бывает тогда вообще читать до посинения (1)

(62) да не... ну хоть пытается что то делать, а не просто "памагите, не могу"

(61) Спасибо!
(63) Не бывает.
(64) Да наоборот! Всё получилось, достаточно быстро, лично мне всё нравится, хотела посмотреть, как это выглядит со стороны, а то я давно сама в своем бульоне варюсь и вижу кроме своего только текст разработчиков.

(65) так в итоге 1 или 3 запроса?

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

(67) мудрое решение... 3>1... пусть будет больше)))

(56) я скажу: можно засунуть в один запрос, он станет пакетным

(69) докажи :)

(70) что именно?

(71) и то что можно и то что "будет пакетным"

(72) сп:
ВыполнитьПакет (ExecuteBatch)
Синтаксис:

ВыполнитьПакет()
Возвращаемое значение:

Тип: Массив.

Описание:

Последовательно выполняет все запросы и возвращает массив результатов для каждого запроса из пакета. Результаты помещаются в массив в последовательности расположения запросов в тексте пакета. Результатом выполнения запроса на уничтожение временной таблицы является значение Неопределено, которое также помещается в массив результатов.

Доступность:

Сервер, толстый клиент, внешнее соединение.

(73) уволить :)
как пакет пригодиться (0)

(74) уволить сп?

(74) пусть тс сам решает, что и как пригодится

(76) если бы ТС "сам" могла, не было бы топика

(75) уволить пейсателя (73)

(78) а за временные таблицы сжечь?

(79) другое дело... а пакет как то не в тему вовсе

(80)а временные таблицы в пакетном запросе кощунство?

(81) не путайте использование временных таблиц и ВыполнитьПакет

(82) с использованием ВТ запрос пакетный, либо нужно определить менеджера ВТ, но сейчас не тот случай. А уж просто Выполнить() или ВыполнитьПакет(), тс разберется.
что вам мешало подсказать нормально? Надо меня подкалывать?

(82) Про соединения в запросе вы наверняка знаете. Но это же такой секрет

(83) еще раз повторю именно "ВыполнитьПакет" в случае ТСа никак не лучше

[что вам мешало подсказать нормально?]

почитайте внимательно все посты... там есть несколько подсказок причем без [Надо меня подкалывать?]

(84) про наличие конструктора запроса тоже подсказать... это секрет?

Там каждый следующий запрос зависит от предыдущего, так что это не может быть пакетом, разве нет?

(87) вполне достаточно соединений, можно даже без ВТ

v8: Добавить в запрос еще один отбор - а вот эту мою тему кто-нибудь видит?
(88) С ВТ проще, наверное?
Теоретически я себе представляю, как соединять, но практически - в башке не укладывается. Даже не знаю, можно ли этому научиться.
Давайте в той теме - практически!
Тут уже всё работает, ну и фик с ним.

(89) "Радость наша" вы уверены, что всё ПРАВИЛЬНО работает, а то иначе можно и с "поганой метлой" познакомится поближе.