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

Мой вариант:

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

   Результат = Запрос.Выполнить();
   
   Если Результат.Пустой() тогда
       Сообщить("Создание переоценки: ошибка обработки!!! Не верно передан период!");
       Возврат;
   КонецЕсли;
   
   Выборка = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
   Пока Выборка.Следующий() цикл
        Склад = Выборка.Склад;
        Записи = Выборка.Выбрать();
        Пока Записи.Следующий() цикл
           ДатаПрихода = Записи.ДатаПрихода;
           Организация = Записи.Организация;
           ДокПереоценки = Документы.ПереоценкаТоваровВРознице.СоздатьДокумент();
           ДокПереоценки.Дата = ДатаПрихода+60;
           ДокПереоценки.ВидОперации = Перечисления.ВидыОперацийПереоценкаТоваровВРознице.ПереоценкаВНТТ;
           ДокПереоценки.Организация = Организация;
           ДокПереоценки.Склад = Склад;
           ДокПереоценки.Комментарий = "Создан автоматически";
           СтрокаПереоценки = ДокПереоценки.Товары.Добавить();
           СтрокаПереоценки.Номенклатура = Записи.Номенклатура;
           СтрокаПереоценки.Количество = Записи.Количество;
           СтрокаПереоценки.ЦенаВРозницеСтарая = Записи.ЦенаВРегистре;
           СтрокаПереоценки.ЦенаВРознице = Записи.ЦенаВРознице;
               
       КонецЦикла;
       ДокПереоценки.Записать();
       КонецЦикла;


Некорректно работает, создается документ переоценки только с одной строчкой, а документов прихода за обрабатываемый период куча. Где я ошибся?

а итоги зачем?

Все, сообразил =) Сам дурак )))

Перенеси в первый цикл
ДокПереоценки = Документы.ПереоценкаТоваровВРознице.СоздатьДокумент();

(3) ага )

(1) Я так понял, выборка по группировкам работать так не будет, не?

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

Переработал запрос. Работает неправильно:

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

       КонецЦикла;
   КонецЦикла;
   


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

Склад = Выборка.Склад;
       ЗаписиПоДате = Склад.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам,"ДатаПрихода");

(7) не идет, метод "выбрать" не обнаружен.
Тип значения "Склад" = СправочникСсылка.Склад

ошибся))

(9) а жаль )))

Вообщем, хочу получить такое:
-Склад1
---Дата1
------ДетальныеЗаписи
---Дата2
------ДетальныеЗаписи
-Склад2
---Дата1
------ДетальныеЗаписи
---Дата3
------ДетальныеЗаписи

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

Надеюсь, доступно объяснил =)

зачем ты перебираешь документы поступлений ?

(6)
записывать документ в конце вестимо

(12) Потому что в док-ах есть реквизит "Переоценять", на основе которого обработка понимает, что его нужно переоценить

в запросе сортировку. по склад, ДатаПрихода

(13) Запись док-та стоит в правильном месте, после перебора товара за дату.

(15) Хм... не вижу связи, но щас попробую

(16) а чего не устраивает тогда ?
Новый документ где хоть создаешь ?

Надеюсь, в обходе первой группировке по складу ?

или по дате (хз, где тебе именно надо - по складам или датам доки лепить)

(18) В обходе по дате. Он и создает по дате, только почему-то только на один склад

(15) Сортировка не помогла

(20) в отладчике посмотри, есть ли у тебя несколько складов...

Мля, может я хренова объяснил?
Допустим:
1янв - поступление1 - склад Основной
1янв - поступление2 - склад Основной
1янв - поступление3 - склад Вторичный
2янв - поступление4 - склад Основной
2янв - поступление5 - склад Вторичный
2янв - поступление6 - склад Вторичный

Я хочу, чтоб создалось:
На 1янв
Переоценка1 по складу основной с товаром из пост-ния 1 и 2
Переоценка2 по складу Вторичный с товаром из пост-ния 3
На 2янв
Переоценка3 по складу основной с товаром из пост-ния 4
Переоценка4 по складу Вторичный с товаром из пост-ния 5 и 6

А у меня получаются только переоценка 1 и 3

(22) В отладчике на выборке 2 строки всего
В том и дело, если убрать итоги по ДатаПрихода и соответственно обход по ним, то получаю корректировки по каждому складу. С обходом по датам корректировки только по одному =(

в тз выгрузи

(24) Не, наврал: 5 разных складов в "выборка". Странно...

Мужики, прошу прощения за отнятое время!
Всему виной вот эти 2 условия:
               Если Записи.ЦенаВРегистре = Записи.ЦенаВРознице тогда
                   Продолжить;
               КонецЕсли;

       Если ДокПереоценки.Товары.Количество() >0 тогда
           ДокПереоценки.Записать();
       КонецЕсли;

Спасибо большое за помощь!!!