1С8. Пример: запрос к таблице значений.

Фрагмент программы с запросом к таблице значений. Таблица значений (ТЗФайлыИзделий) имеет область видимости "модуль" и выполняет роль таблицы "а-ля" встроенной "in-memory" БД. Наполнение ее данными происходит за пределами описанной ниже функции.

//-----------------------------------------------------------------------------
// Заполнить таблицу значений - ТЗФайлыИзделий, номенклатурой из текстовых файлов 
Функция ЗаполнитьТЗ(
	каталогИсточник,
	каталогПриемник,
	каталогНеПрошедших
	);
	
	
	Запрос = Новый Запрос;
	// объявляем новый обеъкт для организации запроса к таблице значений ТЗФайлыИзделий
	Запрос.МенеджерВременныхТаблиц = Новый МенеджерВременныхТаблиц;

	// передаем ссылку на ТЗ в параметр
	Запрос.УстановитьПараметр("ТЗ1",ТЗФайлыИзделий);
	
	// непосредственно запрос к ТЗФайлыИзделий. Всю таблицу значений ТЗФайлыИзделий помещаем в 
	// результат запроса ТЗ 
	Запрос.Текст = "
	|ВЫБРАТЬ *	
	|	ПОМЕСТИТЬ ТЗ
	|	ИЗ &ТЗ1 КАК ТЗ1";	
	Запрос.Выполнить();
		
	Запрос.Текст = "	
	|ВЫБРАТЬ
	|   ТЗ.*	
	|	,СерииНоменклатуры.Владелец.ВидНоменклатуры     как ВидНоменклатуры	
	|	,&каталогИсточник как каталогИсточник 
	|	,&каталогПриемник как каталогПриемник
	|	,&каталогНеПрошедших как каталогНеПрошедших
	|   ПОМЕСТИТЬ ТЗ2
	|ИЗ
	|	ТЗ 
	|	ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Номенклатура КАК Номенклатура
	|		ПО ТЗ.Код = Номенклатура.Код
	|;
	|/////////////////////////////////////////////////////////////////////////
	|ВЫБРАТЬ * ИЗ ТЗ2;
	|";
	

	Запрос.УстановитьПараметр("каталогИсточник",каталогИсточник );
	Запрос.УстановитьПараметр("каталогПриемник",каталогПриемник );
	Запрос.УстановитьПараметр("каталогНеПрошедших",каталогНеПрошедших );	
	Результат = Запрос.Выполнить();	
	ТЗФайлыИзделий = Результат.Выгрузить(); // заполним ТЗ	
	Выборка   = Результат.Выбрать();
	
	строкиТаблицы = "";
	Пока Выборка.Следующий() Цикл
		
		строкиТаблицы = строкиТаблицы + Символы.Таб  
			+ Выборка["ИмяФайла"] + Символы.Таб
			+ Выборка["ВидНоменклатуры_Код"] + Символы.Таб
			+ Выборка["ВидНоменклатуры"] + Символы.Таб
			+ Выборка["каталогИсточник"] + Символы.Таб
			+ Выборка["каталогПриемник"] + Символы.Таб
			+ Выборка["каталогНеПрошедших"]
			+ Символы.ВК
			;
	КонецЦикла;
	msg("	строкиТаблицы ТЗФайлыИзделий: " + Символы.ВК + строкиТаблицы);
	
	Выборка.Сбросить();	// переместить указатель записей таблицы на начало
	Возврат Выборка;	
	
КонецФункции	




Рекламный блок:

Предлагаем решение Ваших задач 1С.

Внедрение 1С:

Доработка и сопровождение 1С:

Ориентировочная стоимость работ программиста 1С : 500 р. за 1 час работы.

Пишите: j008@j008.ru

Звоните: 8 916 710 83 51 Ольга