Код

	БазаДанных = СоздатьОбъект("ODBCDatabase");

	БазаДанных.Соединение("Driver={SQL Server};Server=ИМЯСЕРВЕРА;Database=ИМЯБАЗЫ;Uid=sa;Pwd=ПАРОЛЬ;");
	Если БазаДанных.ЕстьСоединение() = 0 Тогда
		Предупреждение(БазаДанных.ПолучитьОписаниеОшибки(),0);
		Возврат;
	КонецЕсли;    

	RecordSet = СоздатьОбъект("ODBCRecordSet");
	RecordSet.УстБД(БазаДанных);

	СписокНоменклатуры = СоздатьОбъект("СписокЗначений");
	ТЗДок = СоздатьОбъект("ТаблицаЗначений");
	Докум.ВыгрузитьТабличнуюЧасть(ТЗДок,"Номенклатура");
	ТЗДок.Выгрузить(СписокНоменклатуры);  

	RecordSet.УложитьСписокОбъектов(СписокНоменклатуры,"#ВыбТовар","Номенклатура");
    
	НачМес = НачМесяца(РабочаяДата());
	РабДата = Лев(Формат(НачМес,"ДГГГГММДД"),4) + "-" + Сред(Формат(НачМес,"ДГГГГММДД"),5,2) + "-" + Прав(Формат(НачМес,"ДГГГГММДД"),2);

	ТекстЗапроса = "
	|Select
	|    Номенклатура [Номенклатура $Справочник.Номенклатура],
	|    КоличествоОстаток Количество
	|FROM
	|     (
	|   select
	|   rg328_vt.sp331 as Номенклатура,
	|   sum(rg328_vt.sp342) as КоличествоОстаток
	|   from rg328 as rg328_vt (nolock)
	|   where rg328_vt.period={d '"+РабДата+"'}
	|   and (rg328_vt.sp4061 = '     3CDP' AND rg328_vt.sp7442 = '     5XOB' AND rg328_vt.sp331 in (Select val from #ВыбТовар))
	|   group by
	|   rg328_vt.sp331
	|   having
	|   sum(rg328_vt.sp342) <> 0
	|   ) as РегОстатки  
	|";  

	ТЗИтогов = глПолучитьВыборку(RecordSet, ТекстЗапроса,);
    
	RecordSet.УстБД1С();  

Код

|SELECT Продажи.IDDOC [Документ $Документ.Реализация]
   |, $Продажи.Номенклатура [Номенклатура $Справочник.Номенклатура]
   |, $Продажи.Покупатель [Покупатель $Справочник.Контрагенты]
   |, $Продажи.Фирма [Фирма $Справочник.Фирмы]
   |, Sum($Продажи.Количество) СуммаКоличество
   |FROM $Регистр.Продажи AS Продажи With (NOLOCK)
   |INNER JOIN (SELECT Номенклатура.ID Ссылка
   |, $Номенклатура.IDD IDD
   |FROM $Справочник.Номенклатура AS Номенклатура With (NOLOCK)
   |WHERE ($Номенклатура.IDD = :ИДДНоменклатура)) AS Подзапрос ON $Продажи.Номенклатура = Подзапрос.Ссылка
   |INNER JOIN (SELECT Журнал.IDDOC Документ
   |, Журнал.DATE_TIME_IDDOC ДатаВремяИдДок
   |, Журнал.IDDOCDEF Документ_вид
   |FROM _1SJOURN AS Журнал With (NOLOCK)
   |WHERE (Журнал.DATE_TIME_IDDOC > :НачДата)
   |AND (Журнал.DATE_TIME_IDDOC <= :КонДата)
   |AND (Журнал.IDDOCDEF = $ВидДокумента.Реализация)) AS Подзапрос1 ON Продажи.IDDOC = Подзапрос1.Документ
   |INNER JOIN (SELECT Фирмы.ID Ссылка
   |, $Фирмы.IDD IDD
   |FROM $Справочник.Фирмы AS Фирмы With (NOLOCK)
   |WHERE ($Фирмы.IDD = :ИДДФирма)) AS Подзапрос2 ON $Продажи.Фирма = Подзапрос2.Ссылка
   |INNER JOIN (SELECT $Контрагенты.IDD IDD
   |, Контрагенты.ID Ссылка
   |FROM $Справочник.Контрагенты AS Контрагенты With (NOLOCK)
   |WHERE ($Контрагенты.IDD = :ИДДКонтрагент)) AS Подзапрос3 ON $Продажи.Покупатель = Подзапрос3.Ссылка
   |GROUP BY Продажи.IDDOC
   |, $Продажи.Номенклатура
   |, $Продажи.Покупатель
   |, $Продажи.Фирма