Код

	|SELECT
	|	COUNT(жОбщий.IDDOCDEF) as колво
	|	, жОбщий.IDDOCDEF as докВид
	|FROM
	|	_1SJourn as жОбщий (NOLOCK)
	|GROUP BY жОбщий.IDDOCDEF
 

Код

//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
	вСписИдентов = СоздатьОбъект("СписокЗначений");
	СЦ = 0;
	Для СЦ = 1 По Метаданные.Документ() Цикл
		вИдДокСтр = Метаданные.Документ(СЦ).Идентификатор;
		вИдДок = глМетаДатаВерк.ИДДокумента(вИдДокСтр);
		вСписИдентов.ДобавитьЗначение(вИдДокСтр,вИдДок);
	КонецЦикла;
	вРекордСет = СоздатьОбъект("ODBCRecordset");
	//вРекордСет.УстановитьТекстовыйПараметр("ВыбФирма",ВыбФирма);
	//вРекордСет.УложитьСписокОбъектов(ВыбТовар,"#ВыбТовар");
	ТекстЗапроса = "
	|SELECT
	|	COUNT(жОбщий.IDDOCDEF) as колво
	|	, жОбщий.IDDOCDEF as докВид
	|FROM
	|	_1SJourn as жОбщий (NOLOCK)
	|GROUP BY жОбщий.IDDOCDEF
	|";
	Попытка
		вТаблаЗнач = вРекордСет.ВыполнитьИнструкцию(ТекстЗапроса);
	Исключение
		Сообщить(ОписаниеОшибки()+"[200612011246]");
		Возврат;
	КонецПопытки;
	вТаблаЗнач.НоваяКолонка("Вид","Строка");
	вТаблаЗнач.ВыбратьСтроки();
	вТаблаЗнач.ВыбратьСтроки();
	Пока вТаблаЗнач.ПолучитьСтроку() = 1 Цикл
		вТаблаЗнач.Вид = вСписИдентов.Получить(вТаблаЗнач.докВид);
	КонецЦикла;

	глПросмотрОбъекта(вТаблаЗнач);
КонецПроцедуры