Форум Чистова. Подготовка к экзаменам 1С

О форуме => Конфигурирование => Тема начата: DenisS от Декабрь 07, 2016, 01:34:34 am

Название: Запрос с условием
Отправлено: DenisS от Декабрь 07, 2016, 01:34:34 am

Есть справочник Ингредиенты и документ Калькуляция блюд с табличной частью Составляющие.
Необходимо при изменении номенклатуры в форме документа поставить значение "Ккал" из справочника Ингредиенты.

Код: [Выделить]

&НаКлиенте
Процедура СоставляющиеНаименованиеИнгредиентаПриИзменении(Элемент)
Стр=Элементы.Составляющие.ТекущиеДанные;
Стр.Ккал = ПолучитьКкалории(Стр.НаименованиеИнгредиента);
КонецПроцедуры

&НаСервереБезКонтекста
Функция ПолучитьКкалории(Ингредиент)

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Ингредиенты.Наименование КАК Наименование,
| Ингредиенты.Ккал КАК Ккал
|ИЗ
| Справочник.Ингредиенты КАК Ингредиенты";

//Запрос.УстановитьПараметр("Наименование", Ингредиент);

РезультатЗапроса = Запрос.Выполнить();

ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если ВыборкаДетальныеЗаписи.Наименование = Ингредиент Тогда

Результат = ВыборкаДетальныеЗаписи.Ккал;
КонецЕсли;
  КонецЦикла;
 

Возврат Результат;
КонецФункции
Но в итоге ничего не меняется. В пошаговой отладке значение "ВыборкаДетальныеЗаписи.Наименование" пишется в двойных ковычках, а "Ингредиент" записывается без ковычек. В результате условие выглядит след.образом Если "Рис" = Рис Тогда....

Название: Re: Запрос с условием
Отправлено: DenisS от Декабрь 08, 2016, 10:48:37 pm

Еще актуально

Название: Re: Запрос с условием
Отправлено: alex1248 от Декабрь 09, 2016, 09:45:31 pm

Думаю, такой код должен работать

Цитировать

&НаКлиенте
Процедура СоставляющиеНаименованиеИнгредиентаПриИзменении(Элемент)
   Стр=Элементы.Составляющие.ТекущиеДанные;
   Стр.Ккал = ПолучитьКкалории(Стр.НаименованиеИнгредиента);
КонецПроцедуры

&НаСервереБезКонтекста
Функция ПолучитьКкалории(Ингредиент)
   Возврат Ингредиент.Ккал;
КонецФункции