Как составить запрос

Новая тема
Здравствуйте!

Помогите, пожалуйста, составить запрос формирующий таблицу с полями:
1. Тип документа (например документ.Табель)
2. Количество документов данного типа в информационной базе

Заранее благодарен Vol2hv
Володя, ты бы хоть озвучил конфигурацию? Да и предложил бы свое решение, а то как телепатить уже неохота!
Конфигурация значения не имеет. Задача звучит так : посчитать колическтво документов каждого типа, список типов этих документов берется из методанных конфигурации. Решения кроме как программно составлять текст запроса у меня нет. А это объединение подзапросов количеством равным числу документов в конфигурации
"сработало вот это

ТекстЗапроса = """";ТекстОбъединить = " ОБЪЕДИНИТЬ ВСЕ ";	  Для каждого Документ Из Метаданные.Документы Цикл  ТекстЗапроса = ТекстЗапроса +  "ВЫБРАТЬ  |""""" + Документ.Имя + """"" КАК ИмяДокумента,  |КОЛИЧЕСТВО(Ссылка) КАК КоличествоВБазе  |ИЗ Документ." + Документ.Имя  + ТекстОбъединить;КонецЦикла;ТекстЗапроса = Лев(ТекстЗапроса, СтрДлина(ТекстЗапроса)-16);Запрос = Новый Запрос;Запрос.Текст = ТекстЗапроса;ТаблицаРезультата = Запрос.Выполнить().Выгрузить();
"
Бгг, "Сработало". Не иначе магия.
"тот же результат

Процедура КнопкаВыполнитьНажатие(Кнопка)
// Вставить содержимое обработчика.
ТекстЗапроса = """";
ТекстОбъединить = """";
//ТекстОбъединить = " ОБЪЕДИНИТЬ ВСЕ ";
       
Для каждого Документ Из Метаданные.Документы Цикл
 ТекстЗапроса = ТекстЗапроса + ТекстОбъединить+
 "ВЫБРАТЬ
 |""""" + Документ.Имя + """"" КАК ИмяДокумента,
 |КОЛИЧЕСТВО(Ссылка) КАК КоличествоВБазе
 |ИЗ Документ." + Документ.Имя;
 ТекстОбъединить = " ОБЪЕДИНИТЬ ВСЕ ";
КонецЦикла;
//ТекстЗапроса = Лев(ТекстЗапроса, СтрДлина(ТекстЗапроса)-16);
Запрос = Новый Запрос;
Запрос.Текст = ТекстЗапроса;
ТаблицаРезультата = Запрос.Выполнить().Выгрузить();
ТаблицаРезультата.ВыбратьСтроку();
КонецПроцедуры"
Как говорится, "...только в профиль".
"если Вы "любите" запросы, то сделайте здесь ,чтобы в таблицу попадали тоько те "доки" у которых количество>0.
Мне просто в глаза бросилось решение:

ТекстЗапроса = Лев(ТекстЗапроса, СтрДлина(ТекстЗапроса)-16);

ну и не удержался,это очень технически- отсюда и "профиль""
Я не понял, что Вы хотели сказать этим сообщением.
если "разъяснит", будет еще непонятней.
Читают тему
(гостей: 1)

Быстрый переход