Добавление номенклатуры в список

[Zeus_God]

Добрый день!
Подскажите, пожалуйста, как добавить номенклатуру, которая выходит в сообщении, в список для выбора?

[GRADUS]

Добрый день!
Подскажите, пожалуйста, как добавить номенклатуру, которая выходит в сообщении, в список для выбора?

А чего одной темы не хватило?

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

Код Выделить Развернуть

ЭлементОтбора =  ЭлементыФормы.Номенклатура.Значение.Отбор;
ЭлементОтбора.Ном.ВидСравнения = ВидСравнения.ВСписке;
ЭлементОтбора.Ном.Значение = СписокЗначений;
ЭлементОтбора.Ном.Использование = Истина;

Ну и оно тебе отберет что надо. Как то так ^^

[Zeus_God]

Спасибо! Сейчас попробую.
В той теме не отвечали больше =)

[Dethmontt]

А может просто?

Код Выделить Развернуть

СписокЗначений.ВыбратьЭлемент();

[Zeus_God]

Не получается ни 1м ни 2м способом. Может я что не так делаю?

Код Выделить Развернуть

Процедура ЗначениеОтбораСпискаНоменклатурыАвтоПодборТекста(Элемент, Текст, ТекстАвтоПодбора, СтандартнаяОбработка)

  мПоискОбъектовВСпискахДанных.АвтоПодборТекстаПоиска(Элемент, Текст, ТекстАвтоПодбора, СтандартнаяОбработка);

// Получить реквизиты текущего элемента и найти аналоги
Запрос = Новый Запрос;

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

Пока Выборка.Следующий() Цикл
Если Выборка.Артикул = Текст или Выборка.Наименование = Текст Тогда
Коммент = Выборка.Комментарий;
КонецЕсли;
//Если Выборка.Комментарий = Коммент Тогда
// Сообщить(Выборка.Ссылка); 
//КонецЕсли;
КонецЦикла;

//--------------------------------------------------------------------------------------------------------------
//-------------------------------------------------- Поиск аналогов --------------------------------------------
//--------------------------------------------------------------------------------------------------------------
Запрос = Новый Запрос;

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

Аналоги = Новый СписокЗначений;
Пока Выборка.Следующий() Цикл
//Если Выборка.Артикул = Текст или Выборка.Наименование = Текст Тогда
// Коммент = Выборка.Комментарий;
//КонецЕсли;
Если Выборка.Комментарий = Коммент Тогда
Аналоги.ВыбратьЭлемент(Выборка.Ссылка);
КонецЕсли;
КонецЦикла;
//--------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------

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


Добавлено: 11 июн 2013, 12:18

Извините, сразу не уточнил. Используется Обычная форма.

[GRADUS]

Не получается ни 1м ни 2м способом. Может я что не так делаю?

Добавлено: 11 июн 2013, 12:18

Извините, сразу не уточнил. Используется Обычная форма.

Выбрать элемент это вообще из другой оперы, зайди в синкасис помощник и посмотри что он делает.
Ты сейчас находишься в модуле формы, у тебя там должен быть реквизит, типа СправочникСписок, в чем проблема у него отбор покурить?