Здравствуйте, в УТ сделал запрос который выполняется при изменении поля номенклатуры:

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

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

Попробуйте сделать запрос так:

|ВЫБРАТЬ
|Номенклатура, ТипЦен, Цена
|ИЗ
|РегистрСведений.ЦеныНоменклатуры.СрезПоследних(, Номенклатура = &Номенклатура)

Вы изобрели авианосец для перевозки пары зернышек. Вообще, то что Вы сделали это жуть.

Вам нужно при изменении номенклатуры вызывать процедуру которая два раза отфильтрует регистр по номенклатуре, в каждом случае с отдельной ценой, и подставить в нужные значения строки.

В принципе да, я сразу код особо не разбирал.

Для Каждого СтрТовары Из Товары Цикл

Так как телепаты в отпуску...

вопрос? а это что перебирается в цикле то?

ЗЫ: и некоторые операции можно в теле запроса указать наверное...

Посмотрите общий модуль Ценообразование процедуру ПолучитьЦенуНоменклатуры.
Весь код у Вас приведется к виду:

СтрТовары.Закупка = Ценообразование.ПолучитьЦенуНоменклатуры(<параметры процедуры>);
СтрТовары.Продажа = Ценообразование.ПолучитьЦенуНоменклатуры(<параметры процедуры>);

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

Телепаты на месте, перебирается ТЧ "Товары", начальная школа 2-й класс.


Расскажите как решили, нам очень интересно.


Ну представьте, Вы делаете салат, достаете из холодильника 10 продуктов, а потом выбираете 2 из них которые будут необходимы... Наверное лучше будет из холодильника достать сразу только 2 продукта.

А как результаты отбора поместить в ячейки?

Проблема бала в том что в Процедурам ПриВыводеСтроки()
сделал цикл и он "Зацыклелся"

А что Вы вообще делаете? если не секрет..


как-то так:

ОтборРегистра = РегистрыСведений.ИмяРегистра.СрезПоследних(Дата,СтруктураОтбора)
СтрокаТЧ = Элементы.Товары.ТекущаяСтрока
СтрокаТЧ.Цена = ОтборРегистра.Цена
СтрокаТЧ.Цена2 = ОтборРегистра.Цена2

функция в общем модуле Ценообразование имеет вид
ПолучитьЦенуНоменклатуры(Номенклатура, ХарактеристикаНоменклатуры = Неопределено, Знач ТипЦен,
ДатаПараметр = Неопределено, ЕдиницаИзмерения = Неопределено, Валюта = Неопределено, Курс = 0, Кратность = 1, ПроцентСкидкиНаценки = 0, ДоговорКонтрагента = Неопределено, УсловиеПродаж = Неопределено)

Вот код для Вашего случая

Для Каждого СтрТовары Из Товары Цикл
     ТекНоменклатура = СтрТовары.Номенклатура;
     ТипЦенЗакупочная = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Закупка");
     ТипЦенРозничная = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Роздрібний");
     СтрТовары.Закупка = Ценообразование.ПолучитьЦенуНоменклатуры(ТекНоменклатура,,ТипЦенЗакупочная);
     СтрТовары.Продажа = Ценообразование.ПолучитьЦенуНоменклатуры(ТекНоменклатура,,ТипЦенРозничная);
КонецЦикла;

А почему никто не сказал, что вызывать запрос ВНУТРИ цикла - это моветон? Почему бы (если очень уж хочется сделать это запросом) не выгрузить всю номенклатуру в массив/таблицу значений и не передать ее в запрос одним параметром?



Я бы сделал это чуть изящнее:

ТипЦенЗакупочная = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Закупка");
ТипЦенРозничная = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Роздрібний");
Для Каждого СтрТовары Из Товары Цикл
     ТекНоменклатура = СтрТовары.Номенклатура;
     СтрТовары.Закупка = Ценообразование.ПолучитьЦенуНоменклатуры(ТекНоменклатура,,ТипЦенЗакупочная);
     СтрТовары.Продажа = Ценообразование.ПолучитьЦенуНоменклатуры(ТекНоменклатура,,ТипЦенРозничная);
КонецЦикла;