Народ, поделитесь алгоритмом, выводящим первую дату месяца (по-месячно) в периоде)

например, апрель - июнь

01.04.2015
01.05.2015
01.06.2015

запросом через РПК

ВременнаяДата1 = Дата1;
Пока ВременнаяДата1 < Дата2 Цикл
  МассивПериодов.Добавить(НачалоМесяца(ВременнаяДата1));
  ВременнаяДата1 = ДобавитьМесяц(ВременнаяДата1, 1);
КонецЦикла;

500 рублей

(3) согласен за 499

Сделаю за еду

запросом?

МесяцНачальный = НачалоМесяца(ЭтаФорма.НачПериода);
    МесяцКонечный = НачалоМесяца(ЭтаФорма.КонПериода);
    
    ЗакупочныеЦены.Очистить();
    
    Пока  МесяцНачальный <= МесяцКонечный Цикл
        
        НовСтрока         = ЗакупочныеЦены.Добавить();
        НовСтрока.Месяц    = МесяцНачальный;
        МесяцНачальный     = ДобавитьМесяц(МесяцНачальный, 1);
        
    КонецЦикла;

Вот универсальная функция, разбивающая большой период [А, Б] на маленькие (Чего = месяца, дня, недели, квартала, года). Функция возвращает массив структур ("НачалоПериода, КонецПериода"), название элементов структуры также задаются

Вот текст функции

Функция РазбитьПериод8(Знач А, Б, Чего = "Месяца", Поля = "НачалоПериода, КонецПериода") Экспорт    
    М = Новый Массив;    
    Выполнить(СтрЗаменить("Пока А< =Б Цикл М.Добавить(Новый Структура(Поля,А,Мин(Край(А),Б)));А=Край(А)+1 КонецЦикла", "Край", "Конец" + Чего));
    Возврат М
КонецФункции

Функция взята отсюда:
http://catalog.mista.ru/public/158625/ .