ОСВ по счету, номенклатура, обработка

"<pre>Запрос = Новый Запрос;<br>    Запрос.Текст = <br>        "ВЫБРАТЬ<br>        |    СпрНоменклатура.ссылка КАК НоменклатураЭлемент,        <br>        |    ЦеныНоменклатуры.Цена КАК Цена        <br>        |ИЗ<br>        |    Справочник.Номенклатура КАК СпрНоменклатура<br>        |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры КАК ЦеныНоменклатуры<br>        |        ПО ЦеныНоменклатуры.Номенклатура = СпрНоменклатура.Ссылка";<br><br>    Результат = Запрос.Выполнить();<br><br>    ВыборкаДетальныеЗаписи = Результат.Выбрать();<br><br>    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл<br>         // Бегаем по всей номенклатуре у которой установлены цены<br>         Сообщение = Новый СообщениеПользователю();<br>         // получим объект справочника<br>         Номенклатура = ВыборкаДетальныеЗаписи.НоменклатураЭлемент.ПолучитьОбъект();<br>         // присвоим нужную цену<br>         Номенклатура.ЦенаДляОСВ = ВыборкаДетальныеЗаписи.Цена;<br>         Номенклатура.записать();<br>         // вуаля, бестолковая обработка готова, но над ней еще нужно работать, <br>         // потому как не задана дата, на которую выбирать цены<br>         // и еще много вопросов возникает в ходе анализа этого кода.<br>         Сообщение.Текст ="У номенклатуры - "+ВыборкаДетальныеЗаписи.НоменклатураЭлемент+" стоит цена "+ Строка(ВыборкаДетальныеЗаписи.Цена)+"   "+Строка(ТипЗНЧ(ВыборкаДетальныеЗаписи.Цена));<br>         Сообщение.Сообщить();<br>    //Справочники.Номенклатура.Выбрать().ЦенаДляОСВ=ВыборкаДетальныеЗаписи.Цена;<br>    КонецЦикла; </pre><br><br><br><pre> </pre>"

Спасибо. Буду дорабатывать.

Измерение "ТипЦен" нам не важен?

"а зачем? ;) дата ведь не требуется?<br>> // вуаля, бестолковая обработка готова, но над ней еще нужно работать,"

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

Приблизительно такая идея и родилась. Но с исполнением у меня проблемы.

Показал бухам остались не довольны. Сказали, чтобы было как в 7.7, притензии чисто к оформлению, покопал в эту сторону  и в сторону обновления конфы, понял, что буду делать внешний отчет. Спасибо, огромное всем принявшим участие в дискуссии.

> притензии чисто к оформлению<br>наклон не в ту сторону?

Та я вообще хз.  Сказали не не айс. И все привет внешняя обработка)))

"Всегда при переходе возникают, такие вопросы: хочу как в старой.<br>На самом деле сначала нужно выяснить зачем это потом используется и что вообще они хотят с этим делать?<br>Может быть достаточно найти и правильно настроить типовой отчет или использовать универсальный прежде чем ломать конфу или париться с внешней обработкой.<br>У вас материалы<br>1. могут приходить разными партиями соответственно и цены у них могут быть разные в зависимости от партии, это если установлен партионный учет<br>2. при перемещении, списании в зависимости от учетной политики опять же стоимость зависит от партии<br>Так какую цену хотят видеть в отчете, а самое главное для чего????<br>Это в 1С бухгалтерии 7.7 не было партий(или они как-то работали не так. Я уже не помню) и каждый полученный материал приходилось вводить новой строкой, а в 8.2 все работает замечательно;) и не надо раздувать огромный справочник номенклатуры.<br>В любом случае как в 1С 7.7 не будет."