Спр.ID

Полный чайник писал(а) 23. Апреля 2010 :: 10:40:



УложитьСписокОбъектов / PutObjectList

Синтаксис: УложитьСписокОбъектов(Список, ИмяТаблицы, [ВидЭлементов])
Список - тип: СписокЗначений, Справочник, Счет. Объект, содержание которого будет отправляться на сервер. Если передан список значений, во врем. таблицу попадает содержимое списка. Допустимо также передавать группу справочника, элемент справочника, группу счетов, счет - в этом случае во временную таблицу поступает переданное значение, однако если указан ВидЭлементов (вид справочника, или план счетов), то будет попытка включить в таблицу все подчененные элементы.
.......
Параметры:
ВидЭлементов - тип: Строка. Вид справочника для иерархического включения элементов или вид плана счетов для иерархического включения счетов. Если параметр не указан, иерархического включения не происходит.

Полный чайник писал(а) 23. Апреля 2010 :: 10:59:

надо так ( без Справочник )

Запрос.УложитьСписокОбъектов(ОснПрайс,ИмяТаблицы,"Номенклатура"); 

Господа/Дамы!
Не буду плодить темы - проблема "один-в-один": запрос не отбирает элементы справочника заданной группы.
База - dbf.
При выполнении кода

СпрКлиенты	= СоздатьОбъект("Справочник.Клиенты");
	Если СпрКлиенты.НайтиПоНаименованию("Покупатели") = 1 Тогда
		ВыбГруппа	= СпрКлиенты.ТекущийЭлемент();
	Иначе
		Сообщить("Неверно задан параметр поиска");
		Возврат;
	КонецЕсли;
	//СпрКлиенты.НайтиПоКоду("38469");
	ИмяТаблицы	= "";
	запросOLEDBData.УложитьСписокОбъектов(ВыбГруппа, ИмяТаблицы, "Клиенты"); 

где

			Соединение		= "Provider=VFPOLEDB.1;Data Source=" + КаталогИБ() + ";Mode=ReadWrite;Collating Sequence=MACHINE";
			ОлеДБ			= СоздатьОбъект("OLEDBData");
			Рез				= ОлеДБ.Соединение(Соединение);
			запросOLEDBData	= ОлеДБ.СоздатьКоманду();
			запросOLEDBData.Выполнить("EXECSCRIPT('SET ANSI OFF')");
			запросOLEDBData.Выполнить("EXECSCRIPT('SET REPROCESS TO 60 SECONDS')");
			запросOLEDBData.Выполнить("EXECSCRIPT('SET REFRESH TO 0,-1')");
			запросOLEDBData.Выполнить("Exec('SET TABLEVALIDATE TO 0')");
 

Формируется dbf таблица со списком всех элементов, а не только принадлежащих группе "Покупатели". При указании элемента справочника в ВыбГруппа - все работает.
И что я делаю не так?

Уважаемый Ёпрст, не могу дотумкать - на что в моем случае заменяется "$reg.Номенклатура"...

Процедура Выполнить()
	СпрКлиенты = СоздатьОбъект("Справочник.Клиенты");
	Если СпрКлиенты.НайтиПоНаименованию("Покупатели") = 1 Тогда
		ВыбГруппа = СпрКлиенты.ТекущийЭлемент();
	Иначе
		Сообщить("Неверно задан параметр поиска");
		Возврат;
	КонецЕсли;
	ИмяТаблицы = "";
	Соединение = "Provider=VFPOLEDB.1;Data Source=" + КаталогИБ() + ";Mode=ReadWrite;Collating Sequence=MACHINE";
	ДБФ = СоздатьОбъект("OLEDBData");
	Рез = ДБФ.Соединение(Соединение);
	л_обНабор = ДБФ.СоздатьКоманду();
	л_обНабор.УложитьСписокОбъектов(ВыбГруппа, ИмяТаблицы, "Клиенты");
        л_обНабор.УстановитьТекстовыйПараметр("ВыбГруппа", ИмяТаблицы);
	ТекстЗапроса= "
	|SELECT
	|	Спр_Клиенты.id as [ТекЭлемент $Справочник.Клиенты]
	|FROM
	|	$Справочник.Клиенты as Спр_Клиенты
	|WHERE
	|	Спр_Клиенты.ismark=''
	|AND
	|	Спр_Клиенты.IsFolder=2
	|AND
	|	Спр_Клиенты.id IN (SELECT VAL FROM :ВыбГруппа)
	|GROUP BY
	|	Спр_Клиенты.id
	|";
	л_обНабор.Отладка(1);
	ТЗЗапроса		= л_обНабор.ВыполнитьИнструкцию(ТекстЗапроса);
КонецПроцедуры 

Отладка:

SELECT
	Спр_Клиенты.id as [ТекЭлемент_1c_type_Справочник_1c_dot_Клиенты]
FROM
	sc46 as Спр_Клиенты
WHERE
	Спр_Клиенты.ismark=''
AND
	Спр_Клиенты.IsFolder=2
AND
	Спр_Клиенты.id IN (SELECT VAL FROM '94482257-488d-4f61-a46e-c4e495500810')
GROUP BY
	Спр_Клиенты.id 

В результате выполнения во временную таблицу выгружается весь справочник Клиенты.

Eprst писал(а) 18. Января 2017 :: 06:22:

Благодарю - все работает на других группах, а в "Покупателях" какая-то "засада" - но это уже мне разбираться.