Код

//--{ Остатки с Партиями
		Сообщить("---01--");
		ЗапросПР_1 = СоздатьОбъект("ODBCRecordSet");
		Если ФлагИтогиАктуальны=1 Тогда
			стрДат="";
		Иначе        
			meta1 = СоздатьОбъект("MetaDataWork");
			ЗапросПР_1.УстановитьТекстовыйПараметр("ВыбДата", );
			стрДат=":ВыбДата"
		КонецЕсли;

		Сообщить("---02--");

		ЗапросПР_1.УложитьСписокОбъектов(СписокТМЦ, "#ГруппаТ_РН_ПР1", "ТМЦ");

		Сообщить("---03--");

		ЗапросПР_1.УстановитьТекстовыйПараметр("Складп", Склад.ТекущийЭлемент());
		ЗапросПР_1.УстановитьТекстовыйПараметр("ВыбФирма", ПустаяФирма);

		Сообщить("---04--");


		ТекстЗапросаПР_1 = "
		|SELECT
		|  Max(Рег.Фирма) [Фирма $Справочник.Фирмы]
		|, Рег.ТМЦ [ТМЦ $Справочник.ТМЦ]
		|, Max(Рег.Склад) [Склад $Справочник.Склады]
		|, Рег.Партия [Партия $Справочник.Партии]
		|, Рег.Сномер СНомер
		|, SUM(Рег.КвоОстаток) Кво
		|, SUM(Рег.СуммаГрнОстаток) СуммаГрн
		|, SUM(Рег.СуммаБезНДСОстаток) СуммаБезНДС
		|, SUM(Рег.СуммаОснОстаток) СуммаОсн
		|, SUM(Рег.НаценкаОстаток) Наценка
		|FROM
		|  $РегистрОстатки.Остатки("+стрДат+",,
		|  		Фирма = :ВыбФирма AND Склад = :Складп AND ТМЦ IN (SELECT Val FROM #ГруппаТ_РН_ПР1),
		|		(Фирма,ТМЦ,Склад,Партия,СНомер),) as Рег
		|GROUP BY Рег.ТМЦ, Рег.Партия, Рег.Сномер
		|";

		Сообщить("---05--");

		ЗапросПР_1.РежимRPC(1);
		ТаблОст = ЗапросПР_1.ВыполнитьИнструкцию(ТекстЗапросаПР_1);
		ЗапросПР_1=0;
		meta1=0;

		Сообщить("---06--");
 

Код

---01--
---02--
Internal error:
State 42000, native 924, message [Microsoft][ODBC SQL Server Driver][SQL Server]Database '...' is already open and can only have one user at a time.
---03--
---04--
---05--
ТаблОст = ЗапросПР_1.ВыполнитьИнструкцию(ТекстЗапросаПР_1);
{Документ.РасходнаяНакладная.Модуль Документа(1061)}: State 42S02, native 208, message [Microsoft][ODBC SQL Server Driver][SQL Server]Invalid object name '#ГруппаТ_РН_ПР1'.
Документ не проведен!