| 0
    
        VID1234   03.03.22✎ 11:48 | 
        Здравствуйте. Есть код ниже, но он не работает если тонкий клиент! Почему, подскажите пожалуйста?
&НаКлиенте
 Процедура ПоставкаСЗИТоварПриИзменении(Элемент)
 ОСТЧ = Элементы.ПоставкаСЗИ.ТекущиеДанные;
 Если Не ЗначениеЗаполнено(ОСТЧ.ТипЦены) Тогда
 Сообщить("Сначала заполните тип цены! После этого перевыберите товар, необходимые поля заполнятся автоматически!");
 Иначе
 Данные = ЦенаОС(Объект.Дата, ОСТЧ.Товар, ОСТЧ.ТипЦены);
 
 //Для Каждого Пункта Из Данные Цикл
 //    ОСТЧ.Цена = Пункта.Цена;
 //    ОСТЧ.Описание = Пункта.Описание;
 //КонецЦикла;
 
 КонецЕсли;
 КонецПроцедуры
 
 &НаСервере
 Функция ЦенаОС (Дата, Номенклатура, ТипЦены)
 Запрос = Новый Запрос;
 Запрос.Текст =
 "ВЫБРАТЬ
 |    ЦеныНоменклатурыСрезПоследних.Цена КАК Цена,
 |    ЦеныНоменклатурыСрезПоследних.Описание КАК Описание,
 |    ЦеныНоменклатурыСрезПоследних.ТипЦены КАК ТипЦены,
 |    ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Товар
 |ИЗ
 |    РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&Период, ) КАК ЦеныНоменклатурыСрезПоследних
 |ГДЕ
 |    ЦеныНоменклатурыСрезПоследних.ТипЦены = &ТипЦены
 |    И ЦеныНоменклатурыСрезПоследних.Номенклатура = &Номенклатура";
 
 Запрос.УстановитьПараметр("Номенклатура", Номенклатура);
 Запрос.УстановитьПараметр("Период", Дата);
 Запрос.УстановитьПараметр("ТипЦены", ТипЦены);
 
 РезультатЗапроса = Запрос.Выполнить();
 
 ВыборкаДетальныеЗаписи = РезультатЗапроса.Выгрузить();
 Объект.ПоставкаСЗИ.Загрузить(ВыборкаДетальныеЗаписи);
 
 Возврат ВыборкаДетальныеЗаписи;
 КонецФункции
 |  |