Функция ОтборРДней()Экспорт
   ЗапросРД = Новый Запрос;
   ЗапросРД.Текст =
   
   "ВЫБРАТЬ
   |  ДатаКалендаря, ВидДня
   |ИЗ    
   |  РегистрСведений.РегламентированныйПроизводственныйКалендарь
   |ГДЕ    
   |  ДатаКалендаря МЕЖДУ &ДатаП И &ДатаК И
   |  ВидДня = ЗНАЧЕНИЕ(Перечисление.ВидыДнейПроизводственногоКалендаря.Рабочий)
   |УПОРЯДОЧИТЬ ПО
   |  ДатаКалендаря";
   
   
   ЗапросРД.УстановитьПараметр("ДатаП",  ДатаП);
   ЗапросРД.УстановитьПараметр("ДатаК",  ДатаК);
   РезультатЗапроса = ЗапросРД.Выполнить().Выбрать();
   
   
   КЧ = Новый КвалификаторыЧисла(12,2);
   Массив = Новый Массив;
   Массив.Добавить(Тип("Число"));
   Тип = Новый ОписаниеТипов(Массив, , , КЧ);
   
   ТаблицаЗначений = Новый ТаблицаЗначений;
   ТаблицаЗначений.Колонки.Добавить("ФорматМ");
   ТаблицаЗначений.Колонки.Добавить ("Число");
   ТаблицаЗначений.Колонки.Добавить("Количество");
   
   Пока РезультатЗапроса.Следующий() Цикл
       
       НеФорматМесяц = РезультатЗапроса.ДатаКалендаря;
       
       ФорматМ =  формат(НеФорматМесяц,"ДФ="" ММММ гггг  """);
       НоваяСтрока = ТаблицаЗначений.Добавить();
       
       
       НоваяСтрока.ФорматМ = ФорматМ;
       ТаблицаЗначений.ЗаполнитьЗначения(1,"Число");
       ТаблицаЗначений.Свернуть("ФорматМ","Число");
       
   КонецЦикла;
   
   Для Каждого ТекущаяСтрока Из ТаблицаЗначений Цикл
       Сообщить(ТекущаяСтрока.ФорматМ);
       Сообщить(ТекущаяСтрока.Число);
       
   КонецЦикла;
КонецФункции

Нужно получить
Апрель - 21
Май - 20

и тд

что надо ?

выгржай сразу в ТЗ

Как ?

без свертки
Апрель 2011
Апрель 2011
Апрель 2011
Апрель 2011
Апрель 2011
Апрель 2011

и так сколько кол дней

а Нужно получить
Апрель - 21
Май - 20

и тд

Зачем определять описание типов, а потом его не использовать?

не успел выкинуть из кода

Функция ОтборРДней()Экспорт
   ЗапросРД = Новый Запрос;
   ЗапросРД.Текст =
   
   "ВЫБРАТЬ
   |  ДатаКалендаря, ВидДня
   |ИЗ    
   |  РегистрСведений.РегламентированныйПроизводственныйКалендарь
   |ГДЕ    
   |  ДатаКалендаря МЕЖДУ &ДатаП И &ДатаК И
   |  ВидДня = ЗНАЧЕНИЕ(Перечисление.ВидыДнейПроизводственногоКалендаря.Рабочий)
   |УПОРЯДОЧИТЬ ПО
   |  ДатаКалендаря";
   
   
   ЗапросРД.УстановитьПараметр("ДатаП",  ДатаП);
   ЗапросРД.УстановитьПараметр("ДатаК",  ДатаК);
   РезультатЗапроса = ЗапросРД.Выполнить().Выбрать();
   
       
   ТаблицаЗначений = Новый ТаблицаЗначений;
   ТаблицаЗначений.Колонки.Добавить("ФорматМ");
   ТаблицаЗначений.Колонки.Добавить ("Число");
   ТаблицаЗначений.Колонки.Добавить("Количество");
   
   Пока РезультатЗапроса.Следующий() Цикл
       
       НеФорматМесяц = РезультатЗапроса.ДатаКалендаря;
       
       ФорматМ =  формат(НеФорматМесяц,"ДФ="" ММММ гггг  """);
       НоваяСтрока = ТаблицаЗначений.Добавить();
       
       
       НоваяСтрока.ФорматМ = ФорматМ;
       ТаблицаЗначений.ЗаполнитьЗначения(1,"Число");
       ТаблицаЗначений.Свернуть("ФорматМ","Число");
       
   КонецЦикла;
   
   Для Каждого ТекущаяСтрока Из ТаблицаЗначений Цикл
       Сообщить(ТекущаяСтрока.ФорматМ);
       Сообщить(ТекущаяСтрока.Число);
       
   КонецЦикла;
КонецФункции

где описание задачи ?

Нужно получить количество не рабочих дней в месяцах из запроса

Очень ... Надо просьба помочь ):

С ТЗ только сегодня познакомился вот и проблема ):

ЗапросРД.Текст =
   
   "ВЫБРАТЬ
   |  НачалоПериода(ДатаКалендаря, Месяц) КАК НачалоМесяца,
   |  СУММА(1) КАК ЧислоДней
   |ИЗ    
   |  РегистрСведений.РегламентированныйПроизводственныйКалендарь
   |ГДЕ    
   |  ДатаКалендаря МЕЖДУ &ДатаП И &ДатаК И
   |  ВидДня = ЗНАЧЕНИЕ(Перечисление.ВидыДнейПроизводственногоКалендаря.Рабочий)
   |СГРУППИРОВАТЬ ПО  
   |  НачалоПериода(ДатаКалендаря, Месяц)
  |УПОРЯДОЧИТЬ ПО
   |  НачалоМесяца";
   
   
   ЗапросРД.УстановитьПараметр("ДатаП",  ДатаП);
   ЗапросРД.УстановитьПараметр("ДатаК",  ДатаК);
   ТаблицаЗначений = ЗапросРД.Выполнить().Выгрузить();
   ТаблицаЗначений.Колонки.Добавить("ФорматМ");
   Для Каждого Стр Из ТаблицаЗначений Цикл
       Стр.ФорматМ = формат(Стр.НачалоМесяца,"ДФ="" ММММ гггг  """);
   КонецЦикла;

пробую ....

Спасибо большое , а как получить Количество

Апрель - 21
Май - 20

и тд (В этом то и проблема)

Спасибо огромное "hhhh"   я тупонул все получилось )))))) уря я день убил на это (:

Сообщить(Стр.ЧислоДней);