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

Подскажите где ошибки.

оно не выбирает "одинаковые записи"

(1)А как выбрать?

ты смотри-ка, фотку выложила
(0) везде ошибки

Отчет по валовой делаешь? Используй виртуальные таблицы оборотов и период задавай в параметрах

что надо конкретно то? зачем выбирать одинаковые записи?

(2) все зависит от того что ты с ними потом делать будешь

Создавать менеджер записи, выгружать в ТЗ и методом найти строки сравнивать?

как с такими ногтями код писать?

(7) стоп а менеджер записи для чего!?

ногти шикарны!

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

(10)Спасибо

(11) а может не стоит? а

Вот как я вчера делала, только со старыми записями

(13)Почему?

(0) Данный запрос покажет все записи регистра продаж с задвоением/троением и т.д в случае наличие подобных записей в регистре себестоимости. Для отбора повторений стоит использовать внутренее соединение, и неясно какую роль играет агрегация по количеству

(11)интересно, если они уже одинаковые, зачем их перезаписывать?)

+(16) Ну и физика тут действительно даром не нужна. Виртуальных таблиц хватит.

(17)В регистр Продажи добавила ресурс "Себестоимость", по старым записям я должна перенести эту себестоимость с регистра "ПродажиСебестоимость"

(19)я не буду спрашивать зачем)

(19) не надо!!!!

Процедура ОбработкаПроведенияДокументовРеализацииОбработкаПроведения(Источник, Отказ, РежимПроведения) Экспорт
   
   мДок = Источник.Метаданные();
   Если Не мДок.Движения.Содержит(Метаданные.РегистрыНакопления.Продажи) Тогда
       Возврат;
   КонецЕсли;
   Если Не мДок.Движения.Содержит(Метаданные.РегистрыНакопления.ПродажиСебестоимость) Тогда
       Возврат;
   КонецЕсли;
   
   ТЗ = Новый ТаблицаЗначений;
   
   Ссылка = Источник.Ссылка;
   НаборЗаписей = РегистрыНакопления.ПродажиСебестоимость.СоздатьНаборЗаписей();
   НаборЗаписей.Отбор.Регистратор.Установить(Ссылка,Истина);
   НаборЗаписей.Прочитать();
   НЗП = РегистрыНакопления.Продажи.СоздатьНаборЗаписей();
   НЗП.Отбор.Регистратор.Установить(Ссылка,Истина);
   НЗП.Прочитать();
   Количество = НаборЗаписей.Количество();
   ТЗ = НаборЗаписей.Выгрузить();    
   ТЗ.Свернуть("Номенклатура, ХарактеристикаНоменклатуры, ЗаказПокупателя, Подразделение, Проект", "Стоимость, Количество");
   
   Для Каждого Стр Из НЗП Цикл
       
       Отбор = Новый Структура();
       Отбор.Вставить("Номенклатура",Стр.Номенклатура);
       Отбор.Вставить("ХарактеристикаНоменклатуры",Стр.ХарактеристикаНоменклатуры);
       Отбор.Вставить("ЗаказПокупателя",Стр.ЗаказПокупателя);
       Отбор.Вставить("Подразделение",Стр.Подразделение);
       Отбор.Вставить("Проект",Стр.Проект);
       Строки = ТЗ.НайтиСтроки(Отбор);
       Стоимость = 0;
       Количество = 0;
       Для Каждого Строка Из Строки Цикл
           Стоимость = Стоимость+Строка.Стоимость;
           Количество = Количество + Строка.Количество;
       КонецЦикла;
       Если Стр.Количество = Количество Тогда
           Стр.Себестоимость = Стоимость;
       КонецЕсли;
       
   КонецЦикла;
   
   НЗП.Записать();

КонецПроцедуры

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

(20)Для отчета, данных в базе очень много, если отчет с объединением двоих регистров делать, производительность на порядок меньше будит, нежели сразу выбирать себестоимость с регистра на прямую

(19) Не спрашивая "зачем", спрошу: в "ресурс "Себестоимость"" новые документы как данные пишут?

(24)Создала ПодпискуНаСобытие с Событием "ОбработкаПроведения" код см.(22)

на фото тема слегка приоткрыта

(25) ну и что будет с твоим ресурсом если просто перепровести старый документ? -)

(27)там и продажисебестоимость могут полететь

(27)Должен записаться

(28)Почему?

(29) Должен или запишется? -) И если ты уверенна в том что запишется, то почему просто взять и не перепровести документы и не городить всего этого в (0)? -)

(31)Запишется, проверяла

(31)Не все документы можно перепровести, "Не указаны параметры учетной политики управленческого учета на 1 января 2009 г".

(31)Управленческий учет. Документ Реализация товаров и услуг ЧК-00087328 от 27.09.2010 15:40:27, табличная часть "Товары"
Не списано по партиям 6 шт. товара Жигулівське   1 л пет, х-ка: , серия: , со склада: НЛ-1
Управленческий учет. Документ Реализация товаров и услуг ЧК-00087328 от 27.09.2010 15:40:27, табличная часть "Товары"
Не списано по партиям 10 шт. товара Пляшка 0,5 темна, со склада: НЛ-1
Проведение по партиям остановлено

+(26) надо бы тему сильнее раскрыть

(35)Вы о чем?

(36) о Них

(35) +100500 особенно в свете (34)

(19) "в регистр Продажи добавила ресурс "Себестоимость" - это кто-то подсказал так делать или самостоятельное решение?

(39) Подсказали

(34) вот после этого посмотри что у тебя в этих двух регистрах? т.е. по продажам прошло все, а вот по себестоимости нет :)))

(41)Нормально все

(42) уверена? если у тебе по партиям не списано, а себестоимость как раз по этому регистру рассчитывается

(40) наверное те-же кто и (23) подсказал :) ...откуда интересно такие наблюдения "производительность на порядок меньше будит"?

(44) +100500
учитывая что Себестоимость не ресурс, а реквизит и придется дергать физическую таблицу - скорость будет огромная

(45)Ресурс

Сейчас доделаю, проверю и выложу результат

(47) надеюсь все это не на боевой базе :)

(48) Конечно нет)

(49)ни в коем случае не добавляй ресурс и не трогай регистр. Скорости это не добавит а вот проблем очень много

(0) Какая конфа?

(51) УТ да Украины по-ходу.  или УТП

(52) А может УПП?

УПП

8.1

(55) О_О как страшно жить!

Расчет себестоимости пишет в регистр ПродажиСебестоимость?

(55) все, после этого ты обязана раскрыть тему полностью!

а я уже ставлю 1С 8.1, чтобы такой помочь)

конфу тока скажите ...

а все вижу спс)

(58)Тему только мой парень может раскрыть

(62) спорное утверждение

На (57) ответишь?

(57)Да

А теперь будет массовая запись в два регистра Продажи и Продажи себестоимость. У тебя пользователи будут вешаться. Два регистра сделано не просто так.

(66)При записи документа, производительность упала на 0.40, это не существенно

(67) а при проведении?

Если не влияет на время расчета с/с и пользователи не замечают блокировки, значит объем данных не большой. Тогда нафига (0)?

(69) ибо ОБС (одна бабка сказала)

(69)За день количество документов может быть больше 1000

И что, это много?

(71) РСВ сколько проводится? и что пишет и куда?

(72)Не очень, но когда начальник захочет сформировать отчет  за месяц, как вы думаете быстрее будит отрабатывать запрос с одной виртуальной таблицей или с двумя?

(74) однокуйственно, т.е. он не заметит разницы

(0) вообще не понял зачем там соединение, если данные таблицы ПродажиСебестоимость нигде не используются в запросе
(22) пройтись по старым записям можно с помощью НабораЗаписей и отбора по Регистратору

Создавать доп.ресурс в регистре не нужно было

Если начальство не устраивает скорость построения отчетов - пусть раскошелятся на новый сервер

(74) дла начальника делать отчет быстро - это зло. Пока формируется отчет, он должен проникаться насколько все это сложно ;)

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

Пытаюсь записать себестоимость в дерево значений, но НаборЗаписей пустой, что не так делаю?

не нужно объект получать
нужна ссылка

(78) какой адский ужас

+(80) никому больше ЭТО не показывай

(79)Ссылку поставила, все равно тоже самое

(82) Значит твои заказы покупателей не имеют движения по регистру накопления продажи
ПыСы  - код действительно страшен

(78) Мисс, конкретная адресная помощь проблематична. Как-бы это не звучало, но нужно поизучать основы и поразбирать более простые примеры. Если будешь ломать живую базу, то это может иметь неприятные последствия.

(84) она копию ломает

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

+(83) На 2 уровне дерева по идее и нет заказов покупателя - ибо это третья группировка

(78) "Для Каждого Строка Из НаборЗаписей Цикл". Строка -> ТекСтрока. "Строка" нельзя использовать, ибо служебное слово.

(87)Есть

(89) Тогда возьми любой пример заказа в цикле и посмотри в базе - есть ли у него движения по продажам.

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

(88) наглая ложь! всегда использую и никаких проблем

(92) *Ушел учить мат.часть.

(91)Спасибо, поправила
Объект = Стр1.Регистратор.ПолучитьОбъект();
           
           НаборЗаписей.Отбор.Регистратор.Установить(Объект,Истина);

Но все равно возвращает пустой набор

(93)Меня учили проверять по Ctrl + Пробел, так что там все правильно

(94) попробуй мотивировать программиста, давшего задание на совместное его выполнение - и научишься и результат будет.

(97)Когда делаю сама быстрее научусь

(94) Вот так надо
//Объект = Стр1.Регистратор.ПолучитьОбъект();
НаборЗаписей.Отбор.Регистратор.Установить(Стр1.Регистратор,Истина);


Во-вторых, что мешает воспользоваться отладчиком и (90) и опять же проверить наличие движения по регистру продаж у Стр1.Регистратор ?

(98) Тоже верно, но методом тыка тут не очень хорошо учиться. Нужно понимание. Желательно чтение мануалов/лит-ры/итс, поиск. Занудно. Уровень задач будет возрастать.

Вот например твой код: Объект = Стр1.Регистратор.ПолучитьОбъект();
НаборЗаписей.Отбор.Регистратор.Установить(Объект,Истина);

Посмотри что такое объект, что такое ссылка.

А может набор записей и должен быть пустым?

(99)Получилось, спасибки