//Выберите месяц формирования

СписокМесяцев = Новый СписокЗначений;

ТекДата = НачалоМесяца(РабочаяДата);

Для Мес = -15 по 15 Цикл

	ТекМес = ДобавитьМесяц(ТекДата, Мес);

	СписокМесяцев.Добавить(ТекМес, Формат(ТекМес, "ДФ='ММММ гггг'"));

КонецЦикла;	

ВыбранЗначение = СписокМесяцев.ВыбратьЭлемент("Выберите месяц:", СписокМесяцев.НайтиПоЗначению(ТекДата));

Если ВыбранЗначение = Неопределено Тогда 

	Сообщить("Месяц не выбран ");

Иначе 

	Сообщить("Первый день выбранного месяца: "+ ВыбранЗначение.Значение);	

	Сообщить("Представление выбранного месяца: "+ ВыбранЗначение.Представление);

КонецЕсли;